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