Orbital elements: Difference between revisions
Content added Content deleted
SqrtNegInf (talk | contribs) m (→{{header|Perl}}: Fix link: Perl 6 --> Raku) |
Thundergnat (talk | contribs) m (Fix Perl 6 -> Raku in comments) |
||
Line 696: | Line 696: | ||
Say "Position :" ps~x~tostring |
Say "Position :" ps~x~tostring |
||
Say "Speed :" ps~y~tostring |
Say "Speed :" ps~y~tostring |
||
Say ' |
Say 'Raku:' |
||
pi=rxCalcpi(16) |
pi=rxCalcpi(16) |
||
ps=orbitalStateVectors(1,.1,pi/18,pi/6,pi/4,0) /* |
ps=orbitalStateVectors(1,.1,pi/18,pi/6,pi/4,0) /*Raku*/ |
||
Say "Position :" ps~x~tostring |
Say "Position :" ps~x~tostring |
||
Say "Speed :" ps~y~tostring |
Say "Speed :" ps~y~tostring |
||
Line 802: | Line 802: | ||
<pre>Position : (0.7794228433986798,0.4500000346536842,0) |
<pre>Position : (0.7794228433986798,0.4500000346536842,0) |
||
Speed : (-0.5527708409604436,0.9574270831797613,0) |
Speed : (-0.5527708409604436,0.9574270831797613,0) |
||
Raku: |
|||
Perl6: |
|||
Position : (0.2377712839822067,0.8609602616977158,0.1105090235720755) |
Position : (0.2377712839822067,0.8609602616977158,0.1105090235720755) |
||
Speed : (-1.061933017480060,0.2758500205692495,0.1357470248655981)</pre> |
Speed : (-1.061933017480060,0.2758500205692495,0.1357470248655981)</pre> |