Orbital elements: Difference between revisions
Content added Content deleted
m (→{{header|Sidef}}: simplified the code to use the built-in Matrix class) |
m (→version 2: changed whitespace.) |
||
Line 1,066: | Line 1,066: | ||
speed= mulV( divV( speed, absV(speed) ), sqrt(2 / r - 1 / semiMaj) ) |
speed= mulV( divV( speed, absV(speed) ), sqrt(2 / r - 1 / semiMaj) ) |
||
say ' position:' show( mulV( MA(i, c, j, s), r) ) |
say ' position:' show( mulV( MA(i, c, j, s), r) ) |
||
say ' speed:' show( speed) |
say ' speed:' show( speed); return |
||
return |
|||
/*──────────────────────────────────────────────────────────────────────────────────────*/ |
/*──────────────────────────────────────────────────────────────────────────────────────*/ |
||
absV: procedure; parse arg x y z; return sqrt(x**2 + y**2 + z**2) |
absV: procedure; parse arg x y z; return sqrt(x**2 + y**2 + z**2) |