Orbital elements: Difference between revisions

Content added Content deleted
m (→‎{{header|REXX}}: version 1 - replace pi() by pi=3.14etc)
m (→‎REXX version 1: fix the literal)
Line 890: Line 890:
Numeric Digits (2*prec)
Numeric Digits (2*prec)
Numeric Fuzz 3
Numeric Fuzz 3
pi=left('3.1415926535897932384626433832795028841971693993751058209749445923,2*prec+1)
pi=left('3.1415926535897932384626433832795028841971693993751058209749445923',2*prec+1)
Do While x>pi
Do While x>pi
x=x-pi
x=x-pi