https://www.ibiblio.org/apollo/ScansForConversion/Luminary099/0633.jpg

5504 (L697) remove comma not in scan
5505 (L698) remove comma, remove space not in scan
5513 (L706) (un)correct "RA1" → "RAI"; realign whitespace in comment
5515 (L708) realign whitespace in comment
5518 (L711) realign whitespace in comment
5520 (L713) realign whitespace in comment
5523 (L716) realign whitespace in comment
5525 (L718) realign whitespace in comment
5528 (L721) realign whitespace in comment
5529 (L722) realign whitespace in comment
5530 (L723) remove tab not reflected in scan
5531 (L724) realign whitespace in comment
5536 (L729) realign whitespace in comment
5538 (L731) realign whitespace in comment
This commit is contained in:
Nathan Scott 2020-10-25 11:44:42 +11:00
parent 7e6e52dde0
commit 2dcbb4813e

View file

@ -696,8 +696,8 @@ CSI/A CLEAR SET # INITIALIZE INDICATORS
S32.1F2 # FIRST PASS FOR NEWTON ITERATION INDICATR
# Page 633
CLEAR SET
S32.1F3A # 00=1ST 2 PASSES 2ND CYCLE, 01=FIRST CYCLE
S32.1F3B # 10=2ND CYCLE, 11=50 FPS STAGE 2ND CYCLE
S32.1F3A # 00=1ST 2 PASSES 2ND CYCLE 01=FIRST CYCLE
S32.1F3B # 10=2ND CYCLE 11=50FPS STAGE 2ND CYCLE
DLOAD
P30ZERO
STORE LOOPCT
@ -705,32 +705,32 @@ CSI/A CLEAR SET # INITIALIZE INDICATORS
CSI/B SETPD VLOAD
0D
RACT1
ABVAL PUSH # RA1 B29 PL02D
ABVAL PUSH # RAI B29 PL02D
NORM SR1
X2 # B29-N2+ B1 PL04D
X2 # B29-N2+ B1 PL04D
PDVL ABVAL
RPASS3
NORM BDDV # RA1/RP3 B1 PL02D
NORM BDDV # RA1/RP3 B1 PL02D
X1
XSU,2 SR* # B2
XSU,2 SR* # B2
X1
1,2
DAD DMP # (1+(RA1/RP3))RA1 B29+B2=B31 PL00D
DAD DMP # (1+(RA1/RP3))RA1 B29+B2=B31 PL00D
1DPB2
NORM PDDL # PL02D
NORM PDDL # PL02D
X1
RTMU
SR1 DDV # B38-B31= B7 PL00D
SL* SQRT # B7
0 -7,1
PDVL UNIT # PL02D
SR1 DDV # B38-B31= B7 PL00D
SL* SQRT # B7
0 -7,1
PDVL UNIT # PL02D
RACT1
PDVL VXV
UP1
UNIT # UNIT(URP1 X UVP1 X URA1) = UH1
DOT SL1 # VA1 . UH1 B7
DOT SL1 # VA1 . UH1 B7
VACT1
BDSU STADR # PL00D
BDSU STADR # PL00D
STODL DELVCSI
INITST # 10 FPS
STORE DELDV