Orbital elements: Difference between revisions
→{{header|Perl 6}}: change arguments and output format
(→{{header|zkl}}: added code) |
(→{{header|Perl 6}}: change arguments and output format) |
||
Line 121:
$speed *= sqrt(2/r - 1/$semimajor-axis);
{ :
}
Line 127:
semimajor-axis => 1,
eccentricity => 0.1,
inclination =>
longitude-of-ascending-node => pi/6,
argument-of-periapsis =>
true-anomaly => 0;
</lang>
{{out}}
<pre>{position =>
=={{header|zkl}}==
| |||