From 3b0fe95e4258f2f6bbb003fb7149fac64c4d63c0 Mon Sep 17 00:00:00 2001 From: Chris Smith Date: Thu, 9 Jul 2020 13:34:39 -0400 Subject: [PATCH] Proof DAP_INTERFACE_SUBROUTINES #574 (#683) --- Luminary099/DAP_INTERFACE_SUBROUTINES.agc | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/Luminary099/DAP_INTERFACE_SUBROUTINES.agc b/Luminary099/DAP_INTERFACE_SUBROUTINES.agc index 254609a..02c9bb4 100644 --- a/Luminary099/DAP_INTERFACE_SUBROUTINES.agc +++ b/Luminary099/DAP_INTERFACE_SUBROUTINES.agc @@ -38,7 +38,7 @@ # MOD 1 1/23/67 MODIFICATION BY PETER ADLER # # FUNCTIONAL DESCRIPTION -# HEREIN IS A COLLECTION OF SUBROUTINES WHICH ALLOW MISSION CONTROL PROGRAMS TO CONTROL THE MODE +# HEREIN ARE A COLLECTION OF SUBROUTINES WHICH ALLOW MISSION CONTROL PROGRAMS TO CONTROL THE MODE # AND INTERFACE WITH THE DAP. # # CALLING SEQUENCES @@ -60,8 +60,8 @@ # Page 1407 # SUBROUTINE NAMES: # SETMAXDB, SETMINDB, RESTORDB, PFLITEDB -# MODIFIED: 30 JANUARY 1968 BY P. S. WEISSMAN TO CREATE RESTORDB. -# MODIFIED: 1 MARCH 1968 BY P. S. WEISSMAN TO SAVE EBANK AND CREATE PFLITEDB +# MODIFIED: 30 JANUARY 1968 BY P S WEISSMAN TO CREATE RESTORDB. +# MODIFIED: 1 MARCH 1968 BY P S WEISSMAN TO SAVE EBANK AND CREATE PFLITEDB # # FUNCTIONAL DESCRIPTION: # SETMAXDB -- SET DEADBAND TO 5.0 DEGREES @@ -156,7 +156,7 @@ ALLCOAST EXTEND # SAVE Q FOR RETURN QXCH RUPTREG2 # Page 1409 TC STOPRATE # CLEAR RATE INTERFACE. RETURN WITH A=0 - LXCH EBANK # AND L=EBANK6. SAVE CALLER'S EBANK. + LXCH EBANK # AND L=EBANK6. SAVE CALLER'S EBANK. TS AOSQ TS AOSQ +1 TS AOSR