proof(luminary099): page 1161

This commit is contained in:
Taís Massaro 2021-10-29 17:09:37 +00:00 committed by GitHub
parent fd2c5ae56f
commit ff0daa961c

View File

@ -104,7 +104,7 @@
# * +5 FOR MOON *
# X1 (38D) * NONE * INDEX REGISTER SET TO -2D OR -10D ACCORDING TO WHETHER THE EARTH OR MOON,
# * * RESPECTIVELY, IS THE CENTRAL BODY
# TAU * +28 * DESIRED TRANSFER TIME IN CENTISECONDS (DP)
# TAU. * +28 * DESIRED TRANSFER TIME IN CENTISECONDS (DP)
# * * MAY BE POS OR NEG AND ABSOLUTE VALUE MAY BE GREATER OR LESS THAN ONE ORBITAL PERIOD.
# XKEPNEW * +17 FOR EARTH* DP GUESS OF ROOT X OF KEPLERS EQN IN SQRT(METERS). SIGN SHOULD AGREE WITH THAT OF TAU.
# * +16 FOR MOON * AND ABS VALUE SHOULD BE LESS THAN THAT CORRESPONDING TO A PERIOD,VIZ, 2PI SQRT(SEMI-
@ -114,10 +114,13 @@
# XPREV * +17 FOR EARTH* DP PREV. VALUE OF X IN SQRT(METERS). MUST BE LESS THAN AN X CORRESPONDING TO ONE
# * +16 FOR MOON * ORBITAL PERIOD,VIZ,2PI SQRT(SEMI-MAJOR AXIS)
#
#
# SUBROUTINES CALLED -
# DELTIME
#
#
# CALLING SEQUENCE AND NORMAL EXIT MODES -
#
# KEPRTN-2 GOTO # MUST BE IN INTERPRETIVE MODE BUT OVFIND ARBITRARY.
# KEPRTN-1 KEPLER # RETURNS WITH XPREV IN MPAC. PL IS AT 0.
# KEPRTN ... # CONTINUE
@ -126,10 +129,13 @@
# THE INTERRUPTED JOB. THEREFORE THE USER MUST CALL CSMCONIC OR LEMCONIC WHICH GUARANTEES NO INTERRUPTS AND WHICH
# ALSO CALLS KEPPREP TO COMPUTE A GUESS OF XKEPNEW.
#
#
# ABORT EXIT MODES -
# NONE
#
#
# OUTPUT -
#
# * SCALE FACTOR *
# VARIABLE *IN POWERS OF 2* DESCRIPTION AND REMARKS
# -------- *--------------* -----------------------