Google
 

Trailing-Edge - PDP-10 Archives - klad_sources - klad.sources/dakac.seq
There are no other files named dakac.seq in the archive.
MAINDEC-10-DAKAC.TXT
                                                                                                                           SEQ 0001




			IDENTIFICATION
			--------------

	PRODUCT CODE:	MAINDEC-10-DAKAC-B-D

	PRODUCT NAME:	DECSYSTEM10 PDP-10 KA10 BASIC
			INSTRUCTION DIAGNOSTIC (3)

	FUNCTION:	LOGICAL, HALF WORD, ADDER

	VERSION:	0.2

	DATE RELEASED:	JANUARY 1977

	MAINTAINED BY:	DIAGNOSTIC ENGINEERING GROUP

	AUTHOR:		JOHN R. KIRCHOFF

COPYRIGHT(C) 1976,1977
DIGITAL EQUIPMENT CORPORATION
MARLBORO, MASS. 01752

THIS SOFTWARE IS FURNISHED UNDER A LICENSE FOR USE ONLY
ON A SINGLE COMPUTER SYSTEM AND MAY BE COPIED ONLY WITH
THE INCLUSION OF THE ABOVE COPYRIGHT NOTICE.  THIS SOFTWARE,
OR ANY OTHER COPIES THEREOF, MAY NOT BE PROVIDED OR OTHERWISE
MADE AVAILABLE TO ANY OTHER PERSON EXECPT FOR USE ON SUCH SYSTEM
AND TO ONE WHO AGREES TO THESE LICENSE TERMS.  TITLE TO AND
OWNERSHIP OF THE SOFTWARE SHALL AT ALL TIMES REMAIN IN DEC.

THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT
NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL
EQUIPMENT CORPORATION.

DEC ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS
SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DEC.
							MAINDEC-10-DAKAC.TXT
							PAGE 2                                                             SEQ 0002


			TABLE OF CONTENTS
			-----------------

1.0	ABSTRACT

2.0	REQUIREMENTS

2.1	EQUIPMENT

2.2	STORAGE

2.3	PRELIMINARY PROGRAMS

3.0	PROGRAM PROCEDURES

3.1	LOADING PROCEDURE

3.2	STARTING PROCEDURE

3.3	OPERATING PROCEDURE

4.0	ERRORS

5.0	ITERATION COUNTER

6.0	CYCLE TIME

7.0	OPERATIONAL VARIATIONS

8.0	MISCELLANEOUS

9.0	LISTING
							MAINDEC-10-DAKAC.TXT
							PAGE 3                                                             SEQ 0003


1.0	ABSTRACT

	THIS PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC IS THE
	THIRD IN A SERIES OF PDP-10 KA10 PROCESSOR DIAGNOSTICS.
	THE DIAGNOSTIC TESTS SOME FOLLOWING INSTRUCTIONS.
	LOGICAL TEST, HALF WORD INSTRUCTIONS AND THE ADDER.

2.0	REQUIREMENTS

2.1	EQUIPMENT

	A PDP-10 KA10 WITH A MINIMUM OF 32K OF MEMORY

	PAPER-TAPE READER
	DECTAPE (OPTIONAL)
	CONSOLE TELETYPE

2.2	STORAGE

	THE PROGRAM RUNS WITHIN 32K OF MEMORY.

2.3	PRELIMINARY PROGRAMS

	CONSOLE FUNCTIONS WORKING PROPERLY
	PAPER-TAPE OR DECTAPE READ-IN WORKING PROPERLY
	PREVIOUS PROCESSOR DIAGNOSTICS
							MAINDEC-10-DAKAC.TXT
							PAGE 4                                                             SEQ 0004


3.0	PROGRAM PROCEDURES

3.1	LOADING PROCEDURE

	PAPER TAPE - HARDWARE READ-IN (READER DEVICE CODE 104)
	DECTAPE - LOAD WITH DIAMON (DECTAPE DEVICE CODE 320)

3.2	STARTING PROCEDURE

	STAND-ALONE STARTING ADDRESS IS 30000.

	IF THE DIAGNOSTIC FAILS TO START CORRECTLY TRY STARTING AT THE
	FIRST TEST INSTEAD OF AT THE BEGINNING OF THE CONTROL SEQUENCE.
	(SEE LISTING).

3.3	OPERATING PROCEDURE

	ONCE STARTED THE PROGRAM WILL CYCLE CONTINUALLY UNTIL STOPPED
	OR AN ERROR OCCURS.

4.0	ERRORS

	ERRORS ARE IN THE FORM OF HALT INSTRUCTIONS.  THE LISTING
	SHOULD BE CONSULTED TO DETERMINE THE CAUSE OF THE ERROR.  A
	NO OPERATION (JUMP) INSTRUCTION FOLLOWS EACH HALT.  THIS
	MAY BE USEFUL IN CONSTRUCTING A SCOPE LOOP TO CYCLE ON THE
	FAILING INSTRUCTION.

5.0	ITERATION COUNTER

	THE ITERATION COUNT OF THE PROGRAM IS DISPLAYED IN THE MEM-
	ORY INDICATORS (MI).  THIS COUNT IS A DECREMENTING COUNT AND
	INITIALLY STARTS AT -1 IN STAND-ALONE OPERATION.

6.0	CYCLE TIME

	THE CYCLE TIME OF THE PROGRAM IS IN THE MILLISECOND RANGE AND
	IS THEREFORE SUITABLE FOR TAKING MARGINS, VIBRATION TESTS, ETC.

							MAINDEC-10-DAKAC.TXT
							PAGE 5                                                             SEQ 0005


7.0	OPERATIONAL VARIATIONS

	A.  DIAGNOSTIC MONITOR

	    THE PROGRAM IS USABLE WITH THE DIAGNOSTIC MONITOR TO PRO-
	    VIDE RELIABILITY TESTS, ACCEPTANCE TESTS, AND/OR TO PRO-
	    VIDE A QUICK METHOD OF ISOLATION OF A FAULT TO A PARTICULAR
	    AREA OF THE PROCESSOR.  CERTAIN PROCEDURES ARE USED WHEN
	    THE PROGRAM IS USED IN THIS MANNER.  THEY ARE:

	    1.  THE DIAGNOSTIC MONITOR TRANSFERS CONTROL TO THE PRO-
		GRAM AND STARTS IT AT LOCATION 30002.

	    2.  MONCTL - LOCATION 30043 IS USED AS THE DIAGNOSTIC MON-
		ITOR CONTROL FLAG WORD.

	B.  USER MODE

	    THE PROGRAM WILL OPERATE IN USER MODE AND AS SUCH PROVIDES
	    ASSURANCE THAT THE PROCESSOR IS PERFORMING ALL FUNCTIONS
	    CORRECTLY.  USER MODE STARTING ADDRESS IS 30000.

	C.  SYSTEM EXERCISER

	    STARTING ADDRESS IS 30003.  NO DATA SWITCHES ARE USED BY
	    THIS PROGRAM.

8.0	MISCELLANEOUS

	NONE

9.0	LISTING
	THIS IS A HISTORY OF THE DEVELOPMENT OF MAINDEC-10-DAKAC
                                                                                                                           SEQ 0006
************************************************************************

PRODUCT CODE:		MAINDEC-10-DAKAC

PRODUCT NAME:		BASIC INSTRUCTION DIAGNOSTIC #3

DATE RELEASED:		JANUARY 1977

VERSION:		0.2

UPDATE AUTHOR:		JOHN R. KIRCHOFF

CHANGES MADE:

	1. UPGRADE TO ALLOW COMPATABILITY WITH THE SUBROUTINE PACKAGE.

************************************************************************

ORIGINAL VERSION:	0.1

ORIGINAL AUTHOR:	RICHARD MALISKA

ORIGINAL RELEASE:	16-MAR-72

************************************************************************
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 1
DAKACT	MAC	19-JAN-77 13:36		DIAGNOSTIC PARAMETERS                                                              SEQ 0007

     1					;DAKAC
     2
     3
     4
     5			000002			DECVER==2
     6			000000			MCNVER==0
     7
     8						XLIST
     9						LIST
    10						LALL
    11						NAME	\MCNVER,\DECVER^
    12
    13					TITLE	DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2
    14					^
    15
    16					;TEST DESIGNED FOR INITIAL DEBUGGING OF PROCESSOR HARDWARE
    17					;AND TO DETECT (SOLID) FAILURES IN THE FIELD.
    18
    19					;COPYRIGHT 1972,1977
    20					;DIGITAL EQUIPMENT CORPORATION
    21					;MARLBORO, MASS. 01752
    22
    23					;JOHN R. KIRCHOFF
    24					;DICK MALISKA
    25
    26	000137					LOC	137
    27	000137	000000	000002			MCNVER,,DECVER
    28
    29						NOSYM
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 2
DAKACT	MAC	19-JAN-77 13:36		DIAGNOSTIC PARAMETERS                                                              SEQ 0008

    30					SUBTTL	DIAGNOSTIC PARAMETERS
    31					;PARAMETER DEFINITIONS
    32			000001		EXCASB==1
    33			000001		USRASB==1
    34			000001		PGMEND==1
    35			000100		DEBUG==100
    36
    37					;FLAG DEFINITIONS
    38			010000		USERF=10000		;USER MODE FLAG
    39
    40
    41					;MACROS
    42
    43					; STOP - USED FOR SCOPE LOOP, IF INSTRUCTION FAILS, CHANGE (JUMPA .+1)
    44					;	 TO A (JUMPA .-X) TO CYCLE ON FAILING INSTRUCTION
    45
    46					DEFINE	STOP	(A)<
    47						HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
    48						JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
    49									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
    50									;IN THE SUBTEST) TO LOOP ON ERROR>
    51
    52					;SPECIAL FEATURE PARAMETERS
    53
    54			030741		SADR1=STARTA
    55			030741		SADR2=STARTA
    56			030741		SADR3=STARTA
    57			030741		SADR4=STARTA
    58		254000	030741		SADR5=JRST STARTA
    59		254000	030741		SADR6=JRST STARTA
    60		254000	030741		SADR7=JRST STARTA
    61		254000	030741		SADR8=JRST STARTA
    62		254000	030741		SADR9=JRST STARTA
    63		254000	030741		SADR10=JRST STARTA
    64		254000	030741		SADR11=JRST STARTA
    65
    66			000000		PAREA0=0
    67			000000		PAREA1=0
    68			000000		PAREA2=0
    69		444153	414300		PAREA3=SIXBIT/DAKAC/
    70		645560	000000		PAREA4=SIXBIT/TMP/
    71			000000		PAREA5=0
    72			000000		PAREA6=0
    73			001000		ITERAT==1000
    74			000001		PGMEND==1
    75						.DIRECTIVE	.OKOVL
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 1
PARAM	KLM	18-JAN-77 11:38		*PARAM*	CONSOLE DATA SWITCH ASSIGNMENTS, JAN 18,1977                               SEQ 0009

    76					SUBTTL	*PARAM*	CONSOLE DATA SWITCH ASSIGNMENTS, JAN 18,1977
    77
    78					DEFINE	S,<;*********************************************************************>
    79
    80					S^;*********************************************************************^
    81					;*DATA SWITCHES (READ FROM CONSOLE IN EXEC MODE OR TYPED IN IN USER MODE)
    82					;*LEFT HALF SWITCHES ARE PRE-ASSIGNED FOR SUBROUTINE PACKAGE USE
    83					;*AND CONTROL LOOPING, PRINTING (TTY OR OTHER DEVICE) AND MISC. FUNCTIONS
    84					S^;*********************************************************************^
    85
    86			400000		ABORT==	400000			;ABORT PROGRAM ON PASS COMPLETION
    87			200000		RSTART==200000			;RESTART TEST, PRINT TOTALS
    88			100000		TOTALS==100000			;PRINT TOTALS, CONTINUE
    89
    90			040000		NOPNT==	040000			;INHIBIT ALL PRINT/TYPE OUT (EXCEPT FORCED)
    91			020000		PNTLPT==020000			;PRINT ALL DATA ON LPT (LOGICAL DEVICE, USER MODE)
    92			010000		DING==	010000			;RING BELL ON ERROR
    93
    94			004000		LOOPER==004000			;ENTER EXERCISE/CHECK LOOP ON ERROR
    95			002000		ERSTOP==002000			;HALT ON TEST ERROR
    96			001000		PALERS==001000			;PRINT ALL ERRORS
    97
    98			000400		RELIAB==000400			;RELIABILITY MODE
    99			000200		TXTINH==000200			;INHIBIT ERROR TEXT
   100			000100		INHPAG==000100			;INHIBIT PAGING
   101
   102			000040		MODDVC==000040			;MODIFY DEVICE CODE
   103			000020		INHCSH==000020			;INHIBIT CACHE
   104			000010		OPRSEL==000010			;OPERATOR SELECTION
   105
   106			000004		CHAIN==	000004			;CHAIN CONTROL SWITCH
   107
   108			000002		KAHZ50==000002			;KA10 50 HERTZ POWER
   109
   110									;SWITCH 17 RESERVED !!!
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 2
PARAM	KLM	18-JAN-77 11:38		*PARAM* PROGRAM/SUBROUTINE PARAMETERS, JAN 18,1977                                 SEQ 0010

   111					SUBTTL	*PARAM* PROGRAM/SUBROUTINE PARAMETERS, JAN 18,1977
   112
   113					S^;*********************************************************************^
   114					;*SPECIAL SUBPROGRAM LINKAGES
   115					S^;*********************************************************************^
   116
   117			027772		FSELNK=	27772	;FILE SELECT LINK
   118			027773		FRDLNK=	27773	;FILE READ LINK
   119			027774		LDLNK=	27774	;LOAD LINKAGE ADDRESS
   120			027775		DDTLNK=	27775	;DDT LINKAGE ADDRESS
   121			027776		MODLNK=	27776	;OPERATIONAL MODE CHECK LINKAGE ADDRESS
   122			027777		SUBLNK=	27777	;SUBROUTINE LINKAGE ADDRESS
   123
   124					S^;*********************************************************************^
   125					;*SPECIAL SUBROUTINE FATAL HALTS
   126					;*USED TO REPORT ERRORS THAT CAUSE THE SUBROUTINES TO BE UNUSABLE
   127					S^;*********************************************************************^
   128
   129					;ADDRESS   TAG	REASON
   130					;---------------------
   131
   132					; 1010 	NOEXEC	;PROGRAM NOT CODED FOR EXEC MODE OPERATION
   133					; 1011  PLERR	;FATAL PUSH LIST POINTER ERROR
   134					; 1012  PLERR1	;INITIAL PUSH LIST POINTER ERROR
   135					; 1013  MUOERR	;MUUO WITH LUUO HANDLER WIPED OUT
   136					; 1014  DTEBER	;DTE20 INTERRUPT WITHOUT DOORBELL
   137					; 1015  DTECER	;DTE20 CLOCK INTERRUPT WITHOUT FLAG SET
   138					; 1016  CPIERR	;CPU INITIALIZATION ERROR
   139					; 1017  EOPERR	;END OF PROGRAM ERROR
   140					; 1020  LUOERR	;INTERRUPT WITH LUUO HANDLER WIPED OUT
   141
   142					S^;*********************************************************************^
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 3
PARAM	KLM	18-JAN-77 11:38		*PARAM* PROGRAM/SUBROUTINE PARAMETERS, JAN 18,1977                                 SEQ 0011

   143					S^;*********************************************************************^
   144					;OPERATOR DEFINITIONS (NON-UUO'S)
   145					S^;*********************************************************************^
   146
   147		260740	000000		OPDEF	GO	[PUSHJ	P,]	;SUBROUTINE CALL
   148		263740	000000		OPDEF	RTN	[POPJ	P,]	;SUBROUTINE RETURN 
   149		261740	000000		OPDEF	PUT	[PUSH	P,]	;PUT DATA ON PUSH LIST
   150		262740	000000		OPDEF	GET	[POP	P,]	;GET DATA FROM PUSH LIST 
   151		254000	000000		OPDEF	PJRST	[JRST	]	;JRST TO ROUTINE THAT RTN'S
   152		254200	000000		OPDEF	HALT	[JRST	4,]	;DEFINITION FOR DDT
   153		254100	000000		OPDEF	JRSTF	[JRST	2,]	;DEFINITION FOR DDT
   154		254500	000000		OPDEF	JEN	[JRST	12,]	;DEFINITION FOR DDT
   155
   156					S^;*********************************************************************^
   157					;*SUBROUTINE INITIALIZATION CALL
   158					S^;*********************************************************************^
   159
   160		265000	030011		OPDEF	PGMINT	[JSP	0,SBINIT]	;SUBROUTINE INITIALIZATION
   161
   162					S^;*********************************************************************^
   163					;*HALTING UUO'S (A MORE GRACEFUL HALT THAN SIMPLY USING THE HALT INSTRUCTION).
   164					S^;*********************************************************************^
   165
   166		037640	000004		OPDEF	FATAL	[37B8!15B12!4]	;FATAL PROGRAMMING HALT
   167		037600	000004		OPDEF	ERRHLT	[37B8!14B12!4]	;PROGRAM ERROR HALT
   168
   169					S^;*********************************************************************^
   170					;*TERMINAL INPUT UUO'S
   171					;*ALWAYS COME FROM THE CONSOLE TERMINAL IN EXEC MODE OR THE
   172					;*CONTROLLING TERMINAL (REAL TERMINAL OR PTY) IN USER MODE.
   173					S^;*********************************************************************^
   174
   175		037000	000003		OPDEF	TTICHR 	[37B8!0B12!3]	;TTY, INPUT ANY CHARACTER
   176		037040	000003		OPDEF	TTIYES	[37B8!1B12!3]	;TTY, NORMAL RETURN Y
   177		037100	000003		OPDEF	TTINO	[37B8!2B12!3]	;TTY, NORMAL RETURN N
   178		037140	000003		OPDEF	TTIOCT	[37B8!3B12!3]	;TTY, INPUT OCTAL WORD
   179		037200	000003		OPDEF	TTIDEC	[37B8!4B12!3]	;TTY, INPUT DECIMAL WORD
   180		037240	000003		OPDEF	TTICNV	[37B8!5B12!3]	;TTY, INPUT CONVERTABLE WORD
   181		037300	000003		OPDEF	TTLOOK	[37B8!6B12!3]	;TTY, KEYBOARD CHECK
   182		037340	000003		OPDEF	TTALTM	[37B8!7B12!3]	;TTY, ALT-MODE CHECK
   183		037400	000003		OPDEF	TTSIXB	[37B8!10B12!3]	;TTY, INPUT SIXBIT WORD
   184		037440	000003		OPDEF	TTYINP	[37B8!11B12!3]	;TTY, IMAGE MODE INPUT
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 4
PARAM	KLM	18-JAN-77 11:38		*PARAM* PROGRAM/SUBROUTINE PARAMETERS, JAN 18,1977                                 SEQ 0012

   185					;*TERMINAL OUTPUT UUO'S.
   186
   187		037000	000000		OPDEF	PNTA	[37B8!0B12!0]	;PRINT ASCII WORD
   188		037000	000001		OPDEF	PNTAF	[37B8!0B12!1]	;PRINT ASCII WORD FORCED
   189		037740	000000		OPDEF	PNTAL	[37B8!17B12!0]	;PRINT ASCIZ LINE
   190		037740	000001		OPDEF	PNTALF	[37B8!17B12!1]	;PRINT ASCIZ LINE FORCED
   191		037600	000003		OPDEF	PSIXL	[37B8!14B12!3]	;PRINT SIXBIT'Z LINE
   192		037640	000003		OPDEF	PSIXLF	[37B8!15B12!3]	;PRINT SIXBIT'Z LINE FORCED
   193		037000	000000		OPDEF	PNTMSG	[37B8!0B12!0]	;PRINT MESSAGE IMMEDIATE
   194		037040	000000		OPDEF	PNTMSF	[37B8!1B12!0]	;PRINT MESSAGE IMMEDIATE FORCED
   195		037100	000000		OPDEF	PSIXM	[37B8!2B12!0]	;PRINT SIXBIT'Z MSG IMMEDIATE
   196		037200	000000		OPDEF	PSIXMF	[37B8!4B12!0]	;PRINT SIXBIT'Z MSG IMM FORCED
   197		037000	000000		OPDEF	PNTCI	[37B8!0B12!0]	;PRINT CHARACTER IMMEDIATE
   198		037040	000000		OPDEF	PNTCIF	[37B8!1B12!0]	;PRINT CHARACTER IMMEDIATE FORCED
   199		037500	000000		OPDEF	PNTCHR	[37B8!12B12!0]	;PRINT CHARACTER
   200		037500	000001		OPDEF	PNTCHF	[37B8!12B12!1]	;PRINT CHARACTER FORCED
   201		037040	000000		OPDEF	PNT1	[37B8!1B12!0]	;PRINT ONE OCTAL DIGIT
   202		037040	000001		OPDEF	PNT1F	[37B8!1B12!1]	;PRINT 1 OCTAL DIGIT FORCED	
   203		037100	000000		OPDEF	PNT2	[37B8!2B12!0]	;PRINT TWO OCTAL DIGITS
   204		037100	000001		OPDEF	PNT2F	[37B8!2B12!1]	;PRINT 2 OCTAL DIGITS FORCED	
   205		037140	000000		OPDEF	PNT3	[37B8!3B12!0]	;PRINT THREE OCTAL DIGITS
   206		037140	000001		OPDEF	PNT3F	[37B8!3B12!1]	;PRINT THREE OCTAL DIGITS FORCED	
   207		037200	000000		OPDEF	PNT4	[37B8!4B12!0]	;PRINT FOUR OCTAL DIGITS
   208		037200	000001		OPDEF	PNT4F	[37B8!4B12!1]	;PRINT FOUR OCTAL DIGITS FORCED
   209		037240	000000		OPDEF	PNT5	[37B8!5B12!0]	;PRINT FIVE OCTAL DIGITS
   210		037240	000001		OPDEF	PNT5F	[37B8!5B12!1]	;PRINT FIVE OCTAL DIGITS FORCED
   211		037300	000000		OPDEF	PNT6	[37B8!6B12!0]	;PRINT SIX OCTAL DIGITS
   212		037300	000001		OPDEF	PNT6F	[37B8!6B12!1]	;PRINT SIX OCTAL DIGITS FORCED
   213		037340	000000		OPDEF	PNT7	[37B8!7B12!0]	;PRINT 7 OCTAL DIGITS
   214		037340	000001		OPDEF	PNT7F	[37B8!7B12!1]	;PRINT 7 OCTAL DIGITS FORCED
   215		037440	000000		OPDEF	PNT11	[37B8!11B12!0]	;PRINT 11 OCTAL DIGITS
   216		037440	000001		OPDEF	PNT11F	[37B8!11B12!1]	;PRINT 11 OCTAL DIGITS FORCED.
   217		037400	000000		OPDEF	PNTADR	[37B8!10B12!0]	;PRINT PHYSICAL ADDRESS
   218		037400	000001		OPDEF	PNTADF	[37B8!10B12!1]	;PRINT PHYSICAL ADDRESS FORCED
   219		037600	000000		OPDEF	PNTOCT  [37B8!14B12!0]	;PRINT FULL WORD OCTAL
   220		037600	000001		OPDEF	PNTOTF	[37B8!14B12!1]	;PRINT FULL WORD OCTAL FORCED
   221		037540	000000		OPDEF	PNTHW	[37B8!13B12!0]	;PRINT OCTAL HALF WORDS, 6 SP 6
   222		037540	000001		OPDEF	PNTHWF	[37B8!13B12!1]	;PRINT OCTAL HALF WORDS, 6 SP 6 FORCED
   223		037700	000003		OPDEF	PNTOCS	[37B8!16B12!3]	;PRINT OCTAL, SUPPRESS LEADING 0'S
   224		037740	000003		OPDEF	PNTOCF	[37B8!17B12!3]	;PRINT OCTAL, SUPPRESS LEADING 0'S FORCED
   225		037640	000000		OPDEF	PNTDEC	[37B8!15B12!0]	;PRINT DECIMAL, SUPRESS LEADING 0'S
   226		037640	000001		OPDEF	PNTDCF	[37B8!15B12!1]	;PRINT DECIMAL, SUPRESS LEADING 0'S FORCED
   227		037700	000000		OPDEF	PNTDS	[37B8!16B12!0]	;PRINT DECIMAL, SPACES FOR LD 0'S
   228		037700	000001		OPDEF	PNTDSF	[37B8!16B12!1]	;PRINT DECIMAL, SPACES FOR LD 0'S FORCED
   229		037200	000002		OPDEF	PNTNM	[37B8!4B12!2]	;PRINT PROGRAM NAME
   230		037000	000002		OPDEF	PNTSIX	[37B8!0B12!2]	;PRINT SIXBIT WORD
   231		037040	000002		OPDEF	PNTSXF	[37B8!1B12!2]	;PRINT SIXBIT WORD FORCED
   232		037240	000002		OPDEF	DROPDV	[37B8!5B12!2]	;CLOSE LOGICAL FILE, USER MODE
   233		037100	000002		OPDEF	PNTCW	[37B8!2B12!2]	;PRINT DF10 CONTROL WORD
   234		037140	000002		OPDEF	PNTCWF	[37B8!3B12!2]	;PRINT DF10 CONTROL WORD FORCED
   235		037000	030242		OPDEF	PCRL	[37B8!0B12!CRLF] ;PRINT CARRIAGE RETURN/LINE FEED
   236		037040	030242		OPDEF	PCRLF	[37B8!1B12!CRLF] ;PRINT CARRIAGE RETURN/LINE FEED FORCED
   237		037000	000040		OPDEF	PSP	[37B8!0B12!40]	;PRINT SPACE
   238		037040	000040		OPDEF	PSPF	[37B8!1B12!40]	;PRINT SPACE FORCED
   239		037000	030243		OPDEF	PCRL2	[37B8!0B12!CRLF2] ;PRINT CARRIAGE RETURN/LINE FEED (TWICE)
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 4-1
PARAM	KLM	18-JAN-77 11:38		*PARAM* PROGRAM/SUBROUTINE PARAMETERS, JAN 18,1977                                 SEQ 0013

   240		037040	030243		OPDEF	PCRL2F	[37B8!1B12!CRLF2] ;PRINT CARRIAGE RETURN/LINE FEED (TWICE) FORCED
   241		037040	000007		OPDEF	PBELL	[37B8!1B12!7]	;PRINT TTY BELL
   242
   243		037040	000026		OPDEF	PFORCE	[37B8!1B12!26]	;PRINT FORCE, CONTROL O OVERRIDE
   244
   245					DEFINE	PMSG	(ARG),<
   246						PSIXM	[SIXBIT\ARG'_\]>
   247
   248					DEFINE	PMSGF	(ARG),<
   249						PSIXMF	[SIXBIT\ARG'_\]>
   250
   251					;*SIXBTZ -- MACRO TO GENERATE SIXBIT DATA FOR PRINTING
   252					;*	CONSERVES CORE OVER ASCIZ
   253
   254					DEFINE	SIXBTZ	(ARG),<	[SIXBIT\ARG'_\]>
   255
   256					;*CONSOLE SWITCH INPUT UUO.
   257					;*READS CONSOLE SWITCHES IF IN EXEC MODE OR ASKS FOR THEM IF
   258					;* USER MODE.
   259
   260		037400	000002		OPDEF	SWITCH	[37B8!10B12!2]	;INPUT CONSOLE SWITCHES
   261
   262					;*CLOCK INITIALIZATION UUO - TO SET DESIRED CLOCK OPERATION
   263					;*EITHER IGNORE CLOCK, ONLY LET IT TICK OR CAUSE INTERRUPT TO OCCUR.
   264
   265		037540	000004		OPDEF	CLOKOP	[37B8!13B12!4]	;CLOCK OPERATION UUO - PDP-11 CLOCK
   266		037200	000004		OPDEF	MTROP	[37B8!4B12!4]	;CLOCK OPERATION UUO - DK20 METER
   267
   268					;*KL10 ONLY CACHE OPERATION UUO'S
   269
   270		037040	000004		OPDEF	CINVAL	[37B8!1B12!4]	;CACHE INVALIDATE
   271		037100	000004		OPDEF	CFLUSH	[37B8!2B12!4]	;CACHE FLUSH
   272		037140	000004		OPDEF	CWRTBI	[37B8!3B12!4]	;CACHE WRITE-BACK & INVALIDATE
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 5
PARAM	KLM	18-JAN-77 11:38		*PARAM* PROGRAM/SUBROUTINE PARAMETERS, JAN 18,1977                                 SEQ 0014

   273					;*END OF PASS/PROGRAM UUOS
   274
   275					;PERFORMS THE END OF PASS FUNCTIONS. INCREMENT PASS COUNT,
   276					;*DECREMENT ITERATION COUNT, CHECK IF FINISHED WITH THIS PROGRAM ETC.
   277
   278		037500	000004		OPDEF	ENDUUO	[37B8!12B12!4]	;UUO TO DISPLAY LIGHTS
   279		037700	000004		OPDEF	EOPUUO	[37B8!16B12!4]	;END OF PROGRAM UUO
   280
   281					;*MEMORY MANAGEMENT UUO'S
   282					;*UUO'S TO PERFORM VARIOUS MEMORY FUNCTIONS. MAPPING, ZEROING, PAGING,
   283					;*ADDRESS CONVERSION, ETC...
   284
   285		037000	000004		OPDEF	MAPMEM	[37B8!0B12!4]	;MAP MEMORY
   286		037500	000002		OPDEF	MEMZRO	[37B8!12B12!2]	;ZERO MEMORY
   287		037440	000002		OPDEF	MEMSEG	[37B8!11B12!2]	;SETUP MEMORY SEGMENT
   288		037540	000002		OPDEF	MAPADR	[37B8!13B12!2]	;VIRTUAL TO PHYSICAL ADR CONVERT
   289		037640	000002		OPDEF	MAPCNK	[37B8!15B12!2]	;MAP MEMORY CHUNK
   290		037600	000002		OPDEF	MAPSET	[37B8!14B12!2]	;SET KI10 EXEC PAGE MAP
   291		037740	000002		OPDEF	MAPPNT	[37B8!17B12!2]	;PRINT MEMORY MAP
   292
   293					;*DEVICE CODE MODIFICATION UUO
   294					;*ALLOWS THE MODIFICATION OF IOT'S TO ONE DEVICE TO BE CHANGED TO
   295					;*IOT'S TO A DIFFERENT DEVICE CODE.
   296
   297		037340	000002		OPDEF	MODPCU	[37B8!7B12!2]	;MODIFY PERHIPERAL CODE, USER
   298		037300	000002		OPDEF	MODPCP	[37B8!6B12!2]	;MODIFY PERHIPERAL CODE, PROGRAM
   299
   300			030000			IFNDEF	MODDVL,<MODDVL==BEGIN>
   301			030000			IFNDEF	MODDVU,<MODDVU==BEGIN>
   302
   303					;*"DIAMON" FILE SELECTION AND READ UUOS
   304
   305		037240	000004		OPDEF	FSELECT	[37B8!5B12!4]	;FILE SELECTION
   306		037300	000004		OPDEF	FREAD	[37B8!6B12!4]	;FILE READ - ASCII DATA
   307		037340	000004		OPDEF	FRD36	[37B8!7B12!4]	;FILE READ - 36 BIT DATA
   308		037400	000004		OPDEF	FRD8	[37B8!10B12!4]	;FILE READ - 8 BIT DATA
   309
   310					;*KI10 ONLY UUO FOR PRINTING MARGIN VALUES
   311
   312		037700	000002		OPDEF	PNTMGN	[37B8!16B12!2]	;PRINT MARGIN VALUE
   313
   314						XLIST
   315					IFNDEF	KLOLD,<LIST
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 6
PARAM	KLM	18-JAN-77 11:38		ERROR HANDLING UUO DEFINITIONS, JAN 18,1977                                        SEQ 0015

   316					SUBTTL	ERROR HANDLING UUO DEFINITIONS, JAN 18,1977
   317
   318					S^;*********************************************************************^
   319					;*ERROR HANDLER PARAMETERS
   320					S^;*********************************************************************^
   321
   322		036000	000000		OPDEF	ERUUO	[36B8]		;ERROR CALL UUO
   323		035000	000000		OPDEF	ERLOOP	[35B8]		;ERROR LOOP, CHECKS PC,REPT,REPT1,ERROR
   324		035040	000000		OPDEF	ERLP1	[35B8!1B12]	;ERROR LOOP IF PC'S MATCH
   325		035100	000000		OPDEF	ERLP2	[35B8!2B12]	;ERROR LOOP IF ANY ERROR
   326		034000	000000		OPDEF	REPTUO	[34B8]		;REPEAT LOOP UUO
   327
   328					;*THE ERROR HANDLER MACROS
   329
   330					;*A MACRO TO REPORT AN ERROR AND LOOP
   331
   332						DEFINE	ERROR	(ADR,FORMAT,CORECT,ACTUAL,F,D,ERR)<
   333						SALL
   334						ERUUO	FORMAT,[T,,[SIXBIT\F'_\]
   335							   CORECT,,ACTUAL
   336							   [SIXBIT\D'_\],,ERR]
   337						XALL
   338					
   339						ERLOOP	ADR		;IF ERROR, LOOP TO ADR
   340					>
   341
   342					;*A MACRO TO REPORT AN ERROR AND NOT LOOP
   343
   344						DEFINE	ERROR1	(FORMAT,CORECT,ACTUAL,F,D,ERR)<
   345						SALL
   346						ERUUO	FORMAT,[T,,[SIXBIT\F'_\]
   347							   CORECT,,ACTUAL
   348							   [SIXBIT\D'_\],,ERR]
   349						XALL	>
   350
   351					>;END OF KLOLD CONDITIONAL
   352
   353						XLIST
   354						LIST
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 1
FIXED	KLM	18-JAN-77 11:39		*FIXED* FIXED CONTROL AND DISPATCH STORAGE, JAN 18,1977                            SEQ 0016

   355					SUBTTL	*FIXED* FIXED CONTROL AND DISPATCH STORAGE, JAN 18,1977
   356
   357	030000					LOC	30000
   358
   359					S^;*********************************************************************^
   360					;*PROGRAM STARTING ADDRESSES
   361					;*THESE ADDRESSES CALL VARIOUS SPECIAL START ROUTINES AND OR OPTIONS
   362					;*NORMAL START ADDRESS IS 30000 ALL OTHERS ARE SPECIAL. INVOKED BECAUSE
   363					;*OF END OF PASS, POWER FAILURE, DDT START, RE-ENTERING(TYPICALLY USER
   364					;*MODE), OR ANY NUMBER OF SPECIAL FEATURE TESTS.
   365					S^;*********************************************************************^
   366
   367	030000	254 00 1 00 027776 	BEGIN:	JRST	@MODLNK		;STAND-ALONE START
   368	030001	254 00 0 00 030712 	$START:	JRST	START		;MODE CHECK STARTING ADDRESS
   369
   370	030002	254 00 1 00 027774 	DIAGMN:	JRST	@LDLNK		;DIAGNOSTIC MONITOR START
   371
   372	030003	254 00 1 00 027774 	SYSEXR:	JRST	@LDLNK		;SYSTEM EXERCISER START
   373
   374	030004	254 00 0 00 030741 	SFSTRT:	JRST	SADR1		;SPECIAL FEATURE START
   375
   376	030005	254 00 0 00 030741 	PFSTRT:	JRST	SADR2		;POWER FAIL RESTART
   377
   378	030006	254 00 0 00 030741 	REENTR:	JRST	SADR3		;REENTER START(USUALLY USER MODE ONLY)
   379
   380	030007				SRTDDT:				;COMMONLY MISTAKEN NAME FOR "DDTSRT"
   381	030007	254 00 1 00 027775 	DDTSRT:	JRST	@DDTLNK		;DDT START
   382
   383	030010	254 00 0 00 030741 	BEGIN1:	JRST	STARTA		;LOOP START(END OF PASS COMES HERE)
   384	030011	254 00 1 00 027777 	SBINIT:	JRST	@SUBLNK		;PMGINT LINKAGE
   385	030012	000000	000000		RETURN:	0			;RETURN ADDRESS STORAGE
   386
   387	030013	254000	030741		START1:	SADR7			;OPTIONAL STARTING ADR/INSTRUCTIONS
   388	030014	254000	030741		START2:	SADR8			; "
   389	030015	254000	030741		START3:	SADR9			; "
   390	030016	254000	030741		START4:	SADR10			; "
   391	030017	254000	030741		START5:	SADR11			; "
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 2
FIXED	KLM	18-JAN-77 11:39		*FIXED* FIXED CONTROL AND DISPATCH STORAGE, JAN 18,1977                            SEQ 0017

   392					S^;*********************************************************************^
   393					;*PROGRAM FIXED PARAMETER AREA
   394					S^;*********************************************************************^
   395
   396	030020	444153	414300		PNTNAM:	PAREA3		;SIXBIT PROGRAM NAME
   397	030021	645560	000000		PNTEXT:	PAREA4		;SIXBIT PROGRAM EXTENSION
   398	030022	000000	000000		RANDBS:	PAREA1		;RANDOM BASE NUMBER
   399	030023	000000	000000		SWTEXR:	PAREA2		;SYSTEM EXERCISER SWITCHES
   400	030024	000000	001000		ITRCNT:	ITERAT		;PROGRAM ITERATIONS
   401	030025	000000	030725		$PNAME:	PGMNAM		;POINTER TO PROGRAMS NAME
   402	030026	000000	000002		$PVER:	MCNVER,,DECVER	;MCN & DEC VERSION LEVEL
   403	030027	000000	030000		$MODVL:	MODDVL		;DEVICE CODE CHANGE LOWER LIMIT
   404	030030	000000	030000		$MODVU:	MODDVU		;DEVICE CODE CHANGE UPPER LIMIT
   405	030031	777777	777777		$EMODE:	IFNDEF EXCASB,<0> IFDEF EXCASB,<-1>	;EXEC ALLOWED
   406	030032	777777	777777		$UMODE:	IFNDEF USRASB,<0> IFDEF USRASB,<-1>	;USER ALLOWED
   407	030033	000000	000000		$DSKUP:	IFNDEF DSKUPD,<0> IFDEF DSKUPD,<-1>	;DISK UPDATE MODE
   408	030034	000000	000000		$MMAP:	IFNDEF MEMMAP,<0> IFDEF MEMMAP,<-1>	;ALLOW MEMORY RTNS
   409	030035	000000	000000		PAREA7:	PAREA5		;OPTIONAL PARAMETER
   410	030036	000000	000000		PAREA8:	PAREA6		;OPTIONAL PARAMETER
   411
   412					S^;*********************************************************************^
   413					;*PROGRAM VARIABLE PARAMETER AREA
   414					S^;*********************************************************************^
   415
   416	030037	000000	000000		USER:	0		; 0 = EXEC, -1 = USER MODE FLAG
   417	030040	000000	000000		KAIFLG:	0		;PROCESSOR TYPE, 0 = KA10, -1 = KI10
   418	030041	000000	000000		KLFLG:	0		;PROCESSOR TYPE, 0 = KA/KI, -1 = KL10
   419	030042	777777	777777		MONFLG:	-1		;DIAG MONITOR SPECIAL USER FLAG
   420	030043	000000	000000		MONCTL:	0		;DIAG MON/SYS EXR FLAG
   421	030044	000000	000000		MONTEN:	0		;-1= LOADED BY 10
   422	030045	000000	000000		CLOCKF:	0		;CLOCK TICKED FLAG
   423	030046	000000	000000		CONSW:	0		;CONSOLE SWITCH SETTINGS
   424	030047	000000	000000		PASCNT:	0		;PROGRAM PASS COUNT
   425	030050	000000	000000		RUNFLG:	0		;PROGRAM RUN FLAG
   426	030051	000000	000000		TESTPC:	0		;SUBTEST PC
   427	030052	000000	000000		ERRPC:	0		;ERROR PC
   428	030053	000000	000000		ERRTLS:	0		;ERROR TOTALS
   429	030054	000000	000000		TICKS:	0		;PROGRAM RUNNING TIME
   430	030055	000000	000000		MARGIN:	0		;KI10 MARGIN WORD VALUE
   431	030056	000000	000000		$ONETM:	0		;SUBROUTINE INITIALIZATION FLAG
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 3
FIXED	KLM	18-JAN-77 11:39		*FIXED* FIXED CONTROL AND DISPATCH STORAGE, JAN 18,1977                            SEQ 0018

   432					S^;*********************************************************************^
   433					;*SPECIAL PROGRAM DISPATCH ADDRESSES
   434					S^;*********************************************************************^
   435
   436	030057	037 12 0 00 000004 	BEGEND:	ENDUUO		;END OF PASS
   437	030060	254 00 0 00 030010 	$BEND1:	JRST	BEGIN1	;KEEP RUNNING PROGRAM
   438	030061	037 16 0 00 000004 	$BEND2:	EOPUUO		;END OF PROGRAM - NO RETURN
   439	030062	254000	030741		CNTLC:	SADR5		;CONTROL C XFER ADDRESS
   440	030063	254000	030741		ALTMGO:	SADR6		;ALTMODE XFER ADDRESS
   441	030064				CPOPJ1:			;SKIP RETURN
   442	030064	350 00 0 17 000000 	UUOSKP:	AOS	(P)	;SKIP RETURN FROM UUO
   443	030065				CPOPJ:			;NON-SKIP REGULAR RETURN
   444	030065	263 17 0 00 000000 	UUOEXT:	RTN		;UUO RETURN
   445	030066	255 00 0 00 000000 	UUORTN:	JFCL		;ADDITIONAL USERS UUO ROUTINE
   446	030067	255 00 0 00 000000 	$UORTX:	JFCL		;ADDITIONAL UUO LINKAGE
   447	030070	255 00 0 00 000000 	$UUOER:	JFCL		;INITED AS (JRST $UOERX)
   448	030071	255 00 0 00 000000 	$ITRHL:	JFCL		;ADDITIONAL INTERRUPT LINKAGE
   449	030072	255 00 0 00 000000 	$ITRX1:	JFCL		; "
   450	030073	255 00 0 00 000000 	$USRHL:	JFCL		; "
   451	030074	255 00 0 00 000000 	$RSRTX:	JFCL		;ADDITIONAL POWER FAIL LINKAGE
   452	030075	255 00 0 00 000000 	$RSRTY:	JFCL		; "
   453	030076	255 00 0 00 000000 	RESRT1:	JFCL		; INITED AS (JRST RESRTX)
   454	030077	255 00 0 00 000000 	RESRT2:	JFCL		; "
   455	030100	255 00 0 00 000000 	$PARER:	JFCL		;ADDITIONAL PARITY ERROR LINKAGE
   456	030101	255 00 0 00 000000 	ERMORE:	JFCL		;ADDITIONAL ERROR HANDLER LINKAGE
   457	030102	254 04 0 00 030102 		HALT	.	;IMPROPER TRANSFER HALT
   458
   459	030103	000000	000000		$PSHER:	0		;INITED AS (JRST PSHERR)
   460	030104	000000	000000		ITRCH1:	0		;PC & FLAGS OF CURRENT INTERRUPT
   461	030105	000000	000000			0		;INITED AS (JRST $ITRC1)
   462
   463					S^;*********************************************************************^
   464					;*PROCESSOR CONTROL STORAGE
   465					S^;*********************************************************************^
   466
   467	030106	000000	000000		$ACC0:	0		;INTERRUPT SAVED AC0
   468	030107	000000	000000		$SVPI:	0		;INTERRUPT SAVED PI
   469	030110	000000	000000		$SVAPR:	0		;INTERRUPT SAVED APR
   470	030111	000000	000000		$SVPAG:	0		;INTERRUPT SAVED PAG (DATAI)
   471	030112	000000	000000		$SPAG1:	0		;INTERRUPT SAVED PAG (CONI)
   472
   473	030113	000000	000000		$SVUUO:	0		;CURRENT USERS UUO
   474	030114	000000	000000		$SVUPC:	0		;PC OF CURRENT USERS UUO
   475
   476	030115	000000	000000		REPTU:	0		;REPEAT UUO ITERATIONS
   477	030116	000000	000000		SCOPE:	0		;ERROR HANDLER SCOPE LOOP FLAG
   478	030117	000000	000000		%CORFLG:0		; " CORRECT FLAG
   479	030120	000000	000000		%COREC:	0		; " CORRECT DATA
   480	030121	000000	000000		%ACTFL:	0		; " ACTUAL FLAG
   481	030122	000000	000000		%ACTUL:	0		; " ACTUAL DATA
   482	030123	000000	000000		%DISCR:	0		; " DISCREPENCY DATA
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 4
FIXED	KLM	18-JAN-77 11:39		*FIXED* FIXED CONTROL AND DISPATCH STORAGE, JAN 18,1977                            SEQ 0019

   483					S^;*********************************************************************^
   484					;*UUO DISPATCH TABLE
   485					S^;*********************************************************************^
   486						XLIST
   487						LIST
   488	030124	030070	030070		UUODIS:	LUUO1,,$UUOER
   489	030125	030070	030070			LUUO3,,LUUO2
   490	030126	030070	030070			LUUO5,,LUUO4
   491	030127	030070	030070			LUUO7,,LUUO6
   492	030130	030070	030070			LUUO11,,LUUO10
   493	030131	030070	030070			LUUO13,,LUUO12
   494	030132	030070	030070			LUUO15,,LUUO14
   495	030133	030070	030070			LUUO17,,LUUO16
   496	030134	030070	030070			LUUO21,,LUUO20
   497	030135	030070	030070			LUUO23,,LUUO22
   498	030136	030070	030070			LUUO25,,LUUO24
   499	030137	030070	030070			LUUO27,,LUUO26
   500	030140	030070	030070			LUUO31,,LUUO30
   501	030141	030070	030070			LUUO33,,LUUO32
   502
   503					S^;*********************************************************************^
   504					;*MEMORY MANAGMENT STORAGE
   505					S^;*********************************************************************^
   506
   507	030142	000000	000000		DF22F:	0		;DF10 CONTROL FLAG, 0 = 18, -1 = 22 BIT
   508	030143	000000	000000		MAPNEW:	0		;MEMORY MAPPING CONTROL FLAG, -1 = 4096K MAPPING
   509	030144	000000	000000		MEMTOT:	0		;TOTAL MEMORY SIZE IN K (1024.)
   510	030145	000000	000000		MEMLOW:	0		;LOWEST USABLE MEMORY
   511	030146				MEMSIZ:	BLOCK ^D41	;MEMORY SEGMENT POINTER TABLE
   512
   513					S^;*********************************************************************^
   514					;*PRINT CONTROL STORAGE
   515					S^;*********************************************************************^
   516
   517	030217	000000	000000		PNTFLG:	0		;PRINT FLAG, -1 WHILE IN PRINT ROUTINE
   518	030220	000000	000000		PNTENB:	0		;PRINT ENABLE
   519	030221	000000	000000		PDISF:	0		;PRINT DISABLED FLAG
   520	030222	000000	000000		PNTINH:	0		;INHIBIT PRINT INPUT CHECKS
   521	030223	000000	000000		PNTSPC:	0		;PRINT SPACE CONTROL
   522	030224	000000	000000		OPTIME:	0		;TYPE-IN WAIT TIME
   523	030225	000000	000000		$TWCNT:	0		;TIME WAITED
   524	030226	000000	000000		$DVOFF:	0		;LOGICAL DEVICE INITED FLAG
   525	030227	000000	000000		TTYFIL:	0		;TTY EXEC FILLERS FLAG
   526	030230	000000	000000		TTYSPD:	0		;TTY EXEC BAUD RATE
   527	030231	000000	000000		$TTCHR:	0		;ACTUAL TYPED IN CHAR
   528	030232	000000	000000		$CHRIN:	0		;UPPER CASED & PARITY STRIPPED CHAR
   529	030233	000000	000000		$TYPNB:	0		;TYPED IN NUMBER
   530	030234	000000	000000		$CRLF:	0		;FREE CR/LF FLAG
   531	030235	000000	000000		$TABF:	0		;TAB CONVERSION FLAG
   532	030236	000000	000000		$FFF:	0		;FORM FEED CONVERSION FLAG
   533	030237	000000	000000		$VTF:	0		;VERTICAL TAB CONVERSION FLAG
   534	030240	000000	000000		USRLFF:	0		;USER LF FILLERS
   535	030241	000000	000000		USRCRF:	0		;USER CR FILLERS
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 5
FIXED	KLM	18-JAN-77 11:39		*FIXED* FIXED CONTROL AND DISPATCH STORAGE, JAN 18,1977                            SEQ 0020

   536					S^;*********************************************************************^
   537					;*THE FOLLOWING MISCELLANEOUS PRINT CHARACTERS ARE INCLUDED
   538					;*TO FACILITATE PRINTING AND ARE CALLED AS FOLLOWS:
   539					;*	MOVEI	NAME
   540					;*	PNTA		;OR PNTAF
   541					S^;*********************************************************************^
   542
   543	030242				CRLF:	ASCII/
   544	030242	015 012 000 000 000 	/
   545	030243				CRLF2:	ASCII/
   546
   547	030243	015 012 015 012 000 	/
   548	030244	054 000 000 000 000 	COMMA:	ASCII/,/
   549	030245	056 000 000 000 000 	PERIOD:	ASCII/./
   550	030246	040 000 000 000 000 	SPACE:	ASCII/ /
   551	030247	011 000 000 000 000 	TAB:	ASCII/	/
   552	030250				MINUS:
   553	030250	055 000 000 000 000 	HYPEN:	ASCII/-/
   554	030251	053 000 000 000 000 	PLUS:	ASCII/+/
   555	030252	052 000 000 000 000 	AST:	ASCII/*/
   556	030253	100 000 000 000 000 	ATSIN:	ASCII/@/
   557	030254	050 000 000 000 000 	LFP:	ASCII/(/
   558	030255	051 000 000 000 000 	RTP:	ASCII/)/
   559	030256	007 0000000000 		BELL:	BYTE (7) 007
   560	030257	077 000 000 000 000 	QUEST:	ASCII/?/
   561	030260	057 000 000 000 000 	SLASH:	ASCII!/!
   562	030261	044 000 000 000 000 	DOLLAR:	ASCII/$/
   563	030262	000000	000012		RADIX:	^D10			;DECIMAL PRINT RADIX
   564	030263	000000	000040		RADLSP:	40			;DECIMAL PRINT LEADING CHAR
   565	030264	000000	000012		RADLSC:	^D10			;DECIMAL PRINT LEADING CHAR COUNT
   566
   567					S^;*********************************************************************^
   568					;*USER MODE OUTPUT FILE INFORMATION
   569					S^;*********************************************************************^
   570
   571	030265				$OBUF:	BLOCK	3		;LOGICAL FILE OUTPUT BUFFER HEADER
   572	030270	60 62 51 56 64 00 	$OUTNM:	SIXBIT	/PRINT/		;FILE NAME
   573	030271	60 56 64 00 00 00 	$OUTEX:	SIXBIT	/PNT/		;FILE NAME EXTENSION
   574	030272					BLOCK	2
   575
   576					S^;*********************************************************************^
   577					;*DISK UPDATE MODE FILE INFORMATION
   578					S^;*********************************************************************^
   579
   580	030274				$IBUF:	BLOCK	3
   581	030277	60 62 51 56 64 00 	$INNM:	SIXBIT	/PRINT/
   582	030300	60 56 64 00 00 00 	$INEXT:	SIXBIT	/PNT/
   583	030301					BLOCK	2
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 6
FIXED	KLM	18-JAN-77 11:39		*FIXED* FIXED CONTROL AND DISPATCH STORAGE, JAN 18,1977                            SEQ 0021

   584					S^;*********************************************************************^
   585					;*PUSHDOWN LIST CONTROL INFORMATION
   586					S^;*********************************************************************^
   587
   588	030303	777577	030303		PLIST:	PLIST-PLISTE,,PLIST
   589	030304				PLISTS:	BLOCK	200
   590	030504	000000	000000		PLISTE:	0		;END OF PUSHDOWN LIST
   591
   592					S^;*********************************************************************^
   593					;*POWER LINE CLOCK FREQUENCY FLAG
   594					S^;*********************************************************************^
   595
   596	030505	000000	000000		CYCL60:	0	;0 = 60, -1 = 50 CYCLE
   597
   598					S^;*********************************************************************^
   599					;*KL10 CACHE CONTROL FLAGS
   600					S^;*********************************************************************^
   601
   602	030506	000000	000000		CSHFLG:	0	;ALLOW CACHE IF 0
   603	030507	000000	000000		CSHMEM:	0	;CACHE MEMORY SEGMENTS IF 0
   604
   605					S^;*********************************************************************^
   606					;*NUMBER INPUT DIGIT FLAG
   607					S^;*********************************************************************^
   608
   609	030510	000000	000000		TTNBRF:	0	;-1 IF ANY DIGIT TYPED
   610
   611					S^;*********************************************************************^
   612					;*KL10 & KI10 "INHPAG" SWITCH PAGING PREVENTION
   613					S^;*********************************************************************^
   614
   615	030511	000000	000000		PVPAGI:	0	;IF NON-ZERO, OVERRIDE "INHPAG" SWITCH ACTION
   616
   617					S^;*********************************************************************^
   618					;*ERROR REPORTING ROUTINE ADDITIONAL USERS CONTROL INSTRUCTIONS
   619					S^;*********************************************************************^
   620
   621	030512	000000	000000		%ERHI1:	0	;IF NON-ZERO, XCT'D AT START OF %ERUUO
   622	030513	000000	000000		%ERHI2:	0	;IF NON-ZERO, XCT'D AT END OF %ERUUO
   623	030514	000000	000000		%ERHI3:	0	;IF NON-ZERO, XCT'D AFTER "PC" OF %ERUUO
   624
   625					S^;*********************************************************************^
   626					;*SPECIAL USERS UUO INTERCEPT INSTRUCTION
   627					S^;*********************************************************************^
   628
   629	030515	000000	000000		$$UUO:	0	;IF NON-ZERO, XCT'D AT START OF $UORTN
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 7
FIXED	KLM	18-JAN-77 11:39		*FIXED* FIXED CONTROL AND DISPATCH STORAGE, JAN 18,1977                            SEQ 0022

   630					S^;*********************************************************************^
   631					;*KL10 PROCESSOR TYPE FLAG, 0=P0, 1=BBD NEW, 2=BBD OLD
   632					S^;*********************************************************************^
   633
   634	030516	000000	000000		KLTYP:	0
   635
   636					S^;*********************************************************************^
   637					;*SPECIAL USERS MUUO INTERCEPT INSTRUCTION
   638					S^;*********************************************************************^
   639
   640	030517	000000	000000		$$MUUO:	0	;IF NON-ZERO, XCT'D AT START OF MUUOER
   641
   642					S^;*********************************************************************^
   643					;*SPECIAL USERS USER MODE OUTPUT ERROR INTERCEPT INSTUCTION
   644					S^;*********************************************************************^
   645
   646	030520	000000	000000		$$OUTER:0	;IF NON-ZERO, XCT'D AT END OF USER MODE ERROR
   647
   648					S^;*********************************************************************^
   649					;*"SWITCH" CALL USAGE CONTROL
   650					S^;*********************************************************************^
   651
   652	030521	000000	000000		$$TOGGLE:0	;IF NON-ZERO, USE C(CONSW) FOR SWITCHES
   653
   654					S^;*********************************************************************^
   655					;*SPECIAL USERS ALTMODE SWITCH CALL INTERCEPT INSTRUCTIONS
   656					S^;*********************************************************************^
   657
   658	030522	000000	000000		$$TAX1:	0	;IF NON-ZERO, XCT'D AT START OF ALTMODE SWITCH CALL
   659	030523	000000	000000		$$TAX2:	0	;IF NON-ZERO, XCT'D AT END OF ALTMODE SWITCH CALL
   660
   661					S^;*********************************************************************^
   662					;*SPECIAL FUTURE EXPANSION ROOM
   663					;*IF ANY FIXED AREA TAGS ARE ADDED, REDUCE THE SIZE OF
   664					;*THIS BLOCK STATEMENT ACCORDINGLY.  THIS MUST BE DONE
   665					;*SO THAT PREVIOUS FIXED ASSIGNMENTS DO NOT CHANGE.
   666					S^;*********************************************************************^
   667
   668	030524					BLOCK	53	;HOPEFULLY THIS IS ENOUGH FOREVER
   669
   670					S^;*********************************************************************^
   671					;*END OF FIXED STORAGE
   672					S^;*********************************************************************^
   673
   674			030577			$ENDFX=<PLISTE+100>&<777700>-1
   675	030577					LOC	$ENDFX
   676	030577	000000	000000		ENDFIX:	0		;END OF FIXED STORAGE
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 1
SPCCPU	KLM	26-FEB-76 05:50		*SPCCPU* SPECIAL BASIC CPU PROCESSOR CONTROL, 26-FEB-76                            SEQ 0023

   677					SUBTTL	*SPCCPU* SPECIAL BASIC CPU PROCESSOR CONTROL, 26-FEB-76
   678
   679					;NEW DEFINITIONS USED BY THE KL10 SUBROUTINE PACKAGE
   680
   681			000000		AC0=	0
   682			030000		DIAGNOS=30000		;PDP-10 DIAGNOSTIC START ADDRESS
   683			010000		DDT=	10000		;PDP-10 DDT START ADDRESS
   684			020000		DIAMON=	20000		;PDP-10 DIAMON LOADER START ADDRESS
   685			020000		DONG11=	1B22		;11 DOORBELL (FROM THE 10)
   686
   687					;DTE20 DEVICE CODES
   688
   689			000200		DTE==	200		;DTE0
   690			000204		DTE0==	204
   691			000204		DTE1==	204
   692			000210		DTE2==	210
   693			000214		DTE3==	214
   694
   695					;KL10 EPT COMMUNICATION AREA
   696
   697			000440		$STD=	440		;PDP-10 DIAGNOSTIC START ADDRESS
   698			000441		$DDT=	441		;PDP-10 DDT START ADDRESS
   699			000442		$STL=	442		;PDP-10 LOADER START ADDRESS
   700			000443		$STM=	443		;PDP-10 MONITOR START ADDRESS
   701
   702			000444		$DTFLG=	444		;DTE20 OPERATION COMPLETE FLAG
   703			000445		$DTCLK=	445		;DTE20 CLOCK INTERRUPT FLAG
   704			000446		$DTCI=	446		;DTE20 CLOCK INTERRUPT INSTRUCTION
   705			000447		$DTT11=	447		;DTE20 10 TO 11 ARGUMENT
   706			000450		$DTF11=	450		;DTE20 11 TO 10 ARGUMENT
   707			000451		$DTCMD=	451		;DTE20 TO 11 COMMAND WORD
   708			000452		$DTSEQ=	452		;DTE20 OPERATION SEQUENCE NUMBER
   709			000453		$DTOPR=	453		;DTE20 OPERATIONAL DTE #
   710			000454		$DTCHR=	454		;DTE20 LAST TYPED CHARACTER
   711			000455		$DTMTD=	455		;DTE20 MONITOR TTY OUTPUT COMPLETE FLAG
   712			000456		$DTMTI=	456		;DTE20 MONITOR TTY INPUT FLAG
   713
   714			000457		$DTSWR=	457		;DTE20 CONSOLE SWITCH REGISTER
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 2
SPCCPU	KLM	26-FEB-76 05:50		*SPCCPU* SPECIAL BASIC CPU PROCESSOR CONTROL, 26-FEB-76                            SEQ 0024

   715					;SPECIAL "FIXED" REASSIGNMENTS
   716
   717			030600			$$LOC=.			;SAVE CURRENT LOCATION
   718
   719	030000					LOC	30000
   720	030000	254 00 0 00 030600 	$$BEGIN:JRST	$$START		;SETUP SPECIAL START
   721	030001	254 00 0 00 030600 		JRST	$$START		;"DIAMON" CHAIN START ADDRESS
   722
   723	000440					LOC	440
   724	000440	254 00 0 00 030000 	$STD:	JRST	BEGIN		;SETUP FOR "STD"
   725	000443					LOC	443
   726	000443	254 00 0 00 030636 	$STM:	JRST	$SPEC		;SIMPLE RUN CONTROL
   727
   728	030057					LOC	30057
   729	030057	254 00 0 00 030641 	$BEGEND:JRST	$SPBEND		;SETUP SPECIAL "BEGEND"
   730
   731					;SPECIAL MUUO, TRAP & PAGE FAIL SETUP
   732
   733	000420					LOC	420
   734	000420	254 04 0 00 000420 	$$420:	HALT	.		;KI10 PAGE FAIL
   735	000421	255 00 0 00 000000 	$$421:	JFCL			;OVERFLOW
   736	000422	254 04 0 00 000422 	$$422:	HALT	.		;PUSHDOWN OVERFLOW
   737	000423	254 04 0 00 000423 	$$423:	HALT	.		;TRAP 3
   738	000424	000000	000000		$$424:	0			;MMUO
   739	000425	000000	000000		$$425:	0			;MMUO PC
   740	000426	000000	000000		$$426:	0			;KI10-PAGE FAIL, KL10-PROCESS CONTEXT
   741	000427	254 04 0 00 000427 	$$427:	HALT	.
   742	000430	000000	000427		$$430:	427			;MMUO NEW PC'S
   743	000431	000000	000427		$$431:	427
   744	000432	000000	000427		$$432:	427
   745	000433	000000	000427		$$433:	427
   746	000434	000000	000427		$$434:	427
   747	000435	000000	000427		$$435:	427
   748	000436	000000	000427		$$436:	427
   749	000437	000000	000427		$$437:	427
   750
   751	000500					LOC	500
   752	000500	000000	000000		$$500:	0			;KL10 PAGE FAIL WORD
   753	000501	000000	000000		$$501:	0			;KL10 PAGE FAIL PC
   754	000502	000000	000503		$$502:	503			;KL10 PAGE FAIL NEW PC
   755	000503	254 04 0 00 000503 	$$503:	HALT	.
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 3
SPCCPU	KLM	26-FEB-76 05:50		*SPCCPU* SPECIAL BASIC CPU PROCESSOR CONTROL, 26-FEB-76                            SEQ 0025

   756	030600					LOC	$$LOC		;RESET CURRENT LOCATION
   757
   758					;SPECIAL STARTUP SEQUENCE
   759
   760	030600	402 00 0 00 030037 	$$START:SETZM	USER
   761	030601	265 00 0 00 030602 		JSP	0,.+1		;IN USER MODE ?
   762	030602	603 00 0 00 010000 		TLNE	0,USERF
   763	030603	476 00 0 00 030037 		SETOM	USER		;YES, SET CONTROL WORD
   764	030604	336 00 0 00 030042 		SKIPN	MONFLG		;SPECIAL USER MODE ?
   765	030605	402 00 0 00 030037 		SETZM	USER		;YES, RUN AS EXEC
   766	030606	332 00 0 00 030037 		SKIPE	USER
   767	030607	254 00 0 00 030712 		JRST	START		;USER MODE, DON'T NEED CPU TYPE
   768
   769	030610	336 00 0 00 030044 	$STKIL:	SKIPN	MONTEN		;LOADED BY "DIAMON" ?
   770	030611	476 00 0 00 030024 		SETOM	ITRCNT		;NO, RUN FOREVER
   771	030612	402 00 0 00 030516 		SETZM	KLTYP
   772	030613	402 00 0 00 030041 		SETZM	KLFLG		;ASSUME KI10
   773	030614	200 01 0 00 034010 		MOVE	1,[1,,1]
   774	030615	251 01 0 00 000001 		BLT	1,1		;HOPE THIS WORKS
   775	030616	316 01 0 00 034010 		CAMN	1,[1,,1]	;IF AC NE 1,,1 AFTER BLT, KL10
   776	030617	254 00 0 00 030712 		JRST	START		;KI10, NO ADDITIONAL SETUP
   777
   778	030620	7 000 20 0 00 010040 	$STKL:	CONO	APR,10040	;SET BBD NOT BIT
   779	030621	7 000 24 0 00 000000 		CONI	APR,0
   780	030622	7 000 20 0 00 020040 		CONO	APR,20040	;CLEAR BBD NOT BIT
   781	030623	606 00 0 00 000040 		TRNN	0,40		;IF SET, KL10
   782	030624	350 00 0 00 030516 		AOS	KLTYP		;IF NOT, BBD
   783	030625	402 00 0 00 000444 		SETZM	$DTFLG
   784	030626	402 00 0 00 000445 		SETZM	$DTCLK
   785	030627	200 00 0 00 000453 		MOVE	$DTOPR		;GET DTE #
   786	030630	436 00 0 00 030670 		ORM	$$DTE0		;INSERT IN DTE I/O INSTS
   787	030631	436 00 0 00 030672 		ORM	$$DTE1
   788	030632	436 00 0 00 030704 		ORM	$$DTE2
   789	030633	436 00 0 00 030706 		ORM	$$DTE3
   790	030634	476 00 0 00 030041 		SETOM	KLFLG		;SET KL10 CONTROL FLAG
   791	030635	254 00 0 00 030712 		JRST	START
   792
   793	030636	200 00 0 00 034011 	$SPEC:	MOVE	[JRST STARTA]	;SIMPLE RUN CONTROL
   794	030637	202 00 0 00 030643 		MOVEM	$SPB1
   795	030640	254 00 0 00 030712 		JRST	START
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 4
SPCCPU	KLM	26-FEB-76 05:50		*SPCCPU* SPECIAL BASIC CPU PROCESSOR CONTROL, 26-FEB-76                            SEQ 0026

   796					;SPECIAL "BEGEND" ROUTINE
   797
   798	030641	350 00 0 00 030047 	$SPBEND:AOS	PASCNT		;INCREMENT PASS COUNT
   799	030642	370 00 0 00 030024 		SOS	ITRCNT		;DECREMENT ITERATION COUNT
   800	030643	336 00 0 00 030037 	$SPB1:	SKIPN	USER
   801	030644	254 00 0 00 030652 		JRST	$SPBEX		;EXEC MODE
   802
   803	030645	332 00 0 00 030024 	$SPBUS:	SKIPE	ITRCNT		;USER MODE, COMPLETED ?
   804	030646	254 00 0 00 030741 		JRST	STARTA		;NO, KEEP RUNNING
   805	030647	336 00 0 00 030044 		SKIPN	MONTEN		;DONE, LOADED BY "DIAMON" ?
   806	030650	047 00 0 00 000012 		EXIT			;NO, RETURN TO MONITOR
   807	030651	254 00 1 00 030012 		JRST	@RETURN		;YES, RETURN TO "DIAMON"
   808
   809	030652	332 00 0 00 030041 	$SPBEX:	SKIPE	KLFLG
   810	030653	254 00 0 00 030660 		JRST	$SPBKL		;KL10 & EXEC
   811	030654	7 004 14 0 00 030024 		DATAO	PI,ITRCNT	;KI10 & EXEC, DISPLAY ITER COUNT
   812	030655	332 00 0 00 030024 		SKIPE	ITRCNT
   813	030656	254 00 0 00 030741 		JRST	STARTA		;NOT COMPLETED YET
   814	030657	254 00 1 00 030012 		JRST	@RETURN		;DONE
   815
   816	030660	336 00 0 00 030024 	$SPBKL:	SKIPN	ITRCNT
   817	030661	254 00 0 00 030676 		JRST	$SPKLD		;KL10, EXEC & COMPLETED
   818
   819	030662	335 00 0 00 030043 		SKIPGE	MONCTL
   820	030663	254 00 0 00 030741 		JRST	STARTA		;"DIAMON" CONTROL
   821	030664	201 00 0 00 000404 		MOVEI	0,404		;NOTIFY PDP-11 OF END OF PASS
   822	030665	202 00 0 00 000451 		MOVEM	0,$DTCMD
   823	030666	402 00 0 00 000444 		SETZM	$DTFLG
   824	030667	336 00 0 00 030516 		SKIPN	KLTYP
   825	030670	7 200 20 0 00 020000 	$$DTE0:	CONO	DTE,DONG11
   826	030671	332 00 0 00 030516 		SKIPE	KLTYP
   827	030672	7 200 20 0 00 010000 	$$DTE1:	CONO	DTE,10000
   828	030673	336 00 0 00 000444 		SKIPN	$DTFLG		;WAIT TILL 11 RESPONDS
   829	030674	254 00 0 00 030673 		JRST	.-1
   830	030675	254 00 0 00 030741 		JRST	STARTA		;KEEP RUNNING
   831
   832					;SPECIAL KL10 COMPLETED ROUTINE
   833
   834	030676	332 00 0 00 030044 	$SPKLD:	SKIPE	MONTEN
   835	030677	254 00 1 00 030012 		JRST	@RETURN		;LOADED BY "DIAMON"
   836
   837	030700	201 00 0 00 000403 		MOVEI	0,403		;NOTIFY PDP-11 OF COMPLETION
   838	030701	202 00 0 00 000451 		MOVEM	0,$DTCMD
   839	030702	402 00 0 00 000444 		SETZM	$DTFLG
   840	030703	336 00 0 00 030516 		SKIPN	KLTYP
   841	030704	7 200 20 0 00 020000 	$$DTE2:	CONO	DTE,DONG11
   842	030705	332 00 0 00 030516 		SKIPE	KLTYP
   843	030706	7 200 20 0 00 010000 	$$DTE3:	CONO	DTE,10000
   844	030707	336 00 0 00 000444 		SKIPN	$DTFLG		;SHOULD NEVER HAPPEN
   845	030710	254 00 0 00 030707 		JRST	.-1		;11 NEVER RETURNS ON END OF PROGRAM
   846	030711	254 04 0 00 030000 		HALT	BEGIN		;IF IT DOES, HALT.
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 1
DAKACM	MAC	19-JAN-77 13:40		DIAGNOSTIC SECTION                                                                 SEQ 0027

   847					SUBTTL	DIAGNOSTIC SECTION
   848
   849						LALL
   850
   851	030712	402 00 0 00 030037 	START:	SETZM	USER#
   852	030713	265 00 0 00 030714 		JSP	0,.+1		;GET FLAGS
   853	030714	603 00 0 00 010000 		TLNE	USERF		;IN USER MODE
   854	030715	476 00 0 00 030037 		SETOM	USER		;YES SET USER CONTROLL WORD
   855	030716	336 00 0 00 030042 		SKIPN	MONFLG		;SPECIAL USER MODE
   856	030717	402 00 0 00 030037 		SETZM	USER		;YES CLEAR USER CONTROLL WORD
   857	030720	336 00 0 00 030037 		SKIPN	USER
   858	030721	254 00 0 00 030741 		JRST	STARTA
   859	030722	331 00 0 00 030043 		SKIPL	MONCTL
   860	030723	051 03 0 00 030725 		TTCALL	3,PGMNAM		;MENTION OUR NAME
   861	030724	254 00 0 00 030741 		JRST	STARTA
   862
   863	030725				PGMNAM:	ASCIZ/
   864	030725	015 012 120 104 120 	PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) [DAKAC]
   865	030726	055 061 060 040 113 
   866	030727	101 061 060 040 102 
   867	030730	101 123 111 103 040 
   868	030731	111 116 123 124 122 
   869	030732	125 103 124 111 117 
   870	030733	116 040 104 111 101 
   871	030734	107 116 117 123 124 
   872	030735	111 103 040 050 063 
   873	030736	051 040 133 104 101 
   874	030737	113 101 103 135 015 
   875	030740	012 000 000 000 000 	/
   876	030741	254 00 0 00 030742 	STARTA:	JRST	.+1
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 2
DAKACM	MAC	19-JAN-77 13:40		TEST OF LOGICAL TEST INSTRUCTIONS                                                  SEQ 0028

   877					SUBTTL	TEST OF LOGICAL TEST INSTRUCTIONS
   878
   879					;**********
   880
   881					;THIS TEST VERIFIES THAT TDN DOES NOT MODIFY THE AC BECAUSE
   882					;TDN IS A NO-OP
   883					;FIRST, THE AC IS PRELOADED WITH 0.  THEN,
   884					;TDN IS EXECUTED.  THE AC IS THEN CHECKED FOR
   885					;NO MODIFICATION.  IF C(AC) IS UNALTERED, THE TEST PASSES
   886	030742	400 00 0 00 000000 	B12600:	SETZ			;PRELOAD AC WITH 0
   887	030743	610 00 0 00 034012 		TDN	[-1]		;*TDN IS A NO-OP
   888	030744	310 00 0 00 000000 		CAM			;CAM IS A NO-OP.  IT IS HERE IN CASE TDN SKIPS
   889	030745	302 00 0 00 000000 		CAIE			;PASS TEST IF C(AC) IS UNMODIFIED BY TDN
   890						STOP^
   891	030746	254 04 0 00 030747 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
   892	030747	324 00 0 00 030750 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
   893									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
   894									;IN THE SUBTEST) TO LOOP ON ERROR^
   895
   896					;*****     FAILURE ANALYSIS     *****
   897					;C(AC0)		C(AC1)		FAILING SIGNAL
   898
   899					;-1,,-1				FC: AD FM + EN
   900
   901					;**********
   902
   903					;THIS TEST VERIFIES THAT TSN DOES NOT MODIFY THE AC BECAUSE
   904					;TSN IS A NO-OP
   905					;FIRST, THE AC IS PRELOADED WITH -1.  THEN,
   906					;TSN IS EXECUTED.  THE AC IS THEN CHECKED FOR
   907					;NO MODIFICATION.  IF C(AC) IS UNALTERED, THIS TEST PASSES
   908
   909	030750	474 00 0 00 000000 	B12700:	SETO			;PRELOAD AC WITH -1,,-1
   910	030751	611 00 0 00 034013 		TSN	[XWD -1,0]	;*TSN IS A NO-OP
   911	030752	310 00 0 00 000000 		CAM			;CAM IS A NO-OP.  IT IS HERE IN CASE TSN SKIPS
   912	030753	312 00 0 00 034012 		CAME	[-1]		;PASS TEST IF C(AC) IS UNMODIFIED BY TSN
   913						STOP^
   914	030754	254 04 0 00 030755 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
   915	030755	324 00 0 00 030756 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
   916									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
   917									;IN THE SUBTEST) TO LOOP ON ERROR^
   918
   919					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 3
DAKACM	MAC	19-JAN-77 13:40		TEST OF LOGICAL TEST INSTRUCTIONS                                                  SEQ 0029

   920					;THIS TEST VERIFIES THAT TRN DOE NOT MODIFY THE AC BECAUSE
   921					;TRN IS A NO-OP.
   922					;FIRST, THE AC IS PRELOADED WITH 0.  THEN,
   923					;TRN IS EXECUTED.  THE AC IS THEN CHECKED FOR
   924					;NO MODIFICATION.  IF C(AC) IS UNALTERED, THIS TEST PASSES
   925
   926	030756	400 00 0 00 000000 	B13000:	SETZ			;PRELOAD AC WITH 0
   927	030757	600 00 0 00 123456 		TRN	123456		;*TRN IS A NO-OP
   928	030760	310 00 0 00 000000 		CAM			;CAM IS A NO-OP.  IT IS HERE IN CASE TRN SKIPS
   929	030761	302 00 0 00 000000 		CAIE			;PASS TEST IF C(AC) IS UNMODIFIED BY TRN
   930						STOP^
   931	030762	254 04 0 00 030763 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
   932	030763	324 00 0 00 030764 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
   933									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
   934									;IN THE SUBTEST) TO LOOP ON ERROR^
   935
   936					;**********
   937
   938					;THIS TEST VERIFIES THAT TLN DOES NOT MODIFY THE AC BECAUSE
   939					;TLN IS A NO-OP.
   940					;FIRST,THE AC IS PRELOADED WITH -1,,-1.  THEN,
   941					;TRN IS EXECUTED.  THE AC IS THEN CHECKED FOR
   942					;NO MODIFICATION.  IF C(AC) IS UNALTERED, THIS TEST PASSES
   943
   944	030764	474 00 0 00 000000 	B13100:	SETO			;PRELOAD AC WITH -1,,-1
   945	030765	601 00 0 00 123456 		TLN	123456		;*TRN IS A NO-OP
   946	030766	310 00 0 00 000000 		CAM			;CAM IS A NO-OP.  IT IS HERE IN CASE TRN SKIPS
   947	030767	312 00 0 00 000000 		CAME			;PASS TEST IF C(AC) IS UNMODIFIED BY TRN
   948						STOP^
   949	030770	254 04 0 00 030771 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
   950	030771	324 00 0 00 030772 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
   951									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
   952									;IN THE SUBTEST) TO LOOP ON ERROR^
   953
   954					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 4
DAKACM	MAC	19-JAN-77 13:40		TEST OF LOGICAL TEST INSTRUCTIONS                                                  SEQ 0030

   955					;THIS TEST VERIFIES THAT TDO PLACES ONES IN THE BITS OF THE AC
   956					;WHICH ARE MASKED BY C(E) AND DOES NOT AFFECT THE UNMASKED BITS OF THE AC.
   957					;IN THIS CASE, C(AC)=0 AND C(E)=-1,,-1.  HENCE, THE RESULT IN THE AC SHOULD BE -1,,-1.
   958					;THE AC IS CHECKED FOR -1,,-1.  IF C(AC) -1,,-1, THE TEST PASSES.
   959
   960	030772	400 00 0 00 000000 	B13200:	SETZ			;PRELOAD AC WITH 0
   961	030773	670 00 0 00 034012 		TDO	[-1]		;*TDO SHOULD PLACE ALL ONES IN THE AC
   962	030774	300 00 0 00 000000 		CAI			;CAI IS A NO-OP.  IT IS HERE IN CASE TDO SKIPS
   963	030775	312 00 0 00 034012 		CAME	[-1]		;PASS TEST IF C(AC)=-1,,-1
   964						STOP^
   965	030776	254 04 0 00 030777 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
   966	030777	324 00 0 00 031000 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
   967									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
   968									;IN THE SUBTEST) TO LOOP ON ERROR^
   969
   970					;*****     FAILURE ANALYSIS     *****
   971					;C(AC0)		C(AC1)		FAILING SIGNAL
   972
   973					;E				SW: FCE
   974					;0				SW: ET1
   975					;0				ET1: BR AR EN
   976					;0				ET1: AD BR - EN
   977					;0				ET1: AD EQV
   978
   979					;**********
   980
   981					;THIS TEST VERIFIES THAT TDO PLACES ONES IN THE BITS OF THE AC
   982					;WHICH ARE MASKED BY C(E) AND DOES NOT AFFECT THE UNMASKED BITS OF THE AC.
   983					;IN THIS CASE, AC=E AND C(AC)= C(E)=0.  HENCE, THE RESULT IN THE AC SHOULD BE 0.
   984					;THIS AC IS CHECKED FOR ZERO.  IF C(AC) IS ZERO, THE TEST PASSES.
   985
   986	031000	400 00 0 00 000000 	B13300:	SETZ			;PRELOAD AC WITH 0
   987	031001	670 00 0 00 000000 		TDO			;*TDO SHOULD PLACE ALL ZERO IN THE AC		
   988	031002	300 00 0 00 000000 		CAI			;CAI IS A NO-OP.  IT IS HERE IN CASE TDO SKIPS
   989	031003	332 00 0 00 000000 		SKIPE			;PASS TEST IF C(AC) ZERO
   990						STOP^
   991	031004	254 04 0 00 031005 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
   992	031005	324 00 0 00 031006 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
   993									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
   994									;IN THE SUBTEST) TO LOOP ON ERROR^
   995
   996					;*****     FAILURE ANALYSIS     *****
   997					;C(AC0)		C(AC1)		FAILING SIGNAL
   998
   999					;-1,,-1				ET1: AD AR + EN
  1000
  1001					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 5
DAKACM	MAC	19-JAN-77 13:40		TEST OF LOGICAL TEST INSTRUCTIONS                                                  SEQ 0031

  1002					;THIS TEST VERIFIES THAT TDO PLACES ONES IN THE BITS OF THE AC,
  1003					;WHICH ARE MASKED BY C(E) AND DOES NOT AFFECT THE UNMASKED BITS OF THE AC.
  1004					;IN THIS CASE, C(AC)=0 AND C(E)=0.  HENCE, THE RESULT IN THE AC SHOULD BE 0.
  1005					;THE AC IS CHECKED FOR ITS CONTENTS ZERO.  IF C(AC) IS ZERO, THE TEST PASSES.
  1006
  1007	031006	400 00 0 00 000000 	B13400:	SETZ			;PRELOAD AC WITH 0
  1008	031007	670 00 0 00 034014 		TDO	[0]		;*TDO SHOULD PLACE ALL ZERO IN THE AC
  1009	031010	300 00 0 00 000000 		CAI			;CAI IS A NO-OP.  IT IS HERE IN CASE TDO SKIPS
  1010	031011	332 00 0 00 000000 		SKIPE			;PASS TEST IF C(AC) IS ZERO
  1011						STOP^
  1012	031012	254 04 0 00 031013 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1013	031013	324 00 0 00 031014 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1014									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1015									;IN THE SUBTEST) TO LOOP ON ERROR^
  1016
  1017					;**********
  1018
  1019					;THIS TEST VERIFIES THAT TDO PLACES ONES IN THE BITS OF THE AC
  1020					;WHICH ARE MASKED BY C(E) AND DOES NOT AFFECT THE UNMASKED BITS OF THE AC.
  1021					;IN THIS CASE, AC=E AND C(AC)= C(E)=-1,,-1.
  1022					;HENCE, THE RESULT IN THE AC SHOULD BE -1,,-1.
  1023					;THE AC IS CHECKED FOR -1,,-1.  IF C(AC)=-1,,-1, THE TEST PASSES.
  1024
  1025	031014	474 00 0 00 000000 	B13600:	SETO			;PRELOAD AC WITH -1,,-1
  1026	031015	670 00 0 00 000000 		TDO			;*TDO SHOULD PLACE ALL ONES IN THE AC
  1027	031016	300 00 0 00 000000 		CAI			;CAI IS A NO-OP.  IT IS HERE IN CASE TDO SKIPS
  1028	031017	312 00 0 00 034012 		CAME	[-1]		;PASS TEST IF C(AC) -1,,-1
  1029						STOP^
  1030	031020	254 04 0 00 031021 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1031	031021	324 00 0 00 031022 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1032									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1033									;IN THE SUBTEST) TO LOOP ON ERROR^
  1034
  1035					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 6
DAKACM	MAC	19-JAN-77 13:40		TEST OF LOGICAL TEST INSTRUCTIONS                                                  SEQ 0032

  1036					;THIS TEST VERIFIES THAT TDO PLACES ONES IN THE BITS OF THE AC
  1037					;WHICH ARE MASKED BY C(E) AND DOES NOT AFFECT THE UNMASKED BITS OF THE AC.
  1038					;IN THIS CASE, C(AC)=-1,,-1 AND C(E)=0.  HENCE, THE RESULT IN THE AC SHOULD BE -1,,-1.
  1039					;THE AC IS CHECKED FOR -1,,-1.  IF C(AC)=-1,,-1, THE TEST PASSES.
  1040
  1041	031022	474 00 0 00 000000 	B14000:	SETO			;PRELOAD AC WITH -1,,-1
  1042	031023	670 00 0 00 034014 		TDO	[0]		;*TDO SHOULD PLACE ALL ONES IN THE AC
  1043	031024	300 00 0 00 000000 		CAI			;CAI IS A NO-OP.  IT IS HERE IN CASE TDO SKIPS
  1044	031025	312 00 0 00 034012 		CAME	[-1]		;PASS TEST IF C(AC)=-1,,-1
  1045						STOP^
  1046	031026	254 04 0 00 031027 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1047	031027	324 00 0 00 031030 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1048									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1049									;IN THE SUBTEST) TO LOOP ON ERROR^
  1050
  1051					;*****     FAILURE ANALYSIS     *****
  1052					;C(AC0)		C(AC1)		FAILING SIGNAL
  1053
  1054					;0				ET1: AD FM - EN
  1055					;0				ET2: AR AD EN
  1056
  1057					;**********
  1058
  1059					;THIS TEST VERIFIES THAT TDZ PLACES ZERO IN THE BITS OF THE AC
  1060					;WHICH ARE MASKED BY C(E) AND DOES NOT AFFECT THE UNMASKED BITS OF THE AC.
  1061					;IN THIS CASE, AC=E AND C(AC)= C(E)=0.  HENCE, THE RESULT IN THE AC SHOULD BE 0.
  1062					;THE AC IS CHECKED FOR 0.  IF C(AC) 0, THE TEST PASSES.
  1063
  1064	031030	400 00 0 00 000000 	B14100:	SETZ			;PRELOAD AC WITH 0		
  1065	031031	630 00 0 00 000000 		TDZ			;*TDZ SHOULD PLACE ALL ZERO IN THE AC
  1066	031032	300 00 0 00 000000 		CAI			;CAI IS A NO-OP.  IT IS HERE IN CASE TDO
  1067	031033	332 00 0 00 000000 		SKIPE			;PASS TEST IF C(AC)=0
  1068						STOP^
  1069	031034	254 04 0 00 031035 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1070	031035	324 00 0 00 031036 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1071									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1072									;IN THE SUBTEST) TO LOOP ON ERROR^
  1073
  1074					;*****     FAILURE ANALYSIS     *****
  1075					;C(AC0)		C(AC1)		FAILING SIGNAL
  1076
  1077					;-1,,-1				FC: AD FM + EN
  1078
  1079					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 7
DAKACM	MAC	19-JAN-77 13:40		TEST OF LOGICAL TEST INSTRUCTIONS                                                  SEQ 0033

  1080					;THIS TEST VERIFIES THAT TDZ PLACES ZERO IN THE BITS OF THE AC
  1081					;WHICH ARE MASKED BY C(E) AND DOES NOT AFFECT THE UNMASKED BITS OF THE AC.
  1082					;IN THIS CASE, C(AC)=-1,,-1,,-1 AND C(E)=-1,,0.
  1083					;HENCE, THE RESULT IN THE AC SHOULD BE 0,,-1.
  1084					;THE AC IS CHECKED FOR 0,,-1.  IF C(AC)= 0,,-1, THE TEST PASSES.
  1085
  1086	031036	474 00 0 00 000000 	B14200:	SETO			;PRELOAD AC WITH -1,,-1		
  1087	031037	630 00 0 00 034013 		TDZ	[XWD -1,0]	;*TDZ SHOULD PLACE 0,,-1 IN THE AC
  1088	031040	300 00 0 00 000000 		CAI			;CAI IS A NO-OP.  IT IS HERE IN CASE TDO
  1089	031041	312 00 0 00 034015 		CAME	[0,-1]		;PASS TEST IF C(AC)=0,,-1
  1090						STOP^
  1091	031042	254 04 0 00 031043 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1092	031043	324 00 0 00 031044 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1093									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1094									;IN THE SUBTEST) TO LOOP ON ERROR^
  1095
  1096					;*****     FAILURE ANALYSIS     *****
  1097					;C(AC0)		C(AC1)		FAILING SIGNAL
  1098
  1099					;-E				SW: FCE
  1100					;-1,,-1				FC: AD AR -EN
  1101					;-1,,0				ET2: AR AD EN
  1102
  1103					;**********
  1104
  1105					;THIS TEST VERIFIES THAT TDZ PLACES ZEROS IN THE BITS OF THE AC
  1106					;WHICH ARE MASKED BY C(E) AND DOES NOT AFFECT THE UNMASKED BITS OF THE AC.
  1107					;IN THIS CASE, AC=E AND C(AC)= C(E)=-1,,-1.  HENCE, THE RESULT IN THE AC SHOULD BE 0.
  1108					;THE AC IS CHECKED FOR 0.  IF C(AC)=0, THE TEST PASSES.
  1109
  1110	031044	474 00 0 00 000000 	B14400:	SETO			;PRELOAD AC WITH -1,,-1
  1111	031045	630 00 0 00 000000 		TDZ			;*TDZ SHOULD PLACE ALL ZERO IN THE AC
  1112	031046	300 00 0 00 000000 		CAI			;CAI IS A NO-OP.  IT IS HERE IN CASE TDO
  1113	031047	332 00 0 00 000000 		SKIPE			;PASS TEST IF C(AC)=0
  1114						STOP^
  1115	031050	254 04 0 00 031051 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1116	031051	324 00 0 00 031052 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1117									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1118									;IN THE SUBTEST) TO LOOP ON ERROR^
  1119
  1120					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 8
DAKACM	MAC	19-JAN-77 13:40		TEST OF LOGICAL TEST INSTRUCTIONS                                                  SEQ 0034

  1121					;THIS TEST VERIFIES THAT TDZ PLACES ZEROS IN THE BITS OF THE AC
  1122					;WHICH ARE MASKED BY C(E) AND DOES NOT AFFECT THE UNMASKED BITS OF THE AC.
  1123					;IN THIS CASE, C(AC)=0 AND C(E)=-1,,-1.  HENCE, THE RESULT IN THE AC SHOULD BE 0.
  1124					;THE AC IS CHECKED FOR 0.  IF C(AC)=0, THE TEST PASSES.
  1125
  1126	031052	400 00 0 00 000000 	B14500:	SETZ			;PRELOAD AC WITH 0
  1127	031053	630 00 0 00 034012 		TDZ	[-1]		;*TDZ SHOULD PLACE ALL ZEROS IN THE AC
  1128	031054	300 00 0 00 000000 		CAI			;CAI IS A NO-OP.  IT IS HERE IN CASE TDO
  1129	031055	332 00 0 00 000000 		SKIPE			;PASS TEST IS C(AC)=0
  1130						STOP^
  1131	031056	254 04 0 00 031057 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1132	031057	324 00 0 00 031060 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1133									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1134									;IN THE SUBTEST) TO LOOP ON ERROR^
  1135
  1136					;**********
  1137
  1138					;THIS TEST VERIFIES THAT TDZ PLACES ZEROS IN THE BITS OF THE AC
  1139					;WHICH ARE MASKED BY C(E) AND DOES NOT AFFECT THE UNMASKED BITS OF THE AC.
  1140					;IN THIS CASE, AC=E AND C(AC)= C(E)=-1,,-1.
  1141					;HENCE, THE RESULT IN THE AC SHOULD BE -1,,-1.
  1142					;THE AC IS CHECKED -1,,-1.  IF C(AC)=-1,,-1, THE TEST PASSES.
  1143
  1144	031060	474 00 0 00 000000 	B14600:	SETO			;PRELOAD AC WITH -1,,-1
  1145	031061	630 00 0 00 034014 		TDZ	[0]		;*TDZ SHOULD PLACE ALL ONES IN THE AC
  1146	031062	300 00 0 00 000000 		CAI			;CAI IS A NO-OP.  IT IS HERE IN CASE TDO
  1147	031063	312 00 0 00 034012 		CAME	[-1]		;PASS TEST IF C(AC)=-1,,-1
  1148						STOP^
  1149	031064	254 04 0 00 031065 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1150	031065	324 00 0 00 031066 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1151									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1152									;IN THE SUBTEST) TO LOOP ON ERROR^
  1153					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 9
DAKACM	MAC	19-JAN-77 13:40		TEST OF LOGICAL TEST INSTRUCTIONS                                                  SEQ 0035

  1154					;THIS TEST VERIFIES THAT TDC COMPLEMENTS THE BITS OF THE AC
  1155					;WHICH ARE MASKED BY C(E) AND DOES NOT AFFECT THE UNMASKED BITS OF THE AC.
  1156					;IN THIS CASE, C(AC)=-1 AND C(E)=0,,-1.  HENCE, THE RESULT IN THE AC SHOULD BE -1,,0.
  1157					;THE AC IS CHECKED FOR -1,,0.  IF C(AC)=-1,,0, THIS TEST PASSES
  1158
  1159	031066	474 00 0 00 000000 	B14700:	SETO			;PRELOAD AC WITH -1,,-1
  1160	031067	650 00 0 00 034015 		TDC	[XWD 0,-1]	;*TDC SHOULD PLACE -1,,0 INTO THE AC
  1161	031070	300 00 0 00 000000 		CAI			;CAI IS A NO-OP.  IT IS HERE IN CASE TDC SKIPS
  1162	031071	312 00 0 00 034013 		CAME	[-1,,0]		;PASS TEST IF C(AC)=-1,,0
  1163						STOP^
  1164	031072	254 04 0 00 031073 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1165	031073	324 00 0 00 031074 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1166									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1167									;IN THE SUBTEST) TO LOOP ON ERROR^
  1168
  1169					;*****     FAILURE ANALYSIS     *****
  1170					;C(AC0)		C(AC1)		FAILING SIGNAL
  1171
  1172					;-E				SW: FCE
  1173					;0				FC: AD AR - EN
  1174					;0,,-1				ET2: AR AD EN
  1175
  1176					;**********
  1177
  1178					;THIS TEST VERIFIES THAT TDC COMPLEMENTS THE BITS OF THE AC
  1179					;WHICH ARE MASKED BY C(E) AND DOES NOT AFFECT THE UNMASKED BITS OF THE AC.
  1180					;IN THIS CASE, AC=E AND C(AC)= C(E)=0.  HENCE, THE RESULT IN THE AC SHOULD BE 0.
  1181					;THE AC IS CHECKED FOR 0.  IF C(AC)=0, THIS TEST PASSES
  1182
  1183	031074	400 00 0 00 000000 	B15000:	SETZ			;PRELOAD AC, E WITH 0
  1184	031075	650 00 0 00 000000 		TDC			;*TDC SHOULD PLACE 0 INTO THE AC
  1185	031076	300 00 0 00 000000 		CAI			;CAI IS A NO-OP.  IT IS HERE IN CASE TDC SKIPS
  1186	031077	332 00 0 00 000000 		SKIPE			;PASS TEST IF C(AC)=0
  1187						STOP^
  1188	031100	254 04 0 00 031101 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1189	031101	324 00 0 00 031102 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1190									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1191									;IN THE SUBTEST) TO LOOP ON ERROR^
  1192
  1193					;*****     FAILURE ANALYSIS     *****
  1194					;C(AC0)		C(AC1)		FAILING SIGNAL
  1195
  1196					;-1,,-1				FC:AD FM + EN
  1197
  1198					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 10
DAKACM	MAC	19-JAN-77 13:40		TEST OF LOGICAL TEST INSTRUCTIONS                                                  SEQ 0036

  1199					;THIS TEST VERIFIES THAT TDC COMPLEMENTS THE BITS OF THE AC
  1200					;WHICH ARE MASKED BY C(E) AND DOES NOT AFFECT THE UNMASKED BITS OF THE AC.
  1201					;IN THIS CASE, AC=E AND C(AC)= C(E)=-1,,-1.  HENCE, THE RESULT IN THE AC SHOULD BE 0.
  1202					;THE AC IS CHECKED FOR 0.  IF C(AC)=0, THIS TEST FAILS
  1203
  1204	031102	474 00 0 00 000000 	B15400:	SETO			;PRELOAD AC WITH -1,,-1		
  1205	031103	650 00 0 00 000000 		TDC			;*TDC SHOULD PLACE 0 INTO THE AC
  1206	031104	300 00 0 00 000000 		CAI			;CAI IS A NO-OP.  IT IS HERE IN CASE TDC SKIPS
  1207	031105	332 00 0 00 000000 		SKIPE			;PASS TEST IF C(AC)=0
  1208						STOP^
  1209	031106	254 04 0 00 031107 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1210	031107	324 00 0 00 031110 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1211									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1212									;IN THE SUBTEST) TO LOOP ON ERROR^
  1213
  1214					;**********
  1215
  1216					;THIS TEST VERIFIES THAT TDC COMPLEMENTS THE BITS OF THE AC
  1217					;WHICH ARE MASKED BY C(E) AND DOES NOT AFFECT THE UNMASKED BITS OF THE AC.
  1218					;IN THIS CASE, C(AC)=0 AND C(E)=-1,,-1.  HENCE, THE RESULT IN THE AC SHOULD BE -1,,-1.
  1219					;THE AC IS CHECKED FOR -1,,-1.  IF C(AC)=-1,,-1, THIS TEST PASSES
  1220
  1221	031110	400 00 0 00 000000 	B15500:	SETZ			;PRELOAD AC WITH 0		
  1222	031111	650 00 0 00 034012 		TDC	[-1]		;*TDC SHOULD PLACE -1,,-1 INTO THE AC
  1223	031112	300 00 0 00 000000 		CAI			;CAI IS A NO-OP.  IT IS HERE IN CASE TDC SKIPS
  1224	031113	312 00 0 00 034012 		CAME	[-1]		;PASS TEST IF C(AC)=-1,,-1
  1225						STOP^
  1226	031114	254 04 0 00 031115 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1227	031115	324 00 0 00 031116 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1228									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1229									;IN THE SUBTEST) TO LOOP ON ERROR^
  1230
  1231					;*****     FAILURE ANALYSIS     *****
  1232					;C(AC0)		C(AC1)		FAILING SIGNAL
  1233
  1234					;0				FC: AD EQV
  1235
  1236					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 11
DAKACM	MAC	19-JAN-77 13:40		TEST OF LOGICAL TEST INSTRUCTIONS                                                  SEQ 0037

  1237					;THIS TEST VERIFIES THAT TDC COMPLEMENTS THE BITS OF THE AC
  1238					;WHICH ARE MASKED BY C(E) AND DOES NOT AFFECT THE UNMASKED BITS OF THE AC.
  1239					;IN THIS CASE, C(AC)=-1 AND C(E)=0.  HENCE, THE RESULT IN THE AC SHOULD BE -1,,-1.
  1240					;THE AC IS CHECKED FOR -1,,-1.  IF C(AC)=-1,,-1, THIS TEST PASSES
  1241
  1242	031116	474 00 0 00 000000 	B15600:	SETO			;PRELOAD AC WITH -1,,-1		
  1243	031117	650 00 0 00 034014 		TDC	[0]		;*TDC SHOULD PLACE -1,,-1 INTO THE AC
  1244	031120	300 00 0 00 000000 		CAI			;CAI IS A NO-OP.  IT IS HERE IN CASE TDC SKIPS
  1245	031121	312 00 0 00 034012 		CAME	[-1]		;PASS TEST IF C(AC)=-1,,-1
  1246						STOP^
  1247	031122	254 04 0 00 031123 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1248	031123	324 00 0 00 031124 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1249									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1250									;IN THE SUBTEST) TO LOOP ON ERROR^
  1251
  1252					;**********
  1253
  1254					;THIS TEST VERIFIES THAT TDNA ALWAYS SKIPS THE NEXT
  1255					;SEQUENTIAL INSTRUCTION.  IF TDNA DOES NOT
  1256					;SKIP, THIS TEST FAILS.
  1257
  1258	031124	400 00 0 00 000000 	B15700:	SETZ			;PRESET AC, E TO 0		
  1259	031125	614 00 0 00 000000 		TDNA			;*TDNA SHOULD SKIP THE NEXT INSTRUCTION
  1260						STOP^
  1261	031126	254 04 0 00 031127 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1262	031127	324 00 0 00 031130 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1263									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1264									;IN THE SUBTEST) TO LOOP ON ERROR^
  1265
  1266					;*****     FAILURE ANALYSIS     *****
  1267					;C(AC0)		C(AC1)		FAILING SIGNAL
  1268
  1269					;0				SW: ET1
  1270					;0				FC: AB PC EN
  1271					;0				ET1: BR AR EN
  1272					;0				ET1: PC CLOCK
  1273					;0				ET2: MC INST FETCH EN
  1274
  1275					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 12
DAKACM	MAC	19-JAN-77 13:40		TEST OF LOGICAL TEST INSTRUCTIONS                                                  SEQ 0038

  1276					;THIS TEST VERIFIES THAT TDN NEVER SKIPS
  1277					;NEXT SEQUENTIAL INSTRUCTION.
  1278					;THIS TEST FAILS IF TDN SKIPS.
  1279
  1280	031130	474 00 0 00 000000 	B16000:	SETO			;PRESET AC, E TO -1,,-1		
  1281	031131	610 00 0 00 000000 		TDN			;*TDN SHOULD NOT SKIP
  1282	031132	334 00 0 00 000000 		SKIPA			;SKIP HALT IF TDN PASSES
  1283						STOP^
  1284	031133	254 04 0 00 031134 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1285	031134	324 00 0 00 031135 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1286									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1287									;IN THE SUBTEST) TO LOOP ON ERROR^
  1288
  1289					;**********
  1290
  1291					;THIS TEST VERIFIES THAT TDN NEVER SKIPS THE
  1292					;NEXT SEQUENTIAL INSTRUCTION.
  1293					;THIS TEST FAILS IF TDN SKIPS.
  1294
  1295	031135	400 00 0 00 000000 	B16100:	SETZ			;PRESET AC, E TO 0		
  1296	031136	610 00 0 00 000000 		TDN			;*TDN SHOULD NOT SKIP
  1297	031137	334 00 0 00 000000 		SKIPA			;SKIP HALT IF TDN PASSES
  1298						STOP^
  1299	031140	254 04 0 00 031141 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1300	031141	324 00 0 00 031142 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1301									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1302									;IN THE SUBTEST) TO LOOP ON ERROR^
  1303
  1304					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 13
DAKACM	MAC	19-JAN-77 13:40		TEST OF LOGICAL TEST INSTRUCTIONS                                                  SEQ 0039

  1305					;THIS TEST VERIFIES THAT TDNE SKIPS THE NEXT SEQUENTIAL INSTRUCTION WHEN
  1306					;AND ONLY WHEN ALL OF THE BITS OF THE AC, WHICH ARE MASKED
  1307					;BY C(E), ARE ZERO.
  1308					;IN THIS TEST C(AC) = -1..0 AND C(E) = 707070..707070.
  1309					;HENCE, TDNE SHOULD NOT SKIP THE NEXT SEQUENTIAL INSTRUCTION.
  1310					;IF TDNE SKIPS, THIS TEST FAILS
  1311
  1312	031142	200 00 0 00 034013 	B16200:	MOVE	[XWD -1,0]	;PRELOAD AC WITH -1..0
  1313	031143	612 00 0 00 034016 		TDNE	[707070707070]	;*TDNE SHOULD NOT SKIP
  1314	031144	334 00 0 00 000000 		SKIPA			;SKIP HALT IF TDNE PASSES
  1315						STOP^
  1316	031145	254 04 0 00 031146 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1317	031146	324 00 0 00 031147 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1318									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1319									;IN THE SUBTEST) TO LOOP ON ERROR^
  1320
  1321					;*****     FAILURE ANALYSIS     *****
  1322					;C(AC0)		C(AC1)		FAILING SIGNAL
  1323
  1324					;-1,,0				SW:FCE
  1325					;-1,,0				SW: PC CHANGE
  1326					;-1,,-1				FC: AD AR + EN
  1327					;E				ET2: MC INST FETCH EN
  1328
  1329					;**********
  1330
  1331					;THIS TEST VERIFIES THAT TDNE SKIPS THE NEXT SEQUENTIAL INSTRUCTION WHEN
  1332					;AND ONLY WHEN ALL OF THE BITS OF THE AC, WHICH ARE MASKED
  1333					;BY C(E), ARE ZERO.
  1334					;IN THIS CASE, AC=E AND C(AC)=0.
  1335					;HENCE, TDNE SHOULD SKIP THE NEXT SEQUENTIAL INSTRUCTION
  1336					;IF TDNE DOES NOT SKIP, THIS TEST FAILS.
  1337
  1338	031147	400 00 0 00 000000 	B16300:	SETZ			;PRELOAD AC, E WITH 0		
  1339	031150	612 00 0 00 000000 		TDNE			;*TDNE SHOULD SKIP THE NEXT INSTRUCTION
  1340						STOP^
  1341	031151	254 04 0 00 031152 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1342	031152	324 00 0 00 031153 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1343									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1344									;IN THE SUBTEST) TO LOOP ON ERROR^
  1345
  1346					;*****     FAILURE ANALYSIS     *****
  1347					;C(AC0)		C(AC1)		FAILING SIGNAL
  1348
  1349					;0				SW: ET1
  1350					;0				ET1: PC CLOCK
  1351
  1352					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 14
DAKACM	MAC	19-JAN-77 13:40		TEST OF LOGICAL TEST INSTRUCTIONS                                                  SEQ 0040

  1353					;THIS TEST VERIFIES THAT TDNN SKIPS THE NEXT SEQUENTIAL INSTRUCTION WHEN 
  1354					;AND ONLY WHEN NOT ALL OF THE BITS OF THE AC, WHICH ARE MASKED
  1355					;BY C(E) ARE ZERO.
  1356					;IN THIS TEST AC=E AND C(AC)=C(E)=0.  HENCE TDNN
  1357					;SHOULD NOT SKIP THE NEXT SEQUENTIAL INSTRUCTION
  1358					;IF TDNN SKIPS, THE TEST FAILS.
  1359
  1360	031153	400 00 0 00 000000 	B16400:	SETZ			;PRELOAD AC,E WITH 0
  1361	031154	616 00 0 00 000000 		TDNN			;*TDNN SHOULD NOT SKIP THE NEXT INSTRUCTION
  1362	031155	334 00 0 00 000000 		SKIPA			;SKIP HALT IF TDNE PASSES
  1363						STOP^
  1364	031156	254 04 0 00 031157 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1365	031157	324 00 0 00 031160 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1366									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1367									;IN THE SUBTEST) TO LOOP ON ERROR^
  1368
  1369					;*****     FAILURE ANALYSIS     *****
  1370					;C(AC0)		C(AC1)		FAILING SIGNAL
  1371
  1372					;0				SW: PC CHANGE
  1373					;0				FC: AB PC EN
  1374					;0				ET2: MC INST FETCH EN
  1375
  1376					;**********
  1377
  1378					;THIS TEST VERIFIES THAT TDNA ALWAYS SKIPS THE NEXT
  1379					;SEQUENTIAL INSTRUCTION.  IF TDNA DOES NOT
  1380					;SKIP, THIS TEST FAILS.
  1381
  1382	031160	474 00 0 00 000000 	B16500:	SETO			;PRESET AC, E TO 0		
  1383	031161	614 00 0 00 000000 		TDNA			;*TDNA SHOULD SKIP THE NEXT INSTRUCTION
  1384						STOP^
  1385	031162	254 04 0 00 031163 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1386	031163	324 00 0 00 031164 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1387									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1388									;IN THE SUBTEST) TO LOOP ON ERROR^
  1389
  1390					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 15
DAKACM	MAC	19-JAN-77 13:40		TEST OF LOGICAL TEST INSTRUCTIONS                                                  SEQ 0041

  1391					;THIS TEST VERIFIES THAT TDNN SKIPS THE NEXT SEQUENTIAL INSTRUCTION WHEN
  1392					;AND ONLY WHEN NOT ALL OF THE BITS OF THE AC, WHICH ARE MASKED BY C(E),
  1393					;ARE ZERO
  1394					;IN THIS TEST C(AC)=-1,,0 AND C(E)=707070,,707070.  HENCE, TDNN
  1395					;SHOULD SKIP THE NEXT INSTRUCTION.  IF IT DOES NOT SKIP, THIS TEST FAILS.
  1396
  1397	031164	200 00 0 00 034013 	B16600:	MOVE	[XWD -1,0]	;PRESET AC TO -1,,0
  1398	031165	616 00 0 00 034016 		TDNN	[707070707070]	;*TDNN SHOULD SKIP THE NEXT INSTRUCTION
  1399						STOP^
  1400	031166	254 04 0 00 031167 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1401	031167	324 00 0 00 031170 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1402									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1403									;IN THE SUBTEST) TO LOOP ON ERROR^
  1404
  1405					;*****     FAILURE ANALYSIS     *****
  1406					;C(AC0)		C(AC1)		FAILING SIGNAL
  1407
  1408					;-1,,0				SW: FCE
  1409					;-1,,0				SW: ET1
  1410					;-1,,0				ET1: PC CLOCK
  1411
  1412					;**********
  1413
  1414					;THIS TEST VERIFIES THAT TDNE SKIPS THE NEXT SEQUENTIAL INSTRUCTION WHEN
  1415					;AND ONLY WHEN ALL OF THE BITS OF THE AC, WHICH ARE MASKED
  1416					;BY C(E), ARE ZERO.
  1417					;IN THIS TEST, C(AC)=-1,,-1 AND C(E)=0.  HENCE, TDNE SHOULD SKIP
  1418					;THE NEXT SEQUENTIAL INSTRUCTION.
  1419					;IF TDNE DOES NOT SKIP, THIS TEST FAILS
  1420
  1421	031170	474 00 0 00 000000 	B16700:	SETO			;PRESET AC TO ALL ONES		
  1422	031171	612 00 0 00 034014 		TDNE	[0]		;*TDNE SHOULD SKIP THE NEXT INSTRUCTION
  1423						STOP^
  1424	031172	254 04 0 00 031173 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1425	031173	324 00 0 00 031174 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1426									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1427									;IN THE SUBTEST) TO LOOP ON ERROR^
  1428
  1429					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 16
DAKACM	MAC	19-JAN-77 13:40		TEST OF LOGICAL TEST INSTRUCTIONS                                                  SEQ 0042

  1430					;THIS TEST VERIFIES THAT TDNE SKIPS THE NEXT SEQUENTIAL INSTRUCTION WHEN
  1431					;AND ONLY WHEN ALL OF THE BITS OF THE AC, WHICH ARE MASKED
  1432					;BY C(E), ARE ZERO.
  1433					;IN THIS TEST C(AC)=0 AND C(E)=-1,,-1, HENCE, TDNE SHOULD SKIP
  1434					;THE NEXT SEQUENTIAL INSTRUCTION.
  1435					;IF TDNE DOES NOT SKIP, THIS TEST FAILS
  1436
  1437	031174	400 00 0 00 000000 	B17000:	SETZ			;PRESET AC TO 0		
  1438	031175	612 00 0 00 034012 		TDNE	[-1]		;*TDNE SHOULD SKIP THE NEXT INSTRUCTION
  1439						STOP^
  1440	031176	254 04 0 00 031177 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1441	031177	324 00 0 00 031200 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1442									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1443									;IN THE SUBTEST) TO LOOP ON ERROR^
  1444
  1445					;*****     FAILURE ANALYSIS     *****
  1446					;C(AC0)		C(AC1)		FAILING SIGNAL
  1447
  1448					;0				FC: AD FM + EN
  1449
  1450					;**********
  1451
  1452					;THIS TEST VERIFIES THAT TDN NEVER SKIPS THE NEXT SEQUENTIAL INSTRUCTION.
  1453					;THIS TEST FAILS IF TDN SKIPS
  1454
  1455	031200	474 00 0 00 000000 	B17300:	SETO			;PRESET AC TO -1,,-1		
  1456	031201	610 00 0 00 034014 		TDN	[0]		;*TDN SHOULD NOT SKIP
  1457	031202	334 00 0 00 000000 		SKIPA			;SKIP HALT IF TDN PASSES
  1458						STOP^
  1459	031203	254 04 0 00 031204 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1460	031204	324 00 0 00 031205 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1461									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1462									;IN THE SUBTEST) TO LOOP ON ERROR^
  1463
  1464					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 17
DAKACM	MAC	19-JAN-77 13:40		TEST OF LOGICAL TEST INSTRUCTIONS                                                  SEQ 0043

  1465					;THIS TEST VERIFIES THAT TDN NEVER SKIPS THE NEXT SEQUENTIAL INSTRUCTION.
  1466					;THIS TEST FAILS IF TDN SKIPS
  1467
  1468	031205	400 00 0 00 000000 	B17400:	SETZ			;PRESET AC TO 0
  1469	031206	610 00 0 00 034012 		TDN	[-1]		;*TDN SHOULD NOT SKIP
  1470	031207	334 00 0 00 000000 		SKIPA			;SKIP HALT IF TDN PASSES
  1471						STOP^
  1472	031210	254 04 0 00 031211 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1473	031211	324 00 0 00 031212 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1474									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1475									;IN THE SUBTEST) TO LOOP ON ERROR^
  1476
  1477					;**********
  1478
  1479					;THIS TEST VERIFIES THAT TDNA ALWAYS SKIPS THE NEXT SEQUENTIAL INSTRUCTION
  1480					;THIS TEST FAILS IF TDNA DOES NOT SKIP
  1481
  1482	031212	474 00 0 00 000000 	B17700:	SETO			;PRESET AC TO -1,,-1
  1483	031213	614 00 0 00 034014 		TDNA	[0]		;*TDNA SHOULD SKIP
  1484						STOP^
  1485	031214	254 04 0 00 031215 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1486	031215	324 00 0 00 031216 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1487									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1488									;IN THE SUBTEST) TO LOOP ON ERROR^
  1489
  1490					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 18
DAKACM	MAC	19-JAN-77 13:40		TEST OF LOGICAL TEST INSTRUCTIONS                                                  SEQ 0044

  1491					;THIS TEST VERIFIES THAT TDNA ALWAYS SKIPS THE NEXT SEQUENTIAL INSTRUCTION
  1492					;THIS TEST FAILS IF TDNA DOES NOT SKIP
  1493
  1494	031216	400 00 0 00 000000 	B20000:	SETZ			;PRESET AC TO 0
  1495	031217	614 00 0 00 034012 		TDNA	[-1]		;*TDNA SHOULD SKIP
  1496						STOP^
  1497	031220	254 04 0 00 031221 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1498	031221	324 00 0 00 031222 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1499									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1500									;IN THE SUBTEST) TO LOOP ON ERROR^
  1501
  1502					;**********
  1503
  1504					;THIS TEST VERIFIES THAT TDNE SKIPS THE NEXT SEQUENTIAL INSTRUCTION WHEN
  1505					;AND ONLY WHEN ALL OF THE BITS OF THE AC, WHICH ARE MASKED BY C(E), ARE ZERO.
  1506					;IN THIS TEST AC=E AND C(AC)=C(E)=-1,,-1.  HENCE TDNE SHOULD NOT SKIP.
  1507					;IF TDNE SKIPS, THIS TEST FAILS.
  1508
  1509	031222	474 00 0 00 000000 	B20400:	SETO			;PRESET AC,E TO -1,,-1
  1510	031223	612 00 0 00 000000 		TDNE			;*TDNE SHOULD NOT SKIP
  1511	031224	334 00 0 00 000000 		SKIPA			;SKIP HALT IF TDNE PASSES
  1512						STOP^
  1513	031225	254 04 0 00 031226 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1514	031226	324 00 0 00 031227 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1515									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1516									;IN THE SUBTEST) TO LOOP ON ERROR^
  1517
  1518					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 19
DAKACM	MAC	19-JAN-77 13:40		TEST OF LOGICAL TEST INSTRUCTIONS                                                  SEQ 0045

  1519					;THIS TEST VERIFIES THAT TDNN SKIPS THE NEXT SEQUENTIAL INSTRUCTION WHEN
  1520					;AND ONLY WHEN NOT ALL OF THE BITS OF THE AC, WHICH ARE MASKED BY C(E), ARE ZERO.
  1521					;IN THIS TEST, AC=E AND C(AC)=C(E)=-1,,-1.  HENCE TDNN SHOULD SKIP
  1522					;IF TDNN DOES NOT SKIP, THIS TEST FAILS
  1523
  1524	031227	474 00 0 00 000000 	B20600:	SETO			;PRESET AC,E TO -1,,-1
  1525	031230	616 00 0 00 000000 		TDNN			;*TDNN SHOULD SKIP THE NEXT SEQUENTIAL INSTRUCTION
  1526						STOP^
  1527	031231	254 04 0 00 031232 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1528	031232	324 00 0 00 031233 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1529									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1530									;IN THE SUBTEST) TO LOOP ON ERROR^
  1531
  1532					;**********
  1533
  1534					;THIS TEST VERIFIES THAT TDNN SKIPS THE NEXT SEQUENTIAL INSTRUCTION WHEN
  1535					;AND ONLY WHEN NOT ALL OF THE BITS OF THE AC, WHICH ARE MASKED BY C(E), ARE ZERO.
  1536					;IN THIS TEST, C(AC)=0 AND C(E)=-1,,-1.  HENCE TDNN SHOULD NOT SKIP
  1537					;IF TDNN SKIPS, THIS TEST FAILS
  1538
  1539	031233	400 00 0 00 000000 	B20700:	SETZ			;PRESET AC TO 0
  1540	031234	616 00 0 00 034012 		TDNN	[-1]		;*TDNN SHOULD NOT SKIP THE NEXT SEQUENTIAL INSTRUCTION
  1541	031235	334 00 0 00 000000 		SKIPA			;SKIP HALT IF TDNN PASSES
  1542						STOP^
  1543	031236	254 04 0 00 031237 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1544	031237	324 00 0 00 031240 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1545									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1546									;IN THE SUBTEST) TO LOOP ON ERROR^
  1547
  1548					;*****     FAILURE ANALYSIS     *****
  1549					;C(AC0)		C(AC1)		FAILING SIGNAL
  1550
  1551					;0				FC: AD FM + EN
  1552
  1553					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 20
DAKACM	MAC	19-JAN-77 13:40		TEST OF LOGICAL TEST INSTRUCTIONS                                                  SEQ 0046

  1554					;THIS TEST VERIFIES THAT TDNN SKIPS THE NEXT SEQUENTIAL INSTRUCTION WHEN
  1555					;AND ONLY WHEN NOT ALL OF THE BITS OF THE AC, WHICH ARE MASKED BY C(E), ARE ZERO.
  1556					;IN THIS TEST, C(AC)=-1,,-1 AND C(E)=0.  HENCE TDNN SHOULD NOT SKIP
  1557					;IF TDNN SKIPS, THIS TEST FAILS
  1558
  1559	031240	474 00 0 00 000000 	B21000:	SETO			;PRESET AC TO -1,,-1
  1560	031241	616 00 0 00 034014 		TDNN	[0]		;*TDNN SHOULD NOT SKIP THE NEXT SEQUENTIAL INSTRUCTION
  1561	031242	334 00 0 00 000000 		SKIPA			;SKIP HALT IF TDNN PASSES
  1562						STOP^
  1563	031243	254 04 0 00 031244 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1564	031244	324 00 0 00 031245 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1565									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1566									;IN THE SUBTEST) TO LOOP ON ERROR^
  1567
  1568					;*****     FAILURE ANALYSIS     *****
  1569					;C(AC0)		C(AC1)		FAILING SIGNAL
  1570
  1571					;-1,,-1				FC: AD AR + EN
  1572
  1573					;**********
  1574
  1575					;THIS TEST VERIFIES THAT TDO PLACES ONES IN THE BITS OF THE AC
  1576					;WHICH ARE MASKED BY C(E) AND DOES NOT EFFECT THE UNMASKED BITS OF THE AC.
  1577					;IN THIS CASE C(AC)=0 AND C(E)=-1,,0.  HENCE, THE RESULT IN THE AC SHOULD BE -1,,0
  1578					;THE AC IS CHECKED FOR -1,,0.  IF C(AC)=-1,,0, THIS TEST PASSES
  1579
  1580	031245	400 00 0 00 000000 	B21100:	SETZ			;PRELOAD AC WITH 0
  1581	031246	670 00 0 00 034013 		TDO	[XWD -1,0]	;*TDO SHOULD PLACE -1,,0 INTO THE AC
  1582	031247	312 00 0 00 034013 		CAME	[XWD -1,0]	;PASS IF C(AC)=-1,,0
  1583						STOP^
  1584	031250	254 04 0 00 031251 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1585	031251	324 00 0 00 031252 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1586									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1587									;IN THE SUBTEST) TO LOOP ON ERROR^
  1588
  1589					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 21
DAKACM	MAC	19-JAN-77 13:40		TEST OF LOGICAL TEST INSTRUCTIONS                                                  SEQ 0047

  1590					;THIS TEST VERIFIES THAT TSO PLACES ONES IN THE BITS OF THE AC
  1591					;WHICH ARE MASKED BY BOTH HALVES OF C(E) SWAPPED.
  1592					;THE UNMASKED BITS OF THE AC ARE NOT AFFECTED
  1593					;IN THIS CASE, C(AC)=0 AND C(E)=-1,,0.  HENCE,
  1594					;THE RESULT IN THE AC SHOULD BE 0,,-1.  THE AC IS
  1595					;CHECKED FOR 0,,-1.  THIS TEST PASSES IF C(AC)=0,,-1
  1596
  1597	031252	400 00 0 00 000000 	B21400:	SETZ			;PRESET AC WITH 0
  1598	031253	671 00 0 00 034013 		TSO	[XWD -1,0]	;*TSO SHOULD PLACE 0,,-1 INTO THE AC
  1599	031254	312 00 0 00 034015 		CAME	[XWD 0,-1]	;PASS IF C(AC)=0,,-1
  1600						STOP^
  1601	031255	254 04 0 00 031256 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1602	031256	324 00 0 00 031257 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1603									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1604									;IN THE SUBTEST) TO LOOP ON ERROR^
  1605
  1606					;*****     FAILURE ANALYSIS     *****
  1607					;C(AC0)		C(AC1)		FAILING SIGNAL
  1608
  1609					;0				SW: FCE
  1610					;0				SW: ET0
  1611					;0				SW: ET1
  1612					;0				FC: AD FM + EN
  1613					;0				FC: AD AR + EN
  1614					;0				ET0: AR SWAP
  1615					;0				ET0: AD FM + EN
  1616					;0				ET0: AD AR + EN
  1617					;0				ET1: BR AR EN
  1618					;0				ET1: AD BR - EN
  1619					;-1,,-1				ET1: AD AR + EN
  1620					;0				ET1: AD EQV
  1621
  1622					;**********
  1623
  1624					;THIS TEST VERIFIES THAT TSO PLACES ONES IN THE BITS OF THE AC
  1625					;WHICH ARE MASKED BY BOTH HALVES OF C(E) SWAPPED.
  1626					;THE UNMASKED BITS OF THE AC ARE NOT AFFECTED
  1627					;IN THIS CASE, C(AC)=0 AND C(E)=0,,-1.  HENCE,
  1628					;THE RESULT IN THE AC SHOULD BE -1,,0.  THE AC IS
  1629					;CHECKED FOR -1,,0.  THIS TEST PASSES IF C(AC)=-1,,0
  1630
  1631	031257	400 00 0 00 000000 	B21500:	SETZ			;PRESET AC WITH 0
  1632	031260	671 00 0 00 034015 		TSO	[XWD 0,-1]	;*TSO SHOULD PLACE -1,,0 INTO THE AC
  1633	031261	312 00 0 00 034013 		CAME	[XWD -1,0]	;PASS IF C(AC)=-1,,0
  1634						STOP^
  1635	031262	254 04 0 00 031263 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1636	031263	324 00 0 00 031264 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1637									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1638									;IN THE SUBTEST) TO LOOP ON ERROR^
  1639
  1640					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 22
DAKACM	MAC	19-JAN-77 13:40		TEST OF LOGICAL TEST INSTRUCTIONS                                                  SEQ 0048

  1641					;THIS TEST VERIFIES THAT TSO PLACES ONES IN THE BITS OF THE AC
  1642					;WHICH ARE MASKED BY BOTH HALVES OF C(E) SWAPPED.
  1643					;THE UNMASKED BITS OF THE AC ARE NOT AFFECTED
  1644					;IN THIS CASE, C(AC)=0 AND C(E)=0,,-1.  HENCE,
  1645					;THE RESULT IN THE AC SHOULD BE -1,,0.  THE AC IS
  1646					;CHECKED FOR ITS CONTENTS NON-ZERO.  THIS TEST PASSES IF C(AC) IS NON-ZERO
  1647
  1648	031264	400 00 0 00 000000 	B21600:	SETZ			;PRELOAD AC,E WITH 0
  1649	031265	671 00 0 00 000000 		TSO			;*TSO SHOULD PLACE 0 INTO THE AC
  1650	031266	332 00 0 00 000000 		SKIPE			;PASS IF C(AC)=0
  1651						STOP^
  1652	031267	254 04 0 00 031270 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1653	031270	324 00 0 00 031271 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1654									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1655									;IN THE SUBTEST) TO LOOP ON ERROR^
  1656
  1657					;**********
  1658
  1659					;THIS TEST VERIFIES THAT TSO PLACES ONES IN THE BITS OF THE AC
  1660					;WHICH ARE MASKED BY BOTH HALVES OF C(E) SWAPPED.
  1661					;THE UNMASKED BITS OF THE AC ARE NOT AFFECTED
  1662					;IN THIS CASE, AC=E AND C(AC)=C(E)=-1,,-1.  HENCE,
  1663					;THE RESULT IN THE AC SHOULD BE -1,,-1.  THE AC IS
  1664					;CHECKED FOR -1,,-1.  THIS TEST PASSES IF C(AC) -1,,-1
  1665
  1666	031271	474 00 0 00 000000 	B21700:	SETO			;PRELOAD AC,E WITH -1,,-1
  1667	031272	671 00 0 00 000000 		TSO			;*TSO SHOULD PLACE -1,,-1 INTO THE AC
  1668	031273	312 00 0 00 034012 		CAME	[-1]		;PASS IF C(AC)=-1,,-1
  1669						STOP^
  1670	031274	254 04 0 00 031275 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1671	031275	324 00 0 00 031276 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1672									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1673									;IN THE SUBTEST) TO LOOP ON ERROR^
  1674
  1675					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 23
DAKACM	MAC	19-JAN-77 13:40		TEST OF LOGICAL TEST INSTRUCTIONS                                                  SEQ 0049

  1676					;THIS TEST VERIFIES THAT TSO PLACES ONES IN THE BITS OF THE AC
  1677					;WHICH ARE MASKED BY BOTH HALVES OF C(E) SWAPPED.
  1678					;THE UNMASKED BITS OF THE AC ARE NOT AFFECTED
  1679					;IN THIS CASE, C(AC)=-1,,0 AND C(E)=0,,-1.  HENCE,
  1680					;THE RESULT IN THE AC SHOULD BE -1,,0.  THE AC IS
  1681					;CHECKED FOR -1,,0.  THIS TEST PASSES IF C(AC)=-1,,0
  1682
  1683	031276	200 00 0 00 034013 	B22200:	MOVE	[XWD -1,0]	;PRELOAD AC WITH -1,,0
  1684	031277	671 00 0 00 034015 		TSO	[XWD 0,-1]	;*TSO SHOULD PLACE -1,,0 INTO THE AC
  1685	031300	312 00 0 00 034013 		CAME	[-1,,0]		;PASS IF C(AC)=-1,,0
  1686						STOP^
  1687	031301	254 04 0 00 031302 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1688	031302	324 00 0 00 031303 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1689									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1690									;IN THE SUBTEST) TO LOOP ON ERROR^
  1691
  1692					;**********
  1693
  1694					;THIS TEST VERIFIES THAT TSO PLACES ONES IN THE BITS OF THE AC
  1695					;WHICH ARE MASKED BY BOTH HALVES OF C(E) SWAPPED.
  1696					;THE UNMASKED BITS OF THE AC ARE NOT AFFECTED
  1697					;IN THIS CASE, C(AC)=0,,-1 AND C(E)=0.  HENCE,
  1698					;THE RESULT IN THE AC SHOULD BE 0,,-1.  THE AC IS
  1699					;CHECKED FOR 0,,-1.  THIS TEST PASSES IF C(AC)=0,,-1
  1700
  1701	031303	201 00 0 00 777777 	B22300:	MOVEI	-1		;PRELOAD AC WITH 0,,-1
  1702	031304	671 00 0 00 034014 		TSO	[0]		;*TSO SHOULD PLACE 0,,-1 INTO THE AC
  1703	031305	312 00 0 00 034015 		CAME	[XWD 0,-1]	;PASS IF C(AC)=0,,-1
  1704						STOP^
  1705	031306	254 04 0 00 031307 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1706	031307	324 00 0 00 031310 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1707									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1708									;IN THE SUBTEST) TO LOOP ON ERROR^
  1709
  1710					;*****     FAILURE ANALYSIS     *****
  1711					;C(AC0)		C(AC1)		FAILING SIGNAL
  1712
  1713					;0				ET1: AD FM - EN
  1714					;0				ET2: AR AD EN
  1715
  1716					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 24
DAKACM	MAC	19-JAN-77 13:40		TEST OF LOGICAL TEST INSTRUCTIONS                                                  SEQ 0050

  1717					;THIS TEST VERIFIES THAT TSO PLACES ONES IN THE BITS OF THE AC
  1718					;WHICH ARE MASKED BY BOTH HALVES OF C(E) SWAPPED.
  1719					;THE UNMASKED BITS OF THE AC ARE NOT AFFECTED
  1720					;IN THIS CASE, C(AC)=-1,,0 AND C(E)=0.  HENCE,
  1721					;THE RESULT IN THE AC SHOULD BE -1,,0.  THE AC IS
  1722					;CHECKED FOR -1,,0.  THIS TEST PASSES IF C(AC)=-1,,0
  1723
  1724	031310	200 00 0 00 034013 	B22400:	MOVE	[XWD -1,0]	;PRELOAD AC WITH -1,,0
  1725	031311	671 00 0 00 034014 		TSO	[0]		;*TSO SHOULD PLACE -1,,0 INTO THE AC
  1726	031312	312 00 0 00 034013 		CAME	[XWD -1,0]	;PASS IF C(AC)=-1,,0
  1727						STOP^
  1728	031313	254 04 0 00 031314 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1729	031314	324 00 0 00 031315 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1730									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1731									;IN THE SUBTEST) TO LOOP ON ERROR^
  1732
  1733					;**********
  1734
  1735					;THIS TEST VERIFIES THAT TSO PLACES ONES IN THE BITS OF THE AC
  1736					;WHICH ARE MARKED BY BOTH HALVES OF C(E) SWAPPED.
  1737					;THE UNMASKED BITS OF THE AC ARE NOT AFFECTED
  1738					;IN THIS CASE, C(AC)=0,,-1 AND C(E)=-1,,-1.  HENCE,
  1739					;THE RESULT IN THE AC SHOULD BE -1,,-1.  THE AC IS
  1740					;CHECKED FOR -1,,-1.  THIS TEST PASSES IF C(AC)=-1,,-1
  1741
  1742	031315	201 00 0 00 777777 	B22500:	MOVEI	-1		;PRELOAD AC WITH 0,,-1
  1743	031316	671 00 0 00 034012 		TSO	[-1]		;*TSO SHOULD PLACE -1,,-1 INTO THE AC
  1744	031317	312 00 0 00 034012 		CAME	[-1]		;PASS IF C(AC)=-1,,-1
  1745						STOP^
  1746	031320	254 04 0 00 031321 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1747	031321	324 00 0 00 031322 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1748									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1749									;IN THE SUBTEST) TO LOOP ON ERROR^
  1750
  1751					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 25
DAKACM	MAC	19-JAN-77 13:40		TEST OF LOGICAL TEST INSTRUCTIONS                                                  SEQ 0051

  1752					;THIS TEST VERIFIES THAT TSO PLACES ONES IN THE BITS OF THE AC
  1753					;WHICH ARE MARKED BY BOTH HALVES OF C(E) SWAPPED.
  1754					;THE UNMASKED BITS OF THE AC ARE NOT AFFECTED
  1755					;IN THIS CASE, C(AC)=-1,,0 AND C(E)=-1,,-1.  HENCE,
  1756					;THE RESULT IN THE AC SHOULD BE -1,,-1.  THE AC IS
  1757					;CHECKED FOR -1,,-1.  THIS TEST PASSES IF C(AC)=-1,,-1
  1758
  1759	031322	200 00 0 00 034013 	B22600:	MOVE	[XWD -1,0]	;PRELOAD AC WITH -1,,0
  1760	031323	671 00 0 00 034012 		TSO	[-1]		;*TSO SHOULD PLACE -1,,-1 INTO THE AC
  1761	031324	312 00 0 00 034012 		CAME	[-1]		;PASS IF C(AC)=-1,,-1
  1762						STOP^
  1763	031325	254 04 0 00 031326 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1764	031326	324 00 0 00 031327 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1765									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1766									;IN THE SUBTEST) TO LOOP ON ERROR^
  1767
  1768					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 26
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0052

  1769					SUBTTL	TEST OF HWT INSTRUCTIONS
  1770
  1771					;**********
  1772
  1773					;THIS TEST VERIFIES THAT HLL PLACES THE LEFT HALF OF C(E) INTO
  1774					;THE LEFT HALF OF THE AC.  THE RIGHT HALF OF THE AC IS UNAFFECTED.
  1775					;IN THIS CASE AC=E AND C(AC)=C(E)=0.  HENCE, THE RESULT IN THE AC
  1776					;SHOULD BE 0.  THE AC IS CHECKED FOR 0.  IF C(AC)=0, THIS TEST PASSES
  1777
  1778	031327	400 00 0 00 000000 	B22700:	SETZ			;PRELOAD AC,E WITH 0		
  1779	031330	500 00 0 00 000000 		HLL			;*HLL SHOULD PLACE 0 INTO THE AC
  1780	031331	332 00 0 00 000000 		SKIPE			;PASS IF C(AC)=0
  1781						STOP^
  1782	031332	254 04 0 00 031333 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1783	031333	324 00 0 00 031334 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1784									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1785									;IN THE SUBTEST) TO LOOP ON ERROR^
  1786
  1787					;*****     FAILURE ANALYSIS     *****
  1788					;C(AC0)		C(AC1)		FAILING SIGNAL
  1789
  1790					;-1,,0				FC: AD AR + EN
  1791					;0,,-1				FC: AD RT FM + EN
  1792
  1793					;**********
  1794
  1795					;THIS TEST VERIFIES THAT HLL PLACES THE LEFT HALF OF C(E) INTO
  1796					;THE LEFT HALF OF THE AC.  THE RIGHT HALF OF THE AC IS UNAFFECTED.
  1797					;IN THIS CASE, C(AC)=-1,,-1 AND C(E)=0.  HENCE, THE RESULT IN THE AC
  1798					;SHOULD BE 0,,-1.  THE AC IS CHECKED FOR 0,,-1.  IF C(AC)=0,,-1,
  1799					;THIS TEST PASSES.
  1800
  1801	031334	474 00 0 00 000000 	B23000:	SETO			;PRELOAD AC WITH -1,,-1
  1802	031335	500 00 0 00 034014 		HLL	[0]		;*HLL SHOULD PLACE 0,,-1 INTO THE AC
  1803	031336	302 00 0 00 777777 		CAIE	-1		;PASS IF C(AC)=0,,-1
  1804						STOP^
  1805	031337	254 04 0 00 031340 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1806	031340	324 00 0 00 031341 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1807									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1808									;IN THE SUBTEST) TO LOOP ON ERROR^
  1809
  1810					;*****     FAILURE ANALYSIS     *****
  1811					;C(AC0)		C(AC1)		FAILING SIGNAL
  1812
  1813					;0,,-1				SW: FCE
  1814					;0				ET2: AR AD EN
  1815
  1816					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 27
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0053

  1817					;THIS TEST VERIFIES THAT HLL PLACES THE LEFT HALF OF C(E) INTO
  1818					;THE LEFT HALF OF THE AC.  THE RIGHT HALF OF THE AC IS UNAFFECTED.
  1819					;IN THIS CASE AC=E AND C(AC)=C(E)=-1,,-1.  HENCE, THE RESULT IN THE AC
  1820					;SHOULD BE -1,,-1.  THE AC IS CHECKED FOR -1,,-1.  IF C(AC)=-1,,-1, THIS TEST PASSES.
  1821
  1822	031341	474 00 0 00 000000 	B23200:	SETO			;PRELOAD AC,E WITH -1,,-1		
  1823	031342	500 00 0 00 000000 		HLL			;*HLL SHOULD PLACE -1,,-1 INTO THE AC
  1824	031343	312 00 0 00 034012 		CAME	[-1]		;PASS IF C(AC)=-1,,-1
  1825						STOP^
  1826	031344	254 04 0 00 031345 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1827	031345	324 00 0 00 031346 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1828									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1829									;IN THE SUBTEST) TO LOOP ON ERROR^
  1830
  1831					;**********
  1832
  1833					;THIS TEST VERIFIES THAT HLL PLACES THE LEFT HALF OF C(E) INTO
  1834					;THE LEFT HALF OF THE AC.  THE RIGHT HALF OF THE AC IS UNAFFECTED.
  1835					;IN THIS CASE C(AC)=0 AND C(E)=-1,,-1.  HENCE, THE RESULT IN THE AC
  1836					;SHOULD BE -1,,0.  THE AC IS CHECKED FOR -1,,0.  IF C(AC)=-1,,0,
  1837					;THIS TEST PASSES
  1838
  1839	031346	400 00 0 00 000000 	B23400:	SETZ			;PRELOAD AC WITH 0		
  1840	031347	500 00 0 00 034012 		HLL	[-1]		;*HLL SHOULD PLACE -1,,0 INTO THE AC	
  1841	031350	312 00 0 00 034013 		CAME	[XWD -1,0]	;PASS IF C(AC)=-1,,0
  1842						STOP^
  1843	031351	254 04 0 00 031352 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1844	031352	324 00 0 00 031353 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1845									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1846									;IN THE SUBTEST) TO LOOP ON ERROR^
  1847
  1848					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 28
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0054

  1849					;THIS TEST VERIFIES THAT HLL PLACES THE LEFT HALF OF C(E) INTO
  1850					;THE LEFT HALF OF THE AC.  THE RIGHT HALF OF THE AC IS UNAFFECTED.
  1851					;IN THIS CASE, C(AC)=0 AND C(E)=-1,,0.  HENCE, THE RESULT IN THE AC
  1852					;SHOULD BE -1,,0.  THE AC IS CHECKED FOR -1,,0.  IF C(AC)=-1,,0,
  1853					;THIS TEST PASSES.
  1854
  1855	031353	400 00 0 00 000000 	B23600:	SETZ			;PRELOAD AC WITH 0		
  1856	031354	500 00 0 00 034013 		HLL	[XWD -1,0]	;*HLL SHOULD PLACE -1,,0 INTO THE AC
  1857	031355	312 00 0 00 034013 		CAME	[XWD -1,0]	;PASS IF C(AC)=-1,,0
  1858						STOP^
  1859	031356	254 04 0 00 031357 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1860	031357	324 00 0 00 031360 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1861									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1862									;IN THE SUBTEST) TO LOOP ON ERROR^
  1863
  1864					;**********
  1865
  1866					;THIS TEST VERIFIES THAT HLL PLACES THE LEFT HALF OF C(E) INTO
  1867					;THE LEFT HALF OF THE AC.  THE RIGHT HALF OF THE AC IS UNAFFECTED.
  1868					;IN THIS CASE, C(AC)=-1,,-1 AND C(E)=0,,-1.  HENCE, THE RESULT IN THE AC
  1869					;SHOULD BE 0,,-1.  THE AC IS CHECKED FOR 0,,-1.  IF C(AC)=0,,-1,
  1870					;THIS TEST PASSES.
  1871
  1872	031360	474 00 0 00 000000 	B23700:	SETO			;PRELOAD AC WITH -1,,-1
  1873	031361	500 00 0 00 034015 		HLL	[XWD 0,-1]	;*HLL SHOULD PLACE 0,,-1 INTO THE AC
  1874	031362	302 00 0 00 777777 		CAIE	-1		;PASS IF C(AC)=0,,-1
  1875						STOP^
  1876	031363	254 04 0 00 031364 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1877	031364	324 00 0 00 031365 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1878									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1879									;IN THE SUBTEST) TO LOOP ON ERROR^
  1880
  1881					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 29
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0055

  1882					;THIS TEST VERIFIES THAT HLLZ PLACES THE LEFT HALF OF C(E) INTO
  1883					;THE LEFT HALF OF THE AC AND PLACES ZEROS INTO THE RIGHT HALF OF THE AC.
  1884					;IN THIS CASE, AC=E AND C(AC)=C(E)=0.  HENCE, THE RESULT IN THE AC
  1885					;SHOULD BE 0.  THE AC IS CHECKED FOR 0.  IF C(AC)=0, THIS TEST PASSES
  1886
  1887	031365	400 00 0 00 000000 	B24000:	SETZ			;PRELOAD AC,E WITH 0		
  1888	031366	510 00 0 00 000000 		HLLZ			;*HLLZ SHOULD PLACE 0 INTO THE AC
  1889	031367	332 00 0 00 000000 		SKIPE			;PASS IF C(AC)=0
  1890						STOP^
  1891	031370	254 04 0 00 031371 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1892	031371	324 00 0 00 031372 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1893									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1894									;IN THE SUBTEST) TO LOOP ON ERROR^
  1895
  1896					;*****     FAILURE ANALYSIS     *****
  1897					;C(AC0)		C(AC1)		FAILING SIGNAL
  1898
  1899					;-1,,0				FC: AD LT AR + EN
  1900
  1901					;**********
  1902
  1903					;THIS TEST VERIFIES THAT HLLZ PLACES THE LEFT HALF OF C(E) INTO
  1904					;THE LEFT HALF OF THE AC AND PLACES ZEROS INTO THE RIGHT HALF OF THE AC.
  1905					;IN THIS CASE, C(AC)=-1,,-1 AND C(E)=-1,,-1.  HENCE, THE RESULT IN THE AC
  1906					;SHOULD BE -1,,0.  THE AC IS CHECKED FOR -1,,0.
  1907					;IF C(AC)=-1,,0, THIS TEST PASSES.
  1908
  1909	031372	474 00 0 00 000000 	B24300:	SETO			;PRELOAD AC WITH -1,,-1
  1910	031373	510 00 0 00 034012 		HLLZ	[-1]		;*HLLZ SHOULD PLACE -1,,0 INTO THE AC
  1911	031374	312 00 0 00 034013 		CAME	[XWD -1,0]	;PASS IF C(AC)=-1,,0
  1912						STOP^
  1913	031375	254 04 0 00 031376 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1914	031376	324 00 0 00 031377 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1915									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1916									;IN THE SUBTEST) TO LOOP ON ERROR^
  1917
  1918					;*****     FAILURE ANALYSIS     *****
  1919					;C(AC0)		C(AC1)		FAILING SIGNAL
  1920
  1921					;0				SW: FCE
  1922					;-1,,-1				ET2: AR LT AD EN
  1923
  1924					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 30
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0056

  1925					;THIS TEST VERIFIES THAT HLLZ PLACES THE LEFT HALF OF C(E) INTO
  1926					;THE LEFT HALF OF THE AC AND PLACES ZEROS INTO THE RIGHT HALF OF THE AC.
  1927					;IN THIS CASE, C(AC)=0 AND C(E)=-1,,-1.  HENCE, THE RESULT IN THE AC
  1928					;SHOULD BE -1,,0.  THE AC IS CHECKED FOR ITS CONTENTS NON-ZERO
  1929					;IF C(AC) IS NON-ZERO, THIS TEST PASSES.
  1930
  1931	031377	400 00 0 00 000000 	B24400:	SETZ			;PRELOAD AC WITH -1,,-1
  1932	031400	510 00 0 00 034012 		HLLZ	[-1]		;*HLLZ SHOULD PLACE -1,,0 INTO THE AC
  1933	031401	312 00 0 00 034013 		CAME	[XWD -1,0]	;PASS IF C(AC)=-1,,0
  1934						STOP^
  1935	031402	254 04 0 00 031403 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1936	031403	324 00 0 00 031404 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1937									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1938									;IN THE SUBTEST) TO LOOP ON ERROR^
  1939
  1940					;**********
  1941
  1942					;THIS TEST VERIFIES THAT HLLZ PLACES THE LEFT HALF OF C(E) INTO
  1943					;THE LEFT HALF OF THE AC AND PLACES ZEROS INTO THE RIGHT HALF OF THE AC.
  1944					;IN THIS CASE, C(AC)=-1,,-1 AND C(E)=0.  HENCE, THE RESULT IN THE AC
  1945					;SHOULD BE 0.  THE AC IS CHECKED FOR ZERO
  1946					;IF C(AC) IS ZERO, THIS TEST PASSES.
  1947
  1948	031404	474 00 0 00 000000 	B24500:	SETO			;PRELOAD AC WITH -1,,-1		
  1949	031405	510 00 0 00 034014 		HLLZ	[0]		;*HLLZ SHOULD PLACE -1,,0 INTO THE AC
  1950	031406	332 00 0 00 000000 		SKIPE			;PASS IF C(AC) IS ZERO.
  1951						STOP^
  1952	031407	254 04 0 00 031410 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1953	031410	324 00 0 00 031411 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1954									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1955									;IN THE SUBTEST) TO LOOP ON ERROR^
  1956
  1957					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 31
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0057

  1958					;THIS TEST VERIFIES THAT HLLZ PLACES THE LEFT HALF OF C(E) INTO
  1959					;THE LEFT HALF OF THE AC AND PLACES ZEROS INTO THE RIGHT HALF OF THE AC.
  1960					;IN THIS CASE, C(AC)=0 AND C(E)=0.  HENCE, THE RESULT IN THE AC
  1961					;SHOULD BE 0.  THE AC IS CHECKED FOR ZERO
  1962					;IF C(AC) IS ZERO, THIS TEST PASSES.
  1963
  1964	031411	400 00 0 00 000000 	B24600:	SETZ			;PRELOAD AC WITH 0
  1965	031412	510 00 0 00 034014 		HLLZ	[0]		;*HLLZ SHOULD PLACE 0 INTO THE AC
  1966	031413	332 00 0 00 000000 		SKIPE			;PASS IF C(AC) IS ZERO.
  1967						STOP^
  1968	031414	254 04 0 00 031415 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1969	031415	324 00 0 00 031416 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1970									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1971									;IN THE SUBTEST) TO LOOP ON ERROR^
  1972
  1973					;**********
  1974
  1975					;THIS TEST VERIFIES THAT HLLZI ALWAYS CLEARS THE AC.
  1976					;IN THIS CASE C(AC)=-1,,-1 AND E=0,,-1.
  1977					;THE RESULT IN THE AC SHOULD BE 0
  1978					;THE AC IS CHECKED FOR 0.  IF C(AC)=0, THIS TEST PASSES
  1979
  1980	031416	474 00 0 00 000000 	B24700:	SETO			;PRELOAD AC WITH -1,,-1
  1981	031417	511 00 0 00 777777 		HLLZI	-1		;*HLLZI SHOULD CLEAR THE AC
  1982	031420	332 00 0 00 000000 		SKIPE			;PASS IF C(AC)=0
  1983						STOP^
  1984	031421	254 04 0 00 031422 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  1985	031422	324 00 0 00 031423 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  1986									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  1987									;IN THE SUBTEST) TO LOOP ON ERROR^
  1988
  1989					;*****     FAILURE ANALYSIS     *****
  1990					;C(AC0)		C(AC1)		FAILING SIGNAL
  1991
  1992					;-1,,0				FC: AD LT AR + EN
  1993					;0,,-1				ET2: AR LT AD EN
  1994
  1995					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 32
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0058

  1996					;THIS TEST VERIFIES THAT HLLZI ALWAYS CLEARS THE AC.
  1997					;IN THIS CASE C(AC)=0 AND E=0,,-1.
  1998					;THE RESULT IN THE AC SHOULD BE 0
  1999					;THE AC IS CHECKED FOR 0.  IF C(AC)=0, THIS TEST PASSES
  2000
  2001	031423	400 00 0 00 000000 	B25000:	SETZ			;PRELOAD AC WITH 0
  2002	031424	511 00 0 00 777777 		HLLZI	-1		;*HLLZI SHOULD CLEAR THE AC
  2003	031425	332 00 0 00 000000 		SKIPE			;PASS IF C(AC)=0
  2004						STOP^
  2005	031426	254 04 0 00 031427 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2006	031427	324 00 0 00 031430 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2007									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2008									;IN THE SUBTEST) TO LOOP ON ERROR^
  2009
  2010					;**********
  2011
  2012					;THIS TEST VERIFIES THAT HLLZ PLACES THE LEFT HALF OF C(E) INTO
  2013					;THE LEFT HALF OF THE AC AND PLACES ZEROS INTO THE RIGHT HALF OF THE AC.
  2014					;IN THIS CASE, C(AC)=-1,,-1 AND C(E)=-1,,0.  HENCE, THE RESULT IN THE AC
  2015					;SHOULD BE -1,,0.  THE AC IS CHECKED FOR -1,,0.
  2016					;IF C(AC)=-1,,0, THIS TEST PASSES.
  2017
  2018	031430	474 00 0 00 000000 	B25100:	SETO			;PRELOAD AC WITH -1,,-1
  2019	031431	510 00 0 00 034013 		HLLZ	[XWD -1,0]	;*HLLZ SHOULD PLACE -1,,0 INTO THE AC
  2020	031432	312 00 0 00 034013 		CAME	[XWD -1,0]	;PASS IF C(AC)=-1,,0.
  2021						STOP^
  2022	031433	254 04 0 00 031434 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2023	031434	324 00 0 00 031435 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2024									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2025									;IN THE SUBTEST) TO LOOP ON ERROR^
  2026
  2027					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 33
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0059

  2028					;THIS TEST VERIFIES THAT HLLZ PLACES THE LEFT HALF OF C(E) INTO
  2029					;THE LEFT HALF OF THE AC AND PLACES ZEROS INTO THE RIGHT HALF OF THE AC.
  2030					;IN THIS CASE, C(AC)=0 AND C(E)=-1,,0.  HENCE, THE RESULT IN THE AC
  2031					;SHOULD BE -1,,0.  THE AC IS CHECKED FOR -1,,0.
  2032					;IF C(AC)=-1,,0 THIS TEST PASSES.
  2033
  2034	031435	400 00 0 00 000000 	B25200:	SETZ			;PRELOAD AC WITH 0
  2035	031436	510 00 0 00 034013 		HLLZ	[XWD -1,0]	;*HLLZ SHOULD PLACE -1,,0 INTO THE AC
  2036	031437	312 00 0 00 034013 		CAME	[XWD -1,0]	;PASS IF C(AC)=-1,,0
  2037						STOP^
  2038	031440	254 04 0 00 031441 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2039	031441	324 00 0 00 031442 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2040									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2041									;IN THE SUBTEST) TO LOOP ON ERROR^
  2042
  2043					;**********
  2044
  2045					;THIS TEST VERIFIES THAT HLLZ PLACES THE LEFT HALF OF C(E) INTO
  2046					;THE LEFT HALF OF THE AC AND PLACES ZEROS INTO THE RIGHT HALF OF THE AC.
  2047					;IN THIS CASE, C(AC)=0,,-1 AND C(E)=-1,,-1.  HENCE, THE RESULT IN THE AC
  2048					;SHOULD BE -1,,0.  THE AC IS CHECKED FOR -1,,0.
  2049					;IF C(AC)=-1,,0, THIS TEST PASSES.
  2050
  2051	031442	201 00 0 00 777777 	B25300:	MOVEI	-1		;PRELOAD AC WITH -1,,-1
  2052	031443	510 00 0 00 034012 		HLLZ	[-1]		;*HLLZ SHOULD PLACE -1,,0 INTO THE AC
  2053	031444	312 00 0 00 034013 		CAME	[XWD -1,0]	;PASS IF C(AC)=-1,,0
  2054						STOP^
  2055	031445	254 04 0 00 031446 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2056	031446	324 00 0 00 031447 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2057									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2058									;IN THE SUBTEST) TO LOOP ON ERROR^
  2059
  2060					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 34
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0060

  2061					;THIS TEST VERIFIES THAT HLLZ PLACES THE LEFT HALF OF C(E) INTO
  2062					;THE LEFT HALF OF THE AC AND PLACES ZEROS INTO THE RIGHT HALF OF THE AC.
  2063					;IN THIS CASE, C(AC)=-1,,0 AND C(E)=-1,,-1.  HENCE, THE RESULT IN THE AC
  2064					;SHOULD BE -1,,0.  THE AC IS CHECKED FOR -1,,0.
  2065					;IF C(AC)=-1,,0 THIS TEST PASSES.
  2066
  2067	031447	205 00 0 00 777777 	B25400:	MOVSI	-1		;PRELOAD AC WITH -1,,0
  2068	031450	510 00 0 00 034012 		HLLZ	[-1]		;*HLLZ SHOULD PLACE -1,,0 INTO THE AC
  2069	031451	312 00 0 00 034013 		CAME	[XWD -1,0]	;PASS IF C(AC)=-1,,0.
  2070						STOP^
  2071	031452	254 04 0 00 031453 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2072	031453	324 00 0 00 031454 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2073									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2074									;IN THE SUBTEST) TO LOOP ON ERROR^
  2075
  2076					;**********
  2077
  2078					;THIS TEST VERIFIES THAT HLLZ PLACES THE LEFT HALF OF C(E) INTO
  2079					;THE LEFT HALF OF THE AC AND PLACES ZEROS INTO THE RIGHT HALF OF THE AC.
  2080					;IN THIS CASE, C(AC)=0,,-1 AND C(E)=0.  HENCE, THE RESULT IN THE AC
  2081					;SHOULD BE 0.  THE AC IS CHECKED FOR ZERO.
  2082					;IF C(AC) IS ZERO, THIS TEST PASSES.
  2083
  2084	031454	201 00 0 00 777777 	B25500:	MOVEI	-1		;PRELOAD AC WITH 0,,-1	
  2085	031455	510 00 0 00 034014 		HLLZ	[0]		;*HLLZ SHOULD PLACE 0 INTO THE AC
  2086	031456	332 00 0 00 000000 		SKIPE			;PASS IF C(AC) IS ZERO.
  2087						STOP^
  2088	031457	254 04 0 00 031460 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2089	031460	324 00 0 00 031461 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2090									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2091									;IN THE SUBTEST) TO LOOP ON ERROR^
  2092
  2093					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 35
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0061

  2094					;THIS TEST VERIFIES THAT HLLZ PLACES THE LEFT HALF OF C(E) INTO
  2095					;THE LEFT HALF OF THE AC AND PLACES ZEROS INTO THE RIGHT HALF OF THE AC.
  2096					;IN THIS CASE, C(AC)=-1,,0 AND C(E)=0.  HENCE, THE RESULT IN THE AC
  2097					;SHOULD BE 0.  THE AC IS CHECKED FOR ZERO.
  2098					;IF C(AC) IS ZERO, THIS TEST PASSES.
  2099
  2100	031461	205 00 0 00 777777 	B25600:	MOVSI	-1		;PRELOAD AC WITH -1,,0
  2101	031462	510 00 0 00 034014 		HLLZ	[0]		;*HLLZ SHOULD PLACE -1,,0 INTO THE AC
  2102	031463	332 00 0 00 000000 		SKIPE			;PASS IF C(AC) IS ZERO.
  2103						STOP^
  2104	031464	254 04 0 00 031465 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2105	031465	324 00 0 00 031466 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2106									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2107									;IN THE SUBTEST) TO LOOP ON ERROR^
  2108
  2109					;**********
  2110
  2111					;THIS TEST VERIFIES THAT HLLZ PLACES THE LEFT HALF OF C(E) INTO
  2112					;THE LEFT HALF OF THE AC AND PLACES ZEROS INTO THE RIGHT HALF OF THE AC.
  2113					;IN THIS CASE, C(AC)=0,,-1 AND C(E)=-1,,0.  HENCE, THE RESULT IN THE AC
  2114					;SHOULD BE -1,,0.  THE AC IS CHECKED FOR -1,,0.
  2115					;IF C(AC)=-1,,0, THIS TEST PASSES.
  2116
  2117	031466	201 00 0 00 777777 	B25700:	MOVEI	-1		;PRELOAD AC WITH 0,,-1
  2118	031467	510 00 0 00 034013 		HLLZ	[XWD -1,0]	;*HLLZ SHOULD PLACE -1,,0 INTO THE AC
  2119	031470	312 00 0 00 034013 		CAME	[XWD -1,0]	;PASS IF C(AC)=-1,,0
  2120						STOP^
  2121	031471	254 04 0 00 031472 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2122	031472	324 00 0 00 031473 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2123									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2124									;IN THE SUBTEST) TO LOOP ON ERROR^
  2125
  2126					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 36
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0062

  2127					;THIS TEST VERIFIES THAT HLLZI ALWAYS CLEARS THE AC.
  2128					;IN THIS CASE C(AC)=0,,-1 AND E=0,,-1.
  2129					;THE RESULT IN THE AC SHOULD BE 0
  2130					;THE AC IS CHECKED FOR 0.  IF C(AC)=0, THIS TEST PASSES
  2131
  2132	031473	201 00 0 00 777777 	B26000:	MOVEI	-1		;PRELOAD AC WITH 0,,-1
  2133	031474	511 00 0 00 777777 		HLLZI	-1		;*HLLZI SHOULD CLEAR THE AC
  2134	031475	332 00 0 00 000000 		SKIPE			;PASS IF C(AC)=0
  2135						STOP^
  2136	031476	254 04 0 00 031477 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2137	031477	324 00 0 00 031500 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2138									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2139									;IN THE SUBTEST) TO LOOP ON ERROR^
  2140
  2141					;**********
  2142
  2143					;THIS TEST VERIFIES THAT HLLZ PLACES THE LEFT HALF OF C(E) INTO
  2144					;THE LEFT HALF OF THE AC AND PLACES ZEROS INTO THE RIGHT HALF OF THE AC.
  2145					;IN THIS CASE, C(AC)=-1,,0 AND C(E)=-1,,0.  HENCE, THE RESULT IN THE AC
  2146					;SHOULD BE -1,,0.  THE AC IS CHECKED FOR -1,,0.
  2147					;IF C(AC)=-1,,0, THIS TEST PASSES.
  2148
  2149	031500	205 00 0 00 777777 	B26100:	MOVSI	-1		;PRELOAD AC WITH -1,,0
  2150	031501	510 00 0 00 034013 		HLLZ	[XWD -1,0]	;*HLLZ SHOULD PLACE -1,,0 INTO THE AC
  2151	031502	312 00 0 00 034013 		CAME	[XWD -1,0]	;PASS IF C(AC)=-1,,0
  2152						STOP^
  2153	031503	254 04 0 00 031504 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2154	031504	324 00 0 00 031505 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2155									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2156									;IN THE SUBTEST) TO LOOP ON ERROR^
  2157
  2158					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 37
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0063

  2159					;THIS TEST VERIFIES THAT HLLZI ALWAYS CLEARS THE AC.
  2160					;IN THIS CASE C(AC)=-1,,0 AND E=0,,-1.
  2161					;THE RESULT IN THE AC SHOULD BE 0
  2162					;THE AC IS CHECKED FOR 0.  IF C(AC)=0, THIS TEST PASSES
  2163
  2164	031505	205 00 0 00 777777 	B26200:	MOVSI	-1		;PRELOAD AC WITH -1,,0
  2165	031506	511 00 0 00 777777 		HLLZI	-1		;*HLLZI SHOULD CLEAR THE AC
  2166	031507	332 00 0 00 000000 		SKIPE			;PASS IF C(AC)=0
  2167						STOP^
  2168	031510	254 04 0 00 031511 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2169	031511	324 00 0 00 031512 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2170									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2171									;IN THE SUBTEST) TO LOOP ON ERROR^
  2172
  2173					;**********
  2174
  2175					;THIS TEST VERIFIES THAT HRR PLACES THE RIGHT HALF OF C(E) INTO
  2176					;THE RIGHT HALF OF THE AC.  THE LEFT HALF OF THE AC IS UNAFFECTED.
  2177					;IN THIS CASE AC=E AND C(AC)=C(E)=0.  HENCE, THE RESULT IN THE AC
  2178					;SHOULD BE 0.  THE AC IS CHECKED FOR 0.  IF C(AC)=0, THIS TEST PASSES.
  2179
  2180	031512	400 00 0 00 000000 	B26300:	SETZ			;PRELOAD AC WITH 0
  2181	031513	540 00 0 00 000000 		HRR			;*HRR SHOULD PLACE 0 INTO THE AC
  2182	031514	332 00 0 00 000000 		SKIPE			;PASS IF C(AC)=0
  2183						STOP^
  2184	031515	254 04 0 00 031516 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2185	031516	324 00 0 00 031517 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2186									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2187									;IN THE SUBTEST) TO LOOP ON ERROR^
  2188
  2189					;*****     FAILURE ANALYSIS     *****
  2190					;C(AC0)		C(AC1)		FAILING SIGNAL
  2191
  2192					;0,,-1				FC: AD RT AR + EN
  2193					;-1,,0				FC: AD LT FM + EN
  2194
  2195					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 38
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0064

  2196					;THIS TEST VERIFIES THAT HRR PLACES THE RIGHT HALF OF C(E) INTO
  2197					;THE RIGHT HALF OF THE AC.  THE LEFT HALF OF THE AC IS UNAFFECTED.
  2198					;IN THIS CASE AC=E AND C(AC)=C(E)=-1,,-1.  HENCE, THE RESULT IN THE AC
  2199					;SHOULD BE -1,,-1.  THE AC IS CHECKED FOR -1,,-1.  IF C(AC)=-1,,-1, THIS TEST PASSES.
  2200
  2201	031517	474 00 0 00 000000 	B26500:	SETO			;PRELOAD AC WITH -1,,-1
  2202	031520	540 00 0 00 000000 		HRR			;*HRR SHOULD PLACE -1,,-1 INTO THE AC
  2203	031521	312 00 0 00 034012 		CAME	[-1]		;PASS IF C(AC)=-1,,-1
  2204						STOP^
  2205	031522	254 04 0 00 031523 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2206	031523	324 00 0 00 031524 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2207									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2208									;IN THE SUBTEST) TO LOOP ON ERROR^
  2209
  2210					;*****     FAILURE ANALYSIS     *****
  2211					;C(AC0)		C(AC1)		FAILING SIGNAL
  2212
  2213					;-1,,0				SW: FCE
  2214
  2215					;**********
  2216
  2217					;THIS TEST VERIFIES THAT HRR PLACES THE RIGHT HALF OF C(E) INTO
  2218					;THE RIGHT HALF OF THE AC.  THE LEFT HALF OF THE AC IS UNAFFECTED.
  2219					;IN THIS CASE C(AC)=0 AND C(E)=-1,,0.  HENCE, THE RESULT IN THE AC
  2220					;SHOULD BE -1,,0.  THE AC IS CHECKED FOR -1,,0.  IF C(AC)=-1,,0, THIS TEST PASSES.
  2221
  2222	031524	474 00 0 00 000000 	B26600:	SETO			;PRELOAD AC WITH -1,,-1
  2223	031525	540 00 0 00 034013 		HRR	[XWD -1,0]	;*HRR SHOULD PLACE -1,,0 INTO THE AC
  2224	031526	312 00 0 00 034013 		CAME	[XWD -1,0]	;PASS IF C(AC)=-1,,0
  2225						STOP^
  2226	031527	254 04 0 00 031530 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2227	031530	324 00 0 00 031531 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2228									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2229									;IN THE SUBTEST) TO LOOP ON ERROR^
  2230
  2231					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 39
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0065

  2232					;THIS TEST VERIFIES THAT HRRI PLACES E INTO
  2233					;THE RIGHT HALF OF THE AC.  THE LEFT HALF OF THE AC IS UNAFFECTED
  2234					;IN THIS CASE C(AC)=-1,,-1 AND E=0,,-1.  HENCE, THE RESULT IN THE AC
  2235					;SHOULD BE -1,,-1.  THE AC IS CHECKED FOR -1,,-1.  IF C(AC)=-1,,-1, THIS TEST PASSES.
  2236
  2237	031531	474 00 0 00 000000 	B26700:	SETO			;PRELOAD AC WITH -1,,-1
  2238	031532	541 00 0 00 777777 		HRRI	-1		;*HRRI SHOULD PLACE -1,,-1 INTO THE AC
  2239	031533	312 00 0 00 034012 		CAME	[-1]		;PASS IF C(AC)=-1,,-1
  2240						STOP^
  2241	031534	254 04 0 00 031535 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2242	031535	324 00 0 00 031536 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2243									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2244									;IN THE SUBTEST) TO LOOP ON ERROR^
  2245
  2246					;*****     FAILURE ANALYSIS     *****
  2247					;C(AC0)		C(AC1)		FAILING SIGNAL
  2248
  2249					;0,,-1				ET2: AR AD EN
  2250
  2251					;**********
  2252
  2253					;THIS TEST VERIFIES THAT HRR PLACES THE RIGHT HALF OF C(E) INTO
  2254					;THE RIGHT HALF OF THE AC.  THE LEFT HALF OF THE AC IS UNAFFECTED.
  2255					;IN THIS CASE C(AC)=-1,,-1 AND C(E)=0.  HENCE, THE RESULT IN THE AC
  2256					;SHOULD BE -1,,0.  THE AC IS CHECKED FOR -1,,0.  IF C(AC)=-1,,0, THIS TEST PASSES.
  2257
  2258	031536	474 00 0 00 000000 	B27000:	SETO			;PRELOAD AC WITH -1,,-1
  2259	031537	540 00 0 00 034014 		HRR	[0]		;*HRR SHOULD PLACE -1,,0 INTO THE AC
  2260	031540	312 00 0 00 034013 		CAME	[XWD -1,0]	;PASS IF C(AC)=0
  2261						STOP^
  2262	031541	254 04 0 00 031542 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2263	031542	324 00 0 00 031543 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2264									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2265									;IN THE SUBTEST) TO LOOP ON ERROR^
  2266
  2267					;*****     FAILURE ANALYSIS     *****
  2268					;C(AC0)		C(AC1)		FAILING SIGNAL
  2269
  2270					;0				ET2: AR AD EN
  2271
  2272					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 40
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0066

  2273					;THIS TEST VERIFIES THAT HRR PLACES THE RIGHT HALF OF C(E) INTO
  2274					;THE RIGHT HALF OF THE AC.  THE LEFT HALF OF THE AC IS UNAFFECTED.
  2275					;IN THIS CASE C(AC)=0 AND C(E)=0.  HENCE, THE RESULT IN THE AC
  2276					;SHOULD BE 0.  THE AC IS CHECKED FOR 0.  IF C(AC)=0, THIS TEST PASSES.
  2277
  2278	031543	400 00 0 00 000000 	B27100:	SETZ			;PRELOAD AC WITH 0
  2279	031544	540 00 0 00 034014 		HRR	[0]		;*HRR SHOULD PLACE 0 INTO THE AC
  2280	031545	332 00 0 00 000000 		SKIPE			;PASS IF C(AC)=0
  2281						STOP^
  2282	031546	254 04 0 00 031547 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2283	031547	324 00 0 00 031550 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2284									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2285									;IN THE SUBTEST) TO LOOP ON ERROR^
  2286
  2287					;**********
  2288
  2289					;THIS TEST VERIFIES THAT HRR PLACES THE RIGHT HALF OF C(E) INTO
  2290					;THE RIGHT HALF OF THE AC.  THE LEFT HALF OF THE AC IS UNAFFECTED.
  2291					;IN THIS CASE C(AC)=0 AND C(E)=-1,,-1.  HENCE, THE RESULT IN THE AC
  2292					;SHOULD BE 0,,-1.  THE AC IS CHECKED FOR 0,,-1.  IF C(AC)=0,,-1, THIS TEST PASSES.
  2293
  2294	031550	400 00 0 00 000000 	B27200:	SETZ			;PRELOAD AC WITH 0
  2295	031551	540 00 0 00 034012 		HRR	[-1]		;*HRR SHOULD PLACE 0,,-1 INTO THE AC
  2296	031552	302 00 0 00 777777 		CAIE	-1		;PASS IF C(AC)=0,,-1
  2297						STOP^
  2298	031553	254 04 0 00 031554 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2299	031554	324 00 0 00 031555 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2300									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2301									;IN THE SUBTEST) TO LOOP ON ERROR^
  2302
  2303					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 41
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0067

  2304					;THIS TEST VERIFIES THAT HRRI PLACES E INTO
  2305					;THE RIGHT HALF OF THE AC.  THE LEFT HALF OF THE AC IS UNAFFECTED
  2306					;IN THIS CASE C(AC)=0 AND E=0,,-1.  HENCE, THE RESULT IN THE AC
  2307					;SHOULD BE 0,,-1.  THE AC IS CHECKED FOR 0,,-1.  IF C(AC)=0,,-1, THIS TEST PASSES.
  2308
  2309	031555	400 00 0 00 000000 	B27300:	SETZ			;PRELOAD AC WITH 0
  2310	031556	541 00 0 00 777777 		HRRI	-1		;*HRRI SHOULD PLACE 0,,-1 INTO THE AC
  2311	031557	302 00 0 00 777777 		CAIE	-1		;PASS IF C(AC)=0,,-1
  2312						STOP^
  2313	031560	254 04 0 00 031561 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2314	031561	324 00 0 00 031562 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2315									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2316									;IN THE SUBTEST) TO LOOP ON ERROR^
  2317
  2318					;*****     FAILURE ANALYSIS     *****
  2319					;C(AC0)		C(AC1)		FAILING SIGNAL
  2320
  2321					;-1,,-1				FC: AD LT FM + EN
  2322
  2323					;**********
  2324
  2325					;THIS TEST VERIFIES THAT HRR PLACES THE RIGHT HALF OF C(E) INTO
  2326					;THE RIGHT HALF OF THE AC.  THE LEFT HALF OF THE AC IS UNAFFECTED.
  2327					;IN THIS CASE C(AC)=0 AND C(E)=-1,,0.  HENCE, THE RESULT IN THE AC
  2328					;SHOULD BE 0.  THE AC IS CHECKED FOR 0.  IF C(AC)=0, THIS TEST PASSES.
  2329
  2330	031562	400 00 0 00 000000 	B27400:	SETZ			;PRELOAD AC WITH 0
  2331	031563	540 00 0 00 034013 		HRR	[XWD -1,0]	;*HRR SHOULD PLACE 0 INTO THE AC
  2332	031564	332 00 0 00 000000 		SKIPE			;PASS IF C(AC)=0
  2333						STOP^
  2334	031565	254 04 0 00 031566 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2335	031566	324 00 0 00 031567 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2336									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2337									;IN THE SUBTEST) TO LOOP ON ERROR^
  2338
  2339					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 42
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0068

  2340					;THIS TEST VERIFIES THAT HRR PLACES THE RIGHT HALF OF C(E) INTO
  2341					;THE RIGHT HALF OF THE AC.  THE LEFT HALF OF THE AC IS UNAFFECTED.
  2342					;IN THIS CASE C(AC)=0,,-1 AND C(E)=-1,,0.  HENCE, THE RESULT IN THE AC
  2343					;SHOULD BE 0.  THE AC IS CHECKED FOR 0.  IF C(AC)=0, THIS TEST PASSES.
  2344
  2345	031567	201 00 0 00 777777 	B27500:	MOVEI	-1		;PRELOAD AC WITH 0,,-1
  2346	031570	540 00 0 00 034013 		HRR	[XWD -1,0]	;*HRR SHOULD PLACE 0 INTO THE AC
  2347	031571	332 00 0 00 000000 		SKIPE			;PASS IF C(AC)=0
  2348						STOP^
  2349	031572	254 04 0 00 031573 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2350	031573	324 00 0 00 031574 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2351									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2352									;IN THE SUBTEST) TO LOOP ON ERROR^
  2353
  2354					;**********
  2355
  2356					;THIS TEST VERIFIES THAT HRRI PLACES E INTO
  2357					;THE RIGHT HALF OF THE AC.  THE LEFT HALF OF THE AC IS UNAFFECTED
  2358					;IN THIS CASE C(AC)=-1,,0 AND E=0,,-1.  HENCE, THE RESULT IN THE AC
  2359					;SHOULD BE -1,,-1.  THE AC IS CHECKED FOR -1,,-1.  IF C(AC)=-1,,-1, THIS TEST PASSES.
  2360
  2361	031574	205 00 0 00 777777 	B27600:	MOVSI	-1		;PRELOAD AC WITH -1,,0
  2362	031575	541 00 0 00 777777 		HRRI	-1		;*HRRI SHOULD PLACE -1,,-1 INTO THE AC
  2363	031576	312 00 0 00 034012 		CAME	[-1]		;PASS IF C(AC)=-1,,-1
  2364						STOP^
  2365	031577	254 04 0 00 031600 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2366	031600	324 00 0 00 031601 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2367									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2368									;IN THE SUBTEST) TO LOOP ON ERROR^
  2369
  2370					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 43
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0069

  2371					;THIS TEST VERIFIES THAT HRRI PLACES E INTO
  2372					;THE RIGHT HALF OF THE AC.  THE LEFT HALF OF THE AC IS UNAFFECTED
  2373					;IN THIS CASE C(AC)=0,,-1 AND E=0,,-1.  HENCE, THE RESULT IN THE AC
  2374					;SHOULD BE 0,,-1.  THE AC IS CHECKED FOR 0,,-1.  IF C(AC)=0,,-1, THIS TEST PASSES.
  2375
  2376	031601	201 00 0 00 777777 	B27700:	MOVEI	-1		;PRELOAD AC WITH 0,,-1
  2377	031602	541 00 0 00 777777 		HRRI	-1		;*HRRI SHOULD PLACE 0,,-1 INTO THE AC
  2378	031603	302 00 0 00 777777 		CAIE	-1		;PASS IF C(AC)=0,,-1
  2379						STOP^
  2380	031604	254 04 0 00 031605 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2381	031605	324 00 0 00 031606 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2382									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2383									;IN THE SUBTEST) TO LOOP ON ERROR^
  2384
  2385					;**********
  2386
  2387					;THIS TEST VERIFIES THAT HRR PLACES THE RIGHT HALF OF C(E) INTO
  2388					;THE RIGHT HALF OF THE AC.  THE LEFT HALF OF THE AC IS UNAFFECTED.
  2389					;IN THIS CASE C(AC)=-1,,0 AND C(E)=-1,,0.  HENCE, THE RESULT IN THE AC
  2390					;SHOULD BE -1,,0.  THE AC IS CHECKED FOR -1,,0.  IF C(AC)=-1,,0, THIS TEST PASSES.
  2391
  2392	031606	205 00 0 00 777777 	B30000:	MOVSI	-1		;PRELOAD AC WITH -1,,0
  2393	031607	540 00 0 00 034013 		HRR	[XWD -1,0]	;*HRR SHOULD PLACE -1,,0 INTO THE AC
  2394	031610	312 00 0 00 034013 		CAME	[XWD -1,0]	;PASS IF C(AC)=-1,,0
  2395						STOP^
  2396	031611	254 04 0 00 031612 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2397	031612	324 00 0 00 031613 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2398									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2399									;IN THE SUBTEST) TO LOOP ON ERROR^
  2400
  2401					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 44
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0070

  2402					;THIS TEST VERIFIES THAT HRRZ PLACES THE RIGHT HALF OF C(E) INTO
  2403					;RIGHT HALF OF THE AC AND PLACES ZEROS INTO THE LEFT HALF OF THE AC
  2404					;IN THIS CASE, AC=E AND C(AC)=C(E)=0.  HENCE, THE RESULT IN THE AC
  2405					;SHOULD BE 0.  THE AC IS CHECKED FOR 0.  IF C(AC)=0, THIS TEST PASSES.
  2406
  2407	031613	400 00 0 00 000000 	B30100:	SETZ			;PRELOAD AC,E WITH 0
  2408	031614	550 00 0 00 000000 		HRRZ			;*HRRZ SHOULD PLACE 0 INTO THE AC
  2409	031615	332 00 0 00 000000 		SKIPE			;PASS IF C(AC)=0
  2410						STOP^
  2411	031616	254 04 0 00 031617 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2412	031617	324 00 0 00 031620 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2413									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2414									;IN THE SUBTEST) TO LOOP ON ERROR^
  2415
  2416					;*****     FAILURE ANALYSIS     *****
  2417					;C(AC0)		C(AC1)		FAILING SIGNAL
  2418
  2419					;0,,-1				FC: AD RT AR + EN
  2420
  2421					;**********
  2422
  2423					;THIS TEST VERIFIES THAT HRRZI PLACES E INTO
  2424					;THE RIGHT HALF OF THE AC AND CLEARS THE LEFT HALF OF THE AC
  2425					;IN THIS CASE C(AC)=-1,,-1.  HENCE, THE RESULT IN THE AC
  2426					;SHOULD BE 0,,-1.  THE AC IS CHECKED FOR 0,,-1.  IF C(AC)=0,,-1, THIS TEST PASSES
  2427
  2428	031620	474 00 0 00 000000 	B30400:	SETO			;PRELOAD AC WITH -1,,-1
  2429	031621	551 00 0 00 777777 		HRRZI	-1		;*HRRZI SHOULD PLACE 0,,-1 INTO THE AC
  2430	031622	302 00 0 00 777777 		CAIE	-1		;PASS IF C(AC)=0,,-1
  2431						STOP^
  2432	031623	254 04 0 00 031624 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2433	031624	324 00 0 00 031625 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2434									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2435									;IN THE SUBTEST) TO LOOP ON ERROR^
  2436
  2437					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 45
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0071

  2438					;THIS TEST VERIFIES THAT HRRZI PLACES E INTO
  2439					;THE RIGHT HALF OF THE AC AND CLEARS THE LEFT HALF OF THE AC
  2440					;IN THIS CASE C(AC)=-1,,-1.  HENCE, THE RESULT IN THE AC
  2441					;SHOULD BE 0.  THE AC IS CHECKED FOR 0.  IF C(AC)=0, THIS TEST PASSES
  2442
  2443	031625	474 00 0 00 000000 	B30500:	SETO			;PRELOAD AC WITH -1,,-1
  2444	031626	551 00 0 00 000000 		HRRZI	0		;*HRRZI SHOULD PLACE 0 INTO THE AC
  2445	031627	332 00 0 00 000000 		SKIPE			;PASS IF C(AC)=0
  2446						STOP^
  2447	031630	254 04 0 00 031631 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2448	031631	324 00 0 00 031632 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2449									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2450									;IN THE SUBTEST) TO LOOP ON ERROR^
  2451
  2452					;*****     FAILURE ANALYSIS     *****
  2453					;C(AC0)		C(AC1)		FAILING SIGNAL
  2454
  2455					;0,,-1				FC: AD RT AR + EN
  2456
  2457					;**********
  2458
  2459					;THIS TEST VERIFIES THAT HRRZ PLACES THE RIGHT HALF OF C(E) INTO
  2460					;RIGHT HALF OF THE AC AND PLACES ZEROS INTO THE LEFT HALF OF THE AC
  2461					;IN THIS CASE C(AC)=-1,,-1 AND C(E)=-1,,-1.  HENCE, THE RESULT IN THE AC
  2462					;SHOULD BE 0.  THE AC IS CHECKED FOR 0.  IF C(AC)=0, THIS TEST PASSES.
  2463
  2464	031632	474 00 0 00 000000 	B30600:	SETO			;PRELOAD AC WITH -1,,-1
  2465	031633	550 00 0 00 034013 		HRRZ	[XWD -1,0]	;*HRRZ SHOULD PLACE 0 INTO THE AC
  2466	031634	332 00 0 00 000000 		SKIPE			;PASS IF C(AC)=0
  2467						STOP^
  2468	031635	254 04 0 00 031636 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2469	031636	324 00 0 00 031637 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2470									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2471									;IN THE SUBTEST) TO LOOP ON ERROR^
  2472
  2473					;*****     FAILURE ANALYSIS     *****
  2474					;C(AC0)		C(AC1)		FAILING SIGNAL
  2475
  2476					;E				SW: FCE
  2477					;-1,,0				ET2: AR RT AD EN
  2478
  2479					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 46
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0072

  2480					;THIS TEST VERIFIES THAT HRRZ PLACES THE RIGHT HALF OF C(E) INTO
  2481					;RIGHT HALF OF THE AC AND PLACES ZEROS INTO THE LEFT HALF OF THE AC
  2482					;IN THIS CASE C(AC)=-1,,-1 AND C(E)=-1,,-1.  HENCE, THE RESULT IN THE AC
  2483					;SHOULD BE 0,,-1.  THE AC IS CHECKED FOR 0,,-1.  IF C(AC)=0,,-1, THIS TEST PASSES.
  2484
  2485	031637	474 00 0 00 000000 	B30700:	SETO			;PRELOAD AC WITH -1,,-1
  2486	031640	550 00 0 00 034012 		HRRZ	[-1]		;*HRRZ SHOULD PLACE 0,,-1 INTO THE AC
  2487	031641	302 00 0 00 777777 		CAIE	-1		;PASS IF C(AC)=0,,-1
  2488						STOP^
  2489	031642	254 04 0 00 031643 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2490	031643	324 00 0 00 031644 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2491									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2492									;IN THE SUBTEST) TO LOOP ON ERROR^
  2493
  2494					;**********
  2495
  2496					;THIS TEST VERIFIES THAT HRRZ PLACES THE RIGHT HALF OF C(E) INTO
  2497					;RIGHT HALF OF THE AC AND PLACES ZEROS INTO THE LEFT HALF OF THE AC
  2498					;IN THIS CASE C(AC)=0,,-1 AND C(E)=-1,,-1.  HENCE, THE RESULT IN THE AC
  2499					;SHOULD BE 0,,-1.  THE AC IS CHECKED FOR 0,,-1.  IF C(AC)=0,,-1, THIS TEST PASSES.
  2500
  2501	031644	201 00 0 00 777777 	B31000:	MOVEI	-1		;PRELOAD AC WITH 0,,-1
  2502	031645	550 00 0 00 034012 		HRRZ	[-1]		;*HRRZ SHOULD PLACE 0,,-1 INTO THE AC
  2503	031646	302 00 0 00 777777 		CAIE	-1		;PASS IF C(AC)=0,,-1
  2504						STOP^
  2505	031647	254 04 0 00 031650 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2506	031650	324 00 0 00 031651 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2507									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2508									;IN THE SUBTEST) TO LOOP ON ERROR^
  2509
  2510					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 47
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0073

  2511					;THIS TEST VERIFIES THAT HRRZ PLACES THE RIGHT HALF OF C(E) INTO
  2512					;RIGHT HALF OF THE AC AND PLACES ZEROS INTO THE LEFT HALF OF THE AC
  2513					;IN THIS CASE C(AC)=0,,-1 AND C(E)=0.  HENCE, THE RESULT IN THE AC
  2514					;SHOULD BE 0.  THE AC IS CHECKED FOR 0.  IF C(AC)=0, THIS TEST PASSES.
  2515
  2516	031651	201 00 0 00 777777 	B31100:	MOVEI	-1		;PRELOAD AC WITH 0,,-1	
  2517	031652	550 00 0 00 034014 		HRRZ	[0]		;*HRRZ SHOULD PLACE 0 INTO THE AC
  2518	031653	302 00 0 00 000000 		CAIE	0		;PASS IF C(AC)=0
  2519						STOP^
  2520	031654	254 04 0 00 031655 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2521	031655	324 00 0 00 031656 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2522									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2523									;IN THE SUBTEST) TO LOOP ON ERROR^
  2524
  2525					;**********
  2526
  2527					;THIS TEST VERIFIES THAT HRRZ PLACES THE RIGHT HALF OF C(E) INTO
  2528					;RIGHT HALF OF THE AC AND PLACES ZEROS INTO THE LEFT HALF OF THE AC
  2529					;IN THIS CASE C(AC)=-1,,0 AND C(E)=-1,,-1.  HENCE, THE RESULT IN THE AC
  2530					;SHOULD BE 0,,-1.  THE AC IS CHECKED FOR 0,,-1.  IF C(AC)=0,,-1, THIS TEST PASSES.
  2531
  2532	031656	205 00 0 00 777777 	B31200:	MOVSI	-1		;PRELOAD AC WITH -1,,0	
  2533	031657	550 00 0 00 034012 		HRRZ	[-1]		;*HRRZ SHOULD PLACE 0,,-1 INTO THE AC
  2534	031660	302 00 0 00 777777 		CAIE	-1		;PASS IF C(AC)=0,,-1
  2535						STOP^
  2536	031661	254 04 0 00 031662 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2537	031662	324 00 0 00 031663 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2538									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2539									;IN THE SUBTEST) TO LOOP ON ERROR^
  2540
  2541					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 48
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0074

  2542					;THIS TEST VERIFIES THAT HRRZ PLACES THE RIGHT HALF OF C(E) INTO
  2543					;RIGHT HALF OF THE AC AND PLACES ZEROS INTO THE LEFT HALF OF THE AC
  2544					;IN THIS CASE C(AC)=-1,,0 AND C(E)=0.  HENCE, THE RESULT IN THE AC
  2545					;SHOULD BE 0.  THE AC IS CHECKED FOR 0.  IF C(AC)=0, THIS TEST PASSES.
  2546
  2547	031663	205 00 0 00 777777 	B31300:	MOVSI	-1		;PRELOAD AC WITH -1,,0	
  2548	031664	550 00 0 00 034014 		HRRZ	[0]		;*HRRZ SHOULD PLACE 0 INTO THE AC
  2549	031665	302 00 0 00 000000 		CAIE	0		;PASS IF C(AC)=0
  2550						STOP^
  2551	031666	254 04 0 00 031667 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2552	031667	324 00 0 00 031670 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2553									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2554									;IN THE SUBTEST) TO LOOP ON ERROR^
  2555
  2556					;**********
  2557
  2558					;THIS TEST VERIFIES THAT HRRZ PLACES THE RIGHT HALF OF C(E) INTO
  2559					;RIGHT HALF OF THE AC AND PLACES ZEROS INTO THE LEFT HALF OF THE AC
  2560					;IN THIS CASE C(AC)=0,,-1 AND C(E)=-1,,0.  HENCE, THE RESULT IN THE AC
  2561					;SHOULD BE 0.  THE AC IS CHECKED FOR 0.  IF C(AC)=0, THIS TEST PASSES.
  2562
  2563	031670	201 00 0 00 777777 	B31400:	MOVEI	-1		;PRELOAD AC WITH 0,,-1	
  2564	031671	550 00 0 00 034013 		HRRZ	[XWD -1,0]	;*HRRZ SHOULD PLACE 0 INTO THE AC
  2565	031672	332 00 0 00 000000 		SKIPE			;PASS IF C(AC)=0
  2566						STOP^
  2567	031673	254 04 0 00 031674 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2568	031674	324 00 0 00 031675 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2569									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2570									;IN THE SUBTEST) TO LOOP ON ERROR^
  2571
  2572					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 49
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0075

  2573					;THIS TEST VERIFIES THAT HRRZ PLACES THE RIGHT HALF OF C(E) INTO
  2574					;RIGHT HALF OF THE AC AND PLACES ZEROS INTO THE LEFT HALF OF THE AC
  2575					;IN THIS CASE C(AC)=-1,,0 AND C(E)=0,,-1.  HENCE, THE RESULT IN THE AC
  2576					;SHOULD BE 0,,-1.  THE AC IS CHECKED FOR 0,,-1.  IF C(AC)=0,,-1, THIS TEST PASSES.
  2577
  2578	031675	205 00 0 00 777777 	B31500:	MOVSI	-1		;PRELOAD AC WITH -1,,0	
  2579	031676	550 00 0 00 034015 		HRRZ	[XWD 0,-1]	;*HRRZ SHOULD PLACE 0,,-1 INTO THE AC
  2580	031677	302 00 0 00 777777 		CAIE	-1		;PASS IF C(AC)=0,,-1
  2581						STOP^
  2582	031700	254 04 0 00 031701 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2583	031701	324 00 0 00 031702 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2584									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2585									;IN THE SUBTEST) TO LOOP ON ERROR^
  2586
  2587					;**********
  2588
  2589					;THIS TEST VERIFIES THAT HRRZI PLACES E INTO
  2590					;THE RIGHT HALF OF THE AC AND CLEARS THE LEFT HALF OF THE AC
  2591					;IN THIS CASE C(AC)=0,,-1 AND E=0,,-1.  HENCE, THE RESULT IN THE AC
  2592					;SHOULD BE 0,,-1.  THE AC IS CHECKED FOR 0,,-1.  IF C(AC)=0,,-1, THIS TEST PASSES
  2593
  2594	031702	201 00 0 00 777777 	B31600:	MOVEI	-1		;PRELOAD AC WITH 0,,-1	
  2595	031703	551 00 0 00 777777 		HRRZI	-1		;*HRRZI SHOULD PLACE 0,,-1 INTO THE AC
  2596	031704	302 00 0 00 777777 		CAIE	-1		;PASS IF C(AC)=0,,1
  2597						STOP^
  2598	031705	254 04 0 00 031706 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2599	031706	324 00 0 00 031707 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2600									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2601									;IN THE SUBTEST) TO LOOP ON ERROR^
  2602
  2603					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 50
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0076

  2604					;THIS TEST VERIFIES THAT HRRZ PLACES THE RIGHT HALF OF C(E) INTO
  2605					;RIGHT HALF OF THE AC AND PLACES ZEROS INTO THE LEFT HALF OF THE AC
  2606					;IN THIS CASE C(AC)=-1,,0 AND C(E)=-1,,0.  HENCE, THE RESULT IN THE AC
  2607					;SHOULD BE 0.  THE AC IS CHECKED FOR 0.  IF C(AC)=0, THIS TEST PASSES.
  2608
  2609	031707	205 00 0 00 777777 	B31700:	MOVSI	-1		;PRELOAD AC WITH -1,,0	
  2610	031710	550 00 0 00 034013 		HRRZ	[XWD -1,0]	;*HRRZ SHOULD PLACE 0 INTO THE AC,0]
  2611	031711	302 00 0 00 000000 		CAIE	0		;PASS IF C(AC)=0
  2612						STOP^
  2613	031712	254 04 0 00 031713 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2614	031713	324 00 0 00 031714 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2615									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2616									;IN THE SUBTEST) TO LOOP ON ERROR^
  2617
  2618					;**********
  2619
  2620					;THIS TEST VERIFIES THAT HRL PLACES THE RIGHT HALF OF C(E) INTO
  2621					;THE LEFT HALF OF THE AC.  THE RIGHT HALF OF THE AC IS UNAFFECTED
  2622					;IN THIS CASE, AC=E AND C(AC)=C(E)=0.  HENCE, THE RESULT IN THE AC
  2623					;SHOULD BE 0.  THE AC IS CHECKED FOR 0.  IF C(AC)=0, THIS TEST PASSES.
  2624
  2625	031714	400 00 0 00 000000 	B32000:	SETZ			;PRELOAD AC WITH 0		
  2626	031715	504 00 0 00 000000 		HRL			;*HRL SHOULD PLACE 0 INTO THE AC
  2627	031716	332 00 0 00 000000 		SKIPE			;PASS IF C(AC)=0
  2628						STOP^
  2629	031717	254 04 0 00 031720 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2630	031720	324 00 0 00 031721 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2631									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2632									;IN THE SUBTEST) TO LOOP ON ERROR^
  2633
  2634					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 51
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0077

  2635					;THIS TEST VERIFIES THAT HRL PLACES THE RIGHT HALF OF C(E) INTO
  2636					;THE LEFT HALF OF THE AC.  THE RIGHT HALF OF THE AC IS UNAFFECTED
  2637					;IN THIS CASE, C(AC)=-1,,-1 AND C(E)=-1,,-1.  HENCE, THE RESULT IN THE AC
  2638					;SHOULD BE -1,,-1.  THE AC IS CHECKED FOR -1,,-1.  IF C(AC)=-1,,-1, THIS TEST PASSES.
  2639
  2640	031721	474 00 0 00 000000 	B32100:	SETO			;PRELOAD AC WITH -1,,-1		
  2641	031722	504 00 0 00 034012 		HRL	[-1]		;*HRL SHOULD PLACE -1,,-1 INTO THE AC
  2642	031723	312 00 0 00 034012 		CAME	[-1]		;PASS IF C(AC)=-1,,-1
  2643						STOP^
  2644	031724	254 04 0 00 031725 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2645	031725	324 00 0 00 031726 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2646									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2647									;IN THE SUBTEST) TO LOOP ON ERROR^
  2648
  2649					;*****     FAILURE ANALYSIS     *****
  2650					;C(AC0)		C(AC1)		FAILING SIGNAL
  2651
  2652					;E,,-1				SW: FCE
  2653					;0,,-1				FC: AD RT FM + EN
  2654					;0,,-1				ET2: AR LT AR RT EN
  2655					;-1,,0				ET2: AR RT AD EN
  2656
  2657					;**********
  2658
  2659					;THIS TEST VERIFIES THAT HRL PLACES THE RIGHT HALF OF C(E) INTO
  2660					;THE LEFT HALF OF THE AC.  THE RIGHT HALF OF THE AC IS UNAFFECTED
  2661					;IN THIS CASE, C(AC)=-1,,-1 AND C(E)=0.  HENCE, THE RESULT IN THE AC
  2662					;SHOULD BE 0,,-1.  THE AC IS CHECKED FOR 0,,-1.  IF C(AC)=0,,-1, THIS TEST PASSES.
  2663
  2664	031726	474 00 0 00 000000 	B32200:	SETO			;PRELOAD AC WITH -1,,-1		
  2665	031727	504 00 0 00 034014 		HRL	[0]		;*HRL SHOULD PLACE 0,,-1 INTO THE AC
  2666	031730	302 00 0 00 777777 		CAIE	-1		;PASS IF C(AC)=0,,-1
  2667						STOP^
  2668	031731	254 04 0 00 031732 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2669	031732	324 00 0 00 031733 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2670									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2671									;IN THE SUBTEST) TO LOOP ON ERROR^
  2672
  2673					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 52
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0078

  2674					;THIS TEST VERIFIES THAT HLR PLACES THE LEFT HALF OF C(E) INTO
  2675					;THE RIGHT HALF OF THE AC.  THE LEFT HALF OF THE AC IS UNAFFECTED.
  2676					;IN THIS CASE, C(AC)=-1,,-1 AND C(E)=0.  HENCE, THE RESULT IN THE AC
  2677					;SHOULD BE -1,,0.  THE AC IS CHECKED FOR -1,,0.  IF C(AC)=-1,,0, THIS TEST PASSES.
  2678
  2679	031733	474 00 0 00 000000 	B32300:	SETO			;PRELOAD AC WITH -1,,-1		
  2680	031734	544 00 0 00 034014 		HLR	[0]		;*HLR SHOULD PLACE -1,,0 INTO THE AC
  2681	031735	312 00 0 00 034013 		CAME	[-1,,0]		;PASS IF C(AC)=-1,,0
  2682						STOP^
  2683	031736	254 04 0 00 031737 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2684	031737	324 00 0 00 031740 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2685									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2686									;IN THE SUBTEST) TO LOOP ON ERROR^
  2687
  2688					;*****     FAILURE ANALYSIS     *****
  2689					;C(AC0)		C(AC1)		FAILING SIGNAL
  2690
  2691					;0				ET2: AR LT AD EN
  2692
  2693					;**********
  2694
  2695					;THIS TEST VERIFIES THAT HRL PLACES THE RIGHT HALF OF C(E) INTO
  2696					;THE LEFT HALF OF THE AC.  THE RIGHT HALF OF THE AC IS UNAFFECTED
  2697					;IN THIS CASE, C(AC)=-1,,-1 AND C(E)=0.  HENCE, THE RESULT IN THE AC
  2698					;SHOULD BE -1,,0.  THE AC IS CHECKED FOR -1,,0.  IF C(AC)=-1,,0, THIS TEST PASSES.
  2699
  2700	031740	400 00 0 00 000000 	B32600:	SETZ			;PRELOAD AC WITH 0		
  2701	031741	504 00 0 00 034012 		HRL	[-1]		;*HRL SHOULD PLACE -1,,0 INTO THE AC
  2702	031742	312 00 0 00 034013 		CAME	[-1,,0]		;PASS IF C(AC)=-1,,0
  2703						STOP^
  2704	031743	254 04 0 00 031744 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2705	031744	324 00 0 00 031745 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2706									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2707									;IN THE SUBTEST) TO LOOP ON ERROR^
  2708
  2709					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 53
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0079

  2710					;THIS TEST VERIFIES THAT HLR PLACES THE LEFT HALF OF C(E) INTO
  2711					;THE RIGHT HALF OF THE AC.  THE LEFT HALF OF THE AC IS UNAFFECTED.
  2712					;IN THIS CASE, C(AC)=0 AND C(E)=-1,,-1.  HENCE, THE RESULT IN THE AC
  2713					;SHOULD BE 0,,-1.  THE AC IS CHECKED FOR 0,,-1.  IF C(AC)=0,,-1, THIS TEST PASSES.
  2714
  2715	031745	400 00 0 00 000000 	B32700:	SETZ			;PRELOAD AC WITH 0		
  2716	031746	544 00 0 00 034012 		HLR	[-1]		;*HLR SHOULD PLACE 0,,-1 INTO THE AC
  2717	031747	302 00 0 00 777777 		CAIE	-1		;PASS IF C(AC)=0,,-1
  2718						STOP^
  2719	031750	254 04 0 00 031751 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2720	031751	324 00 0 00 031752 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2721									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2722									;IN THE SUBTEST) TO LOOP ON ERROR^
  2723
  2724					;*****     FAILURE ANALYSIS     *****
  2725					;C(AC0)		C(AC1)		FAILING SIGNAL
  2726
  2727					;0				SW: FCE
  2728					;-1,,-1				FC: AD LT FM + EN
  2729					;0				ET2: AR RT AR LT EN
  2730
  2731					;**********
  2732
  2733					;THIS TEST VERIFIES THAT HRLI PLACES E INTO
  2734					;THE LEFT HALF OF THE AC.  THE RIGHT HALF OF THE AC IS UNAFFECTED.
  2735					;IN THIS CASE C(AC)=-1,,-1 AND E=0,,-1.  HENCE, THE RESULT IN THE AC
  2736					;SHOULD BE -1,,-1.  THE AC IS CHECKED FOR -1,,-1.  IF C(AC)=-1,,-1, THIS TEST PASSES
  2737
  2738	031752	400 00 0 00 000000 	B33000:	SETZ			;PRELOAD AC WITH -1,,-1		
  2739	031753	505 00 0 00 777777 		HRLI	-1		;*HRLI SHOULD PLACE -1,,-1 INTO THE AC
  2740	031754	312 00 0 00 034013 		CAME	[XWD -1,0]	;PASS IF C(AC)=-1,,-1
  2741						STOP^
  2742	031755	254 04 0 00 031756 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2743	031756	324 00 0 00 031757 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2744									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2745									;IN THE SUBTEST) TO LOOP ON ERROR^
  2746
  2747					;*****     FAILURE ANALYSIS     *****
  2748					;C(AC0)		C(AC1)		FAILING SIGNAL
  2749
  2750					;-1,,-1				FC: AD RT FM + EN
  2751					;0				ET2: AR LT AR RT EN
  2752
  2753					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 54
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0080

  2754					;THIS TEST VERIFIES THAT HLR PLACES THE LEFT HALF OF C(E) INTO
  2755					;THE RIGHT HALF OF THE AC.  THE LEFT HALF OF THE AC IS UNAFFECTED.
  2756					;IN THIS CASE, C(AC)=-1,,-1 AND C(E)=-1,,0.  HENCE, THE RESULT IN THE AC
  2757					;SHOULD BE 0,,-1.  THE AC IS CHECKED FOR 0,,-1.  IF C(AC)=0,,-1, THIS TEST PASSES.
  2758
  2759	031757	400 00 0 00 000000 	B33100:	SETZ			;PRELOAD AC WITH -1,,-1		
  2760	031760	544 00 0 00 034013 		HLR	[XWD -1,0]	;*HLR SHOULD PLACE -1,,-1 INTO THE AC
  2761	031761	302 00 0 00 777777 		CAIE	-1		;PASS IF C(AC)=0,,-1
  2762						STOP^
  2763	031762	254 04 0 00 031763 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2764	031763	324 00 0 00 031764 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2765									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2766									;IN THE SUBTEST) TO LOOP ON ERROR^
  2767
  2768					;**********
  2769
  2770					;THIS TEST VERIFIES THAT HRL PLACES THE RIGHT HALF OF C(E) INTO
  2771					;THE LEFT HALF OF THE AC.  THE RIGHT HALF OF THE AC IS UNAFFECTED
  2772					;IN THIS CASE, C(AC)=0 AND C(E)=-1,,0.  HENCE, THE RESULT IN THE AC
  2773					;SHOULD BE 0.  THE AC IS CHECKED FOR 0.  IF C(AC)=0, THIS TEST PASSES.
  2774
  2775	031764	400 00 0 00 000000 	B33200:	SETZ			;PRELOAD AC WITH 0		
  2776	031765	504 00 0 00 034013 		HRL	[XWD -1,0]	;*HRL SHOULD PLACE 0 INTO THE AC
  2777	031766	332 00 0 00 000000 		SKIPE			;PASS IF C(AC)=0
  2778						STOP^
  2779	031767	254 04 0 00 031770 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2780	031770	324 00 0 00 031771 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2781									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2782									;IN THE SUBTEST) TO LOOP ON ERROR^
  2783
  2784					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 55
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0081

  2785					;THIS TEST VERIFIES THAT HLRI ALWAYS CLEARS THE RIGHT HALF
  2786					;OF THE AC.  THE LEFT HALF OF THE AC IS UNAFFECTED.
  2787					;IN THIS CASE, C(AC)=0 AND E=0,,-1.  HENCE, THE RESULT IN THE AC
  2788					;SHOULD BE 0.  THE AC IS CHECKED FOR 0
  2789					;IF C(AC)=0, THIS TEST PASSES.
  2790
  2791	031771	400 00 0 00 000000 	B33300:	SETZ			;PRELOAD AC WITH 0		
  2792	031772	545 00 0 00 777777 		HLRI	-1		;*HLRI SHOULD PLACE 0 INTO THE AC
  2793	031773	332 00 0 00 000000 		SKIPE			;PASS IF C(AC)=0
  2794						STOP^
  2795	031774	254 04 0 00 031775 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2796	031775	324 00 0 00 031776 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2797									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2798									;IN THE SUBTEST) TO LOOP ON ERROR^
  2799
  2800					;*****     FAILURE ANALYSIS     *****
  2801					;C(AC0)		C(AC1)		FAILING SIGNAL
  2802
  2803					;-1,,0				FC:AD LT FM + EN
  2804
  2805					;**********
  2806
  2807					;THIS TEST VERIFIES THAT HRLI PLACES E INTO
  2808					;THE LEFT HALF OF THE AC.  THE RIGHT HALF OF THE AC IS UNAFFECTED.
  2809					;IN THIS CASE C(AC)=-1,,-1 AND E=-1,,-1.  HENCE, THE RESULT IN THE AC
  2810					;SHOULD BE -1,,-1.  THE AC IS CHECKED FOR -1,,-1.  IF C(AC)=-1,,-1, THIS TEST PASSES
  2811
  2812	031776	474 00 0 00 000000 	B33400:	SETO			;PRELOAD AC WITH -1,,-1		
  2813	031777	505 00 0 00 777777 		HRLI	-1		;*HRLI SHOULD PLACE -1,,-1 INTO THE AC
  2814	032000	312 00 0 00 034012 		CAME	[-1]		;PASS IF C(AC)=-1,,-1
  2815						STOP^
  2816	032001	254 04 0 00 032002 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2817	032002	324 00 0 00 032003 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2818									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2819									;IN THE SUBTEST) TO LOOP ON ERROR^
  2820
  2821					;*****     FAILURE ANALYSIS     *****
  2822					;C(AC0)		C(AC1)		FAILING SIGNAL
  2823
  2824					;-1,,0				ET2: AR RT AD EN
  2825
  2826
  2827					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 56
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0082

  2828					;THIS TEST VERIFIES THAT HLR PLACES THE LEFT HALF OF C(E) INTO
  2829					;THE RIGHT HALF OF THE AC.  THE LEFT HALF OF THE AC IS UNAFFECTED.
  2830					;IN THIS CASE, C(AC)=-1,,-1 AND C(E)=-1,,0.  HENCE, THE RESULT IN THE AC
  2831					;SHOULD BE -1,,-1.  THE AC IS CHECKED FOR -1,,-1.  IF C(AC)=-1,,-1, THIS TEST PASSES.
  2832
  2833	032003	474 00 0 00 000000 	B33500:	SETO			;PRELOAD AC WITH -1,,-1		
  2834	032004	544 00 0 00 034013 		HLR	[XWD -1,0]	;*HLR SHOULD PLACE -1,,-1 INTO THE AC
  2835	032005	312 00 0 00 034012 		CAME	[-1]		;PASS IF C(AC)=-1,,-1
  2836						STOP^
  2837	032006	254 04 0 00 032007 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2838	032007	324 00 0 00 032010 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2839									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2840									;IN THE SUBTEST) TO LOOP ON ERROR^
  2841
  2842					;**********
  2843
  2844					;THIS TEST VERIFIES THAT HRL PLACES THE RIGHT HALF OF C(E) INTO
  2845					;THE LEFT HALF OF THE AC.  THE RIGHT HALF OF THE AC IS UNAFFECTED
  2846					;IN THIS CASE, C(AC)=-1,,-1 AND C(E)=-1,,0.  HENCE, THE RESULT IN THE AC
  2847					;SHOULD BE 0,,-1.  THE AC IS CHECKED FOR 0,,-1.  IF C(AC)=0,,-1, THIS TEST PASSES.
  2848
  2849	032010	474 00 0 00 000000 	B33600:	SETO			;PRELOAD AC WITH -1,,-1		
  2850	032011	504 00 0 00 034013 		HRL	[XWD -1,0]	;*HRL SHOULD PLACE 0,,-1 INTO THE AC
  2851	032012	312 00 0 00 034015 		CAME	[XWD 0,-1]	;PASS IF C(AC)=0,,-1
  2852						STOP^
  2853	032013	254 04 0 00 032014 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2854	032014	324 00 0 00 032015 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2855									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2856									;IN THE SUBTEST) TO LOOP ON ERROR^
  2857
  2858					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 57
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0083

  2859					;THIS TEST VERIFIES THAT HLRI ALWAYS CLEARS THE RIGHT HALF
  2860					;OF THE AC.  THE LEFT HALF OF THE AC IS UNAFFECTED.
  2861					;IN THIS CASE, C(AC)=-1,,-1 AND E=0,,-1.  HENCE, THE RESULT IN THE AC
  2862					;SHOULD BE -1,,0.  THE AC IS CHECKED FOR -1,,0
  2863					;IF C(AC)=-1,,0, THIS TEST PASSES.
  2864
  2865	032015	474 00 0 00 000000 	B33700:	SETO			;PRELOAD AC WITH -1,,-1		
  2866	032016	545 00 0 00 777777 		HLRI	-1		;*HLRI SHOULD PLACE -1,,0 INTO THE AC
  2867	032017	312 00 0 00 034013 		CAME	[XWD -1,0]	;PASS IF C(AC)=-1,,0
  2868						STOP^
  2869	032020	254 04 0 00 032021 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2870	032021	324 00 0 00 032022 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2871									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2872									;IN THE SUBTEST) TO LOOP ON ERROR^
  2873
  2874					;*****     FAILURE ANALYSIS     *****
  2875					;C(AC0)		C(AC1)		FAILING SIGNAL
  2876
  2877					;0				ET2: AR LT AD EN
  2878
  2879					;**********
  2880
  2881					;THIS TEST VERIFIES THAT HRL PLACES THE RIGHT HALF OF C(E) INTO
  2882					;THE LEFT HALF OF THE AC.  THE RIGHT HALF OF THE AC IS UNAFFECTED
  2883					;IN THIS CASE, C(AC)=0,,-1 AND C(E)=0.  HENCE, THE RESULT IN THE AC
  2884					;SHOULD BE 0,,-1.  THE AC IS CHECKED FOR 0,,-1.  IF C(AC)=0,,-1, THIS TEST PASSES.
  2885
  2886	032022	201 00 0 00 777777 	B34000:	MOVEI	-1		;PRELOAD AC WITH 0,,-1	
  2887	032023	504 00 0 00 034014 		HRL	[0]		;*HRL SHOULD PLACE 0,,-1 INTO THE AC
  2888	032024	302 00 0 00 777777 		CAIE	-1		;PASS IF C(AC)=0,,-1
  2889						STOP^
  2890	032025	254 04 0 00 032026 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2891	032026	324 00 0 00 032027 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2892									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2893									;IN THE SUBTEST) TO LOOP ON ERROR^
  2894
  2895					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 58
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0084

  2896					;THIS TEST VERIFIES THAT HLRI ALWAYS CLEARS THE RIGHT HALF
  2897					;OF THE AC.  THE LEFT HALF OF THE AC IS UNAFFECTED.
  2898					;IN THIS CASE, C(AC)=0,,-1 AND E=0.  HENCE, THE RESULT IN THE AC
  2899					;SHOULD BE 0.  THE AC IS CHECKED FOR 0
  2900					;IF C(AC)=0, THIS TEST PASSES.
  2901
  2902	032027	201 00 0 00 777777 	B34100:	MOVEI	-1		;PRELOAD AC WITH 0,,-1	
  2903	032030	545 00 0 00 000000 		HLRI			;*HLRI SHOULD PLACE 0 INTO THE AC
  2904	032031	332 00 0 00 000000 		SKIPE			;PASS IF C(AC)=0
  2905						STOP^
  2906	032032	254 04 0 00 032033 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2907	032033	324 00 0 00 032034 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2908									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2909									;IN THE SUBTEST) TO LOOP ON ERROR^
  2910
  2911					;**********
  2912
  2913					;THIS TEST VERIFIES THAT HRL PLACES THE RIGHT HALF OF C(E) INTO
  2914					;THE LEFT HALF OF THE AC.  THE RIGHT HALF OF THE AC IS UNAFFECTED
  2915					;IN THIS CASE, C(AC)=0,,-1 AND C(E)=-1,,-1.  HENCE, THE RESULT IN THE AC
  2916					;SHOULD BE -1,,-1.  THE AC IS CHECKED FOR -1,,-1.  IF C(AC)=-1,,-1, THIS TEST PASSES.
  2917
  2918	032034	201 00 0 00 777777 	B34200:	MOVEI	-1		;PRELOAD AC WITH 0,,-1	
  2919	032035	504 00 0 00 034012 		HRL	[-1]		;*HRL SHOULD PLACE -1,,-1 INTO THE AC
  2920	032036	312 00 0 00 034012 		CAME	[-1]		;PASS IF C(AC)=-1,,-1
  2921						STOP^
  2922	032037	254 04 0 00 032040 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2923	032040	324 00 0 00 032041 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2924									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2925									;IN THE SUBTEST) TO LOOP ON ERROR^
  2926
  2927					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 59
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0085

  2928					;THIS TEST VERIFIES THAT HLR PLACES THE LEFT HALF OF C(E) INTO
  2929					;THE RIGHT HALF OF THE AC.  THE LEFT HALF OF THE AC IS UNAFFECTED.
  2930					;IN THIS CASE, C(AC)=0,,-1 AND C(E)=-1,,-1.  HENCE, THE RESULT IN THE AC
  2931					;SHOULD BE 0,,-1.  THE AC IS CHECKED FOR 0,,-1.  IF C(AC)=0,,-1, THIS TEST PASSES.
  2932
  2933	032041	201 00 0 00 777777 	B34300:	MOVEI	-1		;PRELOAD AC WITH 0,,-1	
  2934	032042	544 00 0 00 034012 		HLR	[-1]		;*HLR SHOULD PLACE 0,,-1 INTO THE AC
  2935	032043	302 00 0 00 777777 		CAIE	-1		;PASS IF C(AC)=0,,-1
  2936						STOP^
  2937	032044	254 04 0 00 032045 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2938	032045	324 00 0 00 032046 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2939									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2940									;IN THE SUBTEST) TO LOOP ON ERROR^
  2941
  2942					;**********
  2943
  2944					;THIS TEST VERIFIES THAT HRL PLACES THE RIGHT HALF OF C(E) INTO
  2945					;THE LEFT HALF OF THE AC.  THE RIGHT HALF OF THE AC IS UNAFFECTED
  2946					;IN THIS CASE, C(AC)=-1,,0 AND C(E)=0.  HENCE, THE RESULT IN THE AC
  2947					;SHOULD BE 0.  THE AC IS CHECKED FOR 0.  IF C(AC)=0, THIS TEST PASSES.
  2948
  2949	032046	205 00 0 00 777777 	B34400:	MOVSI	-1		;PRELOAD AC WITH -1,,0	
  2950	032047	504 00 0 00 034014 		HRL	[0]		;*HRL SHOULD PLACE 0 INTO THE AC
  2951	032050	302 00 0 00 000000 		CAIE	0		;PASS IF C(AC)=0
  2952						STOP^
  2953	032051	254 04 0 00 032052 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2954	032052	324 00 0 00 032053 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2955									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2956									;IN THE SUBTEST) TO LOOP ON ERROR^
  2957
  2958					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 60
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0086

  2959					;THIS TEST VERIFIES THAT HLR PLACES THE LEFT HALF OF C(E) INTO
  2960					;THE RIGHT HALF OF THE AC.  THE LEFT HALF OF THE AC IS UNAFFECTED.
  2961					;IN THIS CASE, C(AC)=-1,,0 AND C(E)=0.  HENCE, THE RESULT IN THE AC
  2962					;SHOULD BE -1,,0.  THE AC IS CHECKED FOR -1,,0.  IF C(AC)=-1,,0, THIS TEST PASSES.
  2963
  2964	032053	205 00 0 00 777777 	B34500:	MOVSI	-1		;PRELOAD AC WITH -1,,0	
  2965	032054	544 00 0 00 034014 		HLR	[0]		;*HLR SHOULD PLACE -1,,0 INTO THE AC
  2966	032055	312 00 0 00 034013 		CAME	[XWD -1,0]	;PASS IF C(AC)=-1,,0
  2967						STOP^
  2968	032056	254 04 0 00 032057 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2969	032057	324 00 0 00 032060 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2970									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2971									;IN THE SUBTEST) TO LOOP ON ERROR^
  2972
  2973					;**********
  2974
  2975					;THIS TEST VERIFIES THAT HRL PLACES THE RIGHT HALF OF C(E) INTO
  2976					;THE LEFT HALF OF THE AC.  THE RIGHT HALF OF THE AC IS UNAFFECTED
  2977					;IN THIS CASE, C(AC)=-1,,0 AND C(E)=-1,,-1.  HENCE, THE RESULT IN THE AC
  2978					;SHOULD BE -1,,0.  THE AC IS CHECKED FOR -1,,0.  IF C(AC)=-1,,0, THIS TEST PASSES.
  2979
  2980	032060	205 00 0 00 777777 	B34600:	MOVSI	-1		;PRELOAD AC WITH -1,,0	
  2981	032061	504 00 0 00 034012 		HRL	[-1]		;*HRL SHOULD PLACE -1,,0 INTO THE AC
  2982	032062	312 00 0 00 034013 		CAME	[XWD -1,0]	;PASS IF C(AC)=-1,,0
  2983						STOP^
  2984	032063	254 04 0 00 032064 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  2985	032064	324 00 0 00 032065 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  2986									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  2987									;IN THE SUBTEST) TO LOOP ON ERROR^
  2988
  2989					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 61
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0087

  2990					;THIS TEST VERIFIES THAT HLR PLACES THE LEFT HALF OF C(E) INTO
  2991					;THE RIGHT HALF OF THE AC.  THE LEFT HALF OF THE AC IS UNAFFECTED.
  2992					;IN THIS CASE, C(AC)=-1,,0 AND C(E)=-1,,-1  HENCE, THE RESULT IN THE AC
  2993					;SHOULD BE -1,,-1.  THE AC IS CHECKED FOR -1,,-1.  IF C(AC)=-1,,-1, THIS TEST PASSES.
  2994
  2995	032065	205 00 0 00 777777 	B34700:	MOVSI	-1		;PRELOAD AC WITH -1,,0	
  2996	032066	544 00 0 00 034012 		HLR	[-1]		;*HLR SHOULD PLACE -1,,-1 INTO THE AC
  2997	032067	312 00 0 00 034012 		CAME	[-1]		;PASS IF C(AC)=-1,,-1
  2998						STOP^
  2999	032070	254 04 0 00 032071 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3000	032071	324 00 0 00 032072 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3001									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3002									;IN THE SUBTEST) TO LOOP ON ERROR^
  3003
  3004					;**********
  3005
  3006					;THIS TEST VERIFIES THAT HLLM PLACES THE LEFT HALF OF C(AC) INTO
  3007					;THE LEFT HALF OF E.  THE RIGHT HALF OF E IS UNAFFECTED.
  3008					;IN THIS CASE, AC=E AND C(AC)= C(E)=0.  HENCE, THE RESULT IN E
  3009					;SHOULD BE 0.  E IS CHECKED FOR 0.  IF C(E)=0, THIS TEXT PASSES.
  3010
  3011	032072	400 00 0 00 000000 	B35000:	SETZ			;PRELOAD AC,E WITH 0
  3012	032073	502 00 0 00 000000 		HLLM			;*HLLM SHOULD PLACE 0 INTO E
  3013	032074	332 00 0 00 000000 		SKIPE			;PASS IF C(E)=0
  3014						STOP^
  3015	032075	254 04 0 00 032076 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3016	032076	324 00 0 00 032077 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3017									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3018									;IN THE SUBTEST) TO LOOP ON ERROR^
  3019
  3020					;*****     FAILURE ANALYSIS     *****
  3021					;C(AC0)		C(AC1)		FAILING SIGNAL
  3022
  3023					;-1,,0		0		FC: AD FM + EN
  3024					;0,,-1		0,,-1		ET0: AD RT BR + EN
  3025					;B35000		0,,-1		ET0: BR AR EN
  3026					;-1,,0		0,,-1		ET0: AD LT AR + EN
  3027
  3028					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 62
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0088

  3029					;THIS TEST VERIFIES THAT HLLM PLACES THE LEFT HALF OF C(AC) INTO
  3030					;THE LEFT HALF OF E.  THE RIGHT HALF OF E IS UNAFFECTED.
  3031					;IN THIS CASE, C(AC)=0 AND C(E)=-1,,-1.  HENCE, THE RESULT IN E
  3032					;SHOULD BE 0,,-1.  E IS CHECKED FOR 0,,-1. IF C(E)=0,,-1, THIS TEST PASSES.
  3033
  3034	032077	400 00 0 00 000000 	B35500:	SETZ			;PRELOAD AC WITH 0
  3035	032100	474 01 0 00 000000 		SETO	1,		;PRELOAD E WITH -1,,-1
  3036	032101	502 00 0 00 000001 		HLLM	1		;*HLLM SHOULD PLACE 0,,-1 INTO E
  3037	032102	302 01 0 00 777777 		CAIE	1,- 1		;PASS IF C(E) =0,,-1
  3038						STOP^
  3039	032103	254 04 0 00 032104 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3040	032104	324 00 0 00 032105 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3041									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3042									;IN THE SUBTEST) TO LOOP ON ERROR^
  3043
  3044					;*****     FAILURE ANALYSIS     *****
  3045					;C(AC0)		C(AC1)		FAILING SIGNAL
  3046
  3047					;0		-1,,-1		SW: FCE PSE
  3048					;0		0		SW: ET0
  3049					;0		-1,,-1		ET0: AR AD EN
  3050					;0		0		ET2: AR LT AD EN
  3051
  3052					;**********
  3053
  3054					;THIS TEST VERIFIES THAT HLLM PLACES THE LEFT HALF OF C(AC) INTO
  3055					;THE LEFT HALF OF E.  THE RIGHT HALF OF E IS UNAFFECTED.
  3056					;IN THIS CASE, C(AC)=-1,,-1 AND C(E)=0.  HENCE, THE RESULT IN E
  3057					;SHOULD BE -1,,0.  E IS CHECKED FOR -1,,0. IF C(E)=-1,,0, THIS TEST PASSES
  3058
  3059	032105	474 00 0 00 000000 	B35600:	SETO			;PRELOAD AC WITH -1,,-1
  3060	032106	400 01 0 00 000000 		SETZ	1,		;PRELOAD E WITH 0
  3061	032107	502 00 0 00 000001 		HLLM	1		;*HLLM SHOULD PLACE -1,,0 INTO E
  3062	032110	312 01 0 00 034013 		CAME	1,[XWD -1,0]	;PASS IF C(E) = -1,,0
  3063						STOP^
  3064	032111	254 04 0 00 032112 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3065	032112	324 00 0 00 032113 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3066									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3067									;IN THE SUBTEST) TO LOOP ON ERROR^
  3068
  3069					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 63
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0089

  3070					;THIS TEST VERIFIES THAT HRRM PLACES THE RIGHT HALF OF C(AC) INTO
  3071					;THE RIGHT HALF OF E.  THE LEFT HALF OF E IS UNAFFECTED.
  3072					;IN THIS CASE, C(AC)=0 AND C(E)=-1,,-1.  HENCE, THE RESULT IN E
  3073					;SHOULD BE -1,,0.  E IS CHECKED FOR -1,,0
  3074					;IF C(E) = -1,,0, THIS TEST PASSES.
  3075
  3076	032113	400 00 0 00 000000 	B35700:	SETZ			;PRELOAD AC WITH 0
  3077	032114	474 01 0 00 000000 		SETO	1,		;PRELOAD E WITH -1,,-1
  3078	032115	542 00 0 00 000001 		HRRM	1		;*HRRM SHOULD PLACE -1,,0 INTO E
  3079	032116	312 01 0 00 034013 		CAME	1,[XWD -1,0]	;PASS IF C(E) = -1,,0
  3080						STOP^
  3081	032117	254 04 0 00 032120 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3082	032120	324 00 0 00 032121 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3083									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3084									;IN THE SUBTEST) TO LOOP ON ERROR^
  3085
  3086					;*****     FAILURE ANALYSIS     *****
  3087					;C(AC0)		C(AC1)		FAILING SIGNAL
  3088
  3089					;0		-1,,-1		SW: FCE PSE
  3090					;0		0		SW: ET0
  3091					;0		-1,,-1		FC: AD FM + EN
  3092					;-1,,-1		-1,,-1		ET0: AD LT BR + EN
  3093					;0		-1,,-1		ET0: AD RT AR + EN
  3094					;0		0		ET0: BR AR EN
  3095					;0		-1,,-1		ET0: AR AD EN
  3096					;0		0		ET2: AR AD EN
  3097
  3098					;**********
  3099
  3100					;THIS TEST VERIFIES THAT HRRM PLACES THE RIGHT HALF OF C(AC) INTO
  3101					;THE RIGHT HALF OF E.  THE LEFT HALF OF E IS UNAFFECTED.
  3102					;IN THIS CASE, C(AC)=-1,,-1 AND C(E)=0.  HENCE, THE RESULT IN E
  3103					;SHOULD BE 0,,-1.  E IS CHECKED FOR = 0,,-1
  3104					;IF C(E) = 0,,-1, THIS TEST PASSES.
  3105
  3106	032121	474 00 0 00 000000 	B36000:	SETO			;PRELOAD AC WITH -1,,-1
  3107	032122	400 01 0 00 000000 		SETZ	1,		;PRELOAD E WITH 0
  3108	032123	542 00 0 00 000001 		HRRM	1		;*HRRM SHOULD PLACE 0,,-1 INTO E
  3109	032124	302 01 0 00 777777 		CAIE	1,-1		;PASS IF C(E) = 0,,-1
  3110						STOP^
  3111	032125	254 04 0 00 032126 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3112	032126	324 00 0 00 032127 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3113									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3114									;IN THE SUBTEST) TO LOOP ON ERROR^
  3115
  3116					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 64
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0090

  3117					;THIS TEST VERIFIES THAT HLLO PLACES THE LEFT HALF OF C(E) INTO
  3118					;THE LEFT HALF OF THE AC AND PLACES ONES INTO THE RIGHT HALF OF THE AC.
  3119					;IN THIS CASE, AC=E AND C(AC)=C(E)=-1,,-1.  HENCE THE RESULT IN THE AC
  3120					;SHOULD BE -1,,-1.  THE AC IS CHECKED FOR -1,,-1.  IF C(AC)=-1,,-1, THIS TEST PASSES.
  3121
  3122	032127	474 00 0 00 000000 	B36100:	SETO			;PRELOAD AC WITH -1,,-1
  3123	032130	520 00 0 00 000000 		HLLO			;*HLLO SHOULD PLACE -1,,-1 INTO THE AC
  3124	032131	312 00 0 00 034012 		CAME	[-1]		;PASS OF C(AC)=-1,,-1
  3125						STOP^
  3126	032132	254 04 0 00 032133 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3127	032133	324 00 0 00 032134 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3128									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3129									;IN THE SUBTEST) TO LOOP ON ERROR^
  3130
  3131					;*****     FAILURE ANALYSIS     *****
  3132					;C(AC0)		C(AC1)		FAILING SIGNAL
  3133
  3134					;0,,-1				SW: FCE
  3135
  3136					;**********
  3137
  3138					;THIS TEST VERIFIES THAT HLLO PLACES THE LEFT HALF OF C(E) INTO
  3139					;THE LEFT HALF OF THE AC AND PLACES ONES INTO THE RIGHT HALF OF THE AC.
  3140					;IN THIS CASE, C(AC)=0 AND C(E)=0,,-1.  HENCE THE RESULT IN THE AC
  3141					;SHOULD BE 0,,-1.  THE AC IS CHECKED FOR 0,,-1.  IF C(AC)=0,,-1, THIS TEST PASSES.
  3142
  3143	032134	400 00 0 00 000000 	B36200:	SETZ			;PRELOAD AC WITH 0
  3144	032135	520 00 0 00 034015 		HLLO	[XWD 0,-1]	;*HLLO SHOULD PLACE 0,,-1 INTO THE AC
  3145	032136	302 00 0 00 777777 		CAIE	-1		;PASS IF C(AC)=0,,-1
  3146						STOP^
  3147	032137	254 04 0 00 032140 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3148	032140	324 00 0 00 032141 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3149									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3150									;IN THE SUBTEST) TO LOOP ON ERROR^
  3151
  3152					;*****     FAILURE ANALYSIS     *****
  3153					;C(AC0)		C(AC1)		FAILING SIGNAL
  3154
  3155					;-1,,-1				FC: AD LT AR + EN
  3156
  3157					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 65
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0091

  3158					;THIS TEST VERIFIES THAT HRRO PLACES THE RIGHT HALF OF C(E) INTO
  3159					;THE RIGHT HALF OF THE AC AND PLACES ONES INTO THE LEFT HALF OF THE AC.
  3160					;IN THIS CASE, AC=E AND C(AC)=C(E)=-1,,-1.  HENCE, THE RESULT IN THE AC
  3161					;SHOULD BE -1,,-1.  THE AC IS CHECKED FOR -1,,-1.  IF C(AC)=-1,,-1, THIS TEST PASSES.
  3162
  3163	032141	474 00 0 00 000000 	B36300:	SETO			;PRELOAD AC,E WITH -1,,-1
  3164	032142	560 00 0 00 000000 		HRRO			;*HRRO SHOULD PLACE -1,,-1 INTO THE AC
  3165	032143	312 00 0 00 034012 		CAME	[-1]		;PASS IF C(AC)=-1,,-1
  3166						STOP^
  3167	032144	254 04 0 00 032145 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3168	032145	324 00 0 00 032146 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3169									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3170									;IN THE SUBTEST) TO LOOP ON ERROR^
  3171
  3172					;*****     FAILURE ANALYSIS     *****
  3173					;C(AC0)		C(AC1)		FAILING SIGNAL
  3174
  3175					;-1,,0				SW: FCE
  3176
  3177					;**********
  3178
  3179					;THIS TEST VERIFIES THAT HRRO PLACES THE RIGHT HALF OF C(E) INTO
  3180					;THE RIGHT HALF OF THE AC AND PLACES ONES INTO THE LEFT HALF OF THE AC.
  3181					;IN THIS CASE, C(AC)=0 AND C(E)=-1,,0.  HENCE, THE RESULT IN THE AC
  3182					;SHOULD BE -1,,0.  THE AC IS CHECKED FOR -1,,0.  IF C(AC)=-1,,0, THIS TEST PASSES.
  3183
  3184	032146	400 00 0 00 000000 	B36400:	SETZ			;PRELOAD AC WITH 0
  3185	032147	560 00 0 00 034013 		HRRO	[XWD -1,0]	;*HRRO SHOULD PLACE -1,,0 INTO THE AC
  3186	032150	312 00 0 00 034013 		CAME	[-1,,0]		;PASS IF C(AC)=-1,,0
  3187						STOP^
  3188	032151	254 04 0 00 032152 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3189	032152	324 00 0 00 032153 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3190									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3191									;IN THE SUBTEST) TO LOOP ON ERROR^
  3192
  3193					;*****     FAILURE ANALYSIS     *****
  3194					;C(AC0)		C(AC1)		FAILING SIGNAL
  3195
  3196					;-1,,-1				FC: AD RT AR + EN
  3197
  3198					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 66
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0092

  3199					;THIS TEST VERIFIES THAT HLLO PLACES THE LEFT HALF OF C(E) INTO
  3200					;THE LEFT HALF OF THE AC AND PLACES ONES INTO THE RIGHT HALF OF THE AC.
  3201					;IN THIS CASE, C(AC)=0 AND C(E)=0.  HENCE THE RESULT IN THE AC
  3202					;SHOULD BE 0,,-1.  THE AC IS CHECKED FOR 0,,-1.  IF C(AC)=0,,-1, THIS TEST PASSES.
  3203
  3204	032153	400 00 0 00 000000 	B36500:	SETZ			;PRELOAD AC WITH 0
  3205	032154	520 00 0 00 034014 		HLLO	[0]		;*HLLO SHOULD PLACE 0,,-1 INTO THE AC
  3206	032155	302 00 0 00 777777 		CAIE	-1		;PASS IF C(AC)=0,,-1
  3207						STOP^
  3208	032156	254 04 0 00 032157 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3209	032157	324 00 0 00 032160 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3210									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3211									;IN THE SUBTEST) TO LOOP ON ERROR^
  3212
  3213					;*****     FAILURE ANALYSIS     *****
  3214					;C(AC0)		C(AC1)		FAILING SIGNAL
  3215
  3216					;0				ET2: AR LT AD EN
  3217
  3218					;**********
  3219
  3220					;THIS TEST VERIFIES THAT HRRO PLACES THE RIGHT HALF OF C(E) INTO
  3221					;THE RIGHT HALF OF THE AC AND PLACES ONES INTO THE LEFT HALF OF THE AC.
  3222					;IN THIS CASE, C(AC)=0 AND C(E)=0.  HENCE, THE RESULT IN THE AC
  3223					;SHOULD BE -1,,0.  THE AC IS CHECKED FOR -1,,0.  IF C(AC)=-1,,0, THIS TEST PASSES.
  3224
  3225	032160	400 00 0 00 000000 	B36600:	SETZ			;PRELOAD AC WITH 0
  3226	032161	560 00 0 00 034014 		HRRO	[0]		;*HRRO SHOULD PLACE -1,,0 INTO THE AC
  3227	032162	312 00 0 00 034013 		CAME	[-1,,0]		;PASS IF C(AC)=-1,,0
  3228						STOP^
  3229	032163	254 04 0 00 032164 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3230	032164	324 00 0 00 032165 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3231									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3232									;IN THE SUBTEST) TO LOOP ON ERROR^
  3233
  3234					;*****     FAILURE ANALYSIS     *****
  3235					;C(AC0)		C(AC1)		FAILING SIGNAL
  3236
  3237					;0				ET2: AR AD EN
  3238
  3239					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 67
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0093

  3240					;THIS TEST VERIFIES THAT HLLOI ALWAYS PLACES 0,,-1 INTO THE AC.
  3241					;IN THIS CASE, C(AC)=0 AND E=0.
  3242					;THE RESULT IN THE AC SHOULD BE 0,,-1.
  3243					;THE AC IS CHECKED FOR 0,,-1.  IF C(AC)=0,,-1, THIS TEST PASSES
  3244
  3245	032165	400 00 0 00 000000 	B37100:	SETZ			;PRELOAD AC WITH 0
  3246	032166	521 00 0 00 000000 		HLLOI			;*HLLOI SHOULD PLACE 0,,-1 INTO THE AC
  3247	032167	302 00 0 00 777777 		CAIE	-1		;PASS IF C(AC)=0,,-1
  3248						STOP^
  3249	032170	254 04 0 00 032171 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3250	032171	324 00 0 00 032172 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3251									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3252									;IN THE SUBTEST) TO LOOP ON ERROR^
  3253
  3254					;*****     FAILURE ANALYSIS     *****
  3255					;C(AC0)		C(AC1)		FAILING SIGNAL
  3256
  3257					;-1,,-1				FC: AD LT AR + EN
  3258					;0				ET2: AR AD EN
  3259
  3260					;**********
  3261
  3262					;THIS TEST VERIFIES THAT HRROI PLACES E INTO THE RIGHT HALF OF THE AC
  3263					;AND PLACES ONES INTO THE LEFT HALF OF THE AC.
  3264					;IN THIS CASE, C(AC)=0 AND E=0.  HENCE, THE RESULT IN THE AC
  3265					;SHOULD BE -1,,0.  THE AC IS CHECKED FOR -1,,0.  IF C(AC)=-1, THIS TEST PASSES
  3266
  3267	032172	400 00 0 00 000000 	B37200:	SETZ			;PRELOAD AC WITH 0
  3268	032173	561 00 0 00 000000 		HRROI			;*HRROI SHOULD PLACE -1,,0 INTO THE AC
  3269	032174	312 00 0 00 034013 		CAME	[XWD -1,0]	;PASS IF C(AC)=-1,,0
  3270						STOP^
  3271	032175	254 04 0 00 032176 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3272	032176	324 00 0 00 032177 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3273									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3274									;IN THE SUBTEST) TO LOOP ON ERROR^
  3275
  3276					;*****     FAILURE ANALYSIS     *****
  3277					;C(AC0)		C(AC1)		FAILING SIGNAL
  3278
  3279					;-1,,-1				FC: AD RT AR + EN
  3280					;0				ET2: AR AD EN
  3281
  3282					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 68
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0094

  3283					;THIS TEST VERIFIES THAT HLLO PLACES THE LEFT HALF OF C(E) INTO
  3284					;THE LEFT HALF OF THE AC AND PLACES ONES INTO THE RIGHT HALF OF THE AC.
  3285					;IN THIS CASE, C(AC)=0 AND C(E)=-1,,0.  HENCE THE RESULT IN THE AC
  3286					;SHOULD BE -1,,-1.  THE AC IS CHECKED FOR -1,,-1.  IF C(AC)=-1,,-1, THIS TEST PASSES.
  3287
  3288	032177	400 00 0 00 000000 	B37300:	SETZ			;PRELOAD AC WITH 0
  3289	032200	520 00 0 00 034013 		HLLO	[XWD -1,0]	;*HLLO SHOULD PLACE -1,,-1 INTO THE AC
  3290	032201	312 00 0 00 034012 		CAME	[-1]		;PASS IF C(AC)=-1,,-1
  3291						STOP^
  3292	032202	254 04 0 00 032203 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3293	032203	324 00 0 00 032204 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3294									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3295									;IN THE SUBTEST) TO LOOP ON ERROR^
  3296
  3297					;**********
  3298
  3299					;THIS TEST VERIFIES THAT HRROI PLACES E INTO THE RIGHT HALF OF THE AC
  3300					;AND PLACES ONES INTO THE LEFT HALF OF THE AC.
  3301					;IN THIS CASE, C(AC)=0 AND E=0,,-1.  HENCE, THE RESULT IN THE AC
  3302					;SHOULD BE -1,,-1.  THE AC IS CHECKED FOR -1,,-1.  IF C(AC)=-1,,-1, THIS TEST PASSES
  3303
  3304	032204	400 00 0 00 000000 	B37400:	SETZ			;PRELOAD AC WITH 0
  3305	032205	561 00 0 00 777777 		HRROI	-1		;*HRRIO SHOULD PLACE -1,,-1 INTO THE AC
  3306	032206	312 00 0 00 034012 		CAME	[-1]		;PASS IF C(AC)=-1,,-1
  3307						STOP^
  3308	032207	254 04 0 00 032210 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3309	032210	324 00 0 00 032211 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3310									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3311									;IN THE SUBTEST) TO LOOP ON ERROR^
  3312
  3313					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 69
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0095

  3314					;THIS TEST VERIFIES THAT HLLOI ALWAYS PLACES 0,,-1 INTO THE AC.
  3315					;IN THIS CASE, C(AC)=0 AND E=0.
  3316					;THE RESULT IN THE AC SHOULD BE 0,,-1.
  3317					;THE AC IS CHECKED FOR 0,,-1.  IF C(AC)=0,,-1, THIS TEST PASSES
  3318
  3319	032211	474 00 0 00 000000 	B37500:	SETO			;PRELOAD AC WITH -1,,-1
  3320	032212	521 00 0 00 000000 		HLLOI			;*HLLOI SHOULD PLACE 0,,-1 INTO THE AC
  3321	032213	302 00 0 00 777777 		CAIE	-1		;PASS IF C(AC)=0,,-1
  3322						STOP^
  3323	032214	254 04 0 00 032215 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3324	032215	324 00 0 00 032216 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3325									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3326									;IN THE SUBTEST) TO LOOP ON ERROR^
  3327
  3328					;**********
  3329
  3330					;THIS TEST VERIFIES THAT HRROI PLACES E INTO THE RIGHT HALF OF THE AC
  3331					;AND PLACES ONES INTO THE LEFT HALF OF THE AC.
  3332					;IN THIS CASE, C(AC)=0 AND E=0.  HENCE, THE RESULT IN THE AC
  3333					;SHOULD BE -1,,0.  THE AC IS CHECKED FOR -1,,0.  IF C(AC)=-1,,0, THIS TEST PASSES
  3334
  3335	032216	474 00 0 00 000000 	B37600:	SETO			;PRELOAD AC WITH -1,,-1
  3336	032217	561 00 0 00 000000 		HRROI			;*HRRIO SHOULD PLACE -1,,0 INTO THE AC
  3337	032220	312 00 0 00 034013 		CAME	[XWD -1,0]	;PASS IF C(AC)=-1,,0
  3338						STOP^
  3339	032221	254 04 0 00 032222 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3340	032222	324 00 0 00 032223 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3341									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3342									;IN THE SUBTEST) TO LOOP ON ERROR^
  3343
  3344					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 70
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0096

  3345					;THIS TEST VERIFIES THAT HLLO PLACES THE LEFT HALF OF C(E) INTO
  3346					;THE LEFT HALF OF THE AC AND PLACES ONES INTO THE RIGHT HALF OF THE AC.
  3347					;IN THIS CASE, C(AC)=-1,,-1 AND C(E)=-1,,0.  HENCE THE RESULT IN THE AC
  3348					;SHOULD BE -1,,-1.  THE AC IS CHECKED FOR -1,,-1.  IF C(AC)=-1,,-1, THIS TEST PASSES.
  3349
  3350	032223	474 00 0 00 000000 	B37700:	SETO			;PRELOAD AC WITH -1,,-1
  3351	032224	520 00 0 00 034013 		HLLO	[XWD -1,0]	;*HLLO SHOULD PLACE -1,,-1 INTO THE AC
  3352	032225	312 00 0 00 034012 		CAME	[-1]		;PASS IF C(AC)=-1,,-1
  3353						STOP^
  3354	032226	254 04 0 00 032227 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3355	032227	324 00 0 00 032230 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3356									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3357									;IN THE SUBTEST) TO LOOP ON ERROR^
  3358
  3359					;**********
  3360
  3361					;THIS TEST VERIFIES THAT HRROI PLACES E INTO THE RIGHT HALF OF THE AC
  3362					;AND PLACES ONES INTO THE LEFT HALF OF THE AC.
  3363					;IN THIS CASE, C(AC)=-1,,-1 AND E=0,,-1.  HENCE, THE RESULT IN THE AC
  3364					;SHOULD BE -1,,-1.  THE AC IS CHECKED FOR -1,,-1.  IF C(AC)=-1,,-1, THIS TEST PASSES
  3365
  3366	032230	474 00 0 00 000000 	B40000:	SETO			;PRELOAD AC WITH -1,,-1
  3367	032231	561 00 0 00 777777 		HRROI	-1		;*HRRIO SHOULD PLACE -1,,-1 INTO THE AC
  3368	032232	312 00 0 00 034012 		CAME	[-1]		;PASS IF C(AC)=-1,,-1
  3369						STOP^
  3370	032233	254 04 0 00 032234 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3371	032234	324 00 0 00 032235 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3372									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3373									;IN THE SUBTEST) TO LOOP ON ERROR^
  3374
  3375					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 71
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0097

  3376					;THIS TEST VERIFIES THAT HRROI PLACES E INTO THE RIGHT HALF OF THE AC
  3377					;AND PLACES ONES INTO THE LEFT HALF OF THE AC.
  3378					;IN THIS CASE, C(AC)=0,,-1 AND E=0.  HENCE, THE RESULT IN THE AC
  3379					;SHOULD BE -1,,0.  THE AC IS CHECKED FOR -1,,0.  IF C(AC)=-1,,0, THIS TEST PASSES
  3380
  3381	032235	201 00 0 00 777777 	B40100:	MOVEI	-1		;PRELOAD AC WITH 0,,-1
  3382	032236	561 00 0 00 000000 		HRROI			;*HRRIO SHOULD PLACE -1,,0 INTO THE AC
  3383	032237	312 00 0 00 034013 		CAME	[XWD -1,0]	;PASS IF C(AC)=-1,,0
  3384						STOP^
  3385	032240	254 04 0 00 032241 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3386	032241	324 00 0 00 032242 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3387									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3388									;IN THE SUBTEST) TO LOOP ON ERROR^
  3389
  3390					;**********
  3391
  3392					;THIS TEST VERIFIES THAT HLLO PLACES THE LEFT HALF OF C(E) INTO
  3393					;THE LEFT HALF OF THE AC AND PLACES ONES INTO THE RIGHT HALF OF THE AC.
  3394					;IN THIS CASE, C(AC)=-1,,0 AND C(E)=0,,-1.  HENCE THE RESULT IN THE AC
  3395					;SHOULD BE 0,,-1.  THE AC IS CHECKED FOR 0,,-1.  IF C(AC)=0,,-1, THIS TEST PASSES.
  3396
  3397	032242	205 00 0 00 777777 	B40200:	MOVSI	-1		;PRELOAD AC WITH -1,,0	
  3398	032243	520 00 0 00 034015 		HLLO	[XWD 0,-1]	;*HLLO SHOULD PLACE 0,,-1 INTO THE AC
  3399	032244	302 00 0 00 777777 		CAIE	-1		;PASS IF C(AC)=0,,-1
  3400						STOP^
  3401	032245	254 04 0 00 032246 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3402	032246	324 00 0 00 032247 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3403									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3404									;IN THE SUBTEST) TO LOOP ON ERROR^
  3405
  3406					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 72
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0098

  3407					;THIS TEST VERIFIES THAT HRLZ PLACES THE RIGHT HALF OF C(E)
  3408					;INTO THE LEFT HALF OF THE AC.
  3409					;AND PLACES ZEROS INTO THE RIGHT HALF OF THE AC.
  3410					;IN THIS CASE, AC=E AND C(AC)=C(E)=0. HENCE, THE FINAL RESULT IN THE AC
  3411					;SHOULD BE 0.  THE AC IS CHECKED FOR 0.  IF C(AC)=0, THIS TEST PASSES.
  3412
  3413	032247	400 00 0 00 000000 	B40300:	SETZ			;PRELOAD AC WITH 0
  3414	032250	514 00 0 00 000000 		HRLZ			;*HRLZ SHOULD PLACE 0 INTO THE AC
  3415	032251	332 00 0 00 000000 		SKIPE			;PASS IF C(AC)=0
  3416						STOP^
  3417	032252	254 04 0 00 032253 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3418	032253	324 00 0 00 032254 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3419									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3420									;IN THE SUBTEST) TO LOOP ON ERROR^
  3421
  3422					;**********
  3423
  3424					;THIS TEST VERIFIES THAT HLRZ PLACES THE LEFT HALF OF C(E)
  3425					;INTO THE RIGHT HALF OF THE AC
  3426					;AND PLACES ZEROS INTO THE LEFT HALF OF THE AC.
  3427					;IN THIS CASE, AC=E AND C(AC)=C(E)=0.  HENCE, THE RESULT IN THE AC
  3428					;SHOULD BE 0.  THE AC IS CHECKED FOR 0.  IF C(AC)=0, THIS TEST PASSES.
  3429
  3430	032254	400 00 0 00 000000 	B40400:	SETZ			;PRELOAD AC WITH 0
  3431	032255	554 00 0 00 000000 		HLRZ			;*HLRZ SHOULD PLACE 0 INTO THE AC
  3432	032256	332 00 0 00 000000 		SKIPE			;PASS IF C(AC)=0
  3433						STOP^
  3434	032257	254 04 0 00 032260 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3435	032260	324 00 0 00 032261 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3436									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3437									;IN THE SUBTEST) TO LOOP ON ERROR^
  3438
  3439					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 73
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0099

  3440					;THIS TEST VERIFIES THAT HRLZI PLACES E INTO THE LEFT HALF OF THE AC
  3441					;AND PLACES ZEROS INTO THE RIGHT HALF OF THE AC.
  3442					;IN THIS CASE, C(AC)=0 AND E=0,,-1.  HENCE THE RESULT IN THE AC
  3443					;SHOULD BE -1,,0.  THE AC IS CHECKED FOR -1,,0
  3444					;IF C(AC)=-1,,0, THIS TEST PASSES.
  3445
  3446	032261	400 00 0 00 000000 	B40700:	SETZ			;PRELOAD AC WITH 0		
  3447	032262	515 00 0 00 777777 		HRLZI	-1		;*HRLZI SHOULD PLACE -1,,0 INTO THE AC
  3448	032263	312 00 0 00 034013 		CAME	[XWD -1,0]	;PASS IF C(AC)=-1,,0.
  3449						STOP^
  3450	032264	254 04 0 00 032265 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3451	032265	324 00 0 00 032266 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3452									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3453									;IN THE SUBTEST) TO LOOP ON ERROR^
  3454
  3455					;*****     FAILURE ANALYSIS     *****
  3456					;C(AC0)		C(AC1)		FAILING SIGNAL
  3457
  3458					;0				ET2: AR LT AR RT EN
  3459
  3460					;**********
  3461
  3462					;THIS TEST VERIFIES THAT HLRZ PLACES THE LEFT HALF OF C(E)
  3463					;INTO THE RIGHT HALF OF THE AC
  3464					;AND PLACES ZEROS INTO THE LEFT HALF OF THE AC.
  3465					;IN THIS CASE, C(AC)=0 AND C(E)=-1,,0.  HENCE, THE RESULT IN THE AC
  3466					;SHOULD BE 0,,-1.  THE AC IS CHECKED FOR 0,,-1.  IF C(AC)=0,,-1, THIS TEST PASSES.
  3467
  3468	032266	400 00 0 00 000000 	B41000:	SETZ			;PRELOAD AC WITH 0
  3469	032267	554 00 0 00 034013 		HLRZ	[XWD -1,0]	;*HLRZ SHOULD PLACE 0,,-1 INTO THE AC
  3470	032270	302 00 0 00 777777 		CAIE	-1		;PASS IF C(AC)=0,,-1
  3471						STOP^
  3472	032271	254 04 0 00 032272 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3473	032272	324 00 0 00 032273 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3474									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3475									;IN THE SUBTEST) TO LOOP ON ERROR^
  3476
  3477					;*****     FAILURE ANALYSIS     *****
  3478					;C(AC0)		C(AC1)		FAILING SIGNAL
  3479
  3480					;0				SW: FCE
  3481					;-1,,0				ET2: AR RT AR LT EN
  3482
  3483					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 74
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0100

  3484					;THIS TEST VERIFIES THAT HRLZI PLACES E INTO THE LEFT HALF OF THE AC
  3485					;AND PLACES ZEROS INTO THE RIGHT HALF OF THE AC.
  3486					;IN THIS CASE, C(AC)=-1,,-1 AND E=0,,-1.  HENCE THE RESULT IN THE AC
  3487					;SHOULD BE -1,,0.  THE AC IS CHECKED FOR -1,,0.
  3488					;IF C(AC)=-1,,0, THIS TEST PASSES.
  3489
  3490	032273	474 00 0 00 000000 	B41100:	SETO			;PRELOAD AC WITH -1,,-1
  3491	032274	515 00 0 00 777777 		HRLZI	-1		;*HRLZI SHOULD PLACE -1,,0 INTO THE AC
  3492	032275	312 00 0 00 034013 		CAME	[XWD -1,0]	;PASS IF C(AC)=-1,,0.
  3493						STOP^
  3494	032276	254 04 0 00 032277 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3495	032277	324 00 0 00 032300 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3496									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3497									;IN THE SUBTEST) TO LOOP ON ERROR^
  3498
  3499					;**********
  3500
  3501					;THIS TEST VERIFIES THAT HLRZ PLACES THE LEFT HALF OF C(E)
  3502					;INTO THE RIGHT HALF OF THE AC
  3503					;AND PLACES ZEROS INTO THE LEFT HALF OF THE AC.
  3504					;IN THIS CASE, C(AC)=-1,,-1 AND C(E)=-1,,0.  HENCE, THE RESULT IN THE AC
  3505					;SHOULD BE 0,,-1.  THE AC IS CHECKED FOR 0,,-1.  IF C(AC)=0,,-1, THIS TEST PASSES.
  3506
  3507	032300	474 00 0 00 000000 	B41200:	SETO			;PRELOAD AC WITH -1,,-1
  3508	032301	554 00 0 00 034013 		HLRZ	[XWD -1,0]	;*HLRZ SHOULD PLACE 0,,-1 INTO THE AC
  3509	032302	302 00 0 00 777777 		CAIE	-1		;PASS IF C(AC)=0,,-1
  3510						STOP^
  3511	032303	254 04 0 00 032304 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3512	032304	324 00 0 00 032305 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3513									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3514									;IN THE SUBTEST) TO LOOP ON ERROR^
  3515
  3516					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 75
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0101

  3517					;THIS TEST VERIFIES THAT HLLE PLACES THE LEFT HALF OF C(E)
  3518					;INTO THE LEFT HALF OF THE AC
  3519					;AND PLACES BIT 0 OF C(E) INTO ALL BITS OF THE RIGHT HALF OF THE AC.
  3520					;IN THIS CASE, AC=E AND C(AC)=C(E)=0.  HENCE, THE RESULT IN THE AC SHOULD BE 0
  3521					;THE AC IS CHECKED FOR 0.  IF C(AC)=0, THIS TEST PASSES
  3522
  3523	032305	400 00 0 00 000000 	B41500:	SETZ			;PRELOAD AC WITH 0		
  3524	032306	530 00 0 00 000000 		HLLE			;*HLLE SHOULD PLACE 0 INTO THE AC
  3525	032307	332 00 0 00 000000 		SKIPE			;PASS IF C(AC)=0
  3526						STOP^
  3527	032310	254 04 0 00 032311 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3528	032311	324 00 0 00 032312 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3529									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3530									;IN THE SUBTEST) TO LOOP ON ERROR^
  3531
  3532					;*****     FAILURE ANALYSIS     *****
  3533					;C(AC0)		C(AC1)		FAILING SIGNAL
  3534
  3535					;-1,,0				FC: AD LT AR + EN
  3536
  3537					;**********
  3538
  3539					;THIS TEST VERIFIES THAT HLLE PLACES THE LEFT HALF OF C(E)
  3540					;INTO THE LEFT HALF OF THE AC
  3541					;AND PLACES BIT 0 OF C(E) INTO ALL BITS OF THE RIGHT HALF OF THE AC.
  3542					;IN THIS CASE C(AC)=0 AND C(E)=-1,,-1.  HENCE, THE RESULT IN THE AC SHOULD BE -1,,-1
  3543					;THE AC IS CHECKED FOR -1,,-1.  IF C(AC)=-1,,-1, THIS TEST PASSES
  3544
  3545	032312	400 00 0 00 000000 	B41600:	SETZ			;PRELOAD AC WITH 0		
  3546	032313	530 00 0 00 034012 		HLLE	[-1]		;*HLLE SHOULD PLACE -1,,-1 INTO THE AC
  3547	032314	312 00 0 00 034012 		CAME	[XWD -1,-1]	;PASS IF C(AC)=-1,,-1
  3548						STOP^
  3549	032315	254 04 0 00 032316 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3550	032316	324 00 0 00 032317 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3551									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3552									;IN THE SUBTEST) TO LOOP ON ERROR^
  3553
  3554					;*****     FAILURE ANALYSIS     *****
  3555					;C(AC0)		C(AC1)		FAILING SIGNAL
  3556
  3557					;0				SW: FCE
  3558					;-1,,-1				ET2: AR LT AD EN
  3559					;-1,,0				ET2: AR0(1): AR RT AD EN
  3560
  3561					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 76
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0102

  3562					;THIS TEST VERIFIES THAT HRRE PLACES THE RIGHT HALF OF C(E)
  3563					;INTO THE RIGHT HALF OF THE AC.
  3564					;AND PLACES BIT 18 OF C(E) INTO ALL BITS OF THE LEFT HALF OF THE AC.
  3565					;IN THIS CASE C(AC)=0 AND C(E)=-1,,-1.  HENCE, THE RESULT IN THE AC SHOULD BE -1,,-1.
  3566					;THE AC IS CHECKED FOR -1,,-1.  IF C(AC)=-1,,-1, THIS TEST PASSES.
  3567
  3568	032317	400 00 0 00 000000 	B42000:	SETZ			;PRELOAD AC WITH 0		
  3569	032320	570 00 0 00 034012 		HRRE	[-1]		;*HRRE SHOULD PLACE -1,,-1 INTO THE AC
  3570	032321	312 00 0 00 034012 		CAME	[-1,,-1]	;PASS IF C(AC)=-1,,-1
  3571						STOP^
  3572	032322	254 04 0 00 032323 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3573	032323	324 00 0 00 032324 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3574									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3575									;IN THE SUBTEST) TO LOOP ON ERROR^
  3576
  3577					;**********
  3578
  3579					;THIS TEST VERIFIES THAT HLLE PLACES THE LEFT HALF OF C(E)
  3580					;INTO THE LEFT HALF OF THE AC
  3581					;AND PLACES BIT 0 OF C(E) INTO ALL BITS OF THE RIGHT HALF OF THE AC.
  3582					;IN THIS CASE C(AC)=0 AND C(E)=-1,,0.  HENCE, THE RESULT IN THE AC SHOULD BE -1,,-1
  3583					;THE AC IS CHECKED FOR -1,,-1.  IF C(AC)=-1,,-1, THIS TEST PASSES
  3584
  3585	032324	400 00 0 00 000000 	B42200:	SETZ			;PRELOAD AC WITH 0		
  3586	032325	530 00 0 00 034013 		HLLE	[XWD -1,0]	;*HLLE SHOULD PLACE -1,,-1 INTO THE AC
  3587	032326	312 00 0 00 034012 		CAME	[-1]		;PASS IF C(AC)=-1,,-1
  3588						STOP^
  3589	032327	254 04 0 00 032330 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3590	032330	324 00 0 00 032331 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3591									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3592									;IN THE SUBTEST) TO LOOP ON ERROR^
  3593
  3594					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 77
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0103

  3595					;THIS TEST VERIFIES THAT HRRE PLACES THE RIGHT HALF OF C(E)
  3596					;INTO THE RIGHT HALF OF THE AC.
  3597					;AND PLACES BIT 18 OF C(E) INTO ALL BITS OF THE LEFT HALF OF THE AC.
  3598					;IN THIS CASE, AC=E AND C(AC)=C(E)=0.  HENCE, THE RESULT IN THE AC SHOULD BE 0.
  3599					;THE AC IS CHECKED FOR 0.  IF C(AC)=0, THIS TEST PASSES.
  3600
  3601	032331	400 00 0 00 000000 	B42300:	SETZ			;PRELOAD AC,E WITH 0		
  3602	032332	570 00 0 00 000000 		HRRE			;*HRRE SHOULD PLACE 0 INTO THE AC
  3603	032333	332 00 0 00 000000 		SKIPE			;PASS IF C(AC)=0
  3604						STOP^
  3605	032334	254 04 0 00 032335 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3606	032335	324 00 0 00 032336 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3607									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3608									;IN THE SUBTEST) TO LOOP ON ERROR^
  3609
  3610					;*****     FAILURE ANALYSIS     *****
  3611					;C(AC0)		C(AC1)		FAILING SIGNAL
  3612
  3613					;E				SW: FCE
  3614					;-1,,0				ET2: AR RT AD EN
  3615					;0,,-1				ET2: AR18(1): AR LT AD EN
  3616					;0,,-1				FC: AR RT AR + EN
  3617
  3618					;**********
  3619
  3620					;THIS TEST VERIFIES THAT HRRE PLACES THE RIGHT HALF OF C(E)
  3621					;INTO THE RIGHT HALF OF THE AC.
  3622					;AND PLACES BIT 18 OF C(E) INTO ALL BITS OF THE LEFT HALF OF THE AC.
  3623					;IN THIS CASE C(AC)=0 AND C(E)=-1,,0.  HENCE, THE RESULT IN THE AC SHOULD BE 0.
  3624					;THE AC IS CHECKED FOR 0.  IF C(AC)=0, THIS TEST PASSES.
  3625
  3626	032336	400 00 0 00 000000 	B42500:	SETZ			;PRELOAD AC WITH 0		
  3627	032337	570 00 0 00 034013 		HRRE	[XWD -1,0]	;*HRRE SHOULD PLACE 0 INTO THE AC
  3628	032340	332 00 0 00 000000 		SKIPE			;PASS IF C(AC)=0
  3629						STOP^
  3630	032341	254 04 0 00 032342 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3631	032342	324 00 0 00 032343 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3632									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3633									;IN THE SUBTEST) TO LOOP ON ERROR^
  3634
  3635					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 78
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0104

  3636					;THIS TEST VERIFIES THAT HRREI PLACES E INTO THE RIGHT HALF OF THE AC
  3637					;AND PLACES THE LEFTMOST BIT OF E INTO ALL BITS OF THE LEFT HALF OF THE AC
  3638					;IN THIS CASE, C(AC)=0 AND E=0,,-1.  HENCE, THE RESULT IN THE AC SHOULD BE -1,,-1.
  3639					;THE AC IS CHECKED FOR -1,,-1.  IF C(AC)=-1,,-1, THIS TEST PASSES.
  3640
  3641	032343	400 00 0 00 000000 	B42700:	SETZ			;PRELOAD AC WITH 0		
  3642	032344	571 00 0 00 777777 		HRREI	-1		;*HRREI SHOULD PLACE -1,,-1 INTO THE AC
  3643	032345	312 00 0 00 034012 		CAME	[-1]		;PASS IF C(AC)=-1,,-1
  3644						STOP^
  3645	032346	254 04 0 00 032347 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3646	032347	324 00 0 00 032350 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3647									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3648									;IN THE SUBTEST) TO LOOP ON ERROR^
  3649
  3650					;*****     FAILURE ANALYSIS     *****
  3651					;C(AC0)		C(AC1)		FAILING SIGNAL
  3652
  3653					;-1,,0				ET2: AR RT AD EN
  3654					;0,,-1				ET2: AR18(1): AR LT AD EN
  3655
  3656					;**********
  3657
  3658					;THIS TEST VERIFIES THAT HLLEI ALWAYS CLEARS THE AC.
  3659					;IN THIS CASE, C(AC)=-1,,-1 AND E=0,,-1.
  3660					;THE RESULT IN THE AC SHOULD BE 0
  3661					;THE AC IS CHECKED FOR 0.
  3662					;IF C(AC)=0, THIS TEST PASSES.
  3663
  3664	032350	474 00 0 00 000000 	B43000:	SETO			;PRELOAD AC WITH -1,,-1
  3665	032351	531 00 0 00 777777 		HLLEI	-1		;*HLLEI SHOULD CLEAR THE AC
  3666	032352	332 00 0 00 000000 		SKIPE			;PASS IF C(AC)=0
  3667						STOP^
  3668	032353	254 04 0 00 032354 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3669	032354	324 00 0 00 032355 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3670									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3671									;IN THE SUBTEST) TO LOOP ON ERROR^
  3672
  3673					;*****     FAILURE ANALYSIS     *****
  3674					;C(AC0)		C(AC1)		FAILING SIGNAL
  3675
  3676					;-1,,0				FC: AD LT AR + EN
  3677					;0,,-1				ET2: AR LT AD EN
  3678
  3679					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 79
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0105

  3680					;THIS TEST VERIFIES THAT HLLEI ALWAYS CLEARS THE AC.
  3681					;IN THIS CASE, C(AC)=-1,,-1 AND E=0,,400000.
  3682					;THE RESULT IN THE AC SHOULD BE 0
  3683					;THE AC IS CHECKED FOR 0.
  3684					;IF C(AC) = ZERO, THIS TEST PASSES.
  3685
  3686	032355	474 00 0 00 000000 	B43100:	SETO			;PRELOAD AC WITH -1,,-1
  3687	032356	531 00 0 00 400000 		HLLEI	400000		;*HLLEI SHOULD CLEAR THE AC
  3688	032357	332 00 0 00 000000 		SKIPE			;PASS IF C(AC)=0.
  3689						STOP^
  3690	032360	254 04 0 00 032361 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3691	032361	324 00 0 00 032362 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3692									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3693									;IN THE SUBTEST) TO LOOP ON ERROR^
  3694
  3695					;**********
  3696
  3697					;THIS TEST VERIFIES THAT HRLE PLACES THE RIGHT HALF OF C(E)
  3698					;INTO THE LEFT HALF OF THE AC
  3699					;AND PLACES BIT 18 OF C(E) INTO ALL BITS OF THE RIGHT HALF OF THE AC.
  3700					;IN THIS CASE, C(AC)=0 AND C(E)=0.  HENCE, THE RESULT IN THE AC SHOULD BE 0.
  3701					;THE AC IS CHECKED FOR 0,,-1.  IF C(AC)=0,,-1, THIS TEST FAILS
  3702
  3703	032362	400 00 0 00 000000 	B43400:	SETZ			;PRELOAD AC WITH 0
  3704	032363	534 00 0 00 000000 		HRLE			;*HRLE SHOULD PLACE 0 INTO THE AC
  3705	032364	332 00 0 00 000000 		SKIPE			;FAIL IF C(AC)=0,,-1
  3706						STOP^
  3707	032365	254 04 0 00 032366 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3708	032366	324 00 0 00 032367 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3709									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3710									;IN THE SUBTEST) TO LOOP ON ERROR^
  3711
  3712					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 80
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0106

  3713					;THIS TEST VERIFIES THAT HRLEI PLACES E INTO THE LEFT HALF OF THE AC
  3714					;AND PLACES THE LEFTMOST BIT OF E INTO ALL BITS OF THE RIGHT HALF OF THE AC
  3715					;IN THIS CASE, C(AC)=0 AND E=0,,-1.  HENCE, THE RESULT IN THE AC SHOULD -1,,-1
  3716					;THE AC IS CHECKED FOR -1,,-1.  IF C(AC)=1,,-1, THIS TEST PASSES.
  3717
  3718	032367	400 00 0 00 000000 	B43500:	SETZ			;PRELOAD AC WITH 0		
  3719	032370	535 00 0 00 777777 		HRLEI	-1		;*HRLEI SHOULD PLACE -1,,-1 INTO THE AC
  3720	032371	312 00 0 00 034012 		CAME	[XWD -1,-1]	;PASS IF C(AC)=-1,,-1
  3721						STOP^
  3722	032372	254 04 0 00 032373 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3723	032373	324 00 0 00 032374 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3724									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3725									;IN THE SUBTEST) TO LOOP ON ERROR^
  3726
  3727					;*****     FAILURE ANALYSIS     *****
  3728					;C(AC0)		C(AC1)		FAILING SIGNAL
  3729
  3730					;-1,,0				ET2: AR LT AR RT EN
  3731					;-1,,0				ET2: AR 18(1): AR RT AD EN
  3732
  3733					;**********
  3734
  3735					;THIS TEST VERIFIES THAT HRLE PLACES THE RIGHT HALF OF C(E)
  3736					;INTO THE LEFT HALF OF THE AC
  3737					;AND PLACES BIT 18 OF C(E) INTO ALL BITS OF THE RIGHT HALF OF THE AC.
  3738					;IN THIS CASE, C(AC)=0 AND C(E)=0.  HENCE, THE RESULT IN THE AC SHOULD BE 0.
  3739					;THE AC IS CHECKED FOR 0,,-1.  IF C(AC)=0,,-1, THIS TEST FAILS
  3740
  3741	032374	534 00 0 00 034014 	B43600:	HRLE	[0]		;*HRLE SHOULD PLACE 0 INTO THE AC	
  3742	032375	332 00 0 00 000000 		SKIPE			;FAIL IF C(AC)=0,,-1
  3743						STOP^
  3744	032376	254 04 0 00 032377 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3745	032377	324 00 0 00 032400 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3746									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3747									;IN THE SUBTEST) TO LOOP ON ERROR^
  3748
  3749					;*****     FAILURE ANALYSIS     *****
  3750					;C(AC0)		C(AC1)		FAILING SIGNAL
  3751
  3752					;E,,0				SW: FCE
  3753
  3754					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 81
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0107

  3755					;THIS TEST VERIFIES THAT HRLE PLACES THE RIGHT HALF OF C(E)
  3756					;INTO THE LEFT HALF OF THE AC
  3757					;AND PLACES BIT 18 OF C(E) INTO ALL BITS OF THE RIGHT HALF OF THE AC.
  3758					;IN THIS CASE, C(AC)=0 AND C(E)=0.  HENCE, THE RESULT IN THE AC SHOULD BE 0.
  3759					;THE AC IS CHECKED FOR 0,,-1.  IF C(AC)=0,,-1, THIS TEST FAILS
  3760
  3761	032400	534 00 0 00 034012 	B43700:	HRLE	[-1]		;PRELOAD AC WITH 0	
  3762	032401	312 00 0 00 034012 		CAME	[-1]		;*HRLE SHOULD PLACE 0 INTO THE AC
  3763						STOP			^;FAIL IF C(AC)=0,,-1
  3764
  3765	032402	254 04 0 00 032403 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3766	032403	324 00 0 00 032404 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3767									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3768									;IN THE SUBTEST) TO LOOP ON ERROR
  3769
  3770					;*****     FAILURE ANALYSIS     *****
  3771					;C(AC0)		C(AC1)		FAILING SIGNAL
  3772
  3773					;-1,,0				ET2: AR LT AR RT EN
  3774					;-1,,0				ET2: AR18(1): AR RT AD EN
  3775
  3776					;**********
  3777
  3778					;THIS TEST VERIFIES THAT HRLE PLACES THE RIGHT HALF OF C(E)
  3779					;INTO THE LEFT HALF OF THE AC
  3780					;AND PLACES BIT 18 OF C(E) INTO ALL BITS OF THE RIGHT HALF OF THE AC.
  3781					;IN THIS CASE, C(AC)=0 AND C(E)=0.  HENCE, THE RESULT IN THE AC SHOULD BE 0.
  3782					;THE AC IS CHECKED FOR 0,,-1.  IF C(AC)=0,,-1, THIS TEST FAILS
  3783
  3784	032404	534 00 0 00 034013 	B44000:	HRLE	[XWD -1,0]	;PRELOAD AC WITH 0
  3785	032405	332 00 0 00 000000 		SKIPE			;*HRLE SHOULD PLACE 0 INTO THE AC
  3786						STOP			^;FAIL IF C(AC)=0,,-1
  3787
  3788	032406	254 04 0 00 032407 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3789	032407	324 00 0 00 032410 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3790									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3791									;IN THE SUBTEST) TO LOOP ON ERROR
  3792
  3793					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 82
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0108

  3794					;THIS TEST VERIFIES THAT HRLE PLACES THE RIGHT HALF OF C(E)
  3795					;INTO THE LEFT HALF OF THE AC
  3796					;AND PLACES BIT 18 OF C(E) INTO ALL BITS OF THE RIGHT HALF OF THE AC.
  3797					;IN THIS CASE, C(AC)=0 AND C(E)=0.  HENCE, THE RESULT IN THE AC SHOULD BE 0.
  3798					;THE AC IS CHECKED FOR 0,,-1.  IF C(AC)=0,,-1, THIS TEST FAILS
  3799
  3800	032410	534 00 0 00 034015 	B44100:	HRLE	[XWD 0,-1]	;PRELOAD AC WITH 0
  3801	032411	312 00 0 00 034012 		CAME	[-1]		;*HRLE SHOULD PLACE 0 INTO THE AC
  3802						STOP			^;FAIL IF C(AC)=0,,-1
  3803
  3804	032412	254 04 0 00 032413 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3805	032413	324 00 0 00 032414 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3806									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3807									;IN THE SUBTEST) TO LOOP ON ERROR
  3808
  3809					;**********
  3810
  3811					;THIS TEST VERIFIES THAT HLRE PLACES THE LEFT HALF OF C(E)
  3812					;INTO THE RIGHT HALF OF THE AC
  3813					;AND PLACES BIT 0 OF C(E) INTO ALL BITS OF THE LEFT HALF OF THE AC
  3814					;IN THIS CASE, C(AC=0 AND C(E)=0.  HENCE, THE RESULT IN THE AC SHOULD BE 0.
  3815					;THE AC IS CHECKED FOR 0.  IF C(AC)=0, THIS TEST PASSES
  3816
  3817
  3818	032414	400 00 0 00 000000 	B44200:	SETZ			;PRELOAD AC WITH 0
  3819	032415	574 00 0 00 000000 		HLRE			;*HLRE SHOULD PLACE 0 INTO THE AC
  3820	032416	332 00 0 00 000000 		SKIPE			;PASS IF C(AC)=0
  3821						STOP^
  3822	032417	254 04 0 00 032420 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3823	032420	324 00 0 00 032421 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3824									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3825									;IN THE SUBTEST) TO LOOP ON ERROR^
  3826
  3827					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 83
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0109

  3828					;THIS TEST VERIFIES THAT HLRE PLACES THE LEFT HALF OF C(E)
  3829					;INTO THE RIGHT HALF OF THE AC
  3830					;AND PLACES BIT 0 OF C(E) INTO ALL BITS OF THE LEFT HALF OF THE AC
  3831					;IN THIS CASE, C(AC=0 AND C(E)=0.  HENCE, THE RESULT IN THE AC SHOULD BE 0.
  3832					;THE AC IS CHECKED FOR 0.  IF C(AC)=0, THIS TEST PASSES
  3833
  3834
  3835	032421	400 00 0 00 000000 	B44300:	SETZ			;PRELOAD AC WITH 0
  3836	032422	574 00 0 00 034012 		HLRE	[-1]		;*HLRE SHOULD PLACE -1,,-1 INTO THE AC
  3837	032423	312 00 0 00 034012 		CAME	[-1]		;PASS IF C(AC)=-1,,-1	
  3838						STOP^
  3839	032424	254 04 0 00 032425 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3840	032425	324 00 0 00 032426 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3841									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3842									;IN THE SUBTEST) TO LOOP ON ERROR^
  3843
  3844					;*****     FAILURE ANALYSIS     *****
  3845					;C(AC0)		C(AC1)		FAILING SIGNAL
  3846
  3847					;0				SW: FCE
  3848					;-1,,0				ET2: AR RT AR LT EN
  3849					;0,,-1				ET2: AR0(1): AR LT AD EN
  3850
  3851					;**********
  3852
  3853					;THIS TEST VERIFIES THAT HLREI CLEARS THE AC
  3854					;IN THIS CASE C(AC)=-1,,-1 AND E=0,,-1
  3855					;THE RESULT IN THE AC SHOULD BE 0
  3856					;THE AC IS CHECKED FOR 0.  IF C(AC)=0, THEN TEST PASSES
  3857
  3858	032426	474 00 0 00 000000 	B44500:	SETO			;PRELOAD AC WITH -1,,-1
  3859	032427	575 00 0 00 777777 		HLREI	-1		;*HLREI SHOULD CLEAR THE AC
  3860	032430	332 00 0 00 000000 		SKIPE			;PASS IF C(AC)=0
  3861						STOP^
  3862	032431	254 04 0 00 032432 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3863	032432	324 00 0 00 032433 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3864									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3865									;IN THE SUBTEST) TO LOOP ON ERROR^
  3866
  3867					;*****     FAILURE ANALYSIS     *****
  3868					;C(AC0)		C(AC1)		FAILING SIGNAL
  3869
  3870					;0,,1				ET2: AR RT AR LT EN
  3871
  3872					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 84
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0110

  3873					;THIS TEST VERIFIES THAT HLREI CLEARS THE AC
  3874					;IN THIS CASE C(AC)=0 AND E=0
  3875					;THE RESULT IN THE AC SHOULD BE 0
  3876					;THE AC IS CHECKED FOR 0.  IF C(AC)=0, THE TEST PASSES
  3877
  3878	032433	575 00 0 00 000000 	B44600:	HLREI			;*HLREI SHOULD CLEAR THE AC		
  3879	032434	332 00 0 00 000000 		SKIPE			;PASS IF C(AC)=0
  3880						STOP^
  3881	032435	254 04 0 00 032436 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3882	032436	324 00 0 00 032437 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3883									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3884									;IN THE SUBTEST) TO LOOP ON ERROR^
  3885
  3886					;**********
  3887
  3888					;THIS TEST VERIFIES THAT HLRE PLACES THE LEFT HALF OF C(E)
  3889					;INTO THE RIGHT HALF OF THE AC
  3890					;AND PLACES BIT 0 OF C(E) INTO ALL BITS OF THE LEFT HALF OF THE AC
  3891					;IN THIS CASE, C(E)=-1,,0.  HENCE, THE RESULT IN THE AC SHOULD BE -1,,-1.
  3892					;THE AC IS CHECKED FOR -1,,-1.  IF C(AC)=-1,,-1, THIS TEST PASSES
  3893
  3894
  3895	032437	574 00 0 00 034013 	B44700:	HLRE	[XWD -1,0]	;*HLRE SHOULD PLACE -1,,0 INTO THE AC
  3896	032440	312 00 0 00 034012 		CAME	[-1]		;PASS IF C(AC)=-1,,-1
  3897						STOP^
  3898	032441	254 04 0 00 032442 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3899	032442	324 00 0 00 032443 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3900									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3901									;IN THE SUBTEST) TO LOOP ON ERROR^
  3902
  3903					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 85
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0111

  3904					;THIS TEST VERIFIES THAT HLRE PLACES THE LEFT HALF OF C(E)
  3905					;INTO THE RIGHT HALF OF THE AC
  3906					;AND PLACES BIT 0 OF C(E) INTO ALL BITS OF THE LEFT HALF OF THE AC
  3907					;IN THIS CASE, C(E)=0,,-1.  HENCE, THE RESULT IN THE AC SHOULD BE 0.
  3908					;THE AC IS CHECKED FOR 0.  IF C(AC)=0, THIS TEST PASSES
  3909
  3910	032443	574 00 0 00 034015 	B45000:	HLRE	[XWD 0,-1]	;*HLRE SHOULD PLACE 0,,-1 INTO THE AC
  3911	032444	332 00 0 00 000000 		SKIPE			;PASS IF C(AC)=0
  3912						STOP^
  3913	032445	254 04 0 00 032446 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3914	032446	324 00 0 00 032447 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3915									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3916									;IN THE SUBTEST) TO LOOP ON ERROR^
  3917
  3918					;**********
  3919
  3920					;THIS TEST VERIFIES THAT HLRE PLACES THE LEFT HALF OF C(E)
  3921					;INTO THE RIGHT HALF OF THE AC
  3922					;AND PLACES BIT 0 OF C(E) INTO ALL BITS OF THE LEFT HALF OF THE AC
  3923					;IN THIS CASE, C(E)=-1,,-1.  HENCE, THE RESULT IN THE AC SHOULD BE -1,,-1.
  3924					;THE AC IS CHECKED FOR -1,,-1.  IF C(AC)=-1,,-1, THIS TEST PASSES
  3925
  3926	032447	574 00 0 00 034012 	B45100:	HLRE	[-1]		;*HLRE SHOULD PLACE -1,,-1 INTO THE AC
  3927	032450	312 00 0 00 034012 		CAME	[-1]		;PASS IF C(AC)=-1,,-1
  3928						STOP^
  3929	032451	254 04 0 00 032452 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3930	032452	324 00 0 00 032453 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3931									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3932									;IN THE SUBTEST) TO LOOP ON ERROR^
  3933
  3934					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 86
DAKACM	MAC	19-JAN-77 13:40		TEST OF HWT INSTRUCTIONS                                                           SEQ 0112

  3935					;THIS TEST VERIFIES THAT HLREM PLACES THE LEFT HALF OF C(AC)
  3936					;INTO THE RIGHT HALF OF E
  3937					;AND PLACES BIT 0 OF C(AC) INTO ALL BITS OF THE LEFT HALF OF E.
  3938					;IN THIS CASE, C(AC)=1,,0 AND C(E)=0.  HENCE, THE RESULT IN E SHOULD BE -1,,-1.
  3939					;E IS CHECKED FOR -1,,-1.  IF C(E)=-1,,-1, THIS TEST PASSES
  3940
  3941	032453	400 00 0 00 000000 	B45200:	SETZ			;PRELOAD E WITH 0
  3942	032454	200 01 0 00 034013 		MOVE	1,[XWD -1,0]	;PRELOAD AC WITH -1,,0
  3943	032455	576 01 0 00 000000 		HLREM	1,		;*HLREM SHOULD PLACE -1,,-1 INTO E
  3944	032456	312 00 0 00 034012 		CAME	[-1]		;PASS IF C(E)=-1,,-1
  3945						STOP^
  3946	032457	254 04 0 00 032460 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3947	032460	324 00 0 00 032461 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3948									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3949									;IN THE SUBTEST) TO LOOP ON ERROR^
  3950
  3951					;*****     FAILURE ANALYSIS     *****
  3952					;C(AC0)		C(AC1)		FAILING SIGNAL
  3953
  3954					;0		-1,,0		SW: SCE
  3955					;0		-1,,0		SW: ET0
  3956					;0		-1,,0		ET0: AR AD EN
  3957					;-1,,0		-1,,0		ET2: AR RT AR + EN
  3958					;0,,-1		-1,,0		ET2: AR0(1): AR LT AD EN
  3959
  3960					;**********
  3961
  3962					;THIS TEST VERIFIES THAT HRLM PLACES THE RIGHT HALF OF C(AC) INTO THE LEFT HALF OF E.
  3963					;THE RIGHT HALF OF E IS UNAFFECTED
  3964					;IN THIS CASE, C(AC)=0,,-1 AND C(E)=0.  HENCE, THE RESULT IN E SHOULD BE -1,,0.
  3965					;E IS CHECKED FOR -1,,0.  IF C(E)=-1,,0, THIS  TEST PASSES.
  3966
  3967	032461	400 00 0 00 000000 	B45400:	SETZ			;PRELOAD E WITH 0
  3968	032462	201 01 0 00 777777 		MOVEI	1,-1		;PRELOAD AC WITH 0,,-1
  3969	032463	506 01 0 00 000000 		HRLM	1,		;*HRLM SHOULD PLACE -1,,0 INTO E
  3970	032464	312 00 0 00 034013 		CAME	[XWD -1,0]	;PASS IF C(E)=-1,,0
  3971						STOP^
  3972	032465	254 04 0 00 032466 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  3973	032466	324 00 0 00 032467 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  3974									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  3975									;IN THE SUBTEST) TO LOOP ON ERROR^
  3976
  3977					;*****     FAILURE ANALYSIS     *****
  3978					;C(AC0)		C(AC1)		FAILING SIGNAL
  3979
  3980					;0		0,,-1		SW: FCE PSE
  3981					;0,,-1		0,,-1		SW: ET0
  3982					;-1,,-1		0,,-1		ET0: AD RT BR + EN
  3983					;-1,,B45400	0,,-1		ET0: BR AR EN
  3984					;0		0,,-1		ET0: AR AD EN
  3985					;0		0,,-1		ET2: AR LT AR RT EN
  3986
  3987					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 87
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - FLT 1 + 0                                              SEQ 0113

  3988					SUBTTL	SUPPLEMENTARY ADDER TESTS - FLT 1 + 0
  3989
  3990					;**********
  3991
  3992			045500		SN=45500
  3993			000000			XX=0
  3994
  3995					B45500:	REPEAT	^D18,<
  3996					;THIS TEST VERIFIES THAT THE RESULT OF A ZERO ADDED TO A FLOATING ONE
  3997					;IS THE FLOATING ONE.
  3998					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  3999					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4000					
  4001					SN=SN+1
  4002						XX=XX+XX
  4003						IFE	XX,<XX=1>
  4004						HRRZI	XX		;PRELOAD AC WITH FLOATING ONE
  4005						ADD	[0]		;ADD ZERO TO A FLOATING ONE	
  4006						CAME	[XX]		;CHECK ADDER UPON FAILURE	
  4007						STOP
  4008					
  4009					;**********
  4010					>
  4011
  4012					;THIS TEST VERIFIES THAT THE RESULT OF A ZERO ADDED TO A FLOATING ONE
  4013					;IS THE FLOATING ONE.
  4014					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  4015					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4016
  4017			045501		SN=SN+1
  4018			000000			XX=XX+XX
  4019			000001			IFE	XX,<XX=1>
  4020	032467	551 00 0 00 000001 		HRRZI	XX		;PRELOAD AC WITH FLOATING ONE
  4021	032470	270 00 0 00 034014 		ADD	[0]		;ADD ZERO TO A FLOATING ONE	
  4022	032471	312 00 0 00 034017 		CAME	[XX]		;CHECK ADDER UPON FAILURE	
  4023						STOP^
  4024	032472	254 04 0 00 032473 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  4025	032473	324 00 0 00 032474 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  4026									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  4027									;IN THE SUBTEST) TO LOOP ON ERROR^
  4028
  4029					;**********
  4030
  4031
  4032					;THIS TEST VERIFIES THAT THE RESULT OF A ZERO ADDED TO A FLOATING ONE
  4033					;IS THE FLOATING ONE.
  4034					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  4035					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4036
  4037			045502		SN=SN+1
  4038			000002			XX=XX+XX
  4039						IFE	XX,<XX=1>
  4040	032474	551 00 0 00 000002 		HRRZI	XX		;PRELOAD AC WITH FLOATING ONE
  4041	032475	270 00 0 00 034014 		ADD	[0]		;ADD ZERO TO A FLOATING ONE	
  4042	032476	312 00 0 00 034020 		CAME	[XX]		;CHECK ADDER UPON FAILURE	
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 87-1
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - FLT 1 + 0                                              SEQ 0114

  4043						STOP^
  4044	032477	254 04 0 00 032500 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  4045	032500	324 00 0 00 032501 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  4046									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  4047									;IN THE SUBTEST) TO LOOP ON ERROR^
  4048
  4049					;**********
  4050
  4051
  4052					;THIS TEST VERIFIES THAT THE RESULT OF A ZERO ADDED TO A FLOATING ONE
  4053					;IS THE FLOATING ONE.
  4054					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  4055					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4056
  4057			045503		SN=SN+1
  4058			000004			XX=XX+XX
  4059						IFE	XX,<XX=1>
  4060	032501	551 00 0 00 000004 		HRRZI	XX		;PRELOAD AC WITH FLOATING ONE
  4061	032502	270 00 0 00 034014 		ADD	[0]		;ADD ZERO TO A FLOATING ONE	
  4062	032503	312 00 0 00 034021 		CAME	[XX]		;CHECK ADDER UPON FAILURE	
  4063						STOP^
  4064	032504	254 04 0 00 032505 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  4065	032505	324 00 0 00 032506 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  4066									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  4067									;IN THE SUBTEST) TO LOOP ON ERROR^
  4068
  4069					;**********
  4070
  4071
  4072					;THIS TEST VERIFIES THAT THE RESULT OF A ZERO ADDED TO A FLOATING ONE
  4073					;IS THE FLOATING ONE.
  4074					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  4075					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4076
  4077			045504		SN=SN+1
  4078			000010			XX=XX+XX
  4079						IFE	XX,<XX=1>
  4080	032506	551 00 0 00 000010 		HRRZI	XX		;PRELOAD AC WITH FLOATING ONE
  4081	032507	270 00 0 00 034014 		ADD	[0]		;ADD ZERO TO A FLOATING ONE	
  4082	032510	312 00 0 00 034022 		CAME	[XX]		;CHECK ADDER UPON FAILURE	
  4083						STOP^
  4084	032511	254 04 0 00 032512 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  4085	032512	324 00 0 00 032513 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  4086									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  4087									;IN THE SUBTEST) TO LOOP ON ERROR^
  4088
  4089					;**********
  4090
  4091
  4092					;THIS TEST VERIFIES THAT THE RESULT OF A ZERO ADDED TO A FLOATING ONE
  4093					;IS THE FLOATING ONE.
  4094					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  4095					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4096
  4097			045505		SN=SN+1
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 87-2
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - FLT 1 + 0                                              SEQ 0115

  4098			000020			XX=XX+XX
  4099						IFE	XX,<XX=1>
  4100	032513	551 00 0 00 000020 		HRRZI	XX		;PRELOAD AC WITH FLOATING ONE
  4101	032514	270 00 0 00 034014 		ADD	[0]		;ADD ZERO TO A FLOATING ONE	
  4102	032515	312 00 0 00 034023 		CAME	[XX]		;CHECK ADDER UPON FAILURE	
  4103						STOP^
  4104	032516	254 04 0 00 032517 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  4105	032517	324 00 0 00 032520 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  4106									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  4107									;IN THE SUBTEST) TO LOOP ON ERROR^
  4108
  4109					;**********
  4110
  4111
  4112					;THIS TEST VERIFIES THAT THE RESULT OF A ZERO ADDED TO A FLOATING ONE
  4113					;IS THE FLOATING ONE.
  4114					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  4115					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4116
  4117			045506		SN=SN+1
  4118			000040			XX=XX+XX
  4119						IFE	XX,<XX=1>
  4120	032520	551 00 0 00 000040 		HRRZI	XX		;PRELOAD AC WITH FLOATING ONE
  4121	032521	270 00 0 00 034014 		ADD	[0]		;ADD ZERO TO A FLOATING ONE	
  4122	032522	312 00 0 00 034024 		CAME	[XX]		;CHECK ADDER UPON FAILURE	
  4123						STOP^
  4124	032523	254 04 0 00 032524 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  4125	032524	324 00 0 00 032525 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  4126									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  4127									;IN THE SUBTEST) TO LOOP ON ERROR^
  4128
  4129					;**********
  4130
  4131
  4132					;THIS TEST VERIFIES THAT THE RESULT OF A ZERO ADDED TO A FLOATING ONE
  4133					;IS THE FLOATING ONE.
  4134					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  4135					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4136
  4137			045507		SN=SN+1
  4138			000100			XX=XX+XX
  4139						IFE	XX,<XX=1>
  4140	032525	551 00 0 00 000100 		HRRZI	XX		;PRELOAD AC WITH FLOATING ONE
  4141	032526	270 00 0 00 034014 		ADD	[0]		;ADD ZERO TO A FLOATING ONE	
  4142	032527	312 00 0 00 034025 		CAME	[XX]		;CHECK ADDER UPON FAILURE	
  4143						STOP^
  4144	032530	254 04 0 00 032531 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  4145	032531	324 00 0 00 032532 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  4146									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  4147									;IN THE SUBTEST) TO LOOP ON ERROR^
  4148
  4149					;**********
  4150
  4151
  4152					;THIS TEST VERIFIES THAT THE RESULT OF A ZERO ADDED TO A FLOATING ONE
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 87-3
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - FLT 1 + 0                                              SEQ 0116

  4153					;IS THE FLOATING ONE.
  4154					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  4155					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4156
  4157			045510		SN=SN+1
  4158			000200			XX=XX+XX
  4159						IFE	XX,<XX=1>
  4160	032532	551 00 0 00 000200 		HRRZI	XX		;PRELOAD AC WITH FLOATING ONE
  4161	032533	270 00 0 00 034014 		ADD	[0]		;ADD ZERO TO A FLOATING ONE	
  4162	032534	312 00 0 00 034026 		CAME	[XX]		;CHECK ADDER UPON FAILURE	
  4163						STOP^
  4164	032535	254 04 0 00 032536 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  4165	032536	324 00 0 00 032537 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  4166									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  4167									;IN THE SUBTEST) TO LOOP ON ERROR^
  4168
  4169					;**********
  4170
  4171
  4172					;THIS TEST VERIFIES THAT THE RESULT OF A ZERO ADDED TO A FLOATING ONE
  4173					;IS THE FLOATING ONE.
  4174					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  4175					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4176
  4177			045511		SN=SN+1
  4178			000400			XX=XX+XX
  4179						IFE	XX,<XX=1>
  4180	032537	551 00 0 00 000400 		HRRZI	XX		;PRELOAD AC WITH FLOATING ONE
  4181	032540	270 00 0 00 034014 		ADD	[0]		;ADD ZERO TO A FLOATING ONE	
  4182	032541	312 00 0 00 034027 		CAME	[XX]		;CHECK ADDER UPON FAILURE	
  4183						STOP^
  4184	032542	254 04 0 00 032543 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  4185	032543	324 00 0 00 032544 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  4186									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  4187									;IN THE SUBTEST) TO LOOP ON ERROR^
  4188
  4189					;**********
  4190
  4191
  4192					;THIS TEST VERIFIES THAT THE RESULT OF A ZERO ADDED TO A FLOATING ONE
  4193					;IS THE FLOATING ONE.
  4194					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  4195					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4196
  4197			045512		SN=SN+1
  4198			001000			XX=XX+XX
  4199						IFE	XX,<XX=1>
  4200	032544	551 00 0 00 001000 		HRRZI	XX		;PRELOAD AC WITH FLOATING ONE
  4201	032545	270 00 0 00 034014 		ADD	[0]		;ADD ZERO TO A FLOATING ONE	
  4202	032546	312 00 0 00 034030 		CAME	[XX]		;CHECK ADDER UPON FAILURE	
  4203						STOP^
  4204	032547	254 04 0 00 032550 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  4205	032550	324 00 0 00 032551 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  4206									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  4207									;IN THE SUBTEST) TO LOOP ON ERROR^
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 87-4
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - FLT 1 + 0                                              SEQ 0117

  4208
  4209					;**********
  4210
  4211
  4212					;THIS TEST VERIFIES THAT THE RESULT OF A ZERO ADDED TO A FLOATING ONE
  4213					;IS THE FLOATING ONE.
  4214					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  4215					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4216
  4217			045513		SN=SN+1
  4218			002000			XX=XX+XX
  4219						IFE	XX,<XX=1>
  4220	032551	551 00 0 00 002000 		HRRZI	XX		;PRELOAD AC WITH FLOATING ONE
  4221	032552	270 00 0 00 034014 		ADD	[0]		;ADD ZERO TO A FLOATING ONE	
  4222	032553	312 00 0 00 034031 		CAME	[XX]		;CHECK ADDER UPON FAILURE	
  4223						STOP^
  4224	032554	254 04 0 00 032555 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  4225	032555	324 00 0 00 032556 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  4226									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  4227									;IN THE SUBTEST) TO LOOP ON ERROR^
  4228
  4229					;**********
  4230
  4231
  4232					;THIS TEST VERIFIES THAT THE RESULT OF A ZERO ADDED TO A FLOATING ONE
  4233					;IS THE FLOATING ONE.
  4234					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  4235					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4236
  4237			045514		SN=SN+1
  4238			004000			XX=XX+XX
  4239						IFE	XX,<XX=1>
  4240	032556	551 00 0 00 004000 		HRRZI	XX		;PRELOAD AC WITH FLOATING ONE
  4241	032557	270 00 0 00 034014 		ADD	[0]		;ADD ZERO TO A FLOATING ONE	
  4242	032560	312 00 0 00 034032 		CAME	[XX]		;CHECK ADDER UPON FAILURE	
  4243						STOP^
  4244	032561	254 04 0 00 032562 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  4245	032562	324 00 0 00 032563 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  4246									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  4247									;IN THE SUBTEST) TO LOOP ON ERROR^
  4248
  4249					;**********
  4250
  4251
  4252					;THIS TEST VERIFIES THAT THE RESULT OF A ZERO ADDED TO A FLOATING ONE
  4253					;IS THE FLOATING ONE.
  4254					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  4255					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4256
  4257			045515		SN=SN+1
  4258			010000			XX=XX+XX
  4259						IFE	XX,<XX=1>
  4260	032563	551 00 0 00 010000 		HRRZI	XX		;PRELOAD AC WITH FLOATING ONE
  4261	032564	270 00 0 00 034014 		ADD	[0]		;ADD ZERO TO A FLOATING ONE	
  4262	032565	312 00 0 00 034033 		CAME	[XX]		;CHECK ADDER UPON FAILURE	
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 87-5
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - FLT 1 + 0                                              SEQ 0118

  4263						STOP^
  4264	032566	254 04 0 00 032567 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  4265	032567	324 00 0 00 032570 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  4266									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  4267									;IN THE SUBTEST) TO LOOP ON ERROR^
  4268
  4269					;**********
  4270
  4271
  4272					;THIS TEST VERIFIES THAT THE RESULT OF A ZERO ADDED TO A FLOATING ONE
  4273					;IS THE FLOATING ONE.
  4274					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  4275					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4276
  4277			045516		SN=SN+1
  4278			020000			XX=XX+XX
  4279						IFE	XX,<XX=1>
  4280	032570	551 00 0 00 020000 		HRRZI	XX		;PRELOAD AC WITH FLOATING ONE
  4281	032571	270 00 0 00 034014 		ADD	[0]		;ADD ZERO TO A FLOATING ONE	
  4282	032572	312 00 0 00 034034 		CAME	[XX]		;CHECK ADDER UPON FAILURE	
  4283						STOP^
  4284	032573	254 04 0 00 032574 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  4285	032574	324 00 0 00 032575 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  4286									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  4287									;IN THE SUBTEST) TO LOOP ON ERROR^
  4288
  4289					;**********
  4290
  4291
  4292					;THIS TEST VERIFIES THAT THE RESULT OF A ZERO ADDED TO A FLOATING ONE
  4293					;IS THE FLOATING ONE.
  4294					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  4295					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4296
  4297			045517		SN=SN+1
  4298			040000			XX=XX+XX
  4299						IFE	XX,<XX=1>
  4300	032575	551 00 0 00 040000 		HRRZI	XX		;PRELOAD AC WITH FLOATING ONE
  4301	032576	270 00 0 00 034014 		ADD	[0]		;ADD ZERO TO A FLOATING ONE	
  4302	032577	312 00 0 00 034035 		CAME	[XX]		;CHECK ADDER UPON FAILURE	
  4303						STOP^
  4304	032600	254 04 0 00 032601 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  4305	032601	324 00 0 00 032602 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  4306									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  4307									;IN THE SUBTEST) TO LOOP ON ERROR^
  4308
  4309					;**********
  4310
  4311
  4312					;THIS TEST VERIFIES THAT THE RESULT OF A ZERO ADDED TO A FLOATING ONE
  4313					;IS THE FLOATING ONE.
  4314					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  4315					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4316
  4317			045520		SN=SN+1
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 87-6
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - FLT 1 + 0                                              SEQ 0119

  4318			100000			XX=XX+XX
  4319						IFE	XX,<XX=1>
  4320	032602	551 00 0 00 100000 		HRRZI	XX		;PRELOAD AC WITH FLOATING ONE
  4321	032603	270 00 0 00 034014 		ADD	[0]		;ADD ZERO TO A FLOATING ONE	
  4322	032604	312 00 0 00 034036 		CAME	[XX]		;CHECK ADDER UPON FAILURE	
  4323						STOP^
  4324	032605	254 04 0 00 032606 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  4325	032606	324 00 0 00 032607 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  4326									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  4327									;IN THE SUBTEST) TO LOOP ON ERROR^
  4328
  4329					;**********
  4330
  4331
  4332					;THIS TEST VERIFIES THAT THE RESULT OF A ZERO ADDED TO A FLOATING ONE
  4333					;IS THE FLOATING ONE.
  4334					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  4335					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4336
  4337			045521		SN=SN+1
  4338			200000			XX=XX+XX
  4339						IFE	XX,<XX=1>
  4340	032607	551 00 0 00 200000 		HRRZI	XX		;PRELOAD AC WITH FLOATING ONE
  4341	032610	270 00 0 00 034014 		ADD	[0]		;ADD ZERO TO A FLOATING ONE	
  4342	032611	312 00 0 00 034037 		CAME	[XX]		;CHECK ADDER UPON FAILURE	
  4343						STOP^
  4344	032612	254 04 0 00 032613 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  4345	032613	324 00 0 00 032614 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  4346									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  4347									;IN THE SUBTEST) TO LOOP ON ERROR^
  4348
  4349					;**********
  4350
  4351
  4352					;THIS TEST VERIFIES THAT THE RESULT OF A ZERO ADDED TO A FLOATING ONE
  4353					;IS THE FLOATING ONE.
  4354					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  4355					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4356
  4357			045522		SN=SN+1
  4358			400000			XX=XX+XX
  4359						IFE	XX,<XX=1>
  4360	032614	551 00 0 00 400000 		HRRZI	XX		;PRELOAD AC WITH FLOATING ONE
  4361	032615	270 00 0 00 034014 		ADD	[0]		;ADD ZERO TO A FLOATING ONE	
  4362	032616	312 00 0 00 034040 		CAME	[XX]		;CHECK ADDER UPON FAILURE	
  4363						STOP^
  4364	032617	254 04 0 00 032620 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  4365	032620	324 00 0 00 032621 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  4366									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  4367									;IN THE SUBTEST) TO LOOP ON ERROR^
  4368
  4369					;**********
  4370
  4371					PAGE
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 87-7
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - FLT 1 + 0                                              SEQ 0120

  4372			000000			XX=0
  4373
  4374						REPEAT	^D18,<
  4375					;THIS TEST VERIFIES THAT THE RESULT OF A ZERO ADDED TO A FLOATING ONE
  4376					;IS THE FLOATING ONE.
  4377					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  4378					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4379					
  4380					SN=SN+1
  4381						XX=XX+XX
  4382						IFE	XX,<XX=1>
  4383						HRLZI	XX		;PRELOAD AC WITH FLOATING ONE
  4384						ADD	[0]		;ADD ZERO TO A FLOATING ONE	
  4385						CAME	[XX,,0]		;CHECK ADDER UPON FALIRE
  4386						STOP		
  4387					
  4388					;**********
  4389					>
  4390
  4391					;THIS TEST VERIFIES THAT THE RESULT OF A ZERO ADDED TO A FLOATING ONE
  4392					;IS THE FLOATING ONE.
  4393					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  4394					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4395
  4396			045523		SN=SN+1
  4397			000000			XX=XX+XX
  4398			000001			IFE	XX,<XX=1>
  4399	032621	515 00 0 00 000001 		HRLZI	XX		;PRELOAD AC WITH FLOATING ONE
  4400	032622	270 00 0 00 034014 		ADD	[0]		;ADD ZERO TO A FLOATING ONE	
  4401	032623	312 00 0 00 034041 		CAME	[XX,,0]		;CHECK ADDER UPON FALIRE
  4402						STOP		^
  4403	032624	254 04 0 00 032625 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  4404	032625	324 00 0 00 032626 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  4405									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  4406									;IN THE SUBTEST) TO LOOP ON ERROR^
  4407
  4408					;**********
  4409
  4410
  4411					;THIS TEST VERIFIES THAT THE RESULT OF A ZERO ADDED TO A FLOATING ONE
  4412					;IS THE FLOATING ONE.
  4413					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  4414					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4415
  4416			045524		SN=SN+1
  4417			000002			XX=XX+XX
  4418						IFE	XX,<XX=1>
  4419	032626	515 00 0 00 000002 		HRLZI	XX		;PRELOAD AC WITH FLOATING ONE
  4420	032627	270 00 0 00 034014 		ADD	[0]		;ADD ZERO TO A FLOATING ONE	
  4421	032630	312 00 0 00 034042 		CAME	[XX,,0]		;CHECK ADDER UPON FALIRE
  4422						STOP		^
  4423	032631	254 04 0 00 032632 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  4424	032632	324 00 0 00 032633 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  4425									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  4426									;IN THE SUBTEST) TO LOOP ON ERROR^
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 87-8
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - FLT 1 + 0                                              SEQ 0121

  4427
  4428					;**********
  4429
  4430
  4431					;THIS TEST VERIFIES THAT THE RESULT OF A ZERO ADDED TO A FLOATING ONE
  4432					;IS THE FLOATING ONE.
  4433					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  4434					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4435
  4436			045525		SN=SN+1
  4437			000004			XX=XX+XX
  4438						IFE	XX,<XX=1>
  4439	032633	515 00 0 00 000004 		HRLZI	XX		;PRELOAD AC WITH FLOATING ONE
  4440	032634	270 00 0 00 034014 		ADD	[0]		;ADD ZERO TO A FLOATING ONE	
  4441	032635	312 00 0 00 034043 		CAME	[XX,,0]		;CHECK ADDER UPON FALIRE
  4442						STOP		^
  4443	032636	254 04 0 00 032637 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  4444	032637	324 00 0 00 032640 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  4445									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  4446									;IN THE SUBTEST) TO LOOP ON ERROR^
  4447
  4448					;**********
  4449
  4450
  4451					;THIS TEST VERIFIES THAT THE RESULT OF A ZERO ADDED TO A FLOATING ONE
  4452					;IS THE FLOATING ONE.
  4453					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  4454					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4455
  4456			045526		SN=SN+1
  4457			000010			XX=XX+XX
  4458						IFE	XX,<XX=1>
  4459	032640	515 00 0 00 000010 		HRLZI	XX		;PRELOAD AC WITH FLOATING ONE
  4460	032641	270 00 0 00 034014 		ADD	[0]		;ADD ZERO TO A FLOATING ONE	
  4461	032642	312 00 0 00 034044 		CAME	[XX,,0]		;CHECK ADDER UPON FALIRE
  4462						STOP		^
  4463	032643	254 04 0 00 032644 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  4464	032644	324 00 0 00 032645 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  4465									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  4466									;IN THE SUBTEST) TO LOOP ON ERROR^
  4467
  4468					;**********
  4469
  4470
  4471					;THIS TEST VERIFIES THAT THE RESULT OF A ZERO ADDED TO A FLOATING ONE
  4472					;IS THE FLOATING ONE.
  4473					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  4474					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4475
  4476			045527		SN=SN+1
  4477			000020			XX=XX+XX
  4478						IFE	XX,<XX=1>
  4479	032645	515 00 0 00 000020 		HRLZI	XX		;PRELOAD AC WITH FLOATING ONE
  4480	032646	270 00 0 00 034014 		ADD	[0]		;ADD ZERO TO A FLOATING ONE	
  4481	032647	312 00 0 00 034045 		CAME	[XX,,0]		;CHECK ADDER UPON FALIRE
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 87-9
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - FLT 1 + 0                                              SEQ 0122

  4482						STOP		^
  4483	032650	254 04 0 00 032651 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  4484	032651	324 00 0 00 032652 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  4485									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  4486									;IN THE SUBTEST) TO LOOP ON ERROR^
  4487
  4488					;**********
  4489
  4490
  4491					;THIS TEST VERIFIES THAT THE RESULT OF A ZERO ADDED TO A FLOATING ONE
  4492					;IS THE FLOATING ONE.
  4493					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  4494					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4495
  4496			045530		SN=SN+1
  4497			000040			XX=XX+XX
  4498						IFE	XX,<XX=1>
  4499	032652	515 00 0 00 000040 		HRLZI	XX		;PRELOAD AC WITH FLOATING ONE
  4500	032653	270 00 0 00 034014 		ADD	[0]		;ADD ZERO TO A FLOATING ONE	
  4501	032654	312 00 0 00 034046 		CAME	[XX,,0]		;CHECK ADDER UPON FALIRE
  4502						STOP		^
  4503	032655	254 04 0 00 032656 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  4504	032656	324 00 0 00 032657 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  4505									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  4506									;IN THE SUBTEST) TO LOOP ON ERROR^
  4507
  4508					;**********
  4509
  4510
  4511					;THIS TEST VERIFIES THAT THE RESULT OF A ZERO ADDED TO A FLOATING ONE
  4512					;IS THE FLOATING ONE.
  4513					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  4514					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4515
  4516			045531		SN=SN+1
  4517			000100			XX=XX+XX
  4518						IFE	XX,<XX=1>
  4519	032657	515 00 0 00 000100 		HRLZI	XX		;PRELOAD AC WITH FLOATING ONE
  4520	032660	270 00 0 00 034014 		ADD	[0]		;ADD ZERO TO A FLOATING ONE	
  4521	032661	312 00 0 00 034047 		CAME	[XX,,0]		;CHECK ADDER UPON FALIRE
  4522						STOP		^
  4523	032662	254 04 0 00 032663 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  4524	032663	324 00 0 00 032664 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  4525									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  4526									;IN THE SUBTEST) TO LOOP ON ERROR^
  4527
  4528					;**********
  4529
  4530
  4531					;THIS TEST VERIFIES THAT THE RESULT OF A ZERO ADDED TO A FLOATING ONE
  4532					;IS THE FLOATING ONE.
  4533					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  4534					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4535
  4536			045532		SN=SN+1
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 87-10
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - FLT 1 + 0                                              SEQ 0123

  4537			000200			XX=XX+XX
  4538						IFE	XX,<XX=1>
  4539	032664	515 00 0 00 000200 		HRLZI	XX		;PRELOAD AC WITH FLOATING ONE
  4540	032665	270 00 0 00 034014 		ADD	[0]		;ADD ZERO TO A FLOATING ONE	
  4541	032666	312 00 0 00 034050 		CAME	[XX,,0]		;CHECK ADDER UPON FALIRE
  4542						STOP		^
  4543	032667	254 04 0 00 032670 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  4544	032670	324 00 0 00 032671 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  4545									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  4546									;IN THE SUBTEST) TO LOOP ON ERROR^
  4547
  4548					;**********
  4549
  4550
  4551					;THIS TEST VERIFIES THAT THE RESULT OF A ZERO ADDED TO A FLOATING ONE
  4552					;IS THE FLOATING ONE.
  4553					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  4554					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4555
  4556			045533		SN=SN+1
  4557			000400			XX=XX+XX
  4558						IFE	XX,<XX=1>
  4559	032671	515 00 0 00 000400 		HRLZI	XX		;PRELOAD AC WITH FLOATING ONE
  4560	032672	270 00 0 00 034014 		ADD	[0]		;ADD ZERO TO A FLOATING ONE	
  4561	032673	312 00 0 00 034051 		CAME	[XX,,0]		;CHECK ADDER UPON FALIRE
  4562						STOP		^
  4563	032674	254 04 0 00 032675 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  4564	032675	324 00 0 00 032676 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  4565									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  4566									;IN THE SUBTEST) TO LOOP ON ERROR^
  4567
  4568					;**********
  4569
  4570
  4571					;THIS TEST VERIFIES THAT THE RESULT OF A ZERO ADDED TO A FLOATING ONE
  4572					;IS THE FLOATING ONE.
  4573					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  4574					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4575
  4576			045534		SN=SN+1
  4577			001000			XX=XX+XX
  4578						IFE	XX,<XX=1>
  4579	032676	515 00 0 00 001000 		HRLZI	XX		;PRELOAD AC WITH FLOATING ONE
  4580	032677	270 00 0 00 034014 		ADD	[0]		;ADD ZERO TO A FLOATING ONE	
  4581	032700	312 00 0 00 034052 		CAME	[XX,,0]		;CHECK ADDER UPON FALIRE
  4582						STOP		^
  4583	032701	254 04 0 00 032702 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  4584	032702	324 00 0 00 032703 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  4585									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  4586									;IN THE SUBTEST) TO LOOP ON ERROR^
  4587
  4588					;**********
  4589
  4590
  4591					;THIS TEST VERIFIES THAT THE RESULT OF A ZERO ADDED TO A FLOATING ONE
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 87-11
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - FLT 1 + 0                                              SEQ 0124

  4592					;IS THE FLOATING ONE.
  4593					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  4594					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4595
  4596			045535		SN=SN+1
  4597			002000			XX=XX+XX
  4598						IFE	XX,<XX=1>
  4599	032703	515 00 0 00 002000 		HRLZI	XX		;PRELOAD AC WITH FLOATING ONE
  4600	032704	270 00 0 00 034014 		ADD	[0]		;ADD ZERO TO A FLOATING ONE	
  4601	032705	312 00 0 00 034053 		CAME	[XX,,0]		;CHECK ADDER UPON FALIRE
  4602						STOP		^
  4603	032706	254 04 0 00 032707 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  4604	032707	324 00 0 00 032710 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  4605									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  4606									;IN THE SUBTEST) TO LOOP ON ERROR^
  4607
  4608					;**********
  4609
  4610
  4611					;THIS TEST VERIFIES THAT THE RESULT OF A ZERO ADDED TO A FLOATING ONE
  4612					;IS THE FLOATING ONE.
  4613					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  4614					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4615
  4616			045536		SN=SN+1
  4617			004000			XX=XX+XX
  4618						IFE	XX,<XX=1>
  4619	032710	515 00 0 00 004000 		HRLZI	XX		;PRELOAD AC WITH FLOATING ONE
  4620	032711	270 00 0 00 034014 		ADD	[0]		;ADD ZERO TO A FLOATING ONE	
  4621	032712	312 00 0 00 034054 		CAME	[XX,,0]		;CHECK ADDER UPON FALIRE
  4622						STOP		^
  4623	032713	254 04 0 00 032714 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  4624	032714	324 00 0 00 032715 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  4625									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  4626									;IN THE SUBTEST) TO LOOP ON ERROR^
  4627
  4628					;**********
  4629
  4630
  4631					;THIS TEST VERIFIES THAT THE RESULT OF A ZERO ADDED TO A FLOATING ONE
  4632					;IS THE FLOATING ONE.
  4633					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  4634					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4635
  4636			045537		SN=SN+1
  4637			010000			XX=XX+XX
  4638						IFE	XX,<XX=1>
  4639	032715	515 00 0 00 010000 		HRLZI	XX		;PRELOAD AC WITH FLOATING ONE
  4640	032716	270 00 0 00 034014 		ADD	[0]		;ADD ZERO TO A FLOATING ONE	
  4641	032717	312 00 0 00 034055 		CAME	[XX,,0]		;CHECK ADDER UPON FALIRE
  4642						STOP		^
  4643	032720	254 04 0 00 032721 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  4644	032721	324 00 0 00 032722 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  4645									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  4646									;IN THE SUBTEST) TO LOOP ON ERROR^
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 87-12
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - FLT 1 + 0                                              SEQ 0125

  4647
  4648					;**********
  4649
  4650
  4651					;THIS TEST VERIFIES THAT THE RESULT OF A ZERO ADDED TO A FLOATING ONE
  4652					;IS THE FLOATING ONE.
  4653					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  4654					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4655
  4656			045540		SN=SN+1
  4657			020000			XX=XX+XX
  4658						IFE	XX,<XX=1>
  4659	032722	515 00 0 00 020000 		HRLZI	XX		;PRELOAD AC WITH FLOATING ONE
  4660	032723	270 00 0 00 034014 		ADD	[0]		;ADD ZERO TO A FLOATING ONE	
  4661	032724	312 00 0 00 034056 		CAME	[XX,,0]		;CHECK ADDER UPON FALIRE
  4662						STOP		^
  4663	032725	254 04 0 00 032726 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  4664	032726	324 00 0 00 032727 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  4665									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  4666									;IN THE SUBTEST) TO LOOP ON ERROR^
  4667
  4668					;**********
  4669
  4670
  4671					;THIS TEST VERIFIES THAT THE RESULT OF A ZERO ADDED TO A FLOATING ONE
  4672					;IS THE FLOATING ONE.
  4673					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  4674					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4675
  4676			045541		SN=SN+1
  4677			040000			XX=XX+XX
  4678						IFE	XX,<XX=1>
  4679	032727	515 00 0 00 040000 		HRLZI	XX		;PRELOAD AC WITH FLOATING ONE
  4680	032730	270 00 0 00 034014 		ADD	[0]		;ADD ZERO TO A FLOATING ONE	
  4681	032731	312 00 0 00 034057 		CAME	[XX,,0]		;CHECK ADDER UPON FALIRE
  4682						STOP		^
  4683	032732	254 04 0 00 032733 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  4684	032733	324 00 0 00 032734 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  4685									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  4686									;IN THE SUBTEST) TO LOOP ON ERROR^
  4687
  4688					;**********
  4689
  4690
  4691					;THIS TEST VERIFIES THAT THE RESULT OF A ZERO ADDED TO A FLOATING ONE
  4692					;IS THE FLOATING ONE.
  4693					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  4694					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4695
  4696			045542		SN=SN+1
  4697			100000			XX=XX+XX
  4698						IFE	XX,<XX=1>
  4699	032734	515 00 0 00 100000 		HRLZI	XX		;PRELOAD AC WITH FLOATING ONE
  4700	032735	270 00 0 00 034014 		ADD	[0]		;ADD ZERO TO A FLOATING ONE	
  4701	032736	312 00 0 00 034060 		CAME	[XX,,0]		;CHECK ADDER UPON FALIRE
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 87-13
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - FLT 1 + 0                                              SEQ 0126

  4702						STOP		^
  4703	032737	254 04 0 00 032740 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  4704	032740	324 00 0 00 032741 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  4705									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  4706									;IN THE SUBTEST) TO LOOP ON ERROR^
  4707
  4708					;**********
  4709
  4710
  4711					;THIS TEST VERIFIES THAT THE RESULT OF A ZERO ADDED TO A FLOATING ONE
  4712					;IS THE FLOATING ONE.
  4713					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  4714					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4715
  4716			045543		SN=SN+1
  4717			200000			XX=XX+XX
  4718						IFE	XX,<XX=1>
  4719	032741	515 00 0 00 200000 		HRLZI	XX		;PRELOAD AC WITH FLOATING ONE
  4720	032742	270 00 0 00 034014 		ADD	[0]		;ADD ZERO TO A FLOATING ONE	
  4721	032743	312 00 0 00 034061 		CAME	[XX,,0]		;CHECK ADDER UPON FALIRE
  4722						STOP		^
  4723	032744	254 04 0 00 032745 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  4724	032745	324 00 0 00 032746 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  4725									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  4726									;IN THE SUBTEST) TO LOOP ON ERROR^
  4727
  4728					;**********
  4729
  4730
  4731					;THIS TEST VERIFIES THAT THE RESULT OF A ZERO ADDED TO A FLOATING ONE
  4732					;IS THE FLOATING ONE.
  4733					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  4734					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4735
  4736			045544		SN=SN+1
  4737			400000			XX=XX+XX
  4738						IFE	XX,<XX=1>
  4739	032746	515 00 0 00 400000 		HRLZI	XX		;PRELOAD AC WITH FLOATING ONE
  4740	032747	270 00 0 00 034014 		ADD	[0]		;ADD ZERO TO A FLOATING ONE	
  4741	032750	312 00 0 00 034062 		CAME	[XX,,0]		;CHECK ADDER UPON FALIRE
  4742						STOP		^
  4743	032751	254 04 0 00 032752 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  4744	032752	324 00 0 00 032753 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  4745									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  4746									;IN THE SUBTEST) TO LOOP ON ERROR^
  4747
  4748					;**********
  4749
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 88
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - O + FLT 0                                              SEQ 0127

  4750					SUBTTL	SUPPLEMENTARY ADDER TESTS - O + FLT 0
  4751
  4752					;**********
  4753
  4754			045600		SN=45600
  4755					B45600:	REPEAT	^D18,<
  4756					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO ADDED TO A ZERO
  4757					;IS THE FLOATING ZERO.
  4758					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  4759					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4760					
  4761					SN=SN+1
  4762						XX=<XX+XX+1>&777777
  4763						IFE	<XX-1>,<XX=777776>
  4764						SETZ			;PRELOAD AC WITH 0
  4765						ADD	[-1,,XX]	;ADD A FLOATING ZERO TO ZERO
  4766						CAME	[-1,,XX]	;CHECK ADDER UPON FAILURE
  4767						STOP		
  4768					
  4769					;**********
  4770					>
  4771
  4772					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO ADDED TO A ZERO
  4773					;IS THE FLOATING ZERO.
  4774					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  4775					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4776
  4777			045601		SN=SN+1
  4778			000001			XX=<XX+XX+1>&777777
  4779			777776			IFE	<XX-1>,<XX=777776>
  4780	032753	400 00 0 00 000000 		SETZ			;PRELOAD AC WITH 0
  4781	032754	270 00 0 00 034063 		ADD	[-1,,XX]	;ADD A FLOATING ZERO TO ZERO
  4782	032755	312 00 0 00 034063 		CAME	[-1,,XX]	;CHECK ADDER UPON FAILURE
  4783						STOP		^
  4784	032756	254 04 0 00 032757 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  4785	032757	324 00 0 00 032760 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  4786									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  4787									;IN THE SUBTEST) TO LOOP ON ERROR^
  4788
  4789					;**********
  4790
  4791
  4792					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO ADDED TO A ZERO
  4793					;IS THE FLOATING ZERO.
  4794					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  4795					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4796
  4797			045602		SN=SN+1
  4798			777775			XX=<XX+XX+1>&777777
  4799						IFE	<XX-1>,<XX=777776>
  4800	032760	400 00 0 00 000000 		SETZ			;PRELOAD AC WITH 0
  4801	032761	270 00 0 00 034064 		ADD	[-1,,XX]	;ADD A FLOATING ZERO TO ZERO
  4802	032762	312 00 0 00 034064 		CAME	[-1,,XX]	;CHECK ADDER UPON FAILURE
  4803						STOP		^
  4804	032763	254 04 0 00 032764 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 88-1
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - O + FLT 0                                              SEQ 0128

  4805	032764	324 00 0 00 032765 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  4806									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  4807									;IN THE SUBTEST) TO LOOP ON ERROR^
  4808
  4809					;**********
  4810
  4811
  4812					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO ADDED TO A ZERO
  4813					;IS THE FLOATING ZERO.
  4814					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  4815					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4816
  4817			045603		SN=SN+1
  4818			777773			XX=<XX+XX+1>&777777
  4819						IFE	<XX-1>,<XX=777776>
  4820	032765	400 00 0 00 000000 		SETZ			;PRELOAD AC WITH 0
  4821	032766	270 00 0 00 034065 		ADD	[-1,,XX]	;ADD A FLOATING ZERO TO ZERO
  4822	032767	312 00 0 00 034065 		CAME	[-1,,XX]	;CHECK ADDER UPON FAILURE
  4823						STOP		^
  4824	032770	254 04 0 00 032771 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  4825	032771	324 00 0 00 032772 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  4826									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  4827									;IN THE SUBTEST) TO LOOP ON ERROR^
  4828
  4829					;**********
  4830
  4831
  4832					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO ADDED TO A ZERO
  4833					;IS THE FLOATING ZERO.
  4834					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  4835					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4836
  4837			045604		SN=SN+1
  4838			777767			XX=<XX+XX+1>&777777
  4839						IFE	<XX-1>,<XX=777776>
  4840	032772	400 00 0 00 000000 		SETZ			;PRELOAD AC WITH 0
  4841	032773	270 00 0 00 034066 		ADD	[-1,,XX]	;ADD A FLOATING ZERO TO ZERO
  4842	032774	312 00 0 00 034066 		CAME	[-1,,XX]	;CHECK ADDER UPON FAILURE
  4843						STOP		^
  4844	032775	254 04 0 00 032776 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  4845	032776	324 00 0 00 032777 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  4846									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  4847									;IN THE SUBTEST) TO LOOP ON ERROR^
  4848
  4849					;**********
  4850
  4851
  4852					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO ADDED TO A ZERO
  4853					;IS THE FLOATING ZERO.
  4854					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  4855					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4856
  4857			045605		SN=SN+1
  4858			777757			XX=<XX+XX+1>&777777
  4859						IFE	<XX-1>,<XX=777776>
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 88-2
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - O + FLT 0                                              SEQ 0129

  4860	032777	400 00 0 00 000000 		SETZ			;PRELOAD AC WITH 0
  4861	033000	270 00 0 00 034067 		ADD	[-1,,XX]	;ADD A FLOATING ZERO TO ZERO
  4862	033001	312 00 0 00 034067 		CAME	[-1,,XX]	;CHECK ADDER UPON FAILURE
  4863						STOP		^
  4864	033002	254 04 0 00 033003 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  4865	033003	324 00 0 00 033004 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  4866									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  4867									;IN THE SUBTEST) TO LOOP ON ERROR^
  4868
  4869					;**********
  4870
  4871
  4872					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO ADDED TO A ZERO
  4873					;IS THE FLOATING ZERO.
  4874					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  4875					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4876
  4877			045606		SN=SN+1
  4878			777737			XX=<XX+XX+1>&777777
  4879						IFE	<XX-1>,<XX=777776>
  4880	033004	400 00 0 00 000000 		SETZ			;PRELOAD AC WITH 0
  4881	033005	270 00 0 00 034070 		ADD	[-1,,XX]	;ADD A FLOATING ZERO TO ZERO
  4882	033006	312 00 0 00 034070 		CAME	[-1,,XX]	;CHECK ADDER UPON FAILURE
  4883						STOP		^
  4884	033007	254 04 0 00 033010 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  4885	033010	324 00 0 00 033011 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  4886									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  4887									;IN THE SUBTEST) TO LOOP ON ERROR^
  4888
  4889					;**********
  4890
  4891
  4892					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO ADDED TO A ZERO
  4893					;IS THE FLOATING ZERO.
  4894					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  4895					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4896
  4897			045607		SN=SN+1
  4898			777677			XX=<XX+XX+1>&777777
  4899						IFE	<XX-1>,<XX=777776>
  4900	033011	400 00 0 00 000000 		SETZ			;PRELOAD AC WITH 0
  4901	033012	270 00 0 00 034071 		ADD	[-1,,XX]	;ADD A FLOATING ZERO TO ZERO
  4902	033013	312 00 0 00 034071 		CAME	[-1,,XX]	;CHECK ADDER UPON FAILURE
  4903						STOP		^
  4904	033014	254 04 0 00 033015 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  4905	033015	324 00 0 00 033016 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  4906									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  4907									;IN THE SUBTEST) TO LOOP ON ERROR^
  4908
  4909					;**********
  4910
  4911
  4912					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO ADDED TO A ZERO
  4913					;IS THE FLOATING ZERO.
  4914					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 88-3
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - O + FLT 0                                              SEQ 0130

  4915					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4916
  4917			045610		SN=SN+1
  4918			777577			XX=<XX+XX+1>&777777
  4919						IFE	<XX-1>,<XX=777776>
  4920	033016	400 00 0 00 000000 		SETZ			;PRELOAD AC WITH 0
  4921	033017	270 00 0 00 034072 		ADD	[-1,,XX]	;ADD A FLOATING ZERO TO ZERO
  4922	033020	312 00 0 00 034072 		CAME	[-1,,XX]	;CHECK ADDER UPON FAILURE
  4923						STOP		^
  4924	033021	254 04 0 00 033022 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  4925	033022	324 00 0 00 033023 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  4926									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  4927									;IN THE SUBTEST) TO LOOP ON ERROR^
  4928
  4929					;**********
  4930
  4931
  4932					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO ADDED TO A ZERO
  4933					;IS THE FLOATING ZERO.
  4934					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  4935					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4936
  4937			045611		SN=SN+1
  4938			777377			XX=<XX+XX+1>&777777
  4939						IFE	<XX-1>,<XX=777776>
  4940	033023	400 00 0 00 000000 		SETZ			;PRELOAD AC WITH 0
  4941	033024	270 00 0 00 034073 		ADD	[-1,,XX]	;ADD A FLOATING ZERO TO ZERO
  4942	033025	312 00 0 00 034073 		CAME	[-1,,XX]	;CHECK ADDER UPON FAILURE
  4943						STOP		^
  4944	033026	254 04 0 00 033027 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  4945	033027	324 00 0 00 033030 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  4946									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  4947									;IN THE SUBTEST) TO LOOP ON ERROR^
  4948
  4949					;**********
  4950
  4951
  4952					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO ADDED TO A ZERO
  4953					;IS THE FLOATING ZERO.
  4954					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  4955					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4956
  4957			045612		SN=SN+1
  4958			776777			XX=<XX+XX+1>&777777
  4959						IFE	<XX-1>,<XX=777776>
  4960	033030	400 00 0 00 000000 		SETZ			;PRELOAD AC WITH 0
  4961	033031	270 00 0 00 034074 		ADD	[-1,,XX]	;ADD A FLOATING ZERO TO ZERO
  4962	033032	312 00 0 00 034074 		CAME	[-1,,XX]	;CHECK ADDER UPON FAILURE
  4963						STOP		^
  4964	033033	254 04 0 00 033034 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  4965	033034	324 00 0 00 033035 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  4966									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  4967									;IN THE SUBTEST) TO LOOP ON ERROR^
  4968
  4969					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 88-4
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - O + FLT 0                                              SEQ 0131

  4970
  4971
  4972					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO ADDED TO A ZERO
  4973					;IS THE FLOATING ZERO.
  4974					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  4975					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4976
  4977			045613		SN=SN+1
  4978			775777			XX=<XX+XX+1>&777777
  4979						IFE	<XX-1>,<XX=777776>
  4980	033035	400 00 0 00 000000 		SETZ			;PRELOAD AC WITH 0
  4981	033036	270 00 0 00 034075 		ADD	[-1,,XX]	;ADD A FLOATING ZERO TO ZERO
  4982	033037	312 00 0 00 034075 		CAME	[-1,,XX]	;CHECK ADDER UPON FAILURE
  4983						STOP		^
  4984	033040	254 04 0 00 033041 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  4985	033041	324 00 0 00 033042 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  4986									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  4987									;IN THE SUBTEST) TO LOOP ON ERROR^
  4988
  4989					;**********
  4990
  4991
  4992					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO ADDED TO A ZERO
  4993					;IS THE FLOATING ZERO.
  4994					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  4995					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  4996
  4997			045614		SN=SN+1
  4998			773777			XX=<XX+XX+1>&777777
  4999						IFE	<XX-1>,<XX=777776>
  5000	033042	400 00 0 00 000000 		SETZ			;PRELOAD AC WITH 0
  5001	033043	270 00 0 00 034076 		ADD	[-1,,XX]	;ADD A FLOATING ZERO TO ZERO
  5002	033044	312 00 0 00 034076 		CAME	[-1,,XX]	;CHECK ADDER UPON FAILURE
  5003						STOP		^
  5004	033045	254 04 0 00 033046 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  5005	033046	324 00 0 00 033047 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  5006									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  5007									;IN THE SUBTEST) TO LOOP ON ERROR^
  5008
  5009					;**********
  5010
  5011
  5012					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO ADDED TO A ZERO
  5013					;IS THE FLOATING ZERO.
  5014					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  5015					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5016
  5017			045615		SN=SN+1
  5018			767777			XX=<XX+XX+1>&777777
  5019						IFE	<XX-1>,<XX=777776>
  5020	033047	400 00 0 00 000000 		SETZ			;PRELOAD AC WITH 0
  5021	033050	270 00 0 00 034077 		ADD	[-1,,XX]	;ADD A FLOATING ZERO TO ZERO
  5022	033051	312 00 0 00 034077 		CAME	[-1,,XX]	;CHECK ADDER UPON FAILURE
  5023						STOP		^
  5024	033052	254 04 0 00 033053 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 88-5
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - O + FLT 0                                              SEQ 0132

  5025	033053	324 00 0 00 033054 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  5026									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  5027									;IN THE SUBTEST) TO LOOP ON ERROR^
  5028
  5029					;**********
  5030
  5031
  5032					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO ADDED TO A ZERO
  5033					;IS THE FLOATING ZERO.
  5034					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  5035					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5036
  5037			045616		SN=SN+1
  5038			757777			XX=<XX+XX+1>&777777
  5039						IFE	<XX-1>,<XX=777776>
  5040	033054	400 00 0 00 000000 		SETZ			;PRELOAD AC WITH 0
  5041	033055	270 00 0 00 034100 		ADD	[-1,,XX]	;ADD A FLOATING ZERO TO ZERO
  5042	033056	312 00 0 00 034100 		CAME	[-1,,XX]	;CHECK ADDER UPON FAILURE
  5043						STOP		^
  5044	033057	254 04 0 00 033060 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  5045	033060	324 00 0 00 033061 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  5046									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  5047									;IN THE SUBTEST) TO LOOP ON ERROR^
  5048
  5049					;**********
  5050
  5051
  5052					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO ADDED TO A ZERO
  5053					;IS THE FLOATING ZERO.
  5054					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  5055					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5056
  5057			045617		SN=SN+1
  5058			737777			XX=<XX+XX+1>&777777
  5059						IFE	<XX-1>,<XX=777776>
  5060	033061	400 00 0 00 000000 		SETZ			;PRELOAD AC WITH 0
  5061	033062	270 00 0 00 034101 		ADD	[-1,,XX]	;ADD A FLOATING ZERO TO ZERO
  5062	033063	312 00 0 00 034101 		CAME	[-1,,XX]	;CHECK ADDER UPON FAILURE
  5063						STOP		^
  5064	033064	254 04 0 00 033065 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  5065	033065	324 00 0 00 033066 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  5066									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  5067									;IN THE SUBTEST) TO LOOP ON ERROR^
  5068
  5069					;**********
  5070
  5071
  5072					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO ADDED TO A ZERO
  5073					;IS THE FLOATING ZERO.
  5074					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  5075					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5076
  5077			045620		SN=SN+1
  5078			677777			XX=<XX+XX+1>&777777
  5079						IFE	<XX-1>,<XX=777776>
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 88-6
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - O + FLT 0                                              SEQ 0133

  5080	033066	400 00 0 00 000000 		SETZ			;PRELOAD AC WITH 0
  5081	033067	270 00 0 00 034102 		ADD	[-1,,XX]	;ADD A FLOATING ZERO TO ZERO
  5082	033070	312 00 0 00 034102 		CAME	[-1,,XX]	;CHECK ADDER UPON FAILURE
  5083						STOP		^
  5084	033071	254 04 0 00 033072 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  5085	033072	324 00 0 00 033073 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  5086									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  5087									;IN THE SUBTEST) TO LOOP ON ERROR^
  5088
  5089					;**********
  5090
  5091
  5092					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO ADDED TO A ZERO
  5093					;IS THE FLOATING ZERO.
  5094					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  5095					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5096
  5097			045621		SN=SN+1
  5098			577777			XX=<XX+XX+1>&777777
  5099						IFE	<XX-1>,<XX=777776>
  5100	033073	400 00 0 00 000000 		SETZ			;PRELOAD AC WITH 0
  5101	033074	270 00 0 00 034103 		ADD	[-1,,XX]	;ADD A FLOATING ZERO TO ZERO
  5102	033075	312 00 0 00 034103 		CAME	[-1,,XX]	;CHECK ADDER UPON FAILURE
  5103						STOP		^
  5104	033076	254 04 0 00 033077 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  5105	033077	324 00 0 00 033100 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  5106									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  5107									;IN THE SUBTEST) TO LOOP ON ERROR^
  5108
  5109					;**********
  5110
  5111
  5112					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO ADDED TO A ZERO
  5113					;IS THE FLOATING ZERO.
  5114					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  5115					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5116
  5117			045622		SN=SN+1
  5118			377777			XX=<XX+XX+1>&777777
  5119						IFE	<XX-1>,<XX=777776>
  5120	033100	400 00 0 00 000000 		SETZ			;PRELOAD AC WITH 0
  5121	033101	270 00 0 00 034104 		ADD	[-1,,XX]	;ADD A FLOATING ZERO TO ZERO
  5122	033102	312 00 0 00 034104 		CAME	[-1,,XX]	;CHECK ADDER UPON FAILURE
  5123						STOP		^
  5124	033103	254 04 0 00 033104 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  5125	033104	324 00 0 00 033105 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  5126									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  5127									;IN THE SUBTEST) TO LOOP ON ERROR^
  5128
  5129					;**********
  5130
  5131					PAGE
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 88-7
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - O + FLT 0                                              SEQ 0134

  5132			000000			XX=0
  5133
  5134						REPEAT	^D18,<
  5135					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO ADDED TO A ZERO
  5136					;IS THE FLOATING ZERO.
  5137					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  5138					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5139					
  5140					SN=SN+1
  5141						XX=<XX+XX+1>&777777
  5142						IFE	<XX-1>,<XX=777776>
  5143						SETZ			;PRELOAD AC WITH 0
  5144						ADD	[XX,,-1]	;ADD A FLOATING ZERO TO ZERO
  5145						CAME	[XX,,-1]	;CHECK ADDER UPON FAILURE
  5146						STOP		
  5147					
  5148					;**********
  5149					>
  5150
  5151					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO ADDED TO A ZERO
  5152					;IS THE FLOATING ZERO.
  5153					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  5154					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5155
  5156			045623		SN=SN+1
  5157			000001			XX=<XX+XX+1>&777777
  5158			777776			IFE	<XX-1>,<XX=777776>
  5159	033105	400 00 0 00 000000 		SETZ			;PRELOAD AC WITH 0
  5160	033106	270 00 0 00 034105 		ADD	[XX,,-1]	;ADD A FLOATING ZERO TO ZERO
  5161	033107	312 00 0 00 034105 		CAME	[XX,,-1]	;CHECK ADDER UPON FAILURE
  5162						STOP		^
  5163	033110	254 04 0 00 033111 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  5164	033111	324 00 0 00 033112 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  5165									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  5166									;IN THE SUBTEST) TO LOOP ON ERROR^
  5167
  5168					;**********
  5169
  5170
  5171					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO ADDED TO A ZERO
  5172					;IS THE FLOATING ZERO.
  5173					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  5174					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5175
  5176			045624		SN=SN+1
  5177			777775			XX=<XX+XX+1>&777777
  5178						IFE	<XX-1>,<XX=777776>
  5179	033112	400 00 0 00 000000 		SETZ			;PRELOAD AC WITH 0
  5180	033113	270 00 0 00 034106 		ADD	[XX,,-1]	;ADD A FLOATING ZERO TO ZERO
  5181	033114	312 00 0 00 034106 		CAME	[XX,,-1]	;CHECK ADDER UPON FAILURE
  5182						STOP		^
  5183	033115	254 04 0 00 033116 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  5184	033116	324 00 0 00 033117 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  5185									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  5186									;IN THE SUBTEST) TO LOOP ON ERROR^
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 88-8
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - O + FLT 0                                              SEQ 0135

  5187
  5188					;**********
  5189
  5190
  5191					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO ADDED TO A ZERO
  5192					;IS THE FLOATING ZERO.
  5193					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  5194					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5195
  5196			045625		SN=SN+1
  5197			777773			XX=<XX+XX+1>&777777
  5198						IFE	<XX-1>,<XX=777776>
  5199	033117	400 00 0 00 000000 		SETZ			;PRELOAD AC WITH 0
  5200	033120	270 00 0 00 034107 		ADD	[XX,,-1]	;ADD A FLOATING ZERO TO ZERO
  5201	033121	312 00 0 00 034107 		CAME	[XX,,-1]	;CHECK ADDER UPON FAILURE
  5202						STOP		^
  5203	033122	254 04 0 00 033123 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  5204	033123	324 00 0 00 033124 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  5205									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  5206									;IN THE SUBTEST) TO LOOP ON ERROR^
  5207
  5208					;**********
  5209
  5210
  5211					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO ADDED TO A ZERO
  5212					;IS THE FLOATING ZERO.
  5213					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  5214					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5215
  5216			045626		SN=SN+1
  5217			777767			XX=<XX+XX+1>&777777
  5218						IFE	<XX-1>,<XX=777776>
  5219	033124	400 00 0 00 000000 		SETZ			;PRELOAD AC WITH 0
  5220	033125	270 00 0 00 034110 		ADD	[XX,,-1]	;ADD A FLOATING ZERO TO ZERO
  5221	033126	312 00 0 00 034110 		CAME	[XX,,-1]	;CHECK ADDER UPON FAILURE
  5222						STOP		^
  5223	033127	254 04 0 00 033130 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  5224	033130	324 00 0 00 033131 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  5225									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  5226									;IN THE SUBTEST) TO LOOP ON ERROR^
  5227
  5228					;**********
  5229
  5230
  5231					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO ADDED TO A ZERO
  5232					;IS THE FLOATING ZERO.
  5233					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  5234					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5235
  5236			045627		SN=SN+1
  5237			777757			XX=<XX+XX+1>&777777
  5238						IFE	<XX-1>,<XX=777776>
  5239	033131	400 00 0 00 000000 		SETZ			;PRELOAD AC WITH 0
  5240	033132	270 00 0 00 034111 		ADD	[XX,,-1]	;ADD A FLOATING ZERO TO ZERO
  5241	033133	312 00 0 00 034111 		CAME	[XX,,-1]	;CHECK ADDER UPON FAILURE
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 88-9
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - O + FLT 0                                              SEQ 0136

  5242						STOP		^
  5243	033134	254 04 0 00 033135 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  5244	033135	324 00 0 00 033136 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  5245									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  5246									;IN THE SUBTEST) TO LOOP ON ERROR^
  5247
  5248					;**********
  5249
  5250
  5251					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO ADDED TO A ZERO
  5252					;IS THE FLOATING ZERO.
  5253					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  5254					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5255
  5256			045630		SN=SN+1
  5257			777737			XX=<XX+XX+1>&777777
  5258						IFE	<XX-1>,<XX=777776>
  5259	033136	400 00 0 00 000000 		SETZ			;PRELOAD AC WITH 0
  5260	033137	270 00 0 00 034112 		ADD	[XX,,-1]	;ADD A FLOATING ZERO TO ZERO
  5261	033140	312 00 0 00 034112 		CAME	[XX,,-1]	;CHECK ADDER UPON FAILURE
  5262						STOP		^
  5263	033141	254 04 0 00 033142 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  5264	033142	324 00 0 00 033143 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  5265									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  5266									;IN THE SUBTEST) TO LOOP ON ERROR^
  5267
  5268					;**********
  5269
  5270
  5271					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO ADDED TO A ZERO
  5272					;IS THE FLOATING ZERO.
  5273					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  5274					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5275
  5276			045631		SN=SN+1
  5277			777677			XX=<XX+XX+1>&777777
  5278						IFE	<XX-1>,<XX=777776>
  5279	033143	400 00 0 00 000000 		SETZ			;PRELOAD AC WITH 0
  5280	033144	270 00 0 00 034113 		ADD	[XX,,-1]	;ADD A FLOATING ZERO TO ZERO
  5281	033145	312 00 0 00 034113 		CAME	[XX,,-1]	;CHECK ADDER UPON FAILURE
  5282						STOP		^
  5283	033146	254 04 0 00 033147 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  5284	033147	324 00 0 00 033150 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  5285									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  5286									;IN THE SUBTEST) TO LOOP ON ERROR^
  5287
  5288					;**********
  5289
  5290
  5291					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO ADDED TO A ZERO
  5292					;IS THE FLOATING ZERO.
  5293					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  5294					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5295
  5296			045632		SN=SN+1
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 88-10
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - O + FLT 0                                              SEQ 0137

  5297			777577			XX=<XX+XX+1>&777777
  5298						IFE	<XX-1>,<XX=777776>
  5299	033150	400 00 0 00 000000 		SETZ			;PRELOAD AC WITH 0
  5300	033151	270 00 0 00 034114 		ADD	[XX,,-1]	;ADD A FLOATING ZERO TO ZERO
  5301	033152	312 00 0 00 034114 		CAME	[XX,,-1]	;CHECK ADDER UPON FAILURE
  5302						STOP		^
  5303	033153	254 04 0 00 033154 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  5304	033154	324 00 0 00 033155 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  5305									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  5306									;IN THE SUBTEST) TO LOOP ON ERROR^
  5307
  5308					;**********
  5309
  5310
  5311					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO ADDED TO A ZERO
  5312					;IS THE FLOATING ZERO.
  5313					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  5314					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5315
  5316			045633		SN=SN+1
  5317			777377			XX=<XX+XX+1>&777777
  5318						IFE	<XX-1>,<XX=777776>
  5319	033155	400 00 0 00 000000 		SETZ			;PRELOAD AC WITH 0
  5320	033156	270 00 0 00 034115 		ADD	[XX,,-1]	;ADD A FLOATING ZERO TO ZERO
  5321	033157	312 00 0 00 034115 		CAME	[XX,,-1]	;CHECK ADDER UPON FAILURE
  5322						STOP		^
  5323	033160	254 04 0 00 033161 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  5324	033161	324 00 0 00 033162 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  5325									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  5326									;IN THE SUBTEST) TO LOOP ON ERROR^
  5327
  5328					;**********
  5329
  5330
  5331					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO ADDED TO A ZERO
  5332					;IS THE FLOATING ZERO.
  5333					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  5334					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5335
  5336			045634		SN=SN+1
  5337			776777			XX=<XX+XX+1>&777777
  5338						IFE	<XX-1>,<XX=777776>
  5339	033162	400 00 0 00 000000 		SETZ			;PRELOAD AC WITH 0
  5340	033163	270 00 0 00 034116 		ADD	[XX,,-1]	;ADD A FLOATING ZERO TO ZERO
  5341	033164	312 00 0 00 034116 		CAME	[XX,,-1]	;CHECK ADDER UPON FAILURE
  5342						STOP		^
  5343	033165	254 04 0 00 033166 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  5344	033166	324 00 0 00 033167 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  5345									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  5346									;IN THE SUBTEST) TO LOOP ON ERROR^
  5347
  5348					;**********
  5349
  5350
  5351					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO ADDED TO A ZERO
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 88-11
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - O + FLT 0                                              SEQ 0138

  5352					;IS THE FLOATING ZERO.
  5353					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  5354					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5355
  5356			045635		SN=SN+1
  5357			775777			XX=<XX+XX+1>&777777
  5358						IFE	<XX-1>,<XX=777776>
  5359	033167	400 00 0 00 000000 		SETZ			;PRELOAD AC WITH 0
  5360	033170	270 00 0 00 034117 		ADD	[XX,,-1]	;ADD A FLOATING ZERO TO ZERO
  5361	033171	312 00 0 00 034117 		CAME	[XX,,-1]	;CHECK ADDER UPON FAILURE
  5362						STOP		^
  5363	033172	254 04 0 00 033173 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  5364	033173	324 00 0 00 033174 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  5365									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  5366									;IN THE SUBTEST) TO LOOP ON ERROR^
  5367
  5368					;**********
  5369
  5370
  5371					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO ADDED TO A ZERO
  5372					;IS THE FLOATING ZERO.
  5373					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  5374					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5375
  5376			045636		SN=SN+1
  5377			773777			XX=<XX+XX+1>&777777
  5378						IFE	<XX-1>,<XX=777776>
  5379	033174	400 00 0 00 000000 		SETZ			;PRELOAD AC WITH 0
  5380	033175	270 00 0 00 034120 		ADD	[XX,,-1]	;ADD A FLOATING ZERO TO ZERO
  5381	033176	312 00 0 00 034120 		CAME	[XX,,-1]	;CHECK ADDER UPON FAILURE
  5382						STOP		^
  5383	033177	254 04 0 00 033200 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  5384	033200	324 00 0 00 033201 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  5385									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  5386									;IN THE SUBTEST) TO LOOP ON ERROR^
  5387
  5388					;**********
  5389
  5390
  5391					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO ADDED TO A ZERO
  5392					;IS THE FLOATING ZERO.
  5393					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  5394					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5395
  5396			045637		SN=SN+1
  5397			767777			XX=<XX+XX+1>&777777
  5398						IFE	<XX-1>,<XX=777776>
  5399	033201	400 00 0 00 000000 		SETZ			;PRELOAD AC WITH 0
  5400	033202	270 00 0 00 034121 		ADD	[XX,,-1]	;ADD A FLOATING ZERO TO ZERO
  5401	033203	312 00 0 00 034121 		CAME	[XX,,-1]	;CHECK ADDER UPON FAILURE
  5402						STOP		^
  5403	033204	254 04 0 00 033205 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  5404	033205	324 00 0 00 033206 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  5405									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  5406									;IN THE SUBTEST) TO LOOP ON ERROR^
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 88-12
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - O + FLT 0                                              SEQ 0139

  5407
  5408					;**********
  5409
  5410
  5411					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO ADDED TO A ZERO
  5412					;IS THE FLOATING ZERO.
  5413					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  5414					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5415
  5416			045640		SN=SN+1
  5417			757777			XX=<XX+XX+1>&777777
  5418						IFE	<XX-1>,<XX=777776>
  5419	033206	400 00 0 00 000000 		SETZ			;PRELOAD AC WITH 0
  5420	033207	270 00 0 00 034122 		ADD	[XX,,-1]	;ADD A FLOATING ZERO TO ZERO
  5421	033210	312 00 0 00 034122 		CAME	[XX,,-1]	;CHECK ADDER UPON FAILURE
  5422						STOP		^
  5423	033211	254 04 0 00 033212 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  5424	033212	324 00 0 00 033213 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  5425									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  5426									;IN THE SUBTEST) TO LOOP ON ERROR^
  5427
  5428					;**********
  5429
  5430
  5431					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO ADDED TO A ZERO
  5432					;IS THE FLOATING ZERO.
  5433					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  5434					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5435
  5436			045641		SN=SN+1
  5437			737777			XX=<XX+XX+1>&777777
  5438						IFE	<XX-1>,<XX=777776>
  5439	033213	400 00 0 00 000000 		SETZ			;PRELOAD AC WITH 0
  5440	033214	270 00 0 00 034123 		ADD	[XX,,-1]	;ADD A FLOATING ZERO TO ZERO
  5441	033215	312 00 0 00 034123 		CAME	[XX,,-1]	;CHECK ADDER UPON FAILURE
  5442						STOP		^
  5443	033216	254 04 0 00 033217 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  5444	033217	324 00 0 00 033220 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  5445									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  5446									;IN THE SUBTEST) TO LOOP ON ERROR^
  5447
  5448					;**********
  5449
  5450
  5451					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO ADDED TO A ZERO
  5452					;IS THE FLOATING ZERO.
  5453					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  5454					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5455
  5456			045642		SN=SN+1
  5457			677777			XX=<XX+XX+1>&777777
  5458						IFE	<XX-1>,<XX=777776>
  5459	033220	400 00 0 00 000000 		SETZ			;PRELOAD AC WITH 0
  5460	033221	270 00 0 00 034124 		ADD	[XX,,-1]	;ADD A FLOATING ZERO TO ZERO
  5461	033222	312 00 0 00 034124 		CAME	[XX,,-1]	;CHECK ADDER UPON FAILURE
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 88-13
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - O + FLT 0                                              SEQ 0140

  5462						STOP		^
  5463	033223	254 04 0 00 033224 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  5464	033224	324 00 0 00 033225 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  5465									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  5466									;IN THE SUBTEST) TO LOOP ON ERROR^
  5467
  5468					;**********
  5469
  5470
  5471					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO ADDED TO A ZERO
  5472					;IS THE FLOATING ZERO.
  5473					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  5474					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5475
  5476			045643		SN=SN+1
  5477			577777			XX=<XX+XX+1>&777777
  5478						IFE	<XX-1>,<XX=777776>
  5479	033225	400 00 0 00 000000 		SETZ			;PRELOAD AC WITH 0
  5480	033226	270 00 0 00 034125 		ADD	[XX,,-1]	;ADD A FLOATING ZERO TO ZERO
  5481	033227	312 00 0 00 034125 		CAME	[XX,,-1]	;CHECK ADDER UPON FAILURE
  5482						STOP		^
  5483	033230	254 04 0 00 033231 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  5484	033231	324 00 0 00 033232 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  5485									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  5486									;IN THE SUBTEST) TO LOOP ON ERROR^
  5487
  5488					;**********
  5489
  5490
  5491					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO ADDED TO A ZERO
  5492					;IS THE FLOATING ZERO.
  5493					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  5494					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5495
  5496			045644		SN=SN+1
  5497			377777			XX=<XX+XX+1>&777777
  5498						IFE	<XX-1>,<XX=777776>
  5499	033232	400 00 0 00 000000 		SETZ			;PRELOAD AC WITH 0
  5500	033233	270 00 0 00 034126 		ADD	[XX,,-1]	;ADD A FLOATING ZERO TO ZERO
  5501	033234	312 00 0 00 034126 		CAME	[XX,,-1]	;CHECK ADDER UPON FAILURE
  5502						STOP		^
  5503	033235	254 04 0 00 033236 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  5504	033236	324 00 0 00 033237 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  5505									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  5506									;IN THE SUBTEST) TO LOOP ON ERROR^
  5507
  5508					;**********
  5509
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 89
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - FLT 1 + FLT 1                                          SEQ 0141

  5510					SUBTTL	SUPPLEMENTARY ADDER TESTS - FLT 1 + FLT 1
  5511
  5512					;**********
  5513
  5514			045700		SN=45700
  5515			000000			XX=0
  5516
  5517					B45700:	REPEAT	^D17,<
  5518					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ONE
  5519					;ADDED TO A FLOATING ONE IS A FLOATING ONE
  5520					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ONE.
  5521					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  5522					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5523					
  5524					SN=SN+1
  5525						XX=XX+XX
  5526						IFE	XX,<XX=1>
  5527						HRRZI	XX		;PRELOAD AC WITH A FLOATING ONE
  5528						ADD	[XX]		;ADD A FLOATING ONE TO ITSELF	
  5529						CAME	[XX+XX]		;CHECK ADDER UPON FAILURE
  5530						STOP		
  5531					
  5532					;**********
  5533					>
  5534
  5535					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ONE
  5536					;ADDED TO A FLOATING ONE IS A FLOATING ONE
  5537					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ONE.
  5538					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  5539					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5540
  5541			045701		SN=SN+1
  5542			000000			XX=XX+XX
  5543			000001			IFE	XX,<XX=1>
  5544	033237	551 00 0 00 000001 		HRRZI	XX		;PRELOAD AC WITH A FLOATING ONE
  5545	033240	270 00 0 00 034017 		ADD	[XX]		;ADD A FLOATING ONE TO ITSELF	
  5546	033241	312 00 0 00 034020 		CAME	[XX+XX]		;CHECK ADDER UPON FAILURE
  5547						STOP		^
  5548	033242	254 04 0 00 033243 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  5549	033243	324 00 0 00 033244 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  5550									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  5551									;IN THE SUBTEST) TO LOOP ON ERROR^
  5552
  5553					;**********
  5554
  5555
  5556					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ONE
  5557					;ADDED TO A FLOATING ONE IS A FLOATING ONE
  5558					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ONE.
  5559					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  5560					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5561
  5562			045702		SN=SN+1
  5563			000002			XX=XX+XX
  5564						IFE	XX,<XX=1>
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 89-1
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - FLT 1 + FLT 1                                          SEQ 0142

  5565	033244	551 00 0 00 000002 		HRRZI	XX		;PRELOAD AC WITH A FLOATING ONE
  5566	033245	270 00 0 00 034020 		ADD	[XX]		;ADD A FLOATING ONE TO ITSELF	
  5567	033246	312 00 0 00 034021 		CAME	[XX+XX]		;CHECK ADDER UPON FAILURE
  5568						STOP		^
  5569	033247	254 04 0 00 033250 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  5570	033250	324 00 0 00 033251 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  5571									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  5572									;IN THE SUBTEST) TO LOOP ON ERROR^
  5573
  5574					;**********
  5575
  5576
  5577					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ONE
  5578					;ADDED TO A FLOATING ONE IS A FLOATING ONE
  5579					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ONE.
  5580					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  5581					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5582
  5583			045703		SN=SN+1
  5584			000004			XX=XX+XX
  5585						IFE	XX,<XX=1>
  5586	033251	551 00 0 00 000004 		HRRZI	XX		;PRELOAD AC WITH A FLOATING ONE
  5587	033252	270 00 0 00 034021 		ADD	[XX]		;ADD A FLOATING ONE TO ITSELF	
  5588	033253	312 00 0 00 034022 		CAME	[XX+XX]		;CHECK ADDER UPON FAILURE
  5589						STOP		^
  5590	033254	254 04 0 00 033255 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  5591	033255	324 00 0 00 033256 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  5592									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  5593									;IN THE SUBTEST) TO LOOP ON ERROR^
  5594
  5595					;**********
  5596
  5597
  5598					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ONE
  5599					;ADDED TO A FLOATING ONE IS A FLOATING ONE
  5600					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ONE.
  5601					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  5602					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5603
  5604			045704		SN=SN+1
  5605			000010			XX=XX+XX
  5606						IFE	XX,<XX=1>
  5607	033256	551 00 0 00 000010 		HRRZI	XX		;PRELOAD AC WITH A FLOATING ONE
  5608	033257	270 00 0 00 034022 		ADD	[XX]		;ADD A FLOATING ONE TO ITSELF	
  5609	033260	312 00 0 00 034023 		CAME	[XX+XX]		;CHECK ADDER UPON FAILURE
  5610						STOP		^
  5611	033261	254 04 0 00 033262 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  5612	033262	324 00 0 00 033263 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  5613									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  5614									;IN THE SUBTEST) TO LOOP ON ERROR^
  5615
  5616					;**********
  5617
  5618
  5619					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ONE
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 89-2
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - FLT 1 + FLT 1                                          SEQ 0143

  5620					;ADDED TO A FLOATING ONE IS A FLOATING ONE
  5621					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ONE.
  5622					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  5623					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5624
  5625			045705		SN=SN+1
  5626			000020			XX=XX+XX
  5627						IFE	XX,<XX=1>
  5628	033263	551 00 0 00 000020 		HRRZI	XX		;PRELOAD AC WITH A FLOATING ONE
  5629	033264	270 00 0 00 034023 		ADD	[XX]		;ADD A FLOATING ONE TO ITSELF	
  5630	033265	312 00 0 00 034024 		CAME	[XX+XX]		;CHECK ADDER UPON FAILURE
  5631						STOP		^
  5632	033266	254 04 0 00 033267 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  5633	033267	324 00 0 00 033270 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  5634									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  5635									;IN THE SUBTEST) TO LOOP ON ERROR^
  5636
  5637					;**********
  5638
  5639
  5640					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ONE
  5641					;ADDED TO A FLOATING ONE IS A FLOATING ONE
  5642					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ONE.
  5643					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  5644					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5645
  5646			045706		SN=SN+1
  5647			000040			XX=XX+XX
  5648						IFE	XX,<XX=1>
  5649	033270	551 00 0 00 000040 		HRRZI	XX		;PRELOAD AC WITH A FLOATING ONE
  5650	033271	270 00 0 00 034024 		ADD	[XX]		;ADD A FLOATING ONE TO ITSELF	
  5651	033272	312 00 0 00 034025 		CAME	[XX+XX]		;CHECK ADDER UPON FAILURE
  5652						STOP		^
  5653	033273	254 04 0 00 033274 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  5654	033274	324 00 0 00 033275 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  5655									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  5656									;IN THE SUBTEST) TO LOOP ON ERROR^
  5657
  5658					;**********
  5659
  5660
  5661					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ONE
  5662					;ADDED TO A FLOATING ONE IS A FLOATING ONE
  5663					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ONE.
  5664					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  5665					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5666
  5667			045707		SN=SN+1
  5668			000100			XX=XX+XX
  5669						IFE	XX,<XX=1>
  5670	033275	551 00 0 00 000100 		HRRZI	XX		;PRELOAD AC WITH A FLOATING ONE
  5671	033276	270 00 0 00 034025 		ADD	[XX]		;ADD A FLOATING ONE TO ITSELF	
  5672	033277	312 00 0 00 034026 		CAME	[XX+XX]		;CHECK ADDER UPON FAILURE
  5673						STOP		^
  5674	033300	254 04 0 00 033301 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 89-3
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - FLT 1 + FLT 1                                          SEQ 0144

  5675	033301	324 00 0 00 033302 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  5676									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  5677									;IN THE SUBTEST) TO LOOP ON ERROR^
  5678
  5679					;**********
  5680
  5681
  5682					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ONE
  5683					;ADDED TO A FLOATING ONE IS A FLOATING ONE
  5684					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ONE.
  5685					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  5686					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5687
  5688			045710		SN=SN+1
  5689			000200			XX=XX+XX
  5690						IFE	XX,<XX=1>
  5691	033302	551 00 0 00 000200 		HRRZI	XX		;PRELOAD AC WITH A FLOATING ONE
  5692	033303	270 00 0 00 034026 		ADD	[XX]		;ADD A FLOATING ONE TO ITSELF	
  5693	033304	312 00 0 00 034027 		CAME	[XX+XX]		;CHECK ADDER UPON FAILURE
  5694						STOP		^
  5695	033305	254 04 0 00 033306 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  5696	033306	324 00 0 00 033307 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  5697									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  5698									;IN THE SUBTEST) TO LOOP ON ERROR^
  5699
  5700					;**********
  5701
  5702
  5703					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ONE
  5704					;ADDED TO A FLOATING ONE IS A FLOATING ONE
  5705					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ONE.
  5706					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  5707					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5708
  5709			045711		SN=SN+1
  5710			000400			XX=XX+XX
  5711						IFE	XX,<XX=1>
  5712	033307	551 00 0 00 000400 		HRRZI	XX		;PRELOAD AC WITH A FLOATING ONE
  5713	033310	270 00 0 00 034027 		ADD	[XX]		;ADD A FLOATING ONE TO ITSELF	
  5714	033311	312 00 0 00 034030 		CAME	[XX+XX]		;CHECK ADDER UPON FAILURE
  5715						STOP		^
  5716	033312	254 04 0 00 033313 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  5717	033313	324 00 0 00 033314 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  5718									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  5719									;IN THE SUBTEST) TO LOOP ON ERROR^
  5720
  5721					;**********
  5722
  5723
  5724					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ONE
  5725					;ADDED TO A FLOATING ONE IS A FLOATING ONE
  5726					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ONE.
  5727					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  5728					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5729
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 89-4
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - FLT 1 + FLT 1                                          SEQ 0145

  5730			045712		SN=SN+1
  5731			001000			XX=XX+XX
  5732						IFE	XX,<XX=1>
  5733	033314	551 00 0 00 001000 		HRRZI	XX		;PRELOAD AC WITH A FLOATING ONE
  5734	033315	270 00 0 00 034030 		ADD	[XX]		;ADD A FLOATING ONE TO ITSELF	
  5735	033316	312 00 0 00 034031 		CAME	[XX+XX]		;CHECK ADDER UPON FAILURE
  5736						STOP		^
  5737	033317	254 04 0 00 033320 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  5738	033320	324 00 0 00 033321 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  5739									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  5740									;IN THE SUBTEST) TO LOOP ON ERROR^
  5741
  5742					;**********
  5743
  5744
  5745					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ONE
  5746					;ADDED TO A FLOATING ONE IS A FLOATING ONE
  5747					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ONE.
  5748					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  5749					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5750
  5751			045713		SN=SN+1
  5752			002000			XX=XX+XX
  5753						IFE	XX,<XX=1>
  5754	033321	551 00 0 00 002000 		HRRZI	XX		;PRELOAD AC WITH A FLOATING ONE
  5755	033322	270 00 0 00 034031 		ADD	[XX]		;ADD A FLOATING ONE TO ITSELF	
  5756	033323	312 00 0 00 034032 		CAME	[XX+XX]		;CHECK ADDER UPON FAILURE
  5757						STOP		^
  5758	033324	254 04 0 00 033325 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  5759	033325	324 00 0 00 033326 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  5760									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  5761									;IN THE SUBTEST) TO LOOP ON ERROR^
  5762
  5763					;**********
  5764
  5765
  5766					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ONE
  5767					;ADDED TO A FLOATING ONE IS A FLOATING ONE
  5768					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ONE.
  5769					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  5770					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5771
  5772			045714		SN=SN+1
  5773			004000			XX=XX+XX
  5774						IFE	XX,<XX=1>
  5775	033326	551 00 0 00 004000 		HRRZI	XX		;PRELOAD AC WITH A FLOATING ONE
  5776	033327	270 00 0 00 034032 		ADD	[XX]		;ADD A FLOATING ONE TO ITSELF	
  5777	033330	312 00 0 00 034033 		CAME	[XX+XX]		;CHECK ADDER UPON FAILURE
  5778						STOP		^
  5779	033331	254 04 0 00 033332 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  5780	033332	324 00 0 00 033333 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  5781									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  5782									;IN THE SUBTEST) TO LOOP ON ERROR^
  5783
  5784					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 89-5
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - FLT 1 + FLT 1                                          SEQ 0146

  5785
  5786
  5787					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ONE
  5788					;ADDED TO A FLOATING ONE IS A FLOATING ONE
  5789					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ONE.
  5790					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  5791					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5792
  5793			045715		SN=SN+1
  5794			010000			XX=XX+XX
  5795						IFE	XX,<XX=1>
  5796	033333	551 00 0 00 010000 		HRRZI	XX		;PRELOAD AC WITH A FLOATING ONE
  5797	033334	270 00 0 00 034033 		ADD	[XX]		;ADD A FLOATING ONE TO ITSELF	
  5798	033335	312 00 0 00 034034 		CAME	[XX+XX]		;CHECK ADDER UPON FAILURE
  5799						STOP		^
  5800	033336	254 04 0 00 033337 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  5801	033337	324 00 0 00 033340 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  5802									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  5803									;IN THE SUBTEST) TO LOOP ON ERROR^
  5804
  5805					;**********
  5806
  5807
  5808					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ONE
  5809					;ADDED TO A FLOATING ONE IS A FLOATING ONE
  5810					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ONE.
  5811					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  5812					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5813
  5814			045716		SN=SN+1
  5815			020000			XX=XX+XX
  5816						IFE	XX,<XX=1>
  5817	033340	551 00 0 00 020000 		HRRZI	XX		;PRELOAD AC WITH A FLOATING ONE
  5818	033341	270 00 0 00 034034 		ADD	[XX]		;ADD A FLOATING ONE TO ITSELF	
  5819	033342	312 00 0 00 034035 		CAME	[XX+XX]		;CHECK ADDER UPON FAILURE
  5820						STOP		^
  5821	033343	254 04 0 00 033344 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  5822	033344	324 00 0 00 033345 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  5823									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  5824									;IN THE SUBTEST) TO LOOP ON ERROR^
  5825
  5826					;**********
  5827
  5828
  5829					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ONE
  5830					;ADDED TO A FLOATING ONE IS A FLOATING ONE
  5831					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ONE.
  5832					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  5833					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5834
  5835			045717		SN=SN+1
  5836			040000			XX=XX+XX
  5837						IFE	XX,<XX=1>
  5838	033345	551 00 0 00 040000 		HRRZI	XX		;PRELOAD AC WITH A FLOATING ONE
  5839	033346	270 00 0 00 034035 		ADD	[XX]		;ADD A FLOATING ONE TO ITSELF	
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 89-6
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - FLT 1 + FLT 1                                          SEQ 0147

  5840	033347	312 00 0 00 034036 		CAME	[XX+XX]		;CHECK ADDER UPON FAILURE
  5841						STOP		^
  5842	033350	254 04 0 00 033351 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  5843	033351	324 00 0 00 033352 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  5844									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  5845									;IN THE SUBTEST) TO LOOP ON ERROR^
  5846
  5847					;**********
  5848
  5849
  5850					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ONE
  5851					;ADDED TO A FLOATING ONE IS A FLOATING ONE
  5852					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ONE.
  5853					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  5854					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5855
  5856			045720		SN=SN+1
  5857			100000			XX=XX+XX
  5858						IFE	XX,<XX=1>
  5859	033352	551 00 0 00 100000 		HRRZI	XX		;PRELOAD AC WITH A FLOATING ONE
  5860	033353	270 00 0 00 034036 		ADD	[XX]		;ADD A FLOATING ONE TO ITSELF	
  5861	033354	312 00 0 00 034037 		CAME	[XX+XX]		;CHECK ADDER UPON FAILURE
  5862						STOP		^
  5863	033355	254 04 0 00 033356 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  5864	033356	324 00 0 00 033357 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  5865									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  5866									;IN THE SUBTEST) TO LOOP ON ERROR^
  5867
  5868					;**********
  5869
  5870
  5871					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ONE
  5872					;ADDED TO A FLOATING ONE IS A FLOATING ONE
  5873					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ONE.
  5874					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  5875					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5876
  5877			045721		SN=SN+1
  5878			200000			XX=XX+XX
  5879						IFE	XX,<XX=1>
  5880	033357	551 00 0 00 200000 		HRRZI	XX		;PRELOAD AC WITH A FLOATING ONE
  5881	033360	270 00 0 00 034037 		ADD	[XX]		;ADD A FLOATING ONE TO ITSELF	
  5882	033361	312 00 0 00 034040 		CAME	[XX+XX]		;CHECK ADDER UPON FAILURE
  5883						STOP		^
  5884	033362	254 04 0 00 033363 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  5885	033363	324 00 0 00 033364 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  5886									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  5887									;IN THE SUBTEST) TO LOOP ON ERROR^
  5888
  5889					;**********
  5890
  5891					PAGE
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 89-7
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - FLT 1 + FLT 1                                          SEQ 0148

  5892					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ONE
  5893					;ADDED TO A FLOATING ONE IS A FLOATING ONE
  5894					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ONE.
  5895					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  5896					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5897			045722		SN=SN+1
  5898			400000			XX=XX+XX
  5899	033364	551 00 0 00 400000 		HRRZI	XX		;PRELOAD AC WITH A FLOATING ONE
  5900	033365	270 00 0 00 034040 		ADD	[XX]		;ADD A FLOATING ONE TO ITSELF	
  5901	033366	312 00 0 00 034041 		CAME	[1,,0]		;CHECK ADDRESS UPON FAILURE
  5902						STOP		^
  5903	033367	254 04 0 00 033370 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  5904	033370	324 00 0 00 033371 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  5905									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  5906									;IN THE SUBTEST) TO LOOP ON ERROR^
  5907
  5908					;**********
  5909
  5910			000000			XX=0
  5911
  5912						REPEAT	^D18,<
  5913					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ONE
  5914					;ADDED TO A FLOATING ONE IS A FLOATING ONE
  5915					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ONE.
  5916					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  5917					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5918					
  5919					SN=SN+1
  5920						XX=XX+XX
  5921						IFE	XX,<XX=1>
  5922						HRLZI	XX		;PRELOAD AC WITH A FLOATING ONE
  5923						ADD	[XX,,0]		;ADD A FLOATING ONE TO ITSELF	
  5924						CAME	[XX+XX,,0]	;CHECK ADDER UPON FAILURE
  5925						STOP		
  5926					
  5927					;**********
  5928					>
  5929
  5930					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ONE
  5931					;ADDED TO A FLOATING ONE IS A FLOATING ONE
  5932					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ONE.
  5933					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  5934					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5935
  5936			045723		SN=SN+1
  5937			000000			XX=XX+XX
  5938			000001			IFE	XX,<XX=1>
  5939	033371	515 00 0 00 000001 		HRLZI	XX		;PRELOAD AC WITH A FLOATING ONE
  5940	033372	270 00 0 00 034041 		ADD	[XX,,0]		;ADD A FLOATING ONE TO ITSELF	
  5941	033373	312 00 0 00 034042 		CAME	[XX+XX,,0]	;CHECK ADDER UPON FAILURE
  5942						STOP		^
  5943	033374	254 04 0 00 033375 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  5944	033375	324 00 0 00 033376 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  5945									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  5946									;IN THE SUBTEST) TO LOOP ON ERROR^
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 89-8
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - FLT 1 + FLT 1                                          SEQ 0149

  5947
  5948					;**********
  5949
  5950
  5951					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ONE
  5952					;ADDED TO A FLOATING ONE IS A FLOATING ONE
  5953					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ONE.
  5954					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  5955					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5956
  5957			045724		SN=SN+1
  5958			000002			XX=XX+XX
  5959						IFE	XX,<XX=1>
  5960	033376	515 00 0 00 000002 		HRLZI	XX		;PRELOAD AC WITH A FLOATING ONE
  5961	033377	270 00 0 00 034042 		ADD	[XX,,0]		;ADD A FLOATING ONE TO ITSELF	
  5962	033400	312 00 0 00 034043 		CAME	[XX+XX,,0]	;CHECK ADDER UPON FAILURE
  5963						STOP		^
  5964	033401	254 04 0 00 033402 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  5965	033402	324 00 0 00 033403 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  5966									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  5967									;IN THE SUBTEST) TO LOOP ON ERROR^
  5968
  5969					;**********
  5970
  5971
  5972					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ONE
  5973					;ADDED TO A FLOATING ONE IS A FLOATING ONE
  5974					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ONE.
  5975					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  5976					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5977
  5978			045725		SN=SN+1
  5979			000004			XX=XX+XX
  5980						IFE	XX,<XX=1>
  5981	033403	515 00 0 00 000004 		HRLZI	XX		;PRELOAD AC WITH A FLOATING ONE
  5982	033404	270 00 0 00 034043 		ADD	[XX,,0]		;ADD A FLOATING ONE TO ITSELF	
  5983	033405	312 00 0 00 034044 		CAME	[XX+XX,,0]	;CHECK ADDER UPON FAILURE
  5984						STOP		^
  5985	033406	254 04 0 00 033407 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  5986	033407	324 00 0 00 033410 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  5987									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  5988									;IN THE SUBTEST) TO LOOP ON ERROR^
  5989
  5990					;**********
  5991
  5992
  5993					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ONE
  5994					;ADDED TO A FLOATING ONE IS A FLOATING ONE
  5995					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ONE.
  5996					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  5997					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  5998
  5999			045726		SN=SN+1
  6000			000010			XX=XX+XX
  6001						IFE	XX,<XX=1>
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 89-9
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - FLT 1 + FLT 1                                          SEQ 0150

  6002	033410	515 00 0 00 000010 		HRLZI	XX		;PRELOAD AC WITH A FLOATING ONE
  6003	033411	270 00 0 00 034044 		ADD	[XX,,0]		;ADD A FLOATING ONE TO ITSELF	
  6004	033412	312 00 0 00 034045 		CAME	[XX+XX,,0]	;CHECK ADDER UPON FAILURE
  6005						STOP		^
  6006	033413	254 04 0 00 033414 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  6007	033414	324 00 0 00 033415 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  6008									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  6009									;IN THE SUBTEST) TO LOOP ON ERROR^
  6010
  6011					;**********
  6012
  6013
  6014					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ONE
  6015					;ADDED TO A FLOATING ONE IS A FLOATING ONE
  6016					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ONE.
  6017					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  6018					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  6019
  6020			045727		SN=SN+1
  6021			000020			XX=XX+XX
  6022						IFE	XX,<XX=1>
  6023	033415	515 00 0 00 000020 		HRLZI	XX		;PRELOAD AC WITH A FLOATING ONE
  6024	033416	270 00 0 00 034045 		ADD	[XX,,0]		;ADD A FLOATING ONE TO ITSELF	
  6025	033417	312 00 0 00 034046 		CAME	[XX+XX,,0]	;CHECK ADDER UPON FAILURE
  6026						STOP		^
  6027	033420	254 04 0 00 033421 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  6028	033421	324 00 0 00 033422 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  6029									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  6030									;IN THE SUBTEST) TO LOOP ON ERROR^
  6031
  6032					;**********
  6033
  6034
  6035					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ONE
  6036					;ADDED TO A FLOATING ONE IS A FLOATING ONE
  6037					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ONE.
  6038					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  6039					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  6040
  6041			045730		SN=SN+1
  6042			000040			XX=XX+XX
  6043						IFE	XX,<XX=1>
  6044	033422	515 00 0 00 000040 		HRLZI	XX		;PRELOAD AC WITH A FLOATING ONE
  6045	033423	270 00 0 00 034046 		ADD	[XX,,0]		;ADD A FLOATING ONE TO ITSELF	
  6046	033424	312 00 0 00 034047 		CAME	[XX+XX,,0]	;CHECK ADDER UPON FAILURE
  6047						STOP		^
  6048	033425	254 04 0 00 033426 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  6049	033426	324 00 0 00 033427 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  6050									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  6051									;IN THE SUBTEST) TO LOOP ON ERROR^
  6052
  6053					;**********
  6054
  6055
  6056					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ONE
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 89-10
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - FLT 1 + FLT 1                                          SEQ 0151

  6057					;ADDED TO A FLOATING ONE IS A FLOATING ONE
  6058					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ONE.
  6059					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  6060					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  6061
  6062			045731		SN=SN+1
  6063			000100			XX=XX+XX
  6064						IFE	XX,<XX=1>
  6065	033427	515 00 0 00 000100 		HRLZI	XX		;PRELOAD AC WITH A FLOATING ONE
  6066	033430	270 00 0 00 034047 		ADD	[XX,,0]		;ADD A FLOATING ONE TO ITSELF	
  6067	033431	312 00 0 00 034050 		CAME	[XX+XX,,0]	;CHECK ADDER UPON FAILURE
  6068						STOP		^
  6069	033432	254 04 0 00 033433 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  6070	033433	324 00 0 00 033434 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  6071									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  6072									;IN THE SUBTEST) TO LOOP ON ERROR^
  6073
  6074					;**********
  6075
  6076
  6077					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ONE
  6078					;ADDED TO A FLOATING ONE IS A FLOATING ONE
  6079					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ONE.
  6080					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  6081					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  6082
  6083			045732		SN=SN+1
  6084			000200			XX=XX+XX
  6085						IFE	XX,<XX=1>
  6086	033434	515 00 0 00 000200 		HRLZI	XX		;PRELOAD AC WITH A FLOATING ONE
  6087	033435	270 00 0 00 034050 		ADD	[XX,,0]		;ADD A FLOATING ONE TO ITSELF	
  6088	033436	312 00 0 00 034051 		CAME	[XX+XX,,0]	;CHECK ADDER UPON FAILURE
  6089						STOP		^
  6090	033437	254 04 0 00 033440 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  6091	033440	324 00 0 00 033441 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  6092									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  6093									;IN THE SUBTEST) TO LOOP ON ERROR^
  6094
  6095					;**********
  6096
  6097
  6098					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ONE
  6099					;ADDED TO A FLOATING ONE IS A FLOATING ONE
  6100					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ONE.
  6101					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  6102					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  6103
  6104			045733		SN=SN+1
  6105			000400			XX=XX+XX
  6106						IFE	XX,<XX=1>
  6107	033441	515 00 0 00 000400 		HRLZI	XX		;PRELOAD AC WITH A FLOATING ONE
  6108	033442	270 00 0 00 034051 		ADD	[XX,,0]		;ADD A FLOATING ONE TO ITSELF	
  6109	033443	312 00 0 00 034052 		CAME	[XX+XX,,0]	;CHECK ADDER UPON FAILURE
  6110						STOP		^
  6111	033444	254 04 0 00 033445 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 89-11
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - FLT 1 + FLT 1                                          SEQ 0152

  6112	033445	324 00 0 00 033446 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  6113									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  6114									;IN THE SUBTEST) TO LOOP ON ERROR^
  6115
  6116					;**********
  6117
  6118
  6119					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ONE
  6120					;ADDED TO A FLOATING ONE IS A FLOATING ONE
  6121					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ONE.
  6122					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  6123					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  6124
  6125			045734		SN=SN+1
  6126			001000			XX=XX+XX
  6127						IFE	XX,<XX=1>
  6128	033446	515 00 0 00 001000 		HRLZI	XX		;PRELOAD AC WITH A FLOATING ONE
  6129	033447	270 00 0 00 034052 		ADD	[XX,,0]		;ADD A FLOATING ONE TO ITSELF	
  6130	033450	312 00 0 00 034053 		CAME	[XX+XX,,0]	;CHECK ADDER UPON FAILURE
  6131						STOP		^
  6132	033451	254 04 0 00 033452 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  6133	033452	324 00 0 00 033453 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  6134									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  6135									;IN THE SUBTEST) TO LOOP ON ERROR^
  6136
  6137					;**********
  6138
  6139
  6140					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ONE
  6141					;ADDED TO A FLOATING ONE IS A FLOATING ONE
  6142					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ONE.
  6143					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  6144					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  6145
  6146			045735		SN=SN+1
  6147			002000			XX=XX+XX
  6148						IFE	XX,<XX=1>
  6149	033453	515 00 0 00 002000 		HRLZI	XX		;PRELOAD AC WITH A FLOATING ONE
  6150	033454	270 00 0 00 034053 		ADD	[XX,,0]		;ADD A FLOATING ONE TO ITSELF	
  6151	033455	312 00 0 00 034054 		CAME	[XX+XX,,0]	;CHECK ADDER UPON FAILURE
  6152						STOP		^
  6153	033456	254 04 0 00 033457 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  6154	033457	324 00 0 00 033460 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  6155									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  6156									;IN THE SUBTEST) TO LOOP ON ERROR^
  6157
  6158					;**********
  6159
  6160
  6161					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ONE
  6162					;ADDED TO A FLOATING ONE IS A FLOATING ONE
  6163					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ONE.
  6164					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  6165					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  6166
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 89-12
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - FLT 1 + FLT 1                                          SEQ 0153

  6167			045736		SN=SN+1
  6168			004000			XX=XX+XX
  6169						IFE	XX,<XX=1>
  6170	033460	515 00 0 00 004000 		HRLZI	XX		;PRELOAD AC WITH A FLOATING ONE
  6171	033461	270 00 0 00 034054 		ADD	[XX,,0]		;ADD A FLOATING ONE TO ITSELF	
  6172	033462	312 00 0 00 034055 		CAME	[XX+XX,,0]	;CHECK ADDER UPON FAILURE
  6173						STOP		^
  6174	033463	254 04 0 00 033464 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  6175	033464	324 00 0 00 033465 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  6176									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  6177									;IN THE SUBTEST) TO LOOP ON ERROR^
  6178
  6179					;**********
  6180
  6181
  6182					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ONE
  6183					;ADDED TO A FLOATING ONE IS A FLOATING ONE
  6184					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ONE.
  6185					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  6186					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  6187
  6188			045737		SN=SN+1
  6189			010000			XX=XX+XX
  6190						IFE	XX,<XX=1>
  6191	033465	515 00 0 00 010000 		HRLZI	XX		;PRELOAD AC WITH A FLOATING ONE
  6192	033466	270 00 0 00 034055 		ADD	[XX,,0]		;ADD A FLOATING ONE TO ITSELF	
  6193	033467	312 00 0 00 034056 		CAME	[XX+XX,,0]	;CHECK ADDER UPON FAILURE
  6194						STOP		^
  6195	033470	254 04 0 00 033471 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  6196	033471	324 00 0 00 033472 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  6197									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  6198									;IN THE SUBTEST) TO LOOP ON ERROR^
  6199
  6200					;**********
  6201
  6202
  6203					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ONE
  6204					;ADDED TO A FLOATING ONE IS A FLOATING ONE
  6205					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ONE.
  6206					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  6207					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  6208
  6209			045740		SN=SN+1
  6210			020000			XX=XX+XX
  6211						IFE	XX,<XX=1>
  6212	033472	515 00 0 00 020000 		HRLZI	XX		;PRELOAD AC WITH A FLOATING ONE
  6213	033473	270 00 0 00 034056 		ADD	[XX,,0]		;ADD A FLOATING ONE TO ITSELF	
  6214	033474	312 00 0 00 034057 		CAME	[XX+XX,,0]	;CHECK ADDER UPON FAILURE
  6215						STOP		^
  6216	033475	254 04 0 00 033476 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  6217	033476	324 00 0 00 033477 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  6218									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  6219									;IN THE SUBTEST) TO LOOP ON ERROR^
  6220
  6221					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 89-13
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - FLT 1 + FLT 1                                          SEQ 0154

  6222
  6223
  6224					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ONE
  6225					;ADDED TO A FLOATING ONE IS A FLOATING ONE
  6226					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ONE.
  6227					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  6228					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  6229
  6230			045741		SN=SN+1
  6231			040000			XX=XX+XX
  6232						IFE	XX,<XX=1>
  6233	033477	515 00 0 00 040000 		HRLZI	XX		;PRELOAD AC WITH A FLOATING ONE
  6234	033500	270 00 0 00 034057 		ADD	[XX,,0]		;ADD A FLOATING ONE TO ITSELF	
  6235	033501	312 00 0 00 034060 		CAME	[XX+XX,,0]	;CHECK ADDER UPON FAILURE
  6236						STOP		^
  6237	033502	254 04 0 00 033503 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  6238	033503	324 00 0 00 033504 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  6239									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  6240									;IN THE SUBTEST) TO LOOP ON ERROR^
  6241
  6242					;**********
  6243
  6244
  6245					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ONE
  6246					;ADDED TO A FLOATING ONE IS A FLOATING ONE
  6247					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ONE.
  6248					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  6249					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  6250
  6251			045742		SN=SN+1
  6252			100000			XX=XX+XX
  6253						IFE	XX,<XX=1>
  6254	033504	515 00 0 00 100000 		HRLZI	XX		;PRELOAD AC WITH A FLOATING ONE
  6255	033505	270 00 0 00 034060 		ADD	[XX,,0]		;ADD A FLOATING ONE TO ITSELF	
  6256	033506	312 00 0 00 034061 		CAME	[XX+XX,,0]	;CHECK ADDER UPON FAILURE
  6257						STOP		^
  6258	033507	254 04 0 00 033510 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  6259	033510	324 00 0 00 033511 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  6260									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  6261									;IN THE SUBTEST) TO LOOP ON ERROR^
  6262
  6263					;**********
  6264
  6265
  6266					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ONE
  6267					;ADDED TO A FLOATING ONE IS A FLOATING ONE
  6268					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ONE.
  6269					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  6270					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  6271
  6272			045743		SN=SN+1
  6273			200000			XX=XX+XX
  6274						IFE	XX,<XX=1>
  6275	033511	515 00 0 00 200000 		HRLZI	XX		;PRELOAD AC WITH A FLOATING ONE
  6276	033512	270 00 0 00 034061 		ADD	[XX,,0]		;ADD A FLOATING ONE TO ITSELF	
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 89-14
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - FLT 1 + FLT 1                                          SEQ 0155

  6277	033513	312 00 0 00 034062 		CAME	[XX+XX,,0]	;CHECK ADDER UPON FAILURE
  6278						STOP		^
  6279	033514	254 04 0 00 033515 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  6280	033515	324 00 0 00 033516 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  6281									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  6282									;IN THE SUBTEST) TO LOOP ON ERROR^
  6283
  6284					;**********
  6285
  6286
  6287					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ONE
  6288					;ADDED TO A FLOATING ONE IS A FLOATING ONE
  6289					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ONE.
  6290					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ONE THRU ALL 36 BITS OF THE ADDER.
  6291					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  6292
  6293			045744		SN=SN+1
  6294			400000			XX=XX+XX
  6295						IFE	XX,<XX=1>
  6296	033516	515 00 0 00 400000 		HRLZI	XX		;PRELOAD AC WITH A FLOATING ONE
  6297	033517	270 00 0 00 034062 		ADD	[XX,,0]		;ADD A FLOATING ONE TO ITSELF	
  6298Q	033520	312 00 0 00 034127 		CAME	[XX+XX,,0]	;CHECK ADDER UPON FAILURE
  6299						STOP		^
  6300	033521	254 04 0 00 033522 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  6301	033522	324 00 0 00 033523 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  6302									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  6303									;IN THE SUBTEST) TO LOOP ON ERROR^
  6304
  6305					;**********
  6306
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 90
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - FLT 0 + 0FLT                                           SEQ 0156

  6307					SUBTTL	SUPPLEMENTARY ADDER TESTS - FLT 0 + 0FLT 
  6308
  6309					;**********
  6310
  6311			046000		SN=46000
  6312			000000			XX=0
  6313
  6314					B46000:	REPEAT	^D17,<
  6315					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO
  6316					;ADDED TO A FLOATING ZERO IS A FLOATING ZERO
  6317					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ZERO.
  6318					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  6319					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  6320					
  6321					SN=SN+1
  6322						XX=<XX+XX+1>&777777
  6323						IFE	<XX-1>,<XX=777776>
  6324						HRROI	XX		;PRELOAD AC WITH A FLOATING ZERO
  6325						ADD	[-1,,XX]	;ADD A FLOATING ZERO TO ITSELF
  6326						CAME	[-1,,<XX+XX>&777777]	;CHECK ADDER UPON FAILURE
  6327						STOP		
  6328					
  6329					;**********
  6330					>
  6331
  6332					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO
  6333					;ADDED TO A FLOATING ZERO IS A FLOATING ZERO
  6334					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ZERO.
  6335					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  6336					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  6337
  6338			046001		SN=SN+1
  6339			000001			XX=<XX+XX+1>&777777
  6340			777776			IFE	<XX-1>,<XX=777776>
  6341	033523	561 00 0 00 777776 		HRROI	XX		;PRELOAD AC WITH A FLOATING ZERO
  6342	033524	270 00 0 00 034063 		ADD	[-1,,XX]	;ADD A FLOATING ZERO TO ITSELF
  6343	033525	312 00 0 00 034130 		CAME	[-1,,<XX+XX>&777777]	;CHECK ADDER UPON FAILURE
  6344						STOP		^
  6345	033526	254 04 0 00 033527 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  6346	033527	324 00 0 00 033530 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  6347									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  6348									;IN THE SUBTEST) TO LOOP ON ERROR^
  6349
  6350					;**********
  6351
  6352
  6353					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO
  6354					;ADDED TO A FLOATING ZERO IS A FLOATING ZERO
  6355					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ZERO.
  6356					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  6357					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  6358
  6359			046002		SN=SN+1
  6360			777775			XX=<XX+XX+1>&777777
  6361						IFE	<XX-1>,<XX=777776>
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 90-1
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - FLT 0 + 0FLT                                           SEQ 0157

  6362	033530	561 00 0 00 777775 		HRROI	XX		;PRELOAD AC WITH A FLOATING ZERO
  6363	033531	270 00 0 00 034064 		ADD	[-1,,XX]	;ADD A FLOATING ZERO TO ITSELF
  6364	033532	312 00 0 00 034131 		CAME	[-1,,<XX+XX>&777777]	;CHECK ADDER UPON FAILURE
  6365						STOP		^
  6366	033533	254 04 0 00 033534 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  6367	033534	324 00 0 00 033535 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  6368									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  6369									;IN THE SUBTEST) TO LOOP ON ERROR^
  6370
  6371					;**********
  6372
  6373
  6374					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO
  6375					;ADDED TO A FLOATING ZERO IS A FLOATING ZERO
  6376					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ZERO.
  6377					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  6378					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  6379
  6380			046003		SN=SN+1
  6381			777773			XX=<XX+XX+1>&777777
  6382						IFE	<XX-1>,<XX=777776>
  6383	033535	561 00 0 00 777773 		HRROI	XX		;PRELOAD AC WITH A FLOATING ZERO
  6384	033536	270 00 0 00 034065 		ADD	[-1,,XX]	;ADD A FLOATING ZERO TO ITSELF
  6385	033537	312 00 0 00 034132 		CAME	[-1,,<XX+XX>&777777]	;CHECK ADDER UPON FAILURE
  6386						STOP		^
  6387	033540	254 04 0 00 033541 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  6388	033541	324 00 0 00 033542 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  6389									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  6390									;IN THE SUBTEST) TO LOOP ON ERROR^
  6391
  6392					;**********
  6393
  6394
  6395					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO
  6396					;ADDED TO A FLOATING ZERO IS A FLOATING ZERO
  6397					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ZERO.
  6398					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  6399					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  6400
  6401			046004		SN=SN+1
  6402			777767			XX=<XX+XX+1>&777777
  6403						IFE	<XX-1>,<XX=777776>
  6404	033542	561 00 0 00 777767 		HRROI	XX		;PRELOAD AC WITH A FLOATING ZERO
  6405	033543	270 00 0 00 034066 		ADD	[-1,,XX]	;ADD A FLOATING ZERO TO ITSELF
  6406	033544	312 00 0 00 034133 		CAME	[-1,,<XX+XX>&777777]	;CHECK ADDER UPON FAILURE
  6407						STOP		^
  6408	033545	254 04 0 00 033546 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  6409	033546	324 00 0 00 033547 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  6410									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  6411									;IN THE SUBTEST) TO LOOP ON ERROR^
  6412
  6413					;**********
  6414
  6415
  6416					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 90-2
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - FLT 0 + 0FLT                                           SEQ 0158

  6417					;ADDED TO A FLOATING ZERO IS A FLOATING ZERO
  6418					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ZERO.
  6419					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  6420					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  6421
  6422			046005		SN=SN+1
  6423			777757			XX=<XX+XX+1>&777777
  6424						IFE	<XX-1>,<XX=777776>
  6425	033547	561 00 0 00 777757 		HRROI	XX		;PRELOAD AC WITH A FLOATING ZERO
  6426	033550	270 00 0 00 034067 		ADD	[-1,,XX]	;ADD A FLOATING ZERO TO ITSELF
  6427	033551	312 00 0 00 034134 		CAME	[-1,,<XX+XX>&777777]	;CHECK ADDER UPON FAILURE
  6428						STOP		^
  6429	033552	254 04 0 00 033553 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  6430	033553	324 00 0 00 033554 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  6431									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  6432									;IN THE SUBTEST) TO LOOP ON ERROR^
  6433
  6434					;**********
  6435
  6436
  6437					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO
  6438					;ADDED TO A FLOATING ZERO IS A FLOATING ZERO
  6439					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ZERO.
  6440					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  6441					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  6442
  6443			046006		SN=SN+1
  6444			777737			XX=<XX+XX+1>&777777
  6445						IFE	<XX-1>,<XX=777776>
  6446	033554	561 00 0 00 777737 		HRROI	XX		;PRELOAD AC WITH A FLOATING ZERO
  6447	033555	270 00 0 00 034070 		ADD	[-1,,XX]	;ADD A FLOATING ZERO TO ITSELF
  6448	033556	312 00 0 00 034135 		CAME	[-1,,<XX+XX>&777777]	;CHECK ADDER UPON FAILURE
  6449						STOP		^
  6450	033557	254 04 0 00 033560 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  6451	033560	324 00 0 00 033561 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  6452									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  6453									;IN THE SUBTEST) TO LOOP ON ERROR^
  6454
  6455					;**********
  6456
  6457
  6458					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO
  6459					;ADDED TO A FLOATING ZERO IS A FLOATING ZERO
  6460					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ZERO.
  6461					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  6462					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  6463
  6464			046007		SN=SN+1
  6465			777677			XX=<XX+XX+1>&777777
  6466						IFE	<XX-1>,<XX=777776>
  6467	033561	561 00 0 00 777677 		HRROI	XX		;PRELOAD AC WITH A FLOATING ZERO
  6468	033562	270 00 0 00 034071 		ADD	[-1,,XX]	;ADD A FLOATING ZERO TO ITSELF
  6469	033563	312 00 0 00 034136 		CAME	[-1,,<XX+XX>&777777]	;CHECK ADDER UPON FAILURE
  6470						STOP		^
  6471	033564	254 04 0 00 033565 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 90-3
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - FLT 0 + 0FLT                                           SEQ 0159

  6472	033565	324 00 0 00 033566 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  6473									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  6474									;IN THE SUBTEST) TO LOOP ON ERROR^
  6475
  6476					;**********
  6477
  6478
  6479					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO
  6480					;ADDED TO A FLOATING ZERO IS A FLOATING ZERO
  6481					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ZERO.
  6482					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  6483					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  6484
  6485			046010		SN=SN+1
  6486			777577			XX=<XX+XX+1>&777777
  6487						IFE	<XX-1>,<XX=777776>
  6488	033566	561 00 0 00 777577 		HRROI	XX		;PRELOAD AC WITH A FLOATING ZERO
  6489	033567	270 00 0 00 034072 		ADD	[-1,,XX]	;ADD A FLOATING ZERO TO ITSELF
  6490	033570	312 00 0 00 034137 		CAME	[-1,,<XX+XX>&777777]	;CHECK ADDER UPON FAILURE
  6491						STOP		^
  6492	033571	254 04 0 00 033572 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  6493	033572	324 00 0 00 033573 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  6494									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  6495									;IN THE SUBTEST) TO LOOP ON ERROR^
  6496
  6497					;**********
  6498
  6499
  6500					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO
  6501					;ADDED TO A FLOATING ZERO IS A FLOATING ZERO
  6502					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ZERO.
  6503					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  6504					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  6505
  6506			046011		SN=SN+1
  6507			777377			XX=<XX+XX+1>&777777
  6508						IFE	<XX-1>,<XX=777776>
  6509	033573	561 00 0 00 777377 		HRROI	XX		;PRELOAD AC WITH A FLOATING ZERO
  6510	033574	270 00 0 00 034073 		ADD	[-1,,XX]	;ADD A FLOATING ZERO TO ITSELF
  6511	033575	312 00 0 00 034140 		CAME	[-1,,<XX+XX>&777777]	;CHECK ADDER UPON FAILURE
  6512						STOP		^
  6513	033576	254 04 0 00 033577 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  6514	033577	324 00 0 00 033600 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  6515									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  6516									;IN THE SUBTEST) TO LOOP ON ERROR^
  6517
  6518					;**********
  6519
  6520
  6521					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO
  6522					;ADDED TO A FLOATING ZERO IS A FLOATING ZERO
  6523					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ZERO.
  6524					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  6525					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  6526
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 90-4
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - FLT 0 + 0FLT                                           SEQ 0160

  6527			046012		SN=SN+1
  6528			776777			XX=<XX+XX+1>&777777
  6529						IFE	<XX-1>,<XX=777776>
  6530	033600	561 00 0 00 776777 		HRROI	XX		;PRELOAD AC WITH A FLOATING ZERO
  6531	033601	270 00 0 00 034074 		ADD	[-1,,XX]	;ADD A FLOATING ZERO TO ITSELF
  6532	033602	312 00 0 00 034141 		CAME	[-1,,<XX+XX>&777777]	;CHECK ADDER UPON FAILURE
  6533						STOP		^
  6534	033603	254 04 0 00 033604 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  6535	033604	324 00 0 00 033605 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  6536									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  6537									;IN THE SUBTEST) TO LOOP ON ERROR^
  6538
  6539					;**********
  6540
  6541
  6542					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO
  6543					;ADDED TO A FLOATING ZERO IS A FLOATING ZERO
  6544					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ZERO.
  6545					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  6546					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  6547
  6548			046013		SN=SN+1
  6549			775777			XX=<XX+XX+1>&777777
  6550						IFE	<XX-1>,<XX=777776>
  6551	033605	561 00 0 00 775777 		HRROI	XX		;PRELOAD AC WITH A FLOATING ZERO
  6552	033606	270 00 0 00 034075 		ADD	[-1,,XX]	;ADD A FLOATING ZERO TO ITSELF
  6553	033607	312 00 0 00 034142 		CAME	[-1,,<XX+XX>&777777]	;CHECK ADDER UPON FAILURE
  6554						STOP		^
  6555	033610	254 04 0 00 033611 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  6556	033611	324 00 0 00 033612 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  6557									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  6558									;IN THE SUBTEST) TO LOOP ON ERROR^
  6559
  6560					;**********
  6561
  6562
  6563					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO
  6564					;ADDED TO A FLOATING ZERO IS A FLOATING ZERO
  6565					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ZERO.
  6566					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  6567					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  6568
  6569			046014		SN=SN+1
  6570			773777			XX=<XX+XX+1>&777777
  6571						IFE	<XX-1>,<XX=777776>
  6572	033612	561 00 0 00 773777 		HRROI	XX		;PRELOAD AC WITH A FLOATING ZERO
  6573	033613	270 00 0 00 034076 		ADD	[-1,,XX]	;ADD A FLOATING ZERO TO ITSELF
  6574	033614	312 00 0 00 034143 		CAME	[-1,,<XX+XX>&777777]	;CHECK ADDER UPON FAILURE
  6575						STOP		^
  6576	033615	254 04 0 00 033616 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  6577	033616	324 00 0 00 033617 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  6578									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  6579									;IN THE SUBTEST) TO LOOP ON ERROR^
  6580
  6581					;**********
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 90-5
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - FLT 0 + 0FLT                                           SEQ 0161

  6582
  6583
  6584					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO
  6585					;ADDED TO A FLOATING ZERO IS A FLOATING ZERO
  6586					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ZERO.
  6587					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  6588					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  6589
  6590			046015		SN=SN+1
  6591			767777			XX=<XX+XX+1>&777777
  6592						IFE	<XX-1>,<XX=777776>
  6593	033617	561 00 0 00 767777 		HRROI	XX		;PRELOAD AC WITH A FLOATING ZERO
  6594	033620	270 00 0 00 034077 		ADD	[-1,,XX]	;ADD A FLOATING ZERO TO ITSELF
  6595	033621	312 00 0 00 034144 		CAME	[-1,,<XX+XX>&777777]	;CHECK ADDER UPON FAILURE
  6596						STOP		^
  6597	033622	254 04 0 00 033623 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  6598	033623	324 00 0 00 033624 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  6599									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  6600									;IN THE SUBTEST) TO LOOP ON ERROR^
  6601
  6602					;**********
  6603
  6604
  6605					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO
  6606					;ADDED TO A FLOATING ZERO IS A FLOATING ZERO
  6607					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ZERO.
  6608					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  6609					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  6610
  6611			046016		SN=SN+1
  6612			757777			XX=<XX+XX+1>&777777
  6613						IFE	<XX-1>,<XX=777776>
  6614	033624	561 00 0 00 757777 		HRROI	XX		;PRELOAD AC WITH A FLOATING ZERO
  6615	033625	270 00 0 00 034100 		ADD	[-1,,XX]	;ADD A FLOATING ZERO TO ITSELF
  6616	033626	312 00 0 00 034145 		CAME	[-1,,<XX+XX>&777777]	;CHECK ADDER UPON FAILURE
  6617						STOP		^
  6618	033627	254 04 0 00 033630 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  6619	033630	324 00 0 00 033631 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  6620									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  6621									;IN THE SUBTEST) TO LOOP ON ERROR^
  6622
  6623					;**********
  6624
  6625
  6626					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO
  6627					;ADDED TO A FLOATING ZERO IS A FLOATING ZERO
  6628					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ZERO.
  6629					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  6630					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  6631
  6632			046017		SN=SN+1
  6633			737777			XX=<XX+XX+1>&777777
  6634						IFE	<XX-1>,<XX=777776>
  6635	033631	561 00 0 00 737777 		HRROI	XX		;PRELOAD AC WITH A FLOATING ZERO
  6636	033632	270 00 0 00 034101 		ADD	[-1,,XX]	;ADD A FLOATING ZERO TO ITSELF
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 90-6
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - FLT 0 + 0FLT                                           SEQ 0162

  6637	033633	312 00 0 00 034146 		CAME	[-1,,<XX+XX>&777777]	;CHECK ADDER UPON FAILURE
  6638						STOP		^
  6639	033634	254 04 0 00 033635 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  6640	033635	324 00 0 00 033636 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  6641									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  6642									;IN THE SUBTEST) TO LOOP ON ERROR^
  6643
  6644					;**********
  6645
  6646
  6647					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO
  6648					;ADDED TO A FLOATING ZERO IS A FLOATING ZERO
  6649					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ZERO.
  6650					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  6651					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  6652
  6653			046020		SN=SN+1
  6654			677777			XX=<XX+XX+1>&777777
  6655						IFE	<XX-1>,<XX=777776>
  6656	033636	561 00 0 00 677777 		HRROI	XX		;PRELOAD AC WITH A FLOATING ZERO
  6657	033637	270 00 0 00 034102 		ADD	[-1,,XX]	;ADD A FLOATING ZERO TO ITSELF
  6658	033640	312 00 0 00 034147 		CAME	[-1,,<XX+XX>&777777]	;CHECK ADDER UPON FAILURE
  6659						STOP		^
  6660	033641	254 04 0 00 033642 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  6661	033642	324 00 0 00 033643 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  6662									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  6663									;IN THE SUBTEST) TO LOOP ON ERROR^
  6664
  6665					;**********
  6666
  6667
  6668					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO
  6669					;ADDED TO A FLOATING ZERO IS A FLOATING ZERO
  6670					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ZERO.
  6671					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  6672					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  6673
  6674			046021		SN=SN+1
  6675			577777			XX=<XX+XX+1>&777777
  6676						IFE	<XX-1>,<XX=777776>
  6677	033643	561 00 0 00 577777 		HRROI	XX		;PRELOAD AC WITH A FLOATING ZERO
  6678	033644	270 00 0 00 034103 		ADD	[-1,,XX]	;ADD A FLOATING ZERO TO ITSELF
  6679	033645	312 00 0 00 034150 		CAME	[-1,,<XX+XX>&777777]	;CHECK ADDER UPON FAILURE
  6680						STOP		^
  6681	033646	254 04 0 00 033647 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  6682	033647	324 00 0 00 033650 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  6683									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  6684									;IN THE SUBTEST) TO LOOP ON ERROR^
  6685
  6686					;**********
  6687
  6688					PAGE
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 90-7
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - FLT 0 + 0FLT                                           SEQ 0163

  6689					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO
  6690					;ADDED TO A FLOATING ZERO IS A FLOATING ZERO
  6691					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ZERO.
  6692					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  6693					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  6694
  6695			046022		SN=SN+1
  6696			377777			XX=<XX+XX+1>&777777
  6697	033650	561 00 0 00 377777 		HRROI	XX		;PRELOAD AC WITH A FLOATING ZERO
  6698	033651	270 00 0 00 034104 		ADD	[-1,,XX]	;ADD A FLOATING ZERO TO ITSELF
  6699	033652	312 00 0 00 034151 		CAME	[-2,,-2]	;CHECK ADDER UPON FAILURE
  6700						STOP		^
  6701	033653	254 04 0 00 033654 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  6702	033654	324 00 0 00 033655 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  6703									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  6704									;IN THE SUBTEST) TO LOOP ON ERROR^
  6705
  6706					;**********
  6707
  6708			000000			XX=0
  6709
  6710						REPEAT	^D18,<
  6711					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO
  6712					;ADDED TO A FLOATING ZERO IS A FLOATING ZERO
  6713					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ZERO.
  6714					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  6715					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  6716					
  6717					SN=SN+1
  6718						XX=<XX+XX+1>&777777
  6719						IFE	<XX-1>,<XX=777776>
  6720						HRLOI	XX		;PRELOAD AC WITH A FLOATING ZERO
  6721						ADD	[XX,,-1]	;ADD A FLOATING ZERO TO ITSELF
  6722						CAME	[XX+XX+1,,-2]	;CHECK ADDER UPON FAILURE
  6723						STOP		
  6724					
  6725					;**********
  6726					>
  6727
  6728					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO
  6729					;ADDED TO A FLOATING ZERO IS A FLOATING ZERO
  6730					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ZERO.
  6731					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  6732					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  6733
  6734			046023		SN=SN+1
  6735			000001			XX=<XX+XX+1>&777777
  6736			777776			IFE	<XX-1>,<XX=777776>
  6737	033655	525 00 0 00 777776 		HRLOI	XX		;PRELOAD AC WITH A FLOATING ZERO
  6738	033656	270 00 0 00 034105 		ADD	[XX,,-1]	;ADD A FLOATING ZERO TO ITSELF
  6739Q	033657	312 00 0 00 034152 		CAME	[XX+XX+1,,-2]	;CHECK ADDER UPON FAILURE
  6740						STOP		^
  6741	033660	254 04 0 00 033661 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  6742	033661	324 00 0 00 033662 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 90-8
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - FLT 0 + 0FLT                                           SEQ 0164

  6743									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  6744									;IN THE SUBTEST) TO LOOP ON ERROR^
  6745
  6746					;**********
  6747
  6748
  6749					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO
  6750					;ADDED TO A FLOATING ZERO IS A FLOATING ZERO
  6751					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ZERO.
  6752					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  6753					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  6754
  6755			046024		SN=SN+1
  6756			777775			XX=<XX+XX+1>&777777
  6757						IFE	<XX-1>,<XX=777776>
  6758	033662	525 00 0 00 777775 		HRLOI	XX		;PRELOAD AC WITH A FLOATING ZERO
  6759	033663	270 00 0 00 034106 		ADD	[XX,,-1]	;ADD A FLOATING ZERO TO ITSELF
  6760Q	033664	312 00 0 00 034153 		CAME	[XX+XX+1,,-2]	;CHECK ADDER UPON FAILURE
  6761						STOP		^
  6762	033665	254 04 0 00 033666 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  6763	033666	324 00 0 00 033667 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  6764									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  6765									;IN THE SUBTEST) TO LOOP ON ERROR^
  6766
  6767					;**********
  6768
  6769
  6770					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO
  6771					;ADDED TO A FLOATING ZERO IS A FLOATING ZERO
  6772					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ZERO.
  6773					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  6774					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  6775
  6776			046025		SN=SN+1
  6777			777773			XX=<XX+XX+1>&777777
  6778						IFE	<XX-1>,<XX=777776>
  6779	033667	525 00 0 00 777773 		HRLOI	XX		;PRELOAD AC WITH A FLOATING ZERO
  6780	033670	270 00 0 00 034107 		ADD	[XX,,-1]	;ADD A FLOATING ZERO TO ITSELF
  6781Q	033671	312 00 0 00 034154 		CAME	[XX+XX+1,,-2]	;CHECK ADDER UPON FAILURE
  6782						STOP		^
  6783	033672	254 04 0 00 033673 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  6784	033673	324 00 0 00 033674 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  6785									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  6786									;IN THE SUBTEST) TO LOOP ON ERROR^
  6787
  6788					;**********
  6789
  6790
  6791					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO
  6792					;ADDED TO A FLOATING ZERO IS A FLOATING ZERO
  6793					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ZERO.
  6794					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  6795					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 90-9
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - FLT 0 + 0FLT                                           SEQ 0165

  6796
  6797			046026		SN=SN+1
  6798			777767			XX=<XX+XX+1>&777777
  6799						IFE	<XX-1>,<XX=777776>
  6800	033674	525 00 0 00 777767 		HRLOI	XX		;PRELOAD AC WITH A FLOATING ZERO
  6801	033675	270 00 0 00 034110 		ADD	[XX,,-1]	;ADD A FLOATING ZERO TO ITSELF
  6802Q	033676	312 00 0 00 034155 		CAME	[XX+XX+1,,-2]	;CHECK ADDER UPON FAILURE
  6803						STOP		^
  6804	033677	254 04 0 00 033700 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  6805	033700	324 00 0 00 033701 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  6806									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  6807									;IN THE SUBTEST) TO LOOP ON ERROR^
  6808
  6809					;**********
  6810
  6811
  6812					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO
  6813					;ADDED TO A FLOATING ZERO IS A FLOATING ZERO
  6814					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ZERO.
  6815					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  6816					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  6817
  6818			046027		SN=SN+1
  6819			777757			XX=<XX+XX+1>&777777
  6820						IFE	<XX-1>,<XX=777776>
  6821	033701	525 00 0 00 777757 		HRLOI	XX		;PRELOAD AC WITH A FLOATING ZERO
  6822	033702	270 00 0 00 034111 		ADD	[XX,,-1]	;ADD A FLOATING ZERO TO ITSELF
  6823Q	033703	312 00 0 00 034156 		CAME	[XX+XX+1,,-2]	;CHECK ADDER UPON FAILURE
  6824						STOP		^
  6825	033704	254 04 0 00 033705 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  6826	033705	324 00 0 00 033706 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  6827									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  6828									;IN THE SUBTEST) TO LOOP ON ERROR^
  6829
  6830					;**********
  6831
  6832
  6833					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO
  6834					;ADDED TO A FLOATING ZERO IS A FLOATING ZERO
  6835					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ZERO.
  6836					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  6837					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  6838
  6839			046030		SN=SN+1
  6840			777737			XX=<XX+XX+1>&777777
  6841						IFE	<XX-1>,<XX=777776>
  6842	033706	525 00 0 00 777737 		HRLOI	XX		;PRELOAD AC WITH A FLOATING ZERO
  6843	033707	270 00 0 00 034112 		ADD	[XX,,-1]	;ADD A FLOATING ZERO TO ITSELF
  6844Q	033710	312 00 0 00 034157 		CAME	[XX+XX+1,,-2]	;CHECK ADDER UPON FAILURE
  6845						STOP		^
  6846	033711	254 04 0 00 033712 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  6847	033712	324 00 0 00 033713 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 90-10
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - FLT 0 + 0FLT                                           SEQ 0166

  6848									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  6849									;IN THE SUBTEST) TO LOOP ON ERROR^
  6850
  6851					;**********
  6852
  6853
  6854					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO
  6855					;ADDED TO A FLOATING ZERO IS A FLOATING ZERO
  6856					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ZERO.
  6857					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  6858					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  6859
  6860			046031		SN=SN+1
  6861			777677			XX=<XX+XX+1>&777777
  6862						IFE	<XX-1>,<XX=777776>
  6863	033713	525 00 0 00 777677 		HRLOI	XX		;PRELOAD AC WITH A FLOATING ZERO
  6864	033714	270 00 0 00 034113 		ADD	[XX,,-1]	;ADD A FLOATING ZERO TO ITSELF
  6865Q	033715	312 00 0 00 034160 		CAME	[XX+XX+1,,-2]	;CHECK ADDER UPON FAILURE
  6866						STOP		^
  6867	033716	254 04 0 00 033717 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  6868	033717	324 00 0 00 033720 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  6869									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  6870									;IN THE SUBTEST) TO LOOP ON ERROR^
  6871
  6872					;**********
  6873
  6874
  6875					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO
  6876					;ADDED TO A FLOATING ZERO IS A FLOATING ZERO
  6877					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ZERO.
  6878					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  6879					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  6880
  6881			046032		SN=SN+1
  6882			777577			XX=<XX+XX+1>&777777
  6883						IFE	<XX-1>,<XX=777776>
  6884	033720	525 00 0 00 777577 		HRLOI	XX		;PRELOAD AC WITH A FLOATING ZERO
  6885	033721	270 00 0 00 034114 		ADD	[XX,,-1]	;ADD A FLOATING ZERO TO ITSELF
  6886Q	033722	312 00 0 00 034161 		CAME	[XX+XX+1,,-2]	;CHECK ADDER UPON FAILURE
  6887						STOP		^
  6888	033723	254 04 0 00 033724 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  6889	033724	324 00 0 00 033725 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  6890									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  6891									;IN THE SUBTEST) TO LOOP ON ERROR^
  6892
  6893					;**********
  6894
  6895
  6896					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO
  6897					;ADDED TO A FLOATING ZERO IS A FLOATING ZERO
  6898					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ZERO.
  6899					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  6900					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 90-11
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - FLT 0 + 0FLT                                           SEQ 0167

  6901
  6902			046033		SN=SN+1
  6903			777377			XX=<XX+XX+1>&777777
  6904						IFE	<XX-1>,<XX=777776>
  6905	033725	525 00 0 00 777377 		HRLOI	XX		;PRELOAD AC WITH A FLOATING ZERO
  6906	033726	270 00 0 00 034115 		ADD	[XX,,-1]	;ADD A FLOATING ZERO TO ITSELF
  6907Q	033727	312 00 0 00 034162 		CAME	[XX+XX+1,,-2]	;CHECK ADDER UPON FAILURE
  6908						STOP		^
  6909	033730	254 04 0 00 033731 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  6910	033731	324 00 0 00 033732 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  6911									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  6912									;IN THE SUBTEST) TO LOOP ON ERROR^
  6913
  6914					;**********
  6915
  6916
  6917					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO
  6918					;ADDED TO A FLOATING ZERO IS A FLOATING ZERO
  6919					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ZERO.
  6920					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  6921					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  6922
  6923			046034		SN=SN+1
  6924			776777			XX=<XX+XX+1>&777777
  6925						IFE	<XX-1>,<XX=777776>
  6926	033732	525 00 0 00 776777 		HRLOI	XX		;PRELOAD AC WITH A FLOATING ZERO
  6927	033733	270 00 0 00 034116 		ADD	[XX,,-1]	;ADD A FLOATING ZERO TO ITSELF
  6928Q	033734	312 00 0 00 034163 		CAME	[XX+XX+1,,-2]	;CHECK ADDER UPON FAILURE
  6929						STOP		^
  6930	033735	254 04 0 00 033736 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  6931	033736	324 00 0 00 033737 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  6932									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  6933									;IN THE SUBTEST) TO LOOP ON ERROR^
  6934
  6935					;**********
  6936
  6937
  6938					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO
  6939					;ADDED TO A FLOATING ZERO IS A FLOATING ZERO
  6940					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ZERO.
  6941					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  6942					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  6943
  6944			046035		SN=SN+1
  6945			775777			XX=<XX+XX+1>&777777
  6946						IFE	<XX-1>,<XX=777776>
  6947	033737	525 00 0 00 775777 		HRLOI	XX		;PRELOAD AC WITH A FLOATING ZERO
  6948	033740	270 00 0 00 034117 		ADD	[XX,,-1]	;ADD A FLOATING ZERO TO ITSELF
  6949Q	033741	312 00 0 00 034164 		CAME	[XX+XX+1,,-2]	;CHECK ADDER UPON FAILURE
  6950						STOP		^
  6951	033742	254 04 0 00 033743 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  6952	033743	324 00 0 00 033744 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 90-12
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - FLT 0 + 0FLT                                           SEQ 0168

  6953									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  6954									;IN THE SUBTEST) TO LOOP ON ERROR^
  6955
  6956					;**********
  6957
  6958
  6959					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO
  6960					;ADDED TO A FLOATING ZERO IS A FLOATING ZERO
  6961					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ZERO.
  6962					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  6963					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  6964
  6965			046036		SN=SN+1
  6966			773777			XX=<XX+XX+1>&777777
  6967						IFE	<XX-1>,<XX=777776>
  6968	033744	525 00 0 00 773777 		HRLOI	XX		;PRELOAD AC WITH A FLOATING ZERO
  6969	033745	270 00 0 00 034120 		ADD	[XX,,-1]	;ADD A FLOATING ZERO TO ITSELF
  6970Q	033746	312 00 0 00 034165 		CAME	[XX+XX+1,,-2]	;CHECK ADDER UPON FAILURE
  6971						STOP		^
  6972	033747	254 04 0 00 033750 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  6973	033750	324 00 0 00 033751 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  6974									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  6975									;IN THE SUBTEST) TO LOOP ON ERROR^
  6976
  6977					;**********
  6978
  6979
  6980					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO
  6981					;ADDED TO A FLOATING ZERO IS A FLOATING ZERO
  6982					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ZERO.
  6983					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  6984					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  6985
  6986			046037		SN=SN+1
  6987			767777			XX=<XX+XX+1>&777777
  6988						IFE	<XX-1>,<XX=777776>
  6989	033751	525 00 0 00 767777 		HRLOI	XX		;PRELOAD AC WITH A FLOATING ZERO
  6990	033752	270 00 0 00 034121 		ADD	[XX,,-1]	;ADD A FLOATING ZERO TO ITSELF
  6991Q	033753	312 00 0 00 034166 		CAME	[XX+XX+1,,-2]	;CHECK ADDER UPON FAILURE
  6992						STOP		^
  6993	033754	254 04 0 00 033755 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  6994	033755	324 00 0 00 033756 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  6995									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  6996									;IN THE SUBTEST) TO LOOP ON ERROR^
  6997
  6998					;**********
  6999
  7000
  7001					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO
  7002					;ADDED TO A FLOATING ZERO IS A FLOATING ZERO
  7003					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ZERO.
  7004					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  7005					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 90-13
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - FLT 0 + 0FLT                                           SEQ 0169

  7006
  7007			046040		SN=SN+1
  7008			757777			XX=<XX+XX+1>&777777
  7009						IFE	<XX-1>,<XX=777776>
  7010	033756	525 00 0 00 757777 		HRLOI	XX		;PRELOAD AC WITH A FLOATING ZERO
  7011	033757	270 00 0 00 034122 		ADD	[XX,,-1]	;ADD A FLOATING ZERO TO ITSELF
  7012Q	033760	312 00 0 00 034167 		CAME	[XX+XX+1,,-2]	;CHECK ADDER UPON FAILURE
  7013						STOP		^
  7014	033761	254 04 0 00 033762 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  7015	033762	324 00 0 00 033763 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  7016									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  7017									;IN THE SUBTEST) TO LOOP ON ERROR^
  7018
  7019					;**********
  7020
  7021
  7022					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO
  7023					;ADDED TO A FLOATING ZERO IS A FLOATING ZERO
  7024					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ZERO.
  7025					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  7026					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  7027
  7028			046041		SN=SN+1
  7029			737777			XX=<XX+XX+1>&777777
  7030						IFE	<XX-1>,<XX=777776>
  7031	033763	525 00 0 00 737777 		HRLOI	XX		;PRELOAD AC WITH A FLOATING ZERO
  7032	033764	270 00 0 00 034123 		ADD	[XX,,-1]	;ADD A FLOATING ZERO TO ITSELF
  7033Q	033765	312 00 0 00 034170 		CAME	[XX+XX+1,,-2]	;CHECK ADDER UPON FAILURE
  7034						STOP		^
  7035	033766	254 04 0 00 033767 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  7036	033767	324 00 0 00 033770 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  7037									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  7038									;IN THE SUBTEST) TO LOOP ON ERROR^
  7039
  7040					;**********
  7041
  7042
  7043					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO
  7044					;ADDED TO A FLOATING ZERO IS A FLOATING ZERO
  7045					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ZERO.
  7046					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  7047					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  7048
  7049			046042		SN=SN+1
  7050			677777			XX=<XX+XX+1>&777777
  7051						IFE	<XX-1>,<XX=777776>
  7052	033770	525 00 0 00 677777 		HRLOI	XX		;PRELOAD AC WITH A FLOATING ZERO
  7053	033771	270 00 0 00 034124 		ADD	[XX,,-1]	;ADD A FLOATING ZERO TO ITSELF
  7054Q	033772	312 00 0 00 034171 		CAME	[XX+XX+1,,-2]	;CHECK ADDER UPON FAILURE
  7055						STOP		^
  7056	033773	254 04 0 00 033774 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  7057	033774	324 00 0 00 033775 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 90-14
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - FLT 0 + 0FLT                                           SEQ 0170

  7058									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  7059									;IN THE SUBTEST) TO LOOP ON ERROR^
  7060
  7061					;**********
  7062
  7063
  7064					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO
  7065					;ADDED TO A FLOATING ZERO IS A FLOATING ZERO
  7066					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ZERO.
  7067					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  7068					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  7069
  7070			046043		SN=SN+1
  7071			577777			XX=<XX+XX+1>&777777
  7072						IFE	<XX-1>,<XX=777776>
  7073	033775	525 00 0 00 577777 		HRLOI	XX		;PRELOAD AC WITH A FLOATING ZERO
  7074	033776	270 00 0 00 034125 		ADD	[XX,,-1]	;ADD A FLOATING ZERO TO ITSELF
  7075Q	033777	312 00 0 00 034172 		CAME	[XX+XX+1,,-2]	;CHECK ADDER UPON FAILURE
  7076						STOP		^
  7077	034000	254 04 0 00 034001 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  7078	034001	324 00 0 00 034002 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  7079									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  7080									;IN THE SUBTEST) TO LOOP ON ERROR^
  7081
  7082					;**********
  7083
  7084
  7085					;THIS TEST VERIFIES THAT THE RESULT OF A FLOATING ZERO
  7086					;ADDED TO A FLOATING ZERO IS A FLOATING ZERO
  7087					;PLACED ONE BIT POSITION LEFT OF THE ORIGINAL FLOATING ZERO.
  7088					;THIS TEST IS REPEATED 36 TIMES TO FLOAT A ZERO THRU ALL 36 BITS OF THE ADDER.
  7089					;THIS TEST IS DESIGNED TO TEST THE ADDER AND RELATED DATA PATHS ONLY.
  7090
  7091			046044		SN=SN+1
  7092			377777			XX=<XX+XX+1>&777777
  7093						IFE	<XX-1>,<XX=777776>
  7094	034002	525 00 0 00 377777 		HRLOI	XX		;PRELOAD AC WITH A FLOATING ZERO
  7095	034003	270 00 0 00 034126 		ADD	[XX,,-1]	;ADD A FLOATING ZERO TO ITSELF
  7096	034004	312 00 0 00 034063 		CAME	[XX+XX+1,,-2]	;CHECK ADDER UPON FAILURE
  7097						STOP		^
  7098	034005	254 04 0 00 034006 		HALT	.+1		;TEST FAILED IF PROGRAM HALTS HERE
  7099	034006	324 00 0 00 034007 		JUMPA	.+1		;IF TEST FAILS, CHANGE THIS INSTRUCTION (JUMPA .+1) TO
  7100									;JUMPA X (X IS THE ADDRESS OF THE FIRST INSTRUCTION
  7101									;IN THE SUBTEST) TO LOOP ON ERROR^
  7102
  7103					;**********
  7104
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 91
DAKACM	MAC	19-JAN-77 13:40		SUPPLEMENTARY ADDER TESTS - FLT 0 + 0FLT                                           SEQ 0171

  7105	034007	254 00 0 00 030057 		JRST	BEGEND
  7106					SUBTTL	*STOR* RESERVED STORAGE, JAN 18,1977
  7107
  7108					;PROGRAM LITERALS
  7109
  7110						XLIST
  7111					IFNDEF	$LPAPER,<LIST>
  7112	034010					LIT
  7113	034010	000001	000001
  7114	034011	254 00 0 00 030741 
  7115	034012	777777	777777
  7116	034013	777777	000000
  7117	034014	000000	000000
  7118	034015	000000	777777
  7119	034016	707070	707070
  7120	034017	000000	000001
  7121	034020	000000	000002
  7122	034021	000000	000004
  7123	034022	000000	000010
  7124	034023	000000	000020
  7125	034024	000000	000040
  7126	034025	000000	000100
  7127	034026	000000	000200
  7128	034027	000000	000400
  7129	034030	000000	001000
  7130	034031	000000	002000
  7131	034032	000000	004000
  7132	034033	000000	010000
  7133	034034	000000	020000
  7134	034035	000000	040000
  7135	034036	000000	100000
  7136	034037	000000	200000
  7137	034040	000000	400000
  7138	034041	000001	000000
  7139	034042	000002	000000
  7140	034043	000004	000000
  7141	034044	000010	000000
  7142	034045	000020	000000
  7143	034046	000040	000000
  7144	034047	000100	000000
  7145	034050	000200	000000
  7146	034051	000400	000000
  7147	034052	001000	000000
  7148	034053	002000	000000
  7149	034054	004000	000000
  7150	034055	010000	000000
  7151	034056	020000	000000
  7152	034057	040000	000000
  7153	034060	100000	000000
  7154	034061	200000	000000
  7155	034062	400000	000000
  7156	034063	777777	777776
  7157	034064	777777	777775
  7158	034065	777777	777773
  7159	034066	777777	777767
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 1
STOR	KLM	18-JAN-77 11:42		*STOR* RESERVED STORAGE, JAN 18,1977                                               SEQ 0172

  7160	034067	777777	777757
  7161	034070	777777	777737
  7162	034071	777777	777677
  7163	034072	777777	777577
  7164	034073	777777	777377
  7165	034074	777777	776777
  7166	034075	777777	775777
  7167	034076	777777	773777
  7168	034077	777777	767777
  7169	034100	777777	757777
  7170	034101	777777	737777
  7171	034102	777777	677777
  7172	034103	777777	577777
  7173	034104	777777	377777
  7174	034105	777776	777777
  7175	034106	777775	777777
  7176	034107	777773	777777
  7177	034110	777767	777777
  7178	034111	777757	777777
  7179	034112	777737	777777
  7180	034113	777677	777777
  7181	034114	777577	777777
  7182	034115	777377	777777
  7183	034116	776777	777777
  7184	034117	775777	777777
  7185	034120	773777	777777
  7186	034121	767777	777777
  7187	034122	757777	777777
  7188	034123	737777	777777
  7189	034124	677777	777777
  7190	034125	577777	777777
  7191	034126	377777	777777
  7192	034127	000000	000000
  7193	034130	777777	777774
  7194	034131	777777	777772
  7195	034132	777777	777766
  7196	034133	777777	777756
  7197	034134	777777	777736
  7198	034135	777777	777676
  7199	034136	777777	777576
  7200	034137	777777	777376
  7201	034140	777777	776776
  7202	034141	777777	775776
  7203	034142	777777	773776
  7204	034143	777777	767776
  7205	034144	777777	757776
  7206	034145	777777	737776
  7207	034146	777777	677776
  7208	034147	777777	577776
  7209	034150	777777	377776
  7210	034151	777776	777776
  7211	034152	777775	777776
  7212	034153	777773	777776
  7213	034154	777767	777776
  7214	034155	777757	777776
DAKAC PDP-10 KA10 BASIC INSTRUCTION DIAGNOSTIC (3) 0,2	MACRO %52(537) 14:24 19-JAN-77 PAGE 1-1
STOR	KLM	18-JAN-77 11:42		*STOR* RESERVED STORAGE, JAN 18,1977                                               SEQ 0173

  7215	034156	777737	777776
  7216	034157	777677	777776
  7217	034160	777577	777776
  7218	034161	777377	777776
  7219	034162	776777	777776
  7220	034163	775777	777776
  7221	034164	773777	777776
  7222	034165	767777	777776
  7223	034166	757777	777776
  7224	034167	737777	777776
  7225	034170	677777	777776
  7226	034171	577777	777776
  7227	034172	377777	777776
  7228						LIST
  7229	034173	000000	000000		ENDSLD:	0
  7230
  7231					IFDEF	DEBUG,<
  7232	034174				PATCH:	BLOCK DEBUG		;PATCHING AREA
  7233					>
  7234
  7235					;PROGRAM VARIABLES
  7236	034274					VAR
  7237
  7238					IFDEF	PGMEND,<
  7239	034274	000000	000000		END:	0
  7240			030000			END	BEGIN	>

%18 WARNINGS GIVEN
NO ERRORS DETECTED

PROGRAM BREAK IS 000000
ABSLUTE BREAK IS 034275
CPU TIME USED 00:28.959

11K CORE USED

ABORT	    86#
AC0	   681#                                                                                                            SEQ 0174
ALTMGO	   440#
ANXM	   354#
APR	   778	   779	   780
AROV	   354#
AROVU	   354#
AST	   555#
ATSIN	   556#
B12600	   886#
B12700	   909#
B13000	   926#
B13100	   944#
B13200	   960#
B13300	   986#
B13400	  1007#
B13600	  1025#
B14000	  1041#
B14100	  1064#
B14200	  1086#
B14400	  1110#
B14500	  1126#
B14600	  1144#
B14700	  1159#
B15000	  1183#
B15400	  1204#
B15500	  1221#
B15600	  1242#
B15700	  1258#
B16000	  1280#
B16100	  1295#
B16200	  1312#
B16300	  1338#
B16400	  1360#
B16500	  1382#
B16600	  1397#
B16700	  1421#
B17000	  1437#
B17300	  1455#
B17400	  1468#
B17700	  1482#
B20000	  1494#
B20400	  1509#
B20600	  1524#
B20700	  1539#
B21000	  1559#
B21100	  1580#
B21400	  1597#
B21500	  1631#
B21600	  1648#
B21700	  1666#
B22200	  1683#
B22300	  1701#
B22400	  1724#
B22500	  1742#                                                                                                            SEQ 0175
B22600	  1759#
B22700	  1778#
B23000	  1801#
B23200	  1822#
B23400	  1839#
B23600	  1855#
B23700	  1872#
B24000	  1887#
B24300	  1909#
B24400	  1931#
B24500	  1948#
B24600	  1964#
B24700	  1980#
B25000	  2001#
B25100	  2018#
B25200	  2034#
B25300	  2051#
B25400	  2067#
B25500	  2084#
B25600	  2100#
B25700	  2117#
B26000	  2132#
B26100	  2149#
B26200	  2164#
B26300	  2180#
B26500	  2201#
B26600	  2222#
B26700	  2237#
B27000	  2258#
B27100	  2278#
B27200	  2294#
B27300	  2309#
B27400	  2330#
B27500	  2345#
B27600	  2361#
B27700	  2376#
B30000	  2392#
B30100	  2407#
B30400	  2428#
B30500	  2443#
B30600	  2464#
B30700	  2485#
B31000	  2501#
B31100	  2516#
B31200	  2532#
B31300	  2547#
B31400	  2563#
B31500	  2578#
B31600	  2594#
B31700	  2609#
B32000	  2625#
B32100	  2640#
B32200	  2664#                                                                                                            SEQ 0176
B32300	  2679#
B32600	  2700#
B32700	  2715#
B33000	  2738#
B33100	  2759#
B33200	  2775#
B33300	  2791#
B33400	  2812#
B33500	  2833#
B33600	  2849#
B33700	  2865#
B34000	  2886#
B34100	  2902#
B34200	  2918#
B34300	  2933#
B34400	  2949#
B34500	  2964#
B34600	  2980#
B34700	  2995#
B35000	  3011#
B35500	  3034#
B35600	  3059#
B35700	  3076#
B36000	  3106#
B36100	  3122#
B36200	  3143#
B36300	  3163#
B36400	  3184#
B36500	  3204#
B36600	  3225#
B37100	  3245#
B37200	  3267#
B37300	  3288#
B37400	  3304#
B37500	  3319#
B37600	  3335#
B37700	  3350#
B40000	  3366#
B40100	  3381#
B40200	  3397#
B40300	  3413#
B40400	  3430#
B40700	  3446#
B41000	  3468#
B41100	  3490#
B41200	  3507#
B41500	  3523#
B41600	  3545#
B42000	  3568#
B42200	  3585#
B42300	  3601#
B42500	  3626#
B42700	  3641#                                                                                                            SEQ 0177
B43000	  3664#
B43100	  3686#
B43400	  3703#
B43500	  3718#
B43600	  3741#
B43700	  3761#
B44000	  3784#
B44100	  3800#
B44200	  3818#
B44300	  3835#
B44500	  3858#
B44600	  3878#
B44700	  3895#
B45000	  3910#
B45100	  3926#
B45200	  3941#
B45400	  3967#
B45500	  3995#
B45600	  4755#
B45700	  5517#
B46000	  6314#
BEGEND	   436#	  7105
BEGIN	   300	   301	   367#	   724	   846	  7240
BEGIN1	   383#	   437
BELL	   559#
BIS	   354#
CCA	   354#
CHAIN	   106#
CHNOFF	   354#
CHNON	   354#
CLK	   354#
CLKCLR	   354#
CLKDIS	   354#
CLKENB	   354#
CLKU	   354#
CLOCKF	   422#
CNTLC	   439#
COMMA	   548#
CONSW	   423#
CPOPJ	   443#
CPOPJ1	   441#
CRLF	   235	   236	   543#
CRLF2	   239	   240	   545#
CRY0	   354#
CRY1	   354#
CSHFLG	   602#
CSHMEM	   603#
CYCL60	   596#
DCK	   354#
DDT	   683#
DDTLNK	   120#	   381
DDTSRT	   381#
DEBUG	    35#	  7231	  7232                                                                                             SEQ 0178
DECVER	     5#	    11	    27	   402
DF22F	   507#
DIAGMN	   370#
DIAGNO	   682#
DIAMON	   684#
DING	    92#
DOLLAR	   562#
DONG11	   685#	   825	   841
DSKUPD	   407
DTE	   689#	   825	   827	   841	   843
DTE0	   690#
DTE1	   691#
DTE2	   692#
DTE3	   693#
END	  7239#
ENDFIX	   676#
ENDSLD	  7229#
ERMORE	   456#
ERRPC	   427#
ERRTLS	   428#
ERSTOP	    95#
EXCASB	    32#	   405
EXIOT	   354#
FOV	   354#
FOVU	   354#
FRDLNK	   118#
FSELNK	   117#
FXU	   354#
HYPEN	   553#
INHCSH	   103#
INHPAG	   100#
INXM	   354#
IOCLR	   354#
ITERAT	    73#	   400
ITRCH1	   460#
ITRCNT	   400#	   770	   799	   803	   811	   812	   816
JOB41	   354#
JOBAPR	   354#
JOBCNI	   354#
JOBDDT	   354#
JOBFF	   354#
JOBOPC	   354#
JOBREL	   354#
JOBREN	   354#
JOBSA	   354#
JOBSYM	   354#
JOBTPC	   354#
JOBUSY	   354#
JOBUUO	   354#
JOBVER	   354#
KA10	   354
KAHZ50	   108#
KAIFLG	   417#                                                                                                            SEQ 0179
KI10	   354
KL10	   354
KLFLG	   418#	   772	   790	   809
KLOLD	   315
KLTYP	   634#	   771	   782	   824	   826	   840	   842
LDLNK	   119#	   370	   372
LFP	   557#
LOOPER	    94#
LUUO	   354#
LUUO1	   487	   488
LUUO10	   487	   492
LUUO11	   487	   492
LUUO12	   487	   493
LUUO13	   487	   493
LUUO14	   487	   494
LUUO15	   487	   494
LUUO16	   487	   495
LUUO17	   487	   495
LUUO2	   487	   489
LUUO20	   487	   496
LUUO21	   487	   496
LUUO22	   487	   497
LUUO23	   487	   497
LUUO24	   487	   498
LUUO25	   487	   498
LUUO26	   487	   499
LUUO27	   487	   499
LUUO3	   487	   489
LUUO30	   487	   500
LUUO31	   487	   500
LUUO32	   487	   501
LUUO33	   487	   501
LUUO4	   487	   490
LUUO5	   487	   490
LUUO6	   487	   491
LUUO7	   487	   491
LUUOI	   354#
MAPNEW	   508#
MARGIN	   430#
MCNVER	     6#	    11	    27	   402
MEMLOW	   510#
MEMMAP	   408
MEMSIZ	   511#
MEMTOT	   509#
MINUS	   552#
MODDVC	   102#
MODDVL	   300	   300#	   403
MODDVU	   301	   301#	   404
MODLNK	   121#	   367
MONCTL	   420#	   819	   859
MONFLG	   419#	   764	   855
MONTEN	   421#	   769	   805	   834
MPVU	   354#                                                                                                            SEQ 0180
NOPNT	    90#
NXMU	   354#
OPRSEL	   104#
OPTIME	   522#
P	   147	   148	   149	   150	   354#	   442
PAG	   354#
PALERS	    96#
PARCLR	   354#
PARDIS	   354#
PAREA0	    66#
PAREA1	    67#	   398
PAREA2	    68#	   399
PAREA3	    69#	   396
PAREA4	    70#	   397
PAREA5	    71#	   409
PAREA6	    72#	   410
PAREA7	   409#
PAREA8	   410#
PARENB	   354#
PARU	   354#
PASCNT	   424#	   798
PATCH	  7232#
PDISF	   519#
PDLOVU	   354#
PERIOD	   549#
PFSTRT	   376#
PGMEND	    34#	    74#	  7238
PGMNAM	   401	   860	   863#
PI	   811
PICHN1	   354#
PICHN2	   354#
PICHN3	   354#
PICHN4	   354#
PICHN5	   354#
PICHN6	   354#
PICHN7	   354#
PICHNA	   354#
PICLR	   354#
PIOFF	   354#
PION	   354#
PLIST	   588#	   588
PLISTE	   588	   590#	   674
PLISTS	   589#
PLUS	   554#
PNTENB	   518#
PNTEXT	   397#
PNTFLG	   517#
PNTINH	   520#
PNTLPT	    91#
PNTNAM	   396#
PNTSPC	   521#
PVPAGI	   615#
PWFCLR	   354#                                                                                                            SEQ 0181
QUEST	   560#
RADIX	   563#
RADLSC	   565#
RADLSP	   564#
RANDBS	   398#
REENTR	   378#
RELIAB	    98#
REPT	   354#
REPT1	   354#
REPTU	   476#
REQSET	   354#
RESRT1	   453#
RESRT2	   454#
RETURN	   385#	   807	   814	   835
RSTART	    87#
RTP	   558#
RUNFLG	   425#
SADR1	    54#	   374
SADR10	    63#	   390
SADR11	    64#	   391
SADR2	    55#	   376
SADR3	    56#	   378
SADR4	    57#
SADR5	    58#	   439
SADR6	    59#	   440
SADR7	    60#	   387
SADR8	    61#	   388
SADR9	    62#	   389
SBINIT	   160	   384#
SCOPE	   477#
SFSTRT	   374#
SLASH	   561#
SN	  3992#	  4017	  4017#	  4037	  4037#	  4057	  4057#	  4077	  4077#	  4097	  4097#	  4117	  4117#	  4137
	  4137#	  4157	  4157#	  4177	  4177#	  4197	  4197#	  4217	  4217#	  4237	  4237#	  4257	  4257#	  4277
	  4277#	  4297	  4297#	  4317	  4317#	  4337	  4337#	  4357	  4357#	  4396	  4396#	  4416	  4416#	  4436
	  4436#	  4456	  4456#	  4476	  4476#	  4496	  4496#	  4516	  4516#	  4536	  4536#	  4556	  4556#	  4576
	  4576#	  4596	  4596#	  4616	  4616#	  4636	  4636#	  4656	  4656#	  4676	  4676#	  4696	  4696#	  4716
	  4716#	  4736	  4736#	  4754#	  4777	  4777#	  4797	  4797#	  4817	  4817#	  4837	  4837#	  4857	  4857#
	  4877	  4877#	  4897	  4897#	  4917	  4917#	  4937	  4937#	  4957	  4957#	  4977	  4977#	  4997	  4997#
	  5017	  5017#	  5037	  5037#	  5057	  5057#	  5077	  5077#	  5097	  5097#	  5117	  5117#	  5156	  5156#
	  5176	  5176#	  5196	  5196#	  5216	  5216#	  5236	  5236#	  5256	  5256#	  5276	  5276#	  5296	  5296#
	  5316	  5316#	  5336	  5336#	  5356	  5356#	  5376	  5376#	  5396	  5396#	  5416	  5416#	  5436	  5436#
	  5456	  5456#	  5476	  5476#	  5496	  5496#	  5514#	  5541	  5541#	  5562	  5562#	  5583	  5583#	  5604
	  5604#	  5625	  5625#	  5646	  5646#	  5667	  5667#	  5688	  5688#	  5709	  5709#	  5730	  5730#	  5751
	  5751#	  5772	  5772#	  5793	  5793#	  5814	  5814#	  5835	  5835#	  5856	  5856#	  5877	  5877#	  5897
	  5897#	  5936	  5936#	  5957	  5957#	  5978	  5978#	  5999	  5999#	  6020	  6020#	  6041	  6041#	  6062
	  6062#	  6083	  6083#	  6104	  6104#	  6125	  6125#	  6146	  6146#	  6167	  6167#	  6188	  6188#	  6209
	  6209#	  6230	  6230#	  6251	  6251#	  6272	  6272#	  6293	  6293#	  6311#	  6338	  6338#	  6359	  6359#
	  6380	  6380#	  6401	  6401#	  6422	  6422#	  6443	  6443#	  6464	  6464#	  6485	  6485#	  6506	  6506#
	  6527	  6527#	  6548	  6548#	  6569	  6569#	  6590	  6590#	  6611	  6611#	  6632	  6632#	  6653	  6653#
	  6674	  6674#	  6695	  6695#	  6734	  6734#	  6755	  6755#	  6776	  6776#	  6797	  6797#	  6818	  6818#
	  6839	  6839#	  6860	  6860#	  6881	  6881#	  6902	  6902#	  6923	  6923#	  6944	  6944#	  6965	  6965#
	  6986	  6986#	  7007	  7007#	  7028	  7028#	  7049	  7049#	  7070	  7070#	  7091	  7091#                    SEQ 0182
SPACE	   550#
SRTDDT	   380#
START	   368	   767	   776	   791	   795	   851#
START1	   387#
START2	   388#
START3	   389#
START4	   390#
START5	   391#
STARTA	    54	    55	    56	    57	    58	    59	    60	    61	    62	    63	    64	   383	   793	   804
	   813	   820	   830	   858	   861	   876#
SUBLNK	   122#	   384
SWTEXR	   399#
SYSEXR	   372#
TAB	   551#
TESTPC	   426#
TICKS	   429#
TOTALS	    88#
TTNBRF	   609#
TTYFIL	   525#
TTYSPD	   526#
TXTINH	    99#
USER	   416#	   760	   763	   765	   766	   800	   851#	   851	   854	   856	   857
USERF	    38#	   354#	   762	   853
USRASB	    33#	   406
USRCRF	   535#
USRLFF	   534#
UUODIS	   488#
UUOEXT	   444#
UUORTN	   445#
UUOSKP	   442#
XX	  3993#	  4018	  4018#	  4019	  4019#	  4020	  4022	  4038	  4038#	  4039	  4040	  4042	  4058	  4058#
	  4059	  4060	  4062	  4078	  4078#	  4079	  4080	  4082	  4098	  4098#	  4099	  4100	  4102	  4118
	  4118#	  4119	  4120	  4122	  4138	  4138#	  4139	  4140	  4142	  4158	  4158#	  4159	  4160	  4162
	  4178	  4178#	  4179	  4180	  4182	  4198	  4198#	  4199	  4200	  4202	  4218	  4218#	  4219	  4220
	  4222	  4238	  4238#	  4239	  4240	  4242	  4258	  4258#	  4259	  4260	  4262	  4278	  4278#	  4279
	  4280	  4282	  4298	  4298#	  4299	  4300	  4302	  4318	  4318#	  4319	  4320	  4322	  4338	  4338#
	  4339	  4340	  4342	  4358	  4358#	  4359	  4360	  4362	  4372#	  4397	  4397#	  4398	  4398#	  4399
	  4401	  4417	  4417#	  4418	  4419	  4421	  4437	  4437#	  4438	  4439	  4441	  4457	  4457#	  4458
	  4459	  4461	  4477	  4477#	  4478	  4479	  4481	  4497	  4497#	  4498	  4499	  4501	  4517	  4517#
	  4518	  4519	  4521	  4537	  4537#	  4538	  4539	  4541	  4557	  4557#	  4558	  4559	  4561	  4577
	  4577#	  4578	  4579	  4581	  4597	  4597#	  4598	  4599	  4601	  4617	  4617#	  4618	  4619	  4621
	  4637	  4637#	  4638	  4639	  4641	  4657	  4657#	  4658	  4659	  4661	  4677	  4677#	  4678	  4679
	  4681	  4697	  4697#	  4698	  4699	  4701	  4717	  4717#	  4718	  4719	  4721	  4737	  4737#	  4738
	  4739	  4741	  4778	  4778#	  4779	  4779#	  4781	  4782	  4798	  4798#	  4799	  4801	  4802	  4818
	  4818#	  4819	  4821	  4822	  4838	  4838#	  4839	  4841	  4842	  4858	  4858#	  4859	  4861	  4862
	  4878	  4878#	  4879	  4881	  4882	  4898	  4898#	  4899	  4901	  4902	  4918	  4918#	  4919	  4921
	  4922	  4938	  4938#	  4939	  4941	  4942	  4958	  4958#	  4959	  4961	  4962	  4978	  4978#	  4979
	  4981	  4982	  4998	  4998#	  4999	  5001	  5002	  5018	  5018#	  5019	  5021	  5022	  5038	  5038#
	  5039	  5041	  5042	  5058	  5058#	  5059	  5061	  5062	  5078	  5078#	  5079	  5081	  5082	  5098
	  5098#	  5099	  5101	  5102	  5118	  5118#	  5119	  5121	  5122	  5132#	  5157	  5157#	  5158	  5158#
	  5160	  5161	  5177	  5177#	  5178	  5180	  5181	  5197	  5197#	  5198	  5200	  5201	  5217	  5217#
	  5218	  5220	  5221	  5237	  5237#	  5238	  5240	  5241	  5257	  5257#	  5258	  5260	  5261	  5277
	  5277#	  5278	  5280	  5281	  5297	  5297#	  5298	  5300	  5301	  5317	  5317#	  5318	  5320	  5321     SEQ 0183
	  5337	  5337#	  5338	  5340	  5341	  5357	  5357#	  5358	  5360	  5361	  5377	  5377#	  5378	  5380
	  5381	  5397	  5397#	  5398	  5400	  5401	  5417	  5417#	  5418	  5420	  5421	  5437	  5437#	  5438
	  5440	  5441	  5457	  5457#	  5458	  5460	  5461	  5477	  5477#	  5478	  5480	  5481	  5497	  5497#
	  5498	  5500	  5501	  5515#	  5542	  5542#	  5543	  5543#	  5544	  5545	  5546	  5563	  5563#	  5564
	  5565	  5566	  5567	  5584	  5584#	  5585	  5586	  5587	  5588	  5605	  5605#	  5606	  5607	  5608
	  5609	  5626	  5626#	  5627	  5628	  5629	  5630	  5647	  5647#	  5648	  5649	  5650	  5651	  5668
	  5668#	  5669	  5670	  5671	  5672	  5689	  5689#	  5690	  5691	  5692	  5693	  5710	  5710#	  5711
	  5712	  5713	  5714	  5731	  5731#	  5732	  5733	  5734	  5735	  5752	  5752#	  5753	  5754	  5755
	  5756	  5773	  5773#	  5774	  5775	  5776	  5777	  5794	  5794#	  5795	  5796	  5797	  5798	  5815
	  5815#	  5816	  5817	  5818	  5819	  5836	  5836#	  5837	  5838	  5839	  5840	  5857	  5857#	  5858
	  5859	  5860	  5861	  5878	  5878#	  5879	  5880	  5881	  5882	  5898	  5898#	  5899	  5900	  5910#
	  5937	  5937#	  5938	  5938#	  5939	  5940	  5941	  5958	  5958#	  5959	  5960	  5961	  5962	  5979
	  5979#	  5980	  5981	  5982	  5983	  6000	  6000#	  6001	  6002	  6003	  6004	  6021	  6021#	  6022
	  6023	  6024	  6025	  6042	  6042#	  6043	  6044	  6045	  6046	  6063	  6063#	  6064	  6065	  6066
	  6067	  6084	  6084#	  6085	  6086	  6087	  6088	  6105	  6105#	  6106	  6107	  6108	  6109	  6126
	  6126#	  6127	  6128	  6129	  6130	  6147	  6147#	  6148	  6149	  6150	  6151	  6168	  6168#	  6169
	  6170	  6171	  6172	  6189	  6189#	  6190	  6191	  6192	  6193	  6210	  6210#	  6211	  6212	  6213
	  6214	  6231	  6231#	  6232	  6233	  6234	  6235	  6252	  6252#	  6253	  6254	  6255	  6256	  6273
	  6273#	  6274	  6275	  6276	  6277	  6294	  6294#	  6295	  6296	  6297	  6298	  6312#	  6339	  6339#
	  6340	  6340#	  6341	  6342	  6343	  6360	  6360#	  6361	  6362	  6363	  6364	  6381	  6381#	  6382
	  6383	  6384	  6385	  6402	  6402#	  6403	  6404	  6405	  6406	  6423	  6423#	  6424	  6425	  6426
	  6427	  6444	  6444#	  6445	  6446	  6447	  6448	  6465	  6465#	  6466	  6467	  6468	  6469	  6486
	  6486#	  6487	  6488	  6489	  6490	  6507	  6507#	  6508	  6509	  6510	  6511	  6528	  6528#	  6529
	  6530	  6531	  6532	  6549	  6549#	  6550	  6551	  6552	  6553	  6570	  6570#	  6571	  6572	  6573
	  6574	  6591	  6591#	  6592	  6593	  6594	  6595	  6612	  6612#	  6613	  6614	  6615	  6616	  6633
	  6633#	  6634	  6635	  6636	  6637	  6654	  6654#	  6655	  6656	  6657	  6658	  6675	  6675#	  6676
	  6677	  6678	  6679	  6696	  6696#	  6697	  6698	  6708#	  6735	  6735#	  6736	  6736#	  6737	  6738
	  6739	  6756	  6756#	  6757	  6758	  6759	  6760	  6777	  6777#	  6778	  6779	  6780	  6781	  6798
	  6798#	  6799	  6800	  6801	  6802	  6819	  6819#	  6820	  6821	  6822	  6823	  6840	  6840#	  6841
	  6842	  6843	  6844	  6861	  6861#	  6862	  6863	  6864	  6865	  6882	  6882#	  6883	  6884	  6885
	  6886	  6903	  6903#	  6904	  6905	  6906	  6907	  6924	  6924#	  6925	  6926	  6927	  6928	  6945
	  6945#	  6946	  6947	  6948	  6949	  6966	  6966#	  6967	  6968	  6969	  6970	  6987	  6987#	  6988
	  6989	  6990	  6991	  7008	  7008#	  7009	  7010	  7011	  7012	  7029	  7029#	  7030	  7031	  7032
	  7033	  7050	  7050#	  7051	  7052	  7053	  7054	  7071	  7071#	  7072	  7073	  7074	  7075	  7092
	  7092#	  7093	  7094	  7095	  7096
$$420	   734#
$$421	   735#
$$422	   736#
$$423	   737#
$$424	   738#
$$425	   739#
$$426	   740#
$$427	   741#
$$430	   742#
$$431	   743#
$$432	   744#
$$433	   745#
$$434	   746#
$$435	   747#
$$436	   748#
$$437	   749#
$$500	   752#
$$501	   753#                                                                                                            SEQ 0184
$$502	   754#
$$503	   755#
$$BEGI	   720#
$$DTE0	   786	   825#
$$DTE1	   787	   827#
$$DTE2	   788	   841#
$$DTE3	   789	   843#
$$LOC	   717#	   756
$$MUUO	   640#
$$OUTE	   646#
$$STAR	   720	   721	   760#
$$TAX1	   658#
$$TAX2	   659#
$$TOGG	   652#
$$UUO	   629#
$ACC0	   467#
$BEGEN	   729#
$BEND1	   437#
$BEND2	   438#
$CHRIN	   528#
$CRLF	   530#
$DDT	   698#
$DEVCH	   354#
$DSKUP	   407#
$DTCHR	   710#
$DTCI	   704#
$DTCLK	   703#	   784
$DTCMD	   707#	   822	   838
$DTF11	   706#
$DTFLG	   702#	   783	   823	   828	   839	   844
$DTMTD	   711#
$DTMTI	   712#
$DTOPR	   709#	   785
$DTSEQ	   708#
$DTSWR	   714#
$DTT11	   705#
$DVCH1	   354#
$DVOFF	   524#
$EMODE	   405#
$ENDFX	   674#	   675
$FFF	   532#
$IBUF	   580#
$INEXT	   582#
$INNM	   581#
$ITRHL	   448#
$ITRX1	   449#
$LPAPE	  7111
$MMAP	   408#
$MODVL	   403#
$MODVU	   404#
$OBUF	   571#
$ONETM	   431#
$OUTEX	   573#                                                                                                            SEQ 0185
$OUTNM	   572#
$PAPER	   354
$PARER	   455#
$PNAME	   401#
$PSHER	   459#
$PVER	   402#
$RSRTX	   451#
$RSRTY	   452#
$SPAG1	   471#
$SPB1	   794	   800#
$SPBEN	   729	   798#
$SPBEX	   801	   809#
$SPBKL	   810	   816#
$SPBUS	   803#
$SPEC	   726	   793#
$SPKLD	   817	   834#
$START	   368#
$STD	   697#	   724#
$STKIL	   769#
$STKL	   778#
$STL	   699#
$STM	   700#	   726#
$SVAPR	   469#
$SVPAG	   470#
$SVPI	   468#
$SVUPC	   474#
$SVUUO	   473#
$TABF	   531#
$TTCHR	   527#
$TWCNT	   523#
$TYPNB	   529#
$UMODE	   406#
$UORTX	   446#
$USRHL	   450#
$UUOER	   447#	   488
$VTF	   533#
%ACTFL	   480#
%ACTUL	   481#
%COREC	   479#
%CORFL	   478#
%DISCR	   482#
%ERHI1	   621#
%ERHI2	   622#
%ERHI3	   623#
.JB41	   354#
.JBAPR	   354#
.JBCNI	   354#
.JBDDT	   354#
.JBFF	   354#
.JBOPC	   354#
.JBREL	   354#
.JBREN	   354#
.JBSA	   354#                                                                                                            SEQ 0186
.JBSYM	   354#
.JBTPC	   354#
.JBUSY	   354#
.JBUUO	   354#
.JBVER	   354#
CFLUSH	   271#
CINVAL	   270#                                                                                                            SEQ 0187
CLOKOP	   265#
CWRTBI	   272#
DROPDV	   232#
ENDUUO	   278#	   436
EOPUUO	   279#	   438
ERLOOP	   323#
ERLP1	   324#
ERLP2	   325#
ERRHLT	   167#
ERROR	   332#
ERROR1	   344#
ERUUO	   322#
EXIT	   806
FATAL	   166#
FRD36	   307#
FRD8	   308#
FREAD	   306#
FSELEC	   305#
GET	   150#
GO	   147#
HALT	   152#	   457	   734	   736	   737	   741	   755	   846	   891	   914	   931	   949	   965	   991
	  1012	  1030	  1046	  1069	  1091	  1115	  1131	  1149	  1164	  1188	  1209	  1226	  1247	  1261
	  1284	  1299	  1316	  1341	  1364	  1385	  1400	  1424	  1440	  1459	  1472	  1485	  1497	  1513
	  1527	  1543	  1563	  1584	  1601	  1635	  1652	  1670	  1687	  1705	  1728	  1746	  1763	  1782
	  1805	  1826	  1843	  1859	  1876	  1891	  1913	  1935	  1952	  1968	  1984	  2005	  2022	  2038
	  2055	  2071	  2088	  2104	  2121	  2136	  2153	  2168	  2184	  2205	  2226	  2241	  2262	  2282
	  2298	  2313	  2334	  2349	  2365	  2380	  2396	  2411	  2432	  2447	  2468	  2489	  2505	  2520
	  2536	  2551	  2567	  2582	  2598	  2613	  2629	  2644	  2668	  2683	  2704	  2719	  2742	  2763
	  2779	  2795	  2816	  2837	  2853	  2869	  2890	  2906	  2922	  2937	  2953	  2968	  2984	  2999
	  3015	  3039	  3064	  3081	  3111	  3126	  3147	  3167	  3188	  3208	  3229	  3249	  3271	  3292
	  3308	  3323	  3339	  3354	  3370	  3385	  3401	  3417	  3434	  3450	  3472	  3494	  3511	  3527
	  3549	  3572	  3589	  3605	  3630	  3645	  3668	  3690	  3707	  3722	  3744	  3765	  3788	  3804
	  3822	  3839	  3862	  3881	  3898	  3913	  3929	  3946	  3972	  4024	  4044	  4064	  4084	  4104
	  4124	  4144	  4164	  4184	  4204	  4224	  4244	  4264	  4284	  4304	  4324	  4344	  4364	  4403
	  4423	  4443	  4463	  4483	  4503	  4523	  4543	  4563	  4583	  4603	  4623	  4643	  4663	  4683
	  4703	  4723	  4743	  4784	  4804	  4824	  4844	  4864	  4884	  4904	  4924	  4944	  4964	  4984
	  5004	  5024	  5044	  5064	  5084	  5104	  5124	  5163	  5183	  5203	  5223	  5243	  5263	  5283
	  5303	  5323	  5343	  5363	  5383	  5403	  5423	  5443	  5463	  5483	  5503	  5548	  5569	  5590
	  5611	  5632	  5653	  5674	  5695	  5716	  5737	  5758	  5779	  5800	  5821	  5842	  5863	  5884
	  5903	  5943	  5964	  5985	  6006	  6027	  6048	  6069	  6090	  6111	  6132	  6153	  6174	  6195
	  6216	  6237	  6258	  6279	  6300	  6345	  6366	  6387	  6408	  6429	  6450	  6471	  6492	  6513
	  6534	  6555	  6576	  6597	  6618	  6639	  6660	  6681	  6701	  6741	  6762	  6783	  6804	  6825
	  6846	  6867	  6888	  6909	  6930	  6951	  6972	  6993	  7014	  7035	  7056	  7077	  7098
JEN	   154#
JRSTF	   153#
MAPADR	   288#
MAPCNK	   289#
MAPMEM	   285#
MAPPNT	   291#
MAPSET	   290#
MEMSEG	   287#
MEMZRO	   286#
MODPCP	   298#                                                                                                            SEQ 0188
MODPCU	   297#
MTROP	   266#
NAME	     9#	    11
PBELL	   241#
PCRL	   235#
PCRL2	   239#
PCRL2F	   240#
PCRLF	   236#
PFORCE	   243#
PGMINT	   160#
PJRST	   151#
PMSG	   245#
PMSGF	   248#
PNT1	   201#
PNT11	   215#
PNT11F	   216#
PNT1F	   202#
PNT2	   203#
PNT2F	   204#
PNT3	   205#
PNT3F	   206#
PNT4	   207#
PNT4F	   208#
PNT5	   209#
PNT5F	   210#
PNT6	   211#
PNT6F	   212#
PNT7	   213#
PNT7F	   214#
PNTA	   187#
PNTADF	   218#
PNTADR	   217#
PNTAF	   188#
PNTAL	   189#
PNTALF	   190#
PNTCHF	   200#
PNTCHR	   199#
PNTCI	   197#
PNTCIF	   198#
PNTCW	   233#
PNTCWF	   234#
PNTDCF	   226#
PNTDEC	   225#
PNTDS	   227#
PNTDSF	   228#
PNTHW	   221#
PNTHWF	   222#
PNTMGN	   312#
PNTMSF	   194#
PNTMSG	   193#
PNTNM	   229#
PNTOCF	   224#
PNTOCS	   223#                                                                                                            SEQ 0189
PNTOCT	   219#
PNTOTF	   220#
PNTSIX	   230#
PNTSXF	   231#
PSIXL	   191#
PSIXLF	   192#
PSIXM	   195#
PSIXMF	   196#
PSP	   237#
PSPF	   238#
PUT	   149#
REPTUO	   326#
RTN	   148#	   444
S	    78#	    80	    84	   113	   115	   124	   127	   142	   143	   145	   156	   158	   162	   164
	   169	   173	   318	   320	   354	   359	   365	   392	   394	   412	   414	   432	   434	   463
	   465	   483	   485	   503	   505	   513	   515	   536	   541	   567	   569	   576	   578	   584
	   586	   592	   594	   598	   600	   605	   607	   611	   613	   617	   619	   625	   627	   630
	   632	   636	   638	   642	   644	   648	   650	   654	   656	   661	   666	   670	   672
SIXBTZ	   254#
STOP	    46#	   890	   913	   930	   948	   964	   990	  1011	  1029	  1045	  1068	  1090	  1114	  1130
	  1148	  1163	  1187	  1208	  1225	  1246	  1260	  1283	  1298	  1315	  1340	  1363	  1384	  1399
	  1423	  1439	  1458	  1471	  1484	  1496	  1512	  1526	  1542	  1562	  1583	  1600	  1634	  1651
	  1669	  1686	  1704	  1727	  1745	  1762	  1781	  1804	  1825	  1842	  1858	  1875	  1890	  1912
	  1934	  1951	  1967	  1983	  2004	  2021	  2037	  2054	  2070	  2087	  2103	  2120	  2135	  2152
	  2167	  2183	  2204	  2225	  2240	  2261	  2281	  2297	  2312	  2333	  2348	  2364	  2379	  2395
	  2410	  2431	  2446	  2467	  2488	  2504	  2519	  2535	  2550	  2566	  2581	  2597	  2612	  2628
	  2643	  2667	  2682	  2703	  2718	  2741	  2762	  2778	  2794	  2815	  2836	  2852	  2868	  2889
	  2905	  2921	  2936	  2952	  2967	  2983	  2998	  3014	  3038	  3063	  3080	  3110	  3125	  3146
	  3166	  3187	  3207	  3228	  3248	  3270	  3291	  3307	  3322	  3338	  3353	  3369	  3384	  3400
	  3416	  3433	  3449	  3471	  3493	  3510	  3526	  3548	  3571	  3588	  3604	  3629	  3644	  3667
	  3689	  3706	  3721	  3743	  3763	  3786	  3802	  3821	  3838	  3861	  3880	  3897	  3912	  3928
	  3945	  3971	  4023	  4043	  4063	  4083	  4103	  4123	  4143	  4163	  4183	  4203	  4223	  4243
	  4263	  4283	  4303	  4323	  4343	  4363	  4402	  4422	  4442	  4462	  4482	  4502	  4522	  4542
	  4562	  4582	  4602	  4622	  4642	  4662	  4682	  4702	  4722	  4742	  4783	  4803	  4823	  4843
	  4863	  4883	  4903	  4923	  4943	  4963	  4983	  5003	  5023	  5043	  5063	  5083	  5103	  5123
	  5162	  5182	  5202	  5222	  5242	  5262	  5282	  5302	  5322	  5342	  5362	  5382	  5402	  5422
	  5442	  5462	  5482	  5502	  5547	  5568	  5589	  5610	  5631	  5652	  5673	  5694	  5715	  5736
	  5757	  5778	  5799	  5820	  5841	  5862	  5883	  5902	  5942	  5963	  5984	  6005	  6026	  6047
	  6068	  6089	  6110	  6131	  6152	  6173	  6194	  6215	  6236	  6257	  6278	  6299	  6344	  6365
	  6386	  6407	  6428	  6449	  6470	  6491	  6512	  6533	  6554	  6575	  6596	  6617	  6638	  6659
	  6680	  6700	  6740	  6761	  6782	  6803	  6824	  6845	  6866	  6887	  6908	  6929	  6950	  6971
	  6992	  7013	  7034	  7055	  7076	  7097
SWITCH	   260#
TTALTM	   182#
TTICHR	   175#
TTICNV	   180#
TTIDEC	   179#
TTINO	   177#
TTIOCT	   178#
TTIYES	   176#
TTLOOK	   181#
TTSIXB	   183#
TTYINP	   184#                                                                                                            SEQ 0190
%....Q	  6298	  6739	  6760	  6781	  6802	  6823	  6844	  6865	  6886	  6907	  6928	  6949	  6970	  6991
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 1
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0191


*030001 JRST	0,030600
INITIAL
C(AC)=000000 000000 
C(E)=402000 030037 
FINAL

C(E)=402000 030037 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030001 030001 0   0   254000030600 0            254000030600 
IT1	030001 0      0   0   254000030600 0            254000030600 
AT3	030001 0      0   0   000000030600 0            254000030600 
AT6	030001 0      0   0   000000030600 0            254000030600 
FT1A	030001 0      0   0   000000030600 0            254000030600 
FT9	030002 0      0   0   000000030600 0            254000030600 
ET0	0      030002 0   0   000000030600 0            254000030600 
ST1A	0      030002 0   0   000000030600 0            254000030600 
ST9	0      030002 0   0   000000030600 0            254000030600 


*030600 SETZM	0,030037
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL

C(E)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	0      0      0   0   402000030037 0            000000030037 
IT1	0      0      0   0   402000030037 0            000000030037 
AT3	0      0      0   0   000000030037 0            402000030037 
AT6	0      030037 0   0   000000030037 0            402000030037 
FT1A	0      030037 0   0   000000030037 0            000000030037 
FT9	030601 030037 0   0   000000030037 0            000000030037 
ET0	030601 030037 0   0   0            0            000000030037 
ST6	030601 030037 0   0   0            0            000000030037 
ST6A	030601 030037 0   0   0            0            000000030037 
ST9	030601 030037 0   0   0            0            000000030037 


*030601 JSP	0,030602
INITIAL
C(AC)=000000 000000 
FINAL
C(AC)=000000 030602 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030601 030601 0   0   265000030602 0            000000030602 
IT1	030601 0      0   0   265000030602 0            000000030602 
AT3	030601 0      0   0   000000030602 0            265000030602 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 2
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0192

AT6	030601 030602 0   0   000000030602 0            265000030602 
FT1A	030601 030602 0   0   000000030602 0            000000030602 
FT9	030602 030602 0   0   000000030602 0            000000030602 
ET0	030602 030602 0   0   000000030602 0            000000030602 
ST1	030602 030602 0   0   000000030602 0            000000030602 
ST2	030602 030602 0   0   000000030602 0            000000030602 
ST9	030602 030602 0   0   000000030602 0            000000030602 


*030602 TLNE	0,010000
INITIAL
C(AC)=000000 030602 
FINAL
C(AC)=000000 030602 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030602 030602 0   0   603000010000 0            0            
IT1	030602 0      0   0   603000010000 0            0            
AT3	030602 0      0   0   000000010000 0            603000010000 
AT6	030602 0      0   0   000000010000 0            603000010000 
FT1A	030602 0      0   0   000000010000 0            000000010000 
FT2	030602 0      0   0   0            0            000000010000 
FT2RQ	030602 0      0   0   000000030602 0            000000010000 
FT3	030602 0      0   0   000000030602 0            000000010000 
FT9	030603 0      0   0   000000030602 0            000000010000 
ET0	030603 0      0   0   030602000000 0            000000010000 
ET1	030603 0      0   0   030602000000 0            0            
ET2	030604 0      0   0   000000030602 0            0            
ST1A	030604 0      0   0   000000030602 0            0            
ST9	030604 0      0   0   000000030602 0            0            


*030604 SKIPN	0,030042
INITIAL
C(AC)=000000 030602 
C(E)=777777 777777 
FINAL
C(AC)=000000 030602 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030604 030604 0   0   336000030042 0            777777777777 
IT1	030604 0      0   0   336000030042 0            777777777777 
AT3	030604 0      0   0   000000030042 0            336000030042 
AT6	030604 030042 0   0   000000030042 0            336000030042 
FT0	030604 030042 0   0   777777777777 0            336000030042 
FT1A	030604 030042 0   0   777777777777 0            777777777777 
FT9	030605 030042 0   0   777777777777 0            777777777777 
ET0	030606 030042 0   0   777777777777 0            777777777777 
ST1A	030606 030042 0   0   777777777777 0            777777777777 
ST9	030606 030042 0   0   777777777777 0            777777777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 3
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0193

*030606 SKIPE	0,030037
INITIAL
C(AC)=000000 030602 
C(E)=000000 000000 
FINAL
C(AC)=000000 030602 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030606 030606 0   0   332000030037 0            0            
IT1	030606 0      0   0   332000030037 0            0            
AT3	030606 0      0   0   000000030037 0            332000030037 
AT6	030606 030037 0   0   000000030037 0            332000030037 
FT0	030606 030037 0   0   0            0            332000030037 
FT1A	030606 030037 0   0   0            0            0            
FT9	030607 030037 0   0   0            0            0            
ET0	030610 030037 0   0   0            0            0            
ST1A	030610 030037 0   0   0            0            0            
ST9	030610 030037 0   0   0            0            0            


*030610 SKIPN	0,030044
INITIAL
C(AC)=000000 030602 
C(E)=777777 777777 
FINAL
C(AC)=000000 030602 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030610 030610 0   0   336000030044 0            777777777777 
IT1	030610 0      0   0   336000030044 0            777777777777 
AT3	030610 0      0   0   000000030044 0            336000030044 
AT6	030610 030044 0   0   000000030044 0            336000030044 
FT0	030610 030044 0   0   777777777777 0            336000030044 
FT1A	030610 030044 0   0   777777777777 0            777777777777 
FT9	030611 030044 0   0   777777777777 0            777777777777 
ET0	030612 030044 0   0   777777777777 0            777777777777 
ST1A	030612 030044 0   0   777777777777 0            777777777777 
ST9	030612 030044 0   0   777777777777 0            777777777777 


*030612 SETZM	0,030516
INITIAL
C(AC)=000000 030602 
C(E)=000000 000000 
FINAL

C(E)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030612 030612 0   0   402000030516 0            000000030516 
IT1	030612 0      0   0   402000030516 0            000000030516 
AT3	030612 0      0   0   000000030516 0            402000030516 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 4
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0194

AT6	030612 030516 0   0   000000030516 0            402000030516 
FT1A	030612 030516 0   0   000000030516 0            000000030516 
FT9	030613 030516 0   0   000000030516 0            000000030516 
ET0	030613 030516 0   0   0            0            000000030516 
ST6	030613 030516 0   0   0            0            000000030516 
ST6A	030613 030516 0   0   0            0            000000030516 
ST9	030613 030516 0   0   0            0            000000030516 


*030613 SETZM	0,030041
INITIAL
C(AC)=000000 030602 
C(E)=000000 000000 
FINAL

C(E)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030613 030613 0   0   402000030041 0            000000030041 
IT1	030613 0      0   0   402000030041 0            000000030041 
AT3	030613 0      0   0   000000030041 0            402000030041 
AT6	030613 030041 0   0   000000030041 0            402000030041 
FT1A	030613 030041 0   0   000000030041 0            000000030041 
FT9	030614 030041 0   0   000000030041 0            000000030041 
ET0	030614 030041 0   0   0            0            000000030041 
ST6	030614 030041 0   0   0            0            000000030041 
ST6A	030614 030041 0   0   0            0            000000030041 
ST9	030614 030041 0   0   0            0            000000030041 


*030614 MOVE 	1,034010
INITIAL
C(AC)=000000 000000 
C(E)=000001 000001 
FINAL
C(AC)=000001 000001 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030614 030614 0   0   200040034010 0            000001000001 
IT1	030614 0      0   0   200040034010 0            000001000001 
AT3	030614 0      0   0   000000034010 0            200040034010 
AT6	030614 034010 0   0   000000034010 0            200040034010 
FT0	030614 034010 0   0   000001000001 0            200040034010 
FT1A	030614 034010 0   0   000001000001 0            000001000001 
FT9	030615 034010 0   0   000001000001 0            000001000001 
ET0	030615 034010 0   0   000001000001 0            000001000001 
ST1	030615 034010 0   0   000001000001 0            000001000001 
ST2	030615 034010 0   0   000001000001 0            000001000001 
ST9	030615 034010 0   0   000001000001 0            000001000001 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 5
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0195

*030615 BLT	1,000001
INITIAL
C(AC)=000001 000001 
FINAL
C(AC)=000001 000001 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030615 030615 0   0   251040000001 0            000000000001 
IT1	030615 0      0   0   251040000001 0            000000000001 
AT3	030615 0      0   0   000000000001 0            251040000001 
AT6	030615 000001 0   0   000000000001 0            251040000001 
FT1A	030615 000001 0   0   000000000001 0            000000000001 
FT2	030615 000001 0   0   0            0            000000000001 
FT2RQ	030615 000001 0   0   000001000001 0            000000000001 
FT3	030615 000001 0   0   000001000001 0            000000000001 
FT6	030615 000001 0   0   000001000001 0            000000000001 
FT7	030615 000001 0   0   000001000001 000001000001 000000000001 
FT4RQ	030615 000001 0   0   000001000001 000001000001 000000000001 
FT4A	030615 000001 0   0   000001000001 000001000001 000000000001 
FT9	030615 000001 0   0   000001000001 000001000001 000000000001 
ET0	030615 000001 0   0   000001000001 000001000001 000000000001 
ET1	030615 000001 0   0   000001000001 000001000001 000000000001 
ET2	030615 000001 0   0   000001000001 000002000002 000000000001 
BLTT1	030615 000001 0   0   000000000002 000002000002 000000000001 
BLTT2	030616 000001 0   0   000000000002 000002000002 000000000001 
ST9	030616 000001 0   0   000000000002 000002000002 000000000001 


*030616 CAMN	1,034010
INITIAL
C(AC)=000001 000001 
C(E)=000001 000001 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030616 030616 0   0   316040034010 0            000001000001 
IT1	030616 0      0   0   316040034010 0            000001000001 
AT3	030616 0      0   0   000000034010 0            316040034010 
AT6	030616 034010 0   0   000000034010 0            316040034010 
FT0	030616 034010 0   0   000001000001 0            316040034010 
FT1A	030616 034010 0   0   000001000001 0            000001000001 
FT2	030616 034010 0   0   0            0            000001000001 
FT2RQ	030616 034010 0   0   000001000001 0            000001000001 
FT3	030616 034010 0   0   000001000001 0            000001000001 
FT9	030617 034010 0   0   000001000001 0            000001000001 
ET0	030617 034010 0   0   0            0            000001000001 
ST1A	030617 034010 0   0   0            0            000001000001 
ST9	030617 034010 0   0   0            0            000001000001 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 6
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0196

*030617 JRST	0,030712
INITIAL
C(AC)=000000 030602 
C(E)=402000 030037 
FINAL

C(E)=402000 030037 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030617 030617 0   0   254000030712 0            254000030712 
IT1	030617 0      0   0   254000030712 0            254000030712 
AT3	030617 0      0   0   000000030712 0            254000030712 
AT6	030617 030712 0   0   000000030712 0            254000030712 
FT1A	030617 030712 0   0   000000030712 0            254000030712 
FT9	030620 030712 0   0   000000030712 0            254000030712 
ET0	030712 030620 0   0   000000030712 0            254000030712 
ST1A	030712 030620 0   0   000000030712 0            254000030712 
ST9	030712 030620 0   0   000000030712 0            254000030712 


*030712 SETZM	0,030037
INITIAL
C(AC)=000000 030602 
C(E)=000000 000000 
FINAL

C(E)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030712 030712 0   0   402000030037 0            000000030037 
IT1	030712 0      0   0   402000030037 0            000000030037 
AT3	030712 0      0   0   000000030037 0            402000030037 
AT6	030712 030037 0   0   000000030037 0            402000030037 
FT1A	030712 030037 0   0   000000030037 0            000000030037 
FT9	030713 030037 0   0   000000030037 0            000000030037 
ET0	030713 030037 0   0   0            0            000000030037 
ST6	030713 030037 0   0   0            0            000000030037 
ST6A	030713 030037 0   0   0            0            000000030037 
ST9	030713 030037 0   0   0            0            000000030037 


*030713 JSP	0,030714
INITIAL
C(AC)=000000 030602 
FINAL
C(AC)=000000 030714 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030713 030713 0   0   265000030714 0            000000030714 
IT1	030713 0      0   0   265000030714 0            000000030714 
AT3	030713 0      0   0   000000030714 0            265000030714 
AT6	030713 030714 0   0   000000030714 0            265000030714 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 7
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0197

FT1A	030713 030714 0   0   000000030714 0            000000030714 
FT9	030714 030714 0   0   000000030714 0            000000030714 
ET0	030714 030714 0   0   000000030714 0            000000030714 
ST1	030714 030714 0   0   000000030714 0            000000030714 
ST2	030714 030714 0   0   000000030714 0            000000030714 
ST9	030714 030714 0   0   000000030714 0            000000030714 


*030714 TLNE	0,010000
INITIAL
C(AC)=000000 030714 
FINAL
C(AC)=000000 030714 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030714 030714 0   0   603000010000 0            0            
IT1	030714 0      0   0   603000010000 0            0            
AT3	030714 0      0   0   000000010000 0            603000010000 
AT6	030714 0      0   0   000000010000 0            603000010000 
FT1A	030714 0      0   0   000000010000 0            000000010000 
FT2	030714 0      0   0   0            0            000000010000 
FT2RQ	030714 0      0   0   000000030714 0            000000010000 
FT3	030714 0      0   0   000000030714 0            000000010000 
FT9	030715 0      0   0   000000030714 0            000000010000 
ET0	030715 0      0   0   030714000000 0            000000010000 
ET1	030715 0      0   0   030714000000 0            0            
ET2	030716 0      0   0   000000030714 0            0            
ST1A	030716 0      0   0   000000030714 0            0            
ST9	030716 0      0   0   000000030714 0            0            


*030716 SKIPN	0,030042
INITIAL
C(AC)=000000 030714 
C(E)=777777 777777 
FINAL
C(AC)=000000 030714 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030716 030716 0   0   336000030042 0            777777777777 
IT1	030716 0      0   0   336000030042 0            777777777777 
AT3	030716 0      0   0   000000030042 0            336000030042 
AT6	030716 030042 0   0   000000030042 0            336000030042 
FT0	030716 030042 0   0   777777777777 0            336000030042 
FT1A	030716 030042 0   0   777777777777 0            777777777777 
FT9	030717 030042 0   0   777777777777 0            777777777777 
ET0	030720 030042 0   0   777777777777 0            777777777777 
ST1A	030720 030042 0   0   777777777777 0            777777777777 
ST9	030720 030042 0   0   777777777777 0            777777777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 8
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0198

*030720 SKIPN	0,030037
INITIAL
C(AC)=000000 030714 
C(E)=000000 000000 
FINAL
C(AC)=000000 030714 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030720 030720 0   0   336000030037 0            0            
IT1	030720 0      0   0   336000030037 0            0            
AT3	030720 0      0   0   000000030037 0            336000030037 
AT6	030720 030037 0   0   000000030037 0            336000030037 
FT0	030720 030037 0   0   0            0            336000030037 
FT1A	030720 030037 0   0   0            0            0            
FT9	030721 030037 0   0   0            0            0            
ET0	030721 030037 0   0   0            0            0            
ST1A	030721 030037 0   0   0            0            0            
ST9	030721 030037 0   0   0            0            0            


*030721 JRST	0,030741
INITIAL
C(AC)=000000 030714 
C(E)=254000 030742 
FINAL

C(E)=254000 030742 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030721 030721 0   0   254000030741 0            254000030741 
IT1	030721 0      0   0   254000030741 0            254000030741 
AT3	030721 0      0   0   000000030741 0            254000030741 
AT6	030721 030741 0   0   000000030741 0            254000030741 
FT1A	030721 030741 0   0   000000030741 0            254000030741 
FT9	030722 030741 0   0   000000030741 0            254000030741 
ET0	030741 030722 0   0   000000030741 0            254000030741 
ST1A	030741 030722 0   0   000000030741 0            254000030741 
ST9	030741 030722 0   0   000000030741 0            254000030741 


*030741 JRST	0,030742
INITIAL
C(AC)=000000 030714 
C(E)=400000 000000 
FINAL

C(E)=400000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030741 030741 0   0   254000030742 0            254000030742 
IT1	030741 0      0   0   254000030742 0            254000030742 
AT3	030741 0      0   0   000000030742 0            254000030742 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 9
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0199

AT6	030741 030742 0   0   000000030742 0            254000030742 
FT1A	030741 030742 0   0   000000030742 0            254000030742 
FT9	030742 030742 0   0   000000030742 0            254000030742 
ET0	030742 030742 0   0   000000030742 0            254000030742 
ST1A	030742 030742 0   0   000000030742 0            254000030742 
ST9	030742 030742 0   0   000000030742 0            254000030742 


*030742 SETZ 	0,000000
INITIAL
C(AC)=000000 030714 
C(E)=000000 030714 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030742 030742 0   0   400000000000 0            0            
IT1	030742 0      0   0   400000000000 0            0            
AT3	030742 0      0   0   0            0            400000000000 
AT6	030742 0      0   0   0            0            400000000000 
FT1A	030742 0      0   0   0            0            0            
FT9	030743 0      0   0   0            0            0            
ET0	030743 0      0   0   0            0            0            
ST1	030743 0      0   0   0            0            0            
ST2	030743 0      0   0   0            0            0            
ST9	030743 0      0   0   0            0            0            


*030743 TDN 	0,034012
INITIAL
C(AC)=000000 000000 
C(E)=777777 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030743 030743 0   0   610000034012 0            0            
IT1	030743 0      0   0   610000034012 0            0            
AT3	030743 0      0   0   000000034012 0            610000034012 
AT6	030743 034012 0   0   000000034012 0            610000034012 
FT0	030743 034012 0   0   777777777777 0            610000034012 
FT1A	030743 034012 0   0   777777777777 0            777777777777 
FT2	030743 034012 0   0   0            0            777777777777 
FT2RQ	030743 034012 0   0   0            0            777777777777 
FT3	030743 034012 0   0   0            0            777777777777 
FT9	030744 034012 0   0   0            0            777777777777 
ET0	030744 034012 0   0   0            0            777777777777 
ET1	030744 034012 0   0   0            0            0            
ET2	030744 034012 0   0   0            0            0            
ST1A	030744 034012 0   0   0            0            0            
ST9	030744 034012 0   0   0            0            0            

PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 10
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0200


*030744 CAM 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030744 030744 0   0   310000000000 0            0            
IT1	030744 0      0   0   310000000000 0            0            
AT3	030744 0      0   0   0            0            310000000000 
AT6	030744 0      0   0   0            0            310000000000 
FT0	030744 0      0   0   0            0            310000000000 
FT1A	030744 0      0   0   0            0            0            
FT2	030744 0      0   0   0            0            0            
FT2RQ	030744 0      0   0   0            0            0            
FT3	030744 0      0   0   0            0            0            
FT9	030745 0      0   0   0            0            0            
ET0	030745 0      0   0   0            0            0            
ST1A	030745 0      0   0   0            0            0            
ST9	030745 0      0   0   0            0            0            


*030745 CAIE	0,000000
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030745 030745 0   0   302000000000 0            0            
IT1	030745 0      0   0   302000000000 0            0            
AT3	030745 0      0   0   0            0            302000000000 
AT6	030745 0      0   0   0            0            302000000000 
FT1A	030745 0      0   0   0            0            0            
FT2	030745 0      0   0   0            0            0            
FT2RQ	030745 0      0   0   0            0            0            
FT3	030745 0      0   0   0            0            0            
FT9	030746 0      0   0   0            0            0            
ET0	030747 0      0   0   0            0            0            
ST1A	030747 0      0   0   0            0            0            
ST9	030747 0      0   0   0            0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 11
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0201

*030747 JUMPA	0,030750
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030747 030747 0   0   324000030750 0            000000030750 
IT1	030747 0      0   0   324000030750 0            000000030750 
AT3	030747 0      0   0   000000030750 0            324000030750 
AT6	030747 030750 0   0   000000030750 0            324000030750 
FT1A	030747 030750 0   0   000000030750 0            000000030750 
FT2	030747 030750 0   0   0            0            000000030750 
FT2RQ	030747 030750 0   0   0            0            000000030750 
FT3	030747 030750 0   0   0            0            000000030750 
FT9	030750 030750 0   0   0            0            000000030750 
ET0	030750 030750 0   0   0            0            000000030750 
ST1A	030750 030750 0   0   0            0            000000030750 
ST9	030750 030750 0   0   0            0            000000030750 


*030750 SETO 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030750 030750 0   0   474000000000 0            0            
IT1	030750 0      0   0   474000000000 0            0            
AT3	030750 0      0   0   0            0            474000000000 
AT6	030750 0      0   0   0            0            474000000000 
FT1A	030750 0      0   0   0            0            0            
FT9	030751 0      0   0   0            0            0            
ET0	030751 0      0   0   777777777777 0            0            
ST1	030751 0      0   0   777777777777 0            0            
ST2	030751 0      0   0   777777777777 0            0            
ST9	030751 0      0   0   777777777777 0            0            


*030751 TSN 	0,034013
INITIAL
C(AC)=777777 777777 
C(E)=777777 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030751 030751 0   0   611000034013 0            777777000000 
IT1	030751 0      0   0   611000034013 0            777777000000 
AT3	030751 0      0   0   000000034013 0            611000034013 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 12
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0202

AT6	030751 034013 0   0   000000034013 0            611000034013 
FT0	030751 034013 0   0   777777000000 0            611000034013 
FT1A	030751 034013 0   0   777777000000 0            777777000000 
FT2	030751 034013 0   0   0            0            777777000000 
FT2RQ	030751 034013 0   0   777777777777 0            777777000000 
FT3	030751 034013 0   0   777777777777 0            777777000000 
FT9	030752 034013 0   0   777777777777 0            777777000000 
ET0	030752 034013 0   0   777777777777 0            777777000000 
ET1	030752 034013 0   0   777777777777 0            777777000000 
ET2	030752 034013 0   0   777777777777 0            777777000000 
ST1A	030752 034013 0   0   777777777777 0            777777000000 
ST9	030752 034013 0   0   777777777777 0            777777000000 


*030752 CAM 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030752 030752 0   0   310000000000 0            777777777777 
IT1	030752 0      0   0   310000000000 0            777777777777 
AT3	030752 0      0   0   0            0            310000000000 
AT6	030752 0      0   0   0            0            310000000000 
FT0	030752 0      0   0   777777777777 0            310000000000 
FT1A	030752 0      0   0   777777777777 0            777777777777 
FT2	030752 0      0   0   0            0            777777777777 
FT2RQ	030752 0      0   0   777777777777 0            777777777777 
FT3	030752 0      0   0   777777777777 0            777777777777 
FT9	030753 0      0   0   777777777777 0            777777777777 
ET0	030753 0      0   0   0            0            777777777777 
ST1A	030753 0      0   0   0            0            777777777777 
ST9	030753 0      0   0   0            0            777777777777 


*030753 CAME	0,034012
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030753 030753 0   0   312000034012 0            777777777777 
IT1	030753 0      0   0   312000034012 0            777777777777 
AT3	030753 0      0   0   000000034012 0            312000034012 
AT6	030753 034012 0   0   000000034012 0            312000034012 
FT0	030753 034012 0   0   777777777777 0            312000034012 
FT1A	030753 034012 0   0   777777777777 0            777777777777 
FT2	030753 034012 0   0   0            0            777777777777 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 13
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0203

FT2RQ	030753 034012 0   0   777777777777 0            777777777777 
FT3	030753 034012 0   0   777777777777 0            777777777777 
FT9	030754 034012 0   0   777777777777 0            777777777777 
ET0	030755 034012 0   0   0            0            777777777777 
ST1A	030755 034012 0   0   0            0            777777777777 
ST9	030755 034012 0   0   0            0            777777777777 


*030755 JUMPA	0,030756
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030755 030755 0   0   324000030756 0            000000030756 
IT1	030755 0      0   0   324000030756 0            000000030756 
AT3	030755 0      0   0   000000030756 0            324000030756 
AT6	030755 030756 0   0   000000030756 0            324000030756 
FT1A	030755 030756 0   0   000000030756 0            000000030756 
FT2	030755 030756 0   0   0            0            000000030756 
FT2RQ	030755 030756 0   0   777777777777 0            000000030756 
FT3	030755 030756 0   0   777777777777 0            000000030756 
FT9	030756 030756 0   0   777777777777 0            000000030756 
ET0	030756 030756 0   0   777777777777 0            000000030756 
ST1A	030756 030756 0   0   777777777777 0            000000030756 
ST9	030756 030756 0   0   777777777777 0            000000030756 


*030756 SETZ 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030756 030756 0   0   400000000000 0            0            
IT1	030756 0      0   0   400000000000 0            0            
AT3	030756 0      0   0   0            0            400000000000 
AT6	030756 0      0   0   0            0            400000000000 
FT1A	030756 0      0   0   0            0            0            
FT9	030757 0      0   0   0            0            0            
ET0	030757 0      0   0   0            0            0            
ST1	030757 0      0   0   0            0            0            
ST2	030757 0      0   0   0            0            0            
ST9	030757 0      0   0   0            0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 14
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0204

*030757 TRN 	0,123456
INITIAL
C(AC)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030757 030757 0   0   600000123456 0            0            
IT1	030757 0      0   0   600000123456 0            0            
AT3	030757 0      0   0   000000123456 0            600000123456 
AT6	030757 123456 0   0   000000123456 0            600000123456 
FT1A	030757 123456 0   0   000000123456 0            000000123456 
FT2	030757 123456 0   0   0            0            000000123456 
FT2RQ	030757 123456 0   0   0            0            000000123456 
FT3	030757 123456 0   0   0            0            000000123456 
FT9	030760 123456 0   0   0            0            000000123456 
ET0	030760 123456 0   0   0            0            000000123456 
ET1	030760 123456 0   0   0            0            0            
ET2	030760 123456 0   0   0            0            0            
ST1A	030760 123456 0   0   0            0            0            
ST9	030760 123456 0   0   0            0            0            


*030760 CAM 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030760 030760 0   0   310000000000 0            0            
IT1	030760 0      0   0   310000000000 0            0            
AT3	030760 0      0   0   0            0            310000000000 
AT6	030760 0      0   0   0            0            310000000000 
FT0	030760 0      0   0   0            0            310000000000 
FT1A	030760 0      0   0   0            0            0            
FT2	030760 0      0   0   0            0            0            
FT2RQ	030760 0      0   0   0            0            0            
FT3	030760 0      0   0   0            0            0            
FT9	030761 0      0   0   0            0            0            
ET0	030761 0      0   0   0            0            0            
ST1A	030761 0      0   0   0            0            0            
ST9	030761 0      0   0   0            0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 15
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0205

*030761 CAIE	0,000000
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030761 030761 0   0   302000000000 0            0            
IT1	030761 0      0   0   302000000000 0            0            
AT3	030761 0      0   0   0            0            302000000000 
AT6	030761 0      0   0   0            0            302000000000 
FT1A	030761 0      0   0   0            0            0            
FT2	030761 0      0   0   0            0            0            
FT2RQ	030761 0      0   0   0            0            0            
FT3	030761 0      0   0   0            0            0            
FT9	030762 0      0   0   0            0            0            
ET0	030763 0      0   0   0            0            0            
ST1A	030763 0      0   0   0            0            0            
ST9	030763 0      0   0   0            0            0            


*030763 JUMPA	0,030764
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030763 030763 0   0   324000030764 0            000000030764 
IT1	030763 0      0   0   324000030764 0            000000030764 
AT3	030763 0      0   0   000000030764 0            324000030764 
AT6	030763 030764 0   0   000000030764 0            324000030764 
FT1A	030763 030764 0   0   000000030764 0            000000030764 
FT2	030763 030764 0   0   0            0            000000030764 
FT2RQ	030763 030764 0   0   0            0            000000030764 
FT3	030763 030764 0   0   0            0            000000030764 
FT9	030764 030764 0   0   0            0            000000030764 
ET0	030764 030764 0   0   0            0            000000030764 
ST1A	030764 030764 0   0   0            0            000000030764 
ST9	030764 030764 0   0   0            0            000000030764 


*030764 SETO 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030764 030764 0   0   474000000000 0            0            
IT1	030764 0      0   0   474000000000 0            0            
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 16
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0206

AT3	030764 0      0   0   0            0            474000000000 
AT6	030764 0      0   0   0            0            474000000000 
FT1A	030764 0      0   0   0            0            0            
FT9	030765 0      0   0   0            0            0            
ET0	030765 0      0   0   777777777777 0            0            
ST1	030765 0      0   0   777777777777 0            0            
ST2	030765 0      0   0   777777777777 0            0            
ST9	030765 0      0   0   777777777777 0            0            


*030765 TLN 	0,123456
INITIAL
C(AC)=777777 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030765 030765 0   0   601000123456 0            000000123456 
IT1	030765 0      0   0   601000123456 0            000000123456 
AT3	030765 0      0   0   000000123456 0            601000123456 
AT6	030765 123456 0   0   000000123456 0            601000123456 
FT1A	030765 123456 0   0   000000123456 0            000000123456 
FT2	030765 123456 0   0   0            0            000000123456 
FT2RQ	030765 123456 0   0   777777777777 0            000000123456 
FT3	030765 123456 0   0   777777777777 0            000000123456 
FT9	030766 123456 0   0   777777777777 0            000000123456 
ET0	030766 123456 0   0   777777777777 0            000000123456 
ET1	030766 123456 0   0   777777777777 0            000000123456 
ET2	030766 123456 0   0   777777777777 0            000000123456 
ST1A	030766 123456 0   0   777777777777 0            000000123456 
ST9	030766 123456 0   0   777777777777 0            000000123456 


*030766 CAM 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030766 030766 0   0   310000000000 0            777777777777 
IT1	030766 0      0   0   310000000000 0            777777777777 
AT3	030766 0      0   0   0            0            310000000000 
AT6	030766 0      0   0   0            0            310000000000 
FT0	030766 0      0   0   777777777777 0            310000000000 
FT1A	030766 0      0   0   777777777777 0            777777777777 
FT2	030766 0      0   0   0            0            777777777777 
FT2RQ	030766 0      0   0   777777777777 0            777777777777 
FT3	030766 0      0   0   777777777777 0            777777777777 
FT9	030767 0      0   0   777777777777 0            777777777777 
ET0	030767 0      0   0   0            0            777777777777 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 17
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0207

ST1A	030767 0      0   0   0            0            777777777777 
ST9	030767 0      0   0   0            0            777777777777 


*030767 CAME	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030767 030767 0   0   312000000000 0            777777777777 
IT1	030767 0      0   0   312000000000 0            777777777777 
AT3	030767 0      0   0   0            0            312000000000 
AT6	030767 0      0   0   0            0            312000000000 
FT0	030767 0      0   0   777777777777 0            312000000000 
FT1A	030767 0      0   0   777777777777 0            777777777777 
FT2	030767 0      0   0   0            0            777777777777 
FT2RQ	030767 0      0   0   777777777777 0            777777777777 
FT3	030767 0      0   0   777777777777 0            777777777777 
FT9	030770 0      0   0   777777777777 0            777777777777 
ET0	030771 0      0   0   0            0            777777777777 
ST1A	030771 0      0   0   0            0            777777777777 
ST9	030771 0      0   0   0            0            777777777777 


*030771 JUMPA	0,030772
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030771 030771 0   0   324000030772 0            000000030772 
IT1	030771 0      0   0   324000030772 0            000000030772 
AT3	030771 0      0   0   000000030772 0            324000030772 
AT6	030771 030772 0   0   000000030772 0            324000030772 
FT1A	030771 030772 0   0   000000030772 0            000000030772 
FT2	030771 030772 0   0   0            0            000000030772 
FT2RQ	030771 030772 0   0   777777777777 0            000000030772 
FT3	030771 030772 0   0   777777777777 0            000000030772 
FT9	030772 030772 0   0   777777777777 0            000000030772 
ET0	030772 030772 0   0   777777777777 0            000000030772 
ST1A	030772 030772 0   0   777777777777 0            000000030772 
ST9	030772 030772 0   0   777777777777 0            000000030772 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 18
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0208

*030772 SETZ 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030772 030772 0   0   400000000000 0            0            
IT1	030772 0      0   0   400000000000 0            0            
AT3	030772 0      0   0   0            0            400000000000 
AT6	030772 0      0   0   0            0            400000000000 
FT1A	030772 0      0   0   0            0            0            
FT9	030773 0      0   0   0            0            0            
ET0	030773 0      0   0   0            0            0            
ST1	030773 0      0   0   0            0            0            
ST2	030773 0      0   0   0            0            0            
ST9	030773 0      0   0   0            0            0            


*030773 TDO 	0,034012
INITIAL
C(AC)=000000 000000 
C(E)=777777 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030773 030773 0   0   670000034012 0            0            
IT1	030773 0      0   0   670000034012 0            0            
AT3	030773 0      0   0   000000034012 0            670000034012 
AT6	030773 034012 0   0   000000034012 0            670000034012 
FT0	030773 034012 0   0   777777777777 0            670000034012 
FT1A	030773 034012 0   0   777777777777 0            777777777777 
FT2	030773 034012 0   0   0            0            777777777777 
FT2RQ	030773 034012 0   0   0            0            777777777777 
FT3	030773 034012 0   0   0            0            777777777777 
FT9	030774 034012 0   0   0            0            777777777777 
ET0	030774 034012 0   0   0            0            777777777777 
ET1	030774 034012 0   0   777777777777 0            0            
ET2	030774 034012 0   0   777777777777 0            0            
ST1	030774 034012 0   0   777777777777 0            0            
ST2	030774 034012 0   0   777777777777 0            0            
ST9	030774 034012 0   0   777777777777 0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 19
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0209

*030774 CAI 	0,000000
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030774 030774 0   0   300000000000 0            0            
IT1	030774 0      0   0   300000000000 0            0            
AT3	030774 0      0   0   0            0            300000000000 
AT6	030774 0      0   0   0            0            300000000000 
FT1A	030774 0      0   0   0            0            0            
FT2	030774 0      0   0   0            0            0            
FT2RQ	030774 0      0   0   777777777777 0            0            
FT3	030774 0      0   0   777777777777 0            0            
FT9	030775 0      0   0   777777777777 0            0            
ET0	030775 0      0   0   777777777777 0            0            
ST1A	030775 0      0   0   777777777777 0            0            
ST9	030775 0      0   0   777777777777 0            0            


*030775 CAME	0,034012
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030775 030775 0   0   312000034012 0            777777777777 
IT1	030775 0      0   0   312000034012 0            777777777777 
AT3	030775 0      0   0   000000034012 0            312000034012 
AT6	030775 034012 0   0   000000034012 0            312000034012 
FT0	030775 034012 0   0   777777777777 0            312000034012 
FT1A	030775 034012 0   0   777777777777 0            777777777777 
FT2	030775 034012 0   0   0            0            777777777777 
FT2RQ	030775 034012 0   0   777777777777 0            777777777777 
FT3	030775 034012 0   0   777777777777 0            777777777777 
FT9	030776 034012 0   0   777777777777 0            777777777777 
ET0	030777 034012 0   0   0            0            777777777777 
ST1A	030777 034012 0   0   0            0            777777777777 
ST9	030777 034012 0   0   0            0            777777777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 20
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0210

*030777 JUMPA	0,031000
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030777 030777 0   0   324000031000 0            000000031000 
IT1	030777 0      0   0   324000031000 0            000000031000 
AT3	030777 0      0   0   000000031000 0            324000031000 
AT6	030777 0      0   0   000000031000 0            324000031000 
FT1A	030777 0      0   0   000000031000 0            000000031000 
FT2	030777 0      0   0   0            0            000000031000 
FT2RQ	030777 0      0   0   777777777777 0            000000031000 
FT3	030777 0      0   0   777777777777 0            000000031000 
FT9	0      0      0   0   777777777777 0            000000031000 
ET0	0      0      0   0   777777777777 0            000000031000 
ST1A	0      0      0   0   777777777777 0            000000031000 
ST9	0      0      0   0   777777777777 0            000000031000 


*031000 SETZ 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	0      0      0   0   400000000000 0            0            
IT1	0      0      0   0   400000000000 0            0            
AT3	0      0      0   0   0            0            400000000000 
AT6	0      0      0   0   0            0            400000000000 
FT1A	0      0      0   0   0            0            0            
FT9	031001 0      0   0   0            0            0            
ET0	031001 0      0   0   0            0            0            
ST1	031001 0      0   0   0            0            0            
ST2	031001 0      0   0   0            0            0            
ST9	031001 0      0   0   0            0            0            


*031001 TDO 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031001 031001 0   0   670000000000 0            0            
IT1	031001 0      0   0   670000000000 0            0            
AT3	031001 0      0   0   0            0            670000000000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 21
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0211

AT6	031001 0      0   0   0            0            670000000000 
FT0	031001 0      0   0   0            0            670000000000 
FT1A	031001 0      0   0   0            0            0            
FT2	031001 0      0   0   0            0            0            
FT2RQ	031001 0      0   0   0            0            0            
FT3	031001 0      0   0   0            0            0            
FT9	031002 0      0   0   0            0            0            
ET0	031002 0      0   0   0            0            0            
ET1	031002 0      0   0   0            0            0            
ET2	031002 0      0   0   0            0            0            
ST1	031002 0      0   0   0            0            0            
ST2	031002 0      0   0   0            0            0            
ST9	031002 0      0   0   0            0            0            


*031002 CAI 	0,000000
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031002 031002 0   0   300000000000 0            0            
IT1	031002 0      0   0   300000000000 0            0            
AT3	031002 0      0   0   0            0            300000000000 
AT6	031002 0      0   0   0            0            300000000000 
FT1A	031002 0      0   0   0            0            0            
FT2	031002 0      0   0   0            0            0            
FT2RQ	031002 0      0   0   0            0            0            
FT3	031002 0      0   0   0            0            0            
FT9	031003 0      0   0   0            0            0            
ET0	031003 0      0   0   0            0            0            
ST1A	031003 0      0   0   0            0            0            
ST9	031003 0      0   0   0            0            0            


*031003 SKIPE	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031003 031003 0   0   332000000000 0            0            
IT1	031003 0      0   0   332000000000 0            0            
AT3	031003 0      0   0   0            0            332000000000 
AT6	031003 0      0   0   0            0            332000000000 
FT0	031003 0      0   0   0            0            332000000000 
FT1A	031003 0      0   0   0            0            0            
FT9	031004 0      0   0   0            0            0            
ET0	031005 0      0   0   0            0            0            
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 22
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0212

ST1A	031005 0      0   0   0            0            0            
ST9	031005 0      0   0   0            0            0            


*031005 JUMPA	0,031006
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031005 031005 0   0   324000031006 0            000000031006 
IT1	031005 0      0   0   324000031006 0            000000031006 
AT3	031005 0      0   0   000000031006 0            324000031006 
AT6	031005 031006 0   0   000000031006 0            324000031006 
FT1A	031005 031006 0   0   000000031006 0            000000031006 
FT2	031005 031006 0   0   0            0            000000031006 
FT2RQ	031005 031006 0   0   0            0            000000031006 
FT3	031005 031006 0   0   0            0            000000031006 
FT9	031006 031006 0   0   0            0            000000031006 
ET0	031006 031006 0   0   0            0            000000031006 
ST1A	031006 031006 0   0   0            0            000000031006 
ST9	031006 031006 0   0   0            0            000000031006 


*031006 SETZ 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031006 031006 0   0   400000000000 0            0            
IT1	031006 0      0   0   400000000000 0            0            
AT3	031006 0      0   0   0            0            400000000000 
AT6	031006 0      0   0   0            0            400000000000 
FT1A	031006 0      0   0   0            0            0            
FT9	031007 0      0   0   0            0            0            
ET0	031007 0      0   0   0            0            0            
ST1	031007 0      0   0   0            0            0            
ST2	031007 0      0   0   0            0            0            
ST9	031007 0      0   0   0            0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 23
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0213

*031007 TDO 	0,034014
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031007 031007 0   0   670000034014 0            0            
IT1	031007 0      0   0   670000034014 0            0            
AT3	031007 0      0   0   000000034014 0            670000034014 
AT6	031007 034014 0   0   000000034014 0            670000034014 
FT0	031007 034014 0   0   0            0            670000034014 
FT1A	031007 034014 0   0   0            0            0            
FT2	031007 034014 0   0   0            0            0            
FT2RQ	031007 034014 0   0   0            0            0            
FT3	031007 034014 0   0   0            0            0            
FT9	031010 034014 0   0   0            0            0            
ET0	031010 034014 0   0   0            0            0            
ET1	031010 034014 0   0   0            0            0            
ET2	031010 034014 0   0   0            0            0            
ST1	031010 034014 0   0   0            0            0            
ST2	031010 034014 0   0   0            0            0            
ST9	031010 034014 0   0   0            0            0            


*031010 CAI 	0,000000
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031010 031010 0   0   300000000000 0            0            
IT1	031010 0      0   0   300000000000 0            0            
AT3	031010 0      0   0   0            0            300000000000 
AT6	031010 0      0   0   0            0            300000000000 
FT1A	031010 0      0   0   0            0            0            
FT2	031010 0      0   0   0            0            0            
FT2RQ	031010 0      0   0   0            0            0            
FT3	031010 0      0   0   0            0            0            
FT9	031011 0      0   0   0            0            0            
ET0	031011 0      0   0   0            0            0            
ST1A	031011 0      0   0   0            0            0            
ST9	031011 0      0   0   0            0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 24
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0214

*031011 SKIPE	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031011 031011 0   0   332000000000 0            0            
IT1	031011 0      0   0   332000000000 0            0            
AT3	031011 0      0   0   0            0            332000000000 
AT6	031011 0      0   0   0            0            332000000000 
FT0	031011 0      0   0   0            0            332000000000 
FT1A	031011 0      0   0   0            0            0            
FT9	031012 0      0   0   0            0            0            
ET0	031013 0      0   0   0            0            0            
ST1A	031013 0      0   0   0            0            0            
ST9	031013 0      0   0   0            0            0            


*031013 JUMPA	0,031014
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031013 031013 0   0   324000031014 0            000000031014 
IT1	031013 0      0   0   324000031014 0            000000031014 
AT3	031013 0      0   0   000000031014 0            324000031014 
AT6	031013 031014 0   0   000000031014 0            324000031014 
FT1A	031013 031014 0   0   000000031014 0            000000031014 
FT2	031013 031014 0   0   0            0            000000031014 
FT2RQ	031013 031014 0   0   0            0            000000031014 
FT3	031013 031014 0   0   0            0            000000031014 
FT9	031014 031014 0   0   0            0            000000031014 
ET0	031014 031014 0   0   0            0            000000031014 
ST1A	031014 031014 0   0   0            0            000000031014 
ST9	031014 031014 0   0   0            0            000000031014 


*031014 SETO 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031014 031014 0   0   474000000000 0            0            
IT1	031014 0      0   0   474000000000 0            0            
AT3	031014 0      0   0   0            0            474000000000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 25
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0215

AT6	031014 0      0   0   0            0            474000000000 
FT1A	031014 0      0   0   0            0            0            
FT9	031015 0      0   0   0            0            0            
ET0	031015 0      0   0   777777777777 0            0            
ST1	031015 0      0   0   777777777777 0            0            
ST2	031015 0      0   0   777777777777 0            0            
ST9	031015 0      0   0   777777777777 0            0            


*031015 TDO 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031015 031015 0   0   670000000000 0            777777777777 
IT1	031015 0      0   0   670000000000 0            777777777777 
AT3	031015 0      0   0   0            0            670000000000 
AT6	031015 0      0   0   0            0            670000000000 
FT0	031015 0      0   0   777777777777 0            670000000000 
FT1A	031015 0      0   0   777777777777 0            777777777777 
FT2	031015 0      0   0   0            0            777777777777 
FT2RQ	031015 0      0   0   777777777777 0            777777777777 
FT3	031015 0      0   0   777777777777 0            777777777777 
FT9	031016 0      0   0   777777777777 0            777777777777 
ET0	031016 0      0   0   777777777777 0            777777777777 
ET1	031016 0      0   0   777777777777 0            777777777777 
ET2	031016 0      0   0   777777777777 0            777777777777 
ST1	031016 0      0   0   777777777777 0            777777777777 
ST2	031016 0      0   0   777777777777 0            777777777777 
ST9	031016 0      0   0   777777777777 0            777777777777 


*031016 CAI 	0,000000
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031016 031016 0   0   300000000000 0            0            
IT1	031016 0      0   0   300000000000 0            0            
AT3	031016 0      0   0   0            0            300000000000 
AT6	031016 0      0   0   0            0            300000000000 
FT1A	031016 0      0   0   0            0            0            
FT2	031016 0      0   0   0            0            0            
FT2RQ	031016 0      0   0   777777777777 0            0            
FT3	031016 0      0   0   777777777777 0            0            
FT9	031017 0      0   0   777777777777 0            0            
ET0	031017 0      0   0   777777777777 0            0            
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 26
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0216

ST1A	031017 0      0   0   777777777777 0            0            
ST9	031017 0      0   0   777777777777 0            0            


*031017 CAME	0,034012
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031017 031017 0   0   312000034012 0            777777777777 
IT1	031017 0      0   0   312000034012 0            777777777777 
AT3	031017 0      0   0   000000034012 0            312000034012 
AT6	031017 034012 0   0   000000034012 0            312000034012 
FT0	031017 034012 0   0   777777777777 0            312000034012 
FT1A	031017 034012 0   0   777777777777 0            777777777777 
FT2	031017 034012 0   0   0            0            777777777777 
FT2RQ	031017 034012 0   0   777777777777 0            777777777777 
FT3	031017 034012 0   0   777777777777 0            777777777777 
FT9	031020 034012 0   0   777777777777 0            777777777777 
ET0	031021 034012 0   0   0            0            777777777777 
ST1A	031021 034012 0   0   0            0            777777777777 
ST9	031021 034012 0   0   0            0            777777777777 


*031021 JUMPA	0,031022
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031021 031021 0   0   324000031022 0            000000031022 
IT1	031021 0      0   0   324000031022 0            000000031022 
AT3	031021 0      0   0   000000031022 0            324000031022 
AT6	031021 031022 0   0   000000031022 0            324000031022 
FT1A	031021 031022 0   0   000000031022 0            000000031022 
FT2	031021 031022 0   0   0            0            000000031022 
FT2RQ	031021 031022 0   0   777777777777 0            000000031022 
FT3	031021 031022 0   0   777777777777 0            000000031022 
FT9	031022 031022 0   0   777777777777 0            000000031022 
ET0	031022 031022 0   0   777777777777 0            000000031022 
ST1A	031022 031022 0   0   777777777777 0            000000031022 
ST9	031022 031022 0   0   777777777777 0            000000031022 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 27
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0217

*031022 SETO 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031022 031022 0   0   474000000000 0            0            
IT1	031022 0      0   0   474000000000 0            0            
AT3	031022 0      0   0   0            0            474000000000 
AT6	031022 0      0   0   0            0            474000000000 
FT1A	031022 0      0   0   0            0            0            
FT9	031023 0      0   0   0            0            0            
ET0	031023 0      0   0   777777777777 0            0            
ST1	031023 0      0   0   777777777777 0            0            
ST2	031023 0      0   0   777777777777 0            0            
ST9	031023 0      0   0   777777777777 0            0            


*031023 TDO 	0,034014
INITIAL
C(AC)=777777 777777 
C(E)=000000 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031023 031023 0   0   670000034014 0            0            
IT1	031023 0      0   0   670000034014 0            0            
AT3	031023 0      0   0   000000034014 0            670000034014 
AT6	031023 034014 0   0   000000034014 0            670000034014 
FT0	031023 034014 0   0   0            0            670000034014 
FT1A	031023 034014 0   0   0            0            0            
FT2	031023 034014 0   0   0            0            0            
FT2RQ	031023 034014 0   0   777777777777 0            0            
FT3	031023 034014 0   0   777777777777 0            0            
FT9	031024 034014 0   0   777777777777 0            0            
ET0	031024 034014 0   0   777777777777 0            0            
ET1	031024 034014 0   0   777777777777 0            0            
ET2	031024 034014 0   0   777777777777 0            0            
ST1	031024 034014 0   0   777777777777 0            0            
ST2	031024 034014 0   0   777777777777 0            0            
ST9	031024 034014 0   0   777777777777 0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 28
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0218

*031024 CAI 	0,000000
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031024 031024 0   0   300000000000 0            0            
IT1	031024 0      0   0   300000000000 0            0            
AT3	031024 0      0   0   0            0            300000000000 
AT6	031024 0      0   0   0            0            300000000000 
FT1A	031024 0      0   0   0            0            0            
FT2	031024 0      0   0   0            0            0            
FT2RQ	031024 0      0   0   777777777777 0            0            
FT3	031024 0      0   0   777777777777 0            0            
FT9	031025 0      0   0   777777777777 0            0            
ET0	031025 0      0   0   777777777777 0            0            
ST1A	031025 0      0   0   777777777777 0            0            
ST9	031025 0      0   0   777777777777 0            0            


*031025 CAME	0,034012
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031025 031025 0   0   312000034012 0            777777777777 
IT1	031025 0      0   0   312000034012 0            777777777777 
AT3	031025 0      0   0   000000034012 0            312000034012 
AT6	031025 034012 0   0   000000034012 0            312000034012 
FT0	031025 034012 0   0   777777777777 0            312000034012 
FT1A	031025 034012 0   0   777777777777 0            777777777777 
FT2	031025 034012 0   0   0            0            777777777777 
FT2RQ	031025 034012 0   0   777777777777 0            777777777777 
FT3	031025 034012 0   0   777777777777 0            777777777777 
FT9	031026 034012 0   0   777777777777 0            777777777777 
ET0	031027 034012 0   0   0            0            777777777777 
ST1A	031027 034012 0   0   0            0            777777777777 
ST9	031027 034012 0   0   0            0            777777777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 29
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0219

*031027 JUMPA	0,031030
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031027 031027 0   0   324000031030 0            000000031030 
IT1	031027 0      0   0   324000031030 0            000000031030 
AT3	031027 0      0   0   000000031030 0            324000031030 
AT6	031027 031030 0   0   000000031030 0            324000031030 
FT1A	031027 031030 0   0   000000031030 0            000000031030 
FT2	031027 031030 0   0   0            0            000000031030 
FT2RQ	031027 031030 0   0   777777777777 0            000000031030 
FT3	031027 031030 0   0   777777777777 0            000000031030 
FT9	031030 031030 0   0   777777777777 0            000000031030 
ET0	031030 031030 0   0   777777777777 0            000000031030 
ST1A	031030 031030 0   0   777777777777 0            000000031030 
ST9	031030 031030 0   0   777777777777 0            000000031030 


*031030 SETZ 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031030 031030 0   0   400000000000 0            0            
IT1	031030 0      0   0   400000000000 0            0            
AT3	031030 0      0   0   0            0            400000000000 
AT6	031030 0      0   0   0            0            400000000000 
FT1A	031030 0      0   0   0            0            0            
FT9	031031 0      0   0   0            0            0            
ET0	031031 0      0   0   0            0            0            
ST1	031031 0      0   0   0            0            0            
ST2	031031 0      0   0   0            0            0            
ST9	031031 0      0   0   0            0            0            


*031031 TDZ 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031031 031031 0   0   630000000000 0            0            
IT1	031031 0      0   0   630000000000 0            0            
AT3	031031 0      0   0   0            0            630000000000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 30
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0220

AT6	031031 0      0   0   0            0            630000000000 
FT0	031031 0      0   0   0            0            630000000000 
FT1A	031031 0      0   0   0            0            0            
FT2	031031 0      0   0   0            0            0            
FT2RQ	031031 0      0   0   0            0            0            
FT3	031031 0      0   0   0            0            0            
FT9	031032 0      0   0   0            0            0            
ET0	031032 0      0   0   0            0            0            
ET1	031032 0      0   0   0            0            0            
ET2	031032 0      0   0   0            0            0            
ST1	031032 0      0   0   0            0            0            
ST2	031032 0      0   0   0            0            0            
ST9	031032 0      0   0   0            0            0            


*031032 CAI 	0,000000
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031032 031032 0   0   300000000000 0            0            
IT1	031032 0      0   0   300000000000 0            0            
AT3	031032 0      0   0   0            0            300000000000 
AT6	031032 0      0   0   0            0            300000000000 
FT1A	031032 0      0   0   0            0            0            
FT2	031032 0      0   0   0            0            0            
FT2RQ	031032 0      0   0   0            0            0            
FT3	031032 0      0   0   0            0            0            
FT9	031033 0      0   0   0            0            0            
ET0	031033 0      0   0   0            0            0            
ST1A	031033 0      0   0   0            0            0            
ST9	031033 0      0   0   0            0            0            


*031033 SKIPE	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031033 031033 0   0   332000000000 0            0            
IT1	031033 0      0   0   332000000000 0            0            
AT3	031033 0      0   0   0            0            332000000000 
AT6	031033 0      0   0   0            0            332000000000 
FT0	031033 0      0   0   0            0            332000000000 
FT1A	031033 0      0   0   0            0            0            
FT9	031034 0      0   0   0            0            0            
ET0	031035 0      0   0   0            0            0            
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 31
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0221

ST1A	031035 0      0   0   0            0            0            
ST9	031035 0      0   0   0            0            0            


*031035 JUMPA	0,031036
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031035 031035 0   0   324000031036 0            000000031036 
IT1	031035 0      0   0   324000031036 0            000000031036 
AT3	031035 0      0   0   000000031036 0            324000031036 
AT6	031035 031036 0   0   000000031036 0            324000031036 
FT1A	031035 031036 0   0   000000031036 0            000000031036 
FT2	031035 031036 0   0   0            0            000000031036 
FT2RQ	031035 031036 0   0   0            0            000000031036 
FT3	031035 031036 0   0   0            0            000000031036 
FT9	031036 031036 0   0   0            0            000000031036 
ET0	031036 031036 0   0   0            0            000000031036 
ST1A	031036 031036 0   0   0            0            000000031036 
ST9	031036 031036 0   0   0            0            000000031036 


*031036 SETO 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031036 031036 0   0   474000000000 0            0            
IT1	031036 0      0   0   474000000000 0            0            
AT3	031036 0      0   0   0            0            474000000000 
AT6	031036 0      0   0   0            0            474000000000 
FT1A	031036 0      0   0   0            0            0            
FT9	031037 0      0   0   0            0            0            
ET0	031037 0      0   0   777777777777 0            0            
ST1	031037 0      0   0   777777777777 0            0            
ST2	031037 0      0   0   777777777777 0            0            
ST9	031037 0      0   0   777777777777 0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 32
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0222

*031037 TDZ 	0,034013
INITIAL
C(AC)=777777 777777 
C(E)=777777 000000 
FINAL
C(AC)=000000 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031037 031037 0   0   630000034013 0            777777000000 
IT1	031037 0      0   0   630000034013 0            777777000000 
AT3	031037 0      0   0   000000034013 0            630000034013 
AT6	031037 034013 0   0   000000034013 0            630000034013 
FT0	031037 034013 0   0   777777000000 0            630000034013 
FT1A	031037 034013 0   0   777777000000 0            777777000000 
FT2	031037 034013 0   0   0            0            777777000000 
FT2RQ	031037 034013 0   0   777777777777 0            777777000000 
FT3	031037 034013 0   0   777777777777 0            777777000000 
FT9	031040 034013 0   0   777777777777 0            777777000000 
ET0	031040 034013 0   0   777777777777 0            777777000000 
ET1	031040 034013 0   0   000000777777 0            777777000000 
ET2	031040 034013 0   0   000000777777 0            777777000000 
ST1	031040 034013 0   0   000000777777 0            777777000000 
ST2	031040 034013 0   0   000000777777 0            777777000000 
ST9	031040 034013 0   0   000000777777 0            777777000000 


*031040 CAI 	0,000000
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031040 031040 0   0   300000000000 0            0            
IT1	031040 0      0   0   300000000000 0            0            
AT3	031040 0      0   0   0            0            300000000000 
AT6	031040 0      0   0   0            0            300000000000 
FT1A	031040 0      0   0   0            0            0            
FT2	031040 0      0   0   0            0            0            
FT2RQ	031040 0      0   0   000000777777 0            0            
FT3	031040 0      0   0   000000777777 0            0            
FT9	031041 0      0   0   000000777777 0            0            
ET0	031041 0      0   0   000000777777 0            0            
ST1A	031041 0      0   0   000000777777 0            0            
ST9	031041 0      0   0   000000777777 0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 33
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0223

*031041 CAME	0,034015
INITIAL
C(AC)=000000 777777 
C(E)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031041 031041 0   0   312000034015 0            000000777777 
IT1	031041 0      0   0   312000034015 0            000000777777 
AT3	031041 0      0   0   000000034015 0            312000034015 
AT6	031041 034015 0   0   000000034015 0            312000034015 
FT0	031041 034015 0   0   000000777777 0            312000034015 
FT1A	031041 034015 0   0   000000777777 0            000000777777 
FT2	031041 034015 0   0   0            0            000000777777 
FT2RQ	031041 034015 0   0   000000777777 0            000000777777 
FT3	031041 034015 0   0   000000777777 0            000000777777 
FT9	031042 034015 0   0   000000777777 0            000000777777 
ET0	031043 034015 0   0   0            0            000000777777 
ST1A	031043 034015 0   0   0            0            000000777777 
ST9	031043 034015 0   0   0            0            000000777777 


*031043 JUMPA	0,031044
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031043 031043 0   0   324000031044 0            000000031044 
IT1	031043 0      0   0   324000031044 0            000000031044 
AT3	031043 0      0   0   000000031044 0            324000031044 
AT6	031043 031044 0   0   000000031044 0            324000031044 
FT1A	031043 031044 0   0   000000031044 0            000000031044 
FT2	031043 031044 0   0   0            0            000000031044 
FT2RQ	031043 031044 0   0   000000777777 0            000000031044 
FT3	031043 031044 0   0   000000777777 0            000000031044 
FT9	031044 031044 0   0   000000777777 0            000000031044 
ET0	031044 031044 0   0   000000777777 0            000000031044 
ST1A	031044 031044 0   0   000000777777 0            000000031044 
ST9	031044 031044 0   0   000000777777 0            000000031044 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 34
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0224

*031044 SETO 	0,000000
INITIAL
C(AC)=000000 777777 
C(E)=000000 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031044 031044 0   0   474000000000 0            0            
IT1	031044 0      0   0   474000000000 0            0            
AT3	031044 0      0   0   0            0            474000000000 
AT6	031044 0      0   0   0            0            474000000000 
FT1A	031044 0      0   0   0            0            0            
FT9	031045 0      0   0   0            0            0            
ET0	031045 0      0   0   777777777777 0            0            
ST1	031045 0      0   0   777777777777 0            0            
ST2	031045 0      0   0   777777777777 0            0            
ST9	031045 0      0   0   777777777777 0            0            


*031045 TDZ 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031045 031045 0   0   630000000000 0            777777777777 
IT1	031045 0      0   0   630000000000 0            777777777777 
AT3	031045 0      0   0   0            0            630000000000 
AT6	031045 0      0   0   0            0            630000000000 
FT0	031045 0      0   0   777777777777 0            630000000000 
FT1A	031045 0      0   0   777777777777 0            777777777777 
FT2	031045 0      0   0   0            0            777777777777 
FT2RQ	031045 0      0   0   777777777777 0            777777777777 
FT3	031045 0      0   0   777777777777 0            777777777777 
FT9	031046 0      0   0   777777777777 0            777777777777 
ET0	031046 0      0   0   777777777777 0            777777777777 
ET1	031046 0      0   0   0            0            777777777777 
ET2	031046 0      0   0   0            0            777777777777 
ST1	031046 0      0   0   0            0            777777777777 
ST2	031046 0      0   0   0            0            777777777777 
ST9	031046 0      0   0   0            0            777777777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 35
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0225

*031046 CAI 	0,000000
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031046 031046 0   0   300000000000 0            0            
IT1	031046 0      0   0   300000000000 0            0            
AT3	031046 0      0   0   0            0            300000000000 
AT6	031046 0      0   0   0            0            300000000000 
FT1A	031046 0      0   0   0            0            0            
FT2	031046 0      0   0   0            0            0            
FT2RQ	031046 0      0   0   0            0            0            
FT3	031046 0      0   0   0            0            0            
FT9	031047 0      0   0   0            0            0            
ET0	031047 0      0   0   0            0            0            
ST1A	031047 0      0   0   0            0            0            
ST9	031047 0      0   0   0            0            0            


*031047 SKIPE	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031047 031047 0   0   332000000000 0            0            
IT1	031047 0      0   0   332000000000 0            0            
AT3	031047 0      0   0   0            0            332000000000 
AT6	031047 0      0   0   0            0            332000000000 
FT0	031047 0      0   0   0            0            332000000000 
FT1A	031047 0      0   0   0            0            0            
FT9	031050 0      0   0   0            0            0            
ET0	031051 0      0   0   0            0            0            
ST1A	031051 0      0   0   0            0            0            
ST9	031051 0      0   0   0            0            0            


*031051 JUMPA	0,031052
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031051 031051 0   0   324000031052 0            000000031052 
IT1	031051 0      0   0   324000031052 0            000000031052 
AT3	031051 0      0   0   000000031052 0            324000031052 
AT6	031051 031052 0   0   000000031052 0            324000031052 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 36
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0226

FT1A	031051 031052 0   0   000000031052 0            000000031052 
FT2	031051 031052 0   0   0            0            000000031052 
FT2RQ	031051 031052 0   0   0            0            000000031052 
FT3	031051 031052 0   0   0            0            000000031052 
FT9	031052 031052 0   0   0            0            000000031052 
ET0	031052 031052 0   0   0            0            000000031052 
ST1A	031052 031052 0   0   0            0            000000031052 
ST9	031052 031052 0   0   0            0            000000031052 


*031052 SETZ 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031052 031052 0   0   400000000000 0            0            
IT1	031052 0      0   0   400000000000 0            0            
AT3	031052 0      0   0   0            0            400000000000 
AT6	031052 0      0   0   0            0            400000000000 
FT1A	031052 0      0   0   0            0            0            
FT9	031053 0      0   0   0            0            0            
ET0	031053 0      0   0   0            0            0            
ST1	031053 0      0   0   0            0            0            
ST2	031053 0      0   0   0            0            0            
ST9	031053 0      0   0   0            0            0            


*031053 TDZ 	0,034012
INITIAL
C(AC)=000000 000000 
C(E)=777777 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031053 031053 0   0   630000034012 0            0            
IT1	031053 0      0   0   630000034012 0            0            
AT3	031053 0      0   0   000000034012 0            630000034012 
AT6	031053 034012 0   0   000000034012 0            630000034012 
FT0	031053 034012 0   0   777777777777 0            630000034012 
FT1A	031053 034012 0   0   777777777777 0            777777777777 
FT2	031053 034012 0   0   0            0            777777777777 
FT2RQ	031053 034012 0   0   0            0            777777777777 
FT3	031053 034012 0   0   0            0            777777777777 
FT9	031054 034012 0   0   0            0            777777777777 
ET0	031054 034012 0   0   0            0            777777777777 
ET1	031054 034012 0   0   0            0            0            
ET2	031054 034012 0   0   0            0            0            
ST1	031054 034012 0   0   0            0            0            
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 37
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0227

ST2	031054 034012 0   0   0            0            0            
ST9	031054 034012 0   0   0            0            0            


*031054 CAI 	0,000000
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031054 031054 0   0   300000000000 0            0            
IT1	031054 0      0   0   300000000000 0            0            
AT3	031054 0      0   0   0            0            300000000000 
AT6	031054 0      0   0   0            0            300000000000 
FT1A	031054 0      0   0   0            0            0            
FT2	031054 0      0   0   0            0            0            
FT2RQ	031054 0      0   0   0            0            0            
FT3	031054 0      0   0   0            0            0            
FT9	031055 0      0   0   0            0            0            
ET0	031055 0      0   0   0            0            0            
ST1A	031055 0      0   0   0            0            0            
ST9	031055 0      0   0   0            0            0            


*031055 SKIPE	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031055 031055 0   0   332000000000 0            0            
IT1	031055 0      0   0   332000000000 0            0            
AT3	031055 0      0   0   0            0            332000000000 
AT6	031055 0      0   0   0            0            332000000000 
FT0	031055 0      0   0   0            0            332000000000 
FT1A	031055 0      0   0   0            0            0            
FT9	031056 0      0   0   0            0            0            
ET0	031057 0      0   0   0            0            0            
ST1A	031057 0      0   0   0            0            0            
ST9	031057 0      0   0   0            0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 38
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0228

*031057 JUMPA	0,031060
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031057 031057 0   0   324000031060 0            000000031060 
IT1	031057 0      0   0   324000031060 0            000000031060 
AT3	031057 0      0   0   000000031060 0            324000031060 
AT6	031057 031060 0   0   000000031060 0            324000031060 
FT1A	031057 031060 0   0   000000031060 0            000000031060 
FT2	031057 031060 0   0   0            0            000000031060 
FT2RQ	031057 031060 0   0   0            0            000000031060 
FT3	031057 031060 0   0   0            0            000000031060 
FT9	031060 031060 0   0   0            0            000000031060 
ET0	031060 031060 0   0   0            0            000000031060 
ST1A	031060 031060 0   0   0            0            000000031060 
ST9	031060 031060 0   0   0            0            000000031060 


*031060 SETO 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031060 031060 0   0   474000000000 0            0            
IT1	031060 0      0   0   474000000000 0            0            
AT3	031060 0      0   0   0            0            474000000000 
AT6	031060 0      0   0   0            0            474000000000 
FT1A	031060 0      0   0   0            0            0            
FT9	031061 0      0   0   0            0            0            
ET0	031061 0      0   0   777777777777 0            0            
ST1	031061 0      0   0   777777777777 0            0            
ST2	031061 0      0   0   777777777777 0            0            
ST9	031061 0      0   0   777777777777 0            0            


*031061 TDZ 	0,034014
INITIAL
C(AC)=777777 777777 
C(E)=000000 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031061 031061 0   0   630000034014 0            0            
IT1	031061 0      0   0   630000034014 0            0            
AT3	031061 0      0   0   000000034014 0            630000034014 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 39
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0229

AT6	031061 034014 0   0   000000034014 0            630000034014 
FT0	031061 034014 0   0   0            0            630000034014 
FT1A	031061 034014 0   0   0            0            0            
FT2	031061 034014 0   0   0            0            0            
FT2RQ	031061 034014 0   0   777777777777 0            0            
FT3	031061 034014 0   0   777777777777 0            0            
FT9	031062 034014 0   0   777777777777 0            0            
ET0	031062 034014 0   0   777777777777 0            0            
ET1	031062 034014 0   0   777777777777 0            0            
ET2	031062 034014 0   0   777777777777 0            0            
ST1	031062 034014 0   0   777777777777 0            0            
ST2	031062 034014 0   0   777777777777 0            0            
ST9	031062 034014 0   0   777777777777 0            0            


*031062 CAI 	0,000000
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031062 031062 0   0   300000000000 0            0            
IT1	031062 0      0   0   300000000000 0            0            
AT3	031062 0      0   0   0            0            300000000000 
AT6	031062 0      0   0   0            0            300000000000 
FT1A	031062 0      0   0   0            0            0            
FT2	031062 0      0   0   0            0            0            
FT2RQ	031062 0      0   0   777777777777 0            0            
FT3	031062 0      0   0   777777777777 0            0            
FT9	031063 0      0   0   777777777777 0            0            
ET0	031063 0      0   0   777777777777 0            0            
ST1A	031063 0      0   0   777777777777 0            0            
ST9	031063 0      0   0   777777777777 0            0            


*031063 CAME	0,034012
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031063 031063 0   0   312000034012 0            777777777777 
IT1	031063 0      0   0   312000034012 0            777777777777 
AT3	031063 0      0   0   000000034012 0            312000034012 
AT6	031063 034012 0   0   000000034012 0            312000034012 
FT0	031063 034012 0   0   777777777777 0            312000034012 
FT1A	031063 034012 0   0   777777777777 0            777777777777 
FT2	031063 034012 0   0   0            0            777777777777 
FT2RQ	031063 034012 0   0   777777777777 0            777777777777 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 40
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0230

FT3	031063 034012 0   0   777777777777 0            777777777777 
FT9	031064 034012 0   0   777777777777 0            777777777777 
ET0	031065 034012 0   0   0            0            777777777777 
ST1A	031065 034012 0   0   0            0            777777777777 
ST9	031065 034012 0   0   0            0            777777777777 


*031065 JUMPA	0,031066
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031065 031065 0   0   324000031066 0            000000031066 
IT1	031065 0      0   0   324000031066 0            000000031066 
AT3	031065 0      0   0   000000031066 0            324000031066 
AT6	031065 031066 0   0   000000031066 0            324000031066 
FT1A	031065 031066 0   0   000000031066 0            000000031066 
FT2	031065 031066 0   0   0            0            000000031066 
FT2RQ	031065 031066 0   0   777777777777 0            000000031066 
FT3	031065 031066 0   0   777777777777 0            000000031066 
FT9	031066 031066 0   0   777777777777 0            000000031066 
ET0	031066 031066 0   0   777777777777 0            000000031066 
ST1A	031066 031066 0   0   777777777777 0            000000031066 
ST9	031066 031066 0   0   777777777777 0            000000031066 


*031066 SETO 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031066 031066 0   0   474000000000 0            0            
IT1	031066 0      0   0   474000000000 0            0            
AT3	031066 0      0   0   0            0            474000000000 
AT6	031066 0      0   0   0            0            474000000000 
FT1A	031066 0      0   0   0            0            0            
FT9	031067 0      0   0   0            0            0            
ET0	031067 0      0   0   777777777777 0            0            
ST1	031067 0      0   0   777777777777 0            0            
ST2	031067 0      0   0   777777777777 0            0            
ST9	031067 0      0   0   777777777777 0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 41
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0231

*031067 TDC 	0,034015
INITIAL
C(AC)=777777 777777 
C(E)=000000 777777 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031067 031067 0   0   650000034015 0            000000777777 
IT1	031067 0      0   0   650000034015 0            000000777777 
AT3	031067 0      0   0   000000034015 0            650000034015 
AT6	031067 034015 0   0   000000034015 0            650000034015 
FT0	031067 034015 0   0   000000777777 0            650000034015 
FT1A	031067 034015 0   0   000000777777 0            000000777777 
FT2	031067 034015 0   0   0            0            000000777777 
FT2RQ	031067 034015 0   0   777777777777 0            000000777777 
FT3	031067 034015 0   0   777777777777 0            000000777777 
FT9	031070 034015 0   0   777777777777 0            000000777777 
ET0	031070 034015 0   0   777777777777 0            000000777777 
ET1	031070 034015 0   0   777777000000 0            000000777777 
ET2	031070 034015 0   0   777777000000 0            000000777777 
ST1	031070 034015 0   0   777777000000 0            000000777777 
ST2	031070 034015 0   0   777777000000 0            000000777777 
ST9	031070 034015 0   0   777777000000 0            000000777777 


*031070 CAI 	0,000000
INITIAL
C(AC)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031070 031070 0   0   300000000000 0            0            
IT1	031070 0      0   0   300000000000 0            0            
AT3	031070 0      0   0   0            0            300000000000 
AT6	031070 0      0   0   0            0            300000000000 
FT1A	031070 0      0   0   0            0            0            
FT2	031070 0      0   0   0            0            0            
FT2RQ	031070 0      0   0   777777000000 0            0            
FT3	031070 0      0   0   777777000000 0            0            
FT9	031071 0      0   0   777777000000 0            0            
ET0	031071 0      0   0   777777000000 0            0            
ST1A	031071 0      0   0   777777000000 0            0            
ST9	031071 0      0   0   777777000000 0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 42
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0232

*031071 CAME	0,034013
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031071 031071 0   0   312000034013 0            777777000000 
IT1	031071 0      0   0   312000034013 0            777777000000 
AT3	031071 0      0   0   000000034013 0            312000034013 
AT6	031071 034013 0   0   000000034013 0            312000034013 
FT0	031071 034013 0   0   777777000000 0            312000034013 
FT1A	031071 034013 0   0   777777000000 0            777777000000 
FT2	031071 034013 0   0   0            0            777777000000 
FT2RQ	031071 034013 0   0   777777000000 0            777777000000 
FT3	031071 034013 0   0   777777000000 0            777777000000 
FT9	031072 034013 0   0   777777000000 0            777777000000 
ET0	031073 034013 0   0   0            0            777777000000 
ST1A	031073 034013 0   0   0            0            777777000000 
ST9	031073 034013 0   0   0            0            777777000000 


*031073 JUMPA	0,031074
INITIAL
C(AC)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031073 031073 0   0   324000031074 0            000000031074 
IT1	031073 0      0   0   324000031074 0            000000031074 
AT3	031073 0      0   0   000000031074 0            324000031074 
AT6	031073 031074 0   0   000000031074 0            324000031074 
FT1A	031073 031074 0   0   000000031074 0            000000031074 
FT2	031073 031074 0   0   0            0            000000031074 
FT2RQ	031073 031074 0   0   777777000000 0            000000031074 
FT3	031073 031074 0   0   777777000000 0            000000031074 
FT9	031074 031074 0   0   777777000000 0            000000031074 
ET0	031074 031074 0   0   777777000000 0            000000031074 
ST1A	031074 031074 0   0   777777000000 0            000000031074 
ST9	031074 031074 0   0   777777000000 0            000000031074 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 43
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0233

*031074 SETZ 	0,000000
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031074 031074 0   0   400000000000 0            0            
IT1	031074 0      0   0   400000000000 0            0            
AT3	031074 0      0   0   0            0            400000000000 
AT6	031074 0      0   0   0            0            400000000000 
FT1A	031074 0      0   0   0            0            0            
FT9	031075 0      0   0   0            0            0            
ET0	031075 0      0   0   0            0            0            
ST1	031075 0      0   0   0            0            0            
ST2	031075 0      0   0   0            0            0            
ST9	031075 0      0   0   0            0            0            


*031075 TDC 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031075 031075 0   0   650000000000 0            0            
IT1	031075 0      0   0   650000000000 0            0            
AT3	031075 0      0   0   0            0            650000000000 
AT6	031075 0      0   0   0            0            650000000000 
FT0	031075 0      0   0   0            0            650000000000 
FT1A	031075 0      0   0   0            0            0            
FT2	031075 0      0   0   0            0            0            
FT2RQ	031075 0      0   0   0            0            0            
FT3	031075 0      0   0   0            0            0            
FT9	031076 0      0   0   0            0            0            
ET0	031076 0      0   0   0            0            0            
ET1	031076 0      0   0   0            0            0            
ET2	031076 0      0   0   0            0            0            
ST1	031076 0      0   0   0            0            0            
ST2	031076 0      0   0   0            0            0            
ST9	031076 0      0   0   0            0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 44
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0234

*031076 CAI 	0,000000
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031076 031076 0   0   300000000000 0            0            
IT1	031076 0      0   0   300000000000 0            0            
AT3	031076 0      0   0   0            0            300000000000 
AT6	031076 0      0   0   0            0            300000000000 
FT1A	031076 0      0   0   0            0            0            
FT2	031076 0      0   0   0            0            0            
FT2RQ	031076 0      0   0   0            0            0            
FT3	031076 0      0   0   0            0            0            
FT9	031077 0      0   0   0            0            0            
ET0	031077 0      0   0   0            0            0            
ST1A	031077 0      0   0   0            0            0            
ST9	031077 0      0   0   0            0            0            


*031077 SKIPE	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031077 031077 0   0   332000000000 0            0            
IT1	031077 0      0   0   332000000000 0            0            
AT3	031077 0      0   0   0            0            332000000000 
AT6	031077 0      0   0   0            0            332000000000 
FT0	031077 0      0   0   0            0            332000000000 
FT1A	031077 0      0   0   0            0            0            
FT9	0      0      0   0   0            0            0            
ET0	031101 0      0   0   0            0            0            
ST1A	031101 0      0   0   0            0            0            
ST9	031101 0      0   0   0            0            0            


*031101 JUMPA	0,031102
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031101 031101 0   0   324000031102 0            000000031102 
IT1	031101 0      0   0   324000031102 0            000000031102 
AT3	031101 0      0   0   000000031102 0            324000031102 
AT6	031101 031102 0   0   000000031102 0            324000031102 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 45
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0235

FT1A	031101 031102 0   0   000000031102 0            000000031102 
FT2	031101 031102 0   0   0            0            000000031102 
FT2RQ	031101 031102 0   0   0            0            000000031102 
FT3	031101 031102 0   0   0            0            000000031102 
FT9	031102 031102 0   0   0            0            000000031102 
ET0	031102 031102 0   0   0            0            000000031102 
ST1A	031102 031102 0   0   0            0            000000031102 
ST9	031102 031102 0   0   0            0            000000031102 


*031102 SETO 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031102 031102 0   0   474000000000 0            0            
IT1	031102 0      0   0   474000000000 0            0            
AT3	031102 0      0   0   0            0            474000000000 
AT6	031102 0      0   0   0            0            474000000000 
FT1A	031102 0      0   0   0            0            0            
FT9	031103 0      0   0   0            0            0            
ET0	031103 0      0   0   777777777777 0            0            
ST1	031103 0      0   0   777777777777 0            0            
ST2	031103 0      0   0   777777777777 0            0            
ST9	031103 0      0   0   777777777777 0            0            


*031103 TDC 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031103 031103 0   0   650000000000 0            777777777777 
IT1	031103 0      0   0   650000000000 0            777777777777 
AT3	031103 0      0   0   0            0            650000000000 
AT6	031103 0      0   0   0            0            650000000000 
FT0	031103 0      0   0   777777777777 0            650000000000 
FT1A	031103 0      0   0   777777777777 0            777777777777 
FT2	031103 0      0   0   0            0            777777777777 
FT2RQ	031103 0      0   0   777777777777 0            777777777777 
FT3	031103 0      0   0   777777777777 0            777777777777 
FT9	031104 0      0   0   777777777777 0            777777777777 
ET0	031104 0      0   0   777777777777 0            777777777777 
ET1	031104 0      0   0   0            0            777777777777 
ET2	031104 0      0   0   0            0            777777777777 
ST1	031104 0      0   0   0            0            777777777777 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 46
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0236

ST2	031104 0      0   0   0            0            777777777777 
ST9	031104 0      0   0   0            0            777777777777 


*031104 CAI 	0,000000
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031104 031104 0   0   300000000000 0            0            
IT1	031104 0      0   0   300000000000 0            0            
AT3	031104 0      0   0   0            0            300000000000 
AT6	031104 0      0   0   0            0            300000000000 
FT1A	031104 0      0   0   0            0            0            
FT2	031104 0      0   0   0            0            0            
FT2RQ	031104 0      0   0   0            0            0            
FT3	031104 0      0   0   0            0            0            
FT9	031105 0      0   0   0            0            0            
ET0	031105 0      0   0   0            0            0            
ST1A	031105 0      0   0   0            0            0            
ST9	031105 0      0   0   0            0            0            


*031105 SKIPE	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031105 031105 0   0   332000000000 0            0            
IT1	031105 0      0   0   332000000000 0            0            
AT3	031105 0      0   0   0            0            332000000000 
AT6	031105 0      0   0   0            0            332000000000 
FT0	031105 0      0   0   0            0            332000000000 
FT1A	031105 0      0   0   0            0            0            
FT9	031106 0      0   0   0            0            0            
ET0	031107 0      0   0   0            0            0            
ST1A	031107 0      0   0   0            0            0            
ST9	031107 0      0   0   0            0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 47
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0237

*031107 JUMPA	0,031110
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031107 031107 0   0   324000031110 0            000000031110 
IT1	031107 0      0   0   324000031110 0            000000031110 
AT3	031107 0      0   0   000000031110 0            324000031110 
AT6	031107 031110 0   0   000000031110 0            324000031110 
FT1A	031107 031110 0   0   000000031110 0            000000031110 
FT2	031107 031110 0   0   0            0            000000031110 
FT2RQ	031107 031110 0   0   0            0            000000031110 
FT3	031107 031110 0   0   0            0            000000031110 
FT9	031110 031110 0   0   0            0            000000031110 
ET0	031110 031110 0   0   0            0            000000031110 
ST1A	031110 031110 0   0   0            0            000000031110 
ST9	031110 031110 0   0   0            0            000000031110 


*031110 SETZ 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031110 031110 0   0   400000000000 0            0            
IT1	031110 0      0   0   400000000000 0            0            
AT3	031110 0      0   0   0            0            400000000000 
AT6	031110 0      0   0   0            0            400000000000 
FT1A	031110 0      0   0   0            0            0            
FT9	031111 0      0   0   0            0            0            
ET0	031111 0      0   0   0            0            0            
ST1	031111 0      0   0   0            0            0            
ST2	031111 0      0   0   0            0            0            
ST9	031111 0      0   0   0            0            0            


*031111 TDC 	0,034012
INITIAL
C(AC)=000000 000000 
C(E)=777777 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031111 031111 0   0   650000034012 0            0            
IT1	031111 0      0   0   650000034012 0            0            
AT3	031111 0      0   0   000000034012 0            650000034012 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 48
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0238

AT6	031111 034012 0   0   000000034012 0            650000034012 
FT0	031111 034012 0   0   777777777777 0            650000034012 
FT1A	031111 034012 0   0   777777777777 0            777777777777 
FT2	031111 034012 0   0   0            0            777777777777 
FT2RQ	031111 034012 0   0   0            0            777777777777 
FT3	031111 034012 0   0   0            0            777777777777 
FT9	031112 034012 0   0   0            0            777777777777 
ET0	031112 034012 0   0   0            0            777777777777 
ET1	031112 034012 0   0   777777777777 0            0            
ET2	031112 034012 0   0   777777777777 0            0            
ST1	031112 034012 0   0   777777777777 0            0            
ST2	031112 034012 0   0   777777777777 0            0            
ST9	031112 034012 0   0   777777777777 0            0            


*031112 CAI 	0,000000
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031112 031112 0   0   300000000000 0            0            
IT1	031112 0      0   0   300000000000 0            0            
AT3	031112 0      0   0   0            0            300000000000 
AT6	031112 0      0   0   0            0            300000000000 
FT1A	031112 0      0   0   0            0            0            
FT2	031112 0      0   0   0            0            0            
FT2RQ	031112 0      0   0   777777777777 0            0            
FT3	031112 0      0   0   777777777777 0            0            
FT9	031113 0      0   0   777777777777 0            0            
ET0	031113 0      0   0   777777777777 0            0            
ST1A	031113 0      0   0   777777777777 0            0            
ST9	031113 0      0   0   777777777777 0            0            


*031113 CAME	0,034012
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031113 031113 0   0   312000034012 0            777777777777 
IT1	031113 0      0   0   312000034012 0            777777777777 
AT3	031113 0      0   0   000000034012 0            312000034012 
AT6	031113 034012 0   0   000000034012 0            312000034012 
FT0	031113 034012 0   0   777777777777 0            312000034012 
FT1A	031113 034012 0   0   777777777777 0            777777777777 
FT2	031113 034012 0   0   0            0            777777777777 
FT2RQ	031113 034012 0   0   777777777777 0            777777777777 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 49
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0239

FT3	031113 034012 0   0   777777777777 0            777777777777 
FT9	031114 034012 0   0   777777777777 0            777777777777 
ET0	031115 034012 0   0   0            0            777777777777 
ST1A	031115 034012 0   0   0            0            777777777777 
ST9	031115 034012 0   0   0            0            777777777777 


*031115 JUMPA	0,031116
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031115 031115 0   0   324000031116 0            000000031116 
IT1	031115 0      0   0   324000031116 0            000000031116 
AT3	031115 0      0   0   000000031116 0            324000031116 
AT6	031115 031116 0   0   000000031116 0            324000031116 
FT1A	031115 031116 0   0   000000031116 0            000000031116 
FT2	031115 031116 0   0   0            0            000000031116 
FT2RQ	031115 031116 0   0   777777777777 0            000000031116 
FT3	031115 031116 0   0   777777777777 0            000000031116 
FT9	031116 031116 0   0   777777777777 0            000000031116 
ET0	031116 031116 0   0   777777777777 0            000000031116 
ST1A	031116 031116 0   0   777777777777 0            000000031116 
ST9	031116 031116 0   0   777777777777 0            000000031116 


*031116 SETO 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031116 031116 0   0   474000000000 0            0            
IT1	031116 0      0   0   474000000000 0            0            
AT3	031116 0      0   0   0            0            474000000000 
AT6	031116 0      0   0   0            0            474000000000 
FT1A	031116 0      0   0   0            0            0            
FT9	031117 0      0   0   0            0            0            
ET0	031117 0      0   0   777777777777 0            0            
ST1	031117 0      0   0   777777777777 0            0            
ST2	031117 0      0   0   777777777777 0            0            
ST9	031117 0      0   0   777777777777 0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 50
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0240

*031117 TDC 	0,034014
INITIAL
C(AC)=777777 777777 
C(E)=000000 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031117 031117 0   0   650000034014 0            0            
IT1	031117 0      0   0   650000034014 0            0            
AT3	031117 0      0   0   000000034014 0            650000034014 
AT6	031117 034014 0   0   000000034014 0            650000034014 
FT0	031117 034014 0   0   0            0            650000034014 
FT1A	031117 034014 0   0   0            0            0            
FT2	031117 034014 0   0   0            0            0            
FT2RQ	031117 034014 0   0   777777777777 0            0            
FT3	031117 034014 0   0   777777777777 0            0            
FT9	031120 034014 0   0   777777777777 0            0            
ET0	031120 034014 0   0   777777777777 0            0            
ET1	031120 034014 0   0   777777777777 0            0            
ET2	031120 034014 0   0   777777777777 0            0            
ST1	031120 034014 0   0   777777777777 0            0            
ST2	031120 034014 0   0   777777777777 0            0            
ST9	031120 034014 0   0   777777777777 0            0            


*031120 CAI 	0,000000
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031120 031120 0   0   300000000000 0            0            
IT1	031120 0      0   0   300000000000 0            0            
AT3	031120 0      0   0   0            0            300000000000 
AT6	031120 0      0   0   0            0            300000000000 
FT1A	031120 0      0   0   0            0            0            
FT2	031120 0      0   0   0            0            0            
FT2RQ	031120 0      0   0   777777777777 0            0            
FT3	031120 0      0   0   777777777777 0            0            
FT9	031121 0      0   0   777777777777 0            0            
ET0	031121 0      0   0   777777777777 0            0            
ST1A	031121 0      0   0   777777777777 0            0            
ST9	031121 0      0   0   777777777777 0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 51
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0241

*031121 CAME	0,034012
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031121 031121 0   0   312000034012 0            777777777777 
IT1	031121 0      0   0   312000034012 0            777777777777 
AT3	031121 0      0   0   000000034012 0            312000034012 
AT6	031121 034012 0   0   000000034012 0            312000034012 
FT0	031121 034012 0   0   777777777777 0            312000034012 
FT1A	031121 034012 0   0   777777777777 0            777777777777 
FT2	031121 034012 0   0   0            0            777777777777 
FT2RQ	031121 034012 0   0   777777777777 0            777777777777 
FT3	031121 034012 0   0   777777777777 0            777777777777 
FT9	031122 034012 0   0   777777777777 0            777777777777 
ET0	031123 034012 0   0   0            0            777777777777 
ST1A	031123 034012 0   0   0            0            777777777777 
ST9	031123 034012 0   0   0            0            777777777777 


*031123 JUMPA	0,031124
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031123 031123 0   0   324000031124 0            000000031124 
IT1	031123 0      0   0   324000031124 0            000000031124 
AT3	031123 0      0   0   000000031124 0            324000031124 
AT6	031123 031124 0   0   000000031124 0            324000031124 
FT1A	031123 031124 0   0   000000031124 0            000000031124 
FT2	031123 031124 0   0   0            0            000000031124 
FT2RQ	031123 031124 0   0   777777777777 0            000000031124 
FT3	031123 031124 0   0   777777777777 0            000000031124 
FT9	031124 031124 0   0   777777777777 0            000000031124 
ET0	031124 031124 0   0   777777777777 0            000000031124 
ST1A	031124 031124 0   0   777777777777 0            000000031124 
ST9	031124 031124 0   0   777777777777 0            000000031124 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 52
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0242

*031124 SETZ 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031124 031124 0   0   400000000000 0            0            
IT1	031124 0      0   0   400000000000 0            0            
AT3	031124 0      0   0   0            0            400000000000 
AT6	031124 0      0   0   0            0            400000000000 
FT1A	031124 0      0   0   0            0            0            
FT9	031125 0      0   0   0            0            0            
ET0	031125 0      0   0   0            0            0            
ST1	031125 0      0   0   0            0            0            
ST2	031125 0      0   0   0            0            0            
ST9	031125 0      0   0   0            0            0            


*031125 TDNA	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031125 031125 0   0   614000000000 0            0            
IT1	031125 0      0   0   614000000000 0            0            
AT3	031125 0      0   0   0            0            614000000000 
AT6	031125 0      0   0   0            0            614000000000 
FT0	031125 0      0   0   0            0            614000000000 
FT1A	031125 0      0   0   0            0            0            
FT2	031125 0      0   0   0            0            0            
FT2RQ	031125 0      0   0   0            0            0            
FT3	031125 0      0   0   0            0            0            
FT9	031126 0      0   0   0            0            0            
ET0	031126 0      0   0   0            0            0            
ET1	031126 0      0   0   0            0            0            
ET2	031127 0      0   0   0            0            0            
ST1A	031127 0      0   0   0            0            0            
ST9	031127 0      0   0   0            0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 53
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0243

*031127 JUMPA	0,031130
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031127 031127 0   0   324000031130 0            000000031130 
IT1	031127 0      0   0   324000031130 0            000000031130 
AT3	031127 0      0   0   000000031130 0            324000031130 
AT6	031127 031130 0   0   000000031130 0            324000031130 
FT1A	031127 031130 0   0   000000031130 0            000000031130 
FT2	031127 031130 0   0   0            0            000000031130 
FT2RQ	031127 031130 0   0   0            0            000000031130 
FT3	031127 031130 0   0   0            0            000000031130 
FT9	031130 031130 0   0   0            0            000000031130 
ET0	031130 031130 0   0   0            0            000000031130 
ST1A	031130 031130 0   0   0            0            000000031130 
ST9	031130 031130 0   0   0            0            000000031130 


*031130 SETO 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031130 031130 0   0   474000000000 0            0            
IT1	031130 0      0   0   474000000000 0            0            
AT3	031130 0      0   0   0            0            474000000000 
AT6	031130 0      0   0   0            0            474000000000 
FT1A	031130 0      0   0   0            0            0            
FT9	031131 0      0   0   0            0            0            
ET0	031131 0      0   0   777777777777 0            0            
ST1	031131 0      0   0   777777777777 0            0            
ST2	031131 0      0   0   777777777777 0            0            
ST9	031131 0      0   0   777777777777 0            0            


*031131 TDN 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031131 031131 0   0   610000000000 0            777777777777 
IT1	031131 0      0   0   610000000000 0            777777777777 
AT3	031131 0      0   0   0            0            610000000000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 54
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0244

AT6	031131 0      0   0   0            0            610000000000 
FT0	031131 0      0   0   777777777777 0            610000000000 
FT1A	031131 0      0   0   777777777777 0            777777777777 
FT2	031131 0      0   0   0            0            777777777777 
FT2RQ	031131 0      0   0   777777777777 0            777777777777 
FT3	031131 0      0   0   777777777777 0            777777777777 
FT9	031132 0      0   0   777777777777 0            777777777777 
ET0	031132 0      0   0   777777777777 0            777777777777 
ET1	031132 0      0   0   777777777777 0            777777777777 
ET2	031132 0      0   0   777777777777 0            777777777777 
ST1A	031132 0      0   0   777777777777 0            777777777777 
ST9	031132 0      0   0   777777777777 0            777777777777 


*031132 SKIPA	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031132 031132 0   0   334000000000 0            777777777777 
IT1	031132 0      0   0   334000000000 0            777777777777 
AT3	031132 0      0   0   0            0            334000000000 
AT6	031132 0      0   0   0            0            334000000000 
FT0	031132 0      0   0   777777777777 0            334000000000 
FT1A	031132 0      0   0   777777777777 0            777777777777 
FT9	031133 0      0   0   777777777777 0            777777777777 
ET0	031134 0      0   0   777777777777 0            777777777777 
ST1A	031134 0      0   0   777777777777 0            777777777777 
ST9	031134 0      0   0   777777777777 0            777777777777 


*031134 JUMPA	0,031135
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031134 031134 0   0   324000031135 0            000000031135 
IT1	031134 0      0   0   324000031135 0            000000031135 
AT3	031134 0      0   0   000000031135 0            324000031135 
AT6	031134 031135 0   0   000000031135 0            324000031135 
FT1A	031134 031135 0   0   000000031135 0            000000031135 
FT2	031134 031135 0   0   0            0            000000031135 
FT2RQ	031134 031135 0   0   777777777777 0            000000031135 
FT3	031134 031135 0   0   777777777777 0            000000031135 
FT9	031135 031135 0   0   777777777777 0            000000031135 
ET0	031135 031135 0   0   777777777777 0            000000031135 
ST1A	031135 031135 0   0   777777777777 0            000000031135 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 55
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0245

ST9	031135 031135 0   0   777777777777 0            000000031135 


*031135 SETZ 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031135 031135 0   0   400000000000 0            0            
IT1	031135 0      0   0   400000000000 0            0            
AT3	031135 0      0   0   0            0            400000000000 
AT6	031135 0      0   0   0            0            400000000000 
FT1A	031135 0      0   0   0            0            0            
FT9	031136 0      0   0   0            0            0            
ET0	031136 0      0   0   0            0            0            
ST1	031136 0      0   0   0            0            0            
ST2	031136 0      0   0   0            0            0            
ST9	031136 0      0   0   0            0            0            


*031136 TDN 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031136 031136 0   0   610000000000 0            0            
IT1	031136 0      0   0   610000000000 0            0            
AT3	031136 0      0   0   0            0            610000000000 
AT6	031136 0      0   0   0            0            610000000000 
FT0	031136 0      0   0   0            0            610000000000 
FT1A	031136 0      0   0   0            0            0            
FT2	031136 0      0   0   0            0            0            
FT2RQ	031136 0      0   0   0            0            0            
FT3	031136 0      0   0   0            0            0            
FT9	031137 0      0   0   0            0            0            
ET0	031137 0      0   0   0            0            0            
ET1	031137 0      0   0   0            0            0            
ET2	031137 0      0   0   0            0            0            
ST1A	031137 0      0   0   0            0            0            
ST9	031137 0      0   0   0            0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 56
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0246

*031137 SKIPA	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031137 031137 0   0   334000000000 0            0            
IT1	031137 0      0   0   334000000000 0            0            
AT3	031137 0      0   0   0            0            334000000000 
AT6	031137 0      0   0   0            0            334000000000 
FT0	031137 0      0   0   0            0            334000000000 
FT1A	031137 0      0   0   0            0            0            
FT9	031140 0      0   0   0            0            0            
ET0	031141 0      0   0   0            0            0            
ST1A	031141 0      0   0   0            0            0            
ST9	031141 0      0   0   0            0            0            


*031141 JUMPA	0,031142
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031141 031141 0   0   324000031142 0            000000031142 
IT1	031141 0      0   0   324000031142 0            000000031142 
AT3	031141 0      0   0   000000031142 0            324000031142 
AT6	031141 031142 0   0   000000031142 0            324000031142 
FT1A	031141 031142 0   0   000000031142 0            000000031142 
FT2	031141 031142 0   0   0            0            000000031142 
FT2RQ	031141 031142 0   0   0            0            000000031142 
FT3	031141 031142 0   0   0            0            000000031142 
FT9	031142 031142 0   0   0            0            000000031142 
ET0	031142 031142 0   0   0            0            000000031142 
ST1A	031142 031142 0   0   0            0            000000031142 
ST9	031142 031142 0   0   0            0            000000031142 


*031142 MOVE 	0,034013
INITIAL
C(AC)=000000 000000 
C(E)=777777 000000 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031142 031142 0   0   200000034013 0            777777000000 
IT1	031142 0      0   0   200000034013 0            777777000000 
AT3	031142 0      0   0   000000034013 0            200000034013 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 57
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0247

AT6	031142 034013 0   0   000000034013 0            200000034013 
FT0	031142 034013 0   0   777777000000 0            200000034013 
FT1A	031142 034013 0   0   777777000000 0            777777000000 
FT9	031143 034013 0   0   777777000000 0            777777000000 
ET0	031143 034013 0   0   777777000000 0            777777000000 
ST1	031143 034013 0   0   777777000000 0            777777000000 
ST2	031143 034013 0   0   777777000000 0            777777000000 
ST9	031143 034013 0   0   777777000000 0            777777000000 


*031143 TDNE	0,034016
INITIAL
C(AC)=777777 000000 
C(E)=707070 707070 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031143 031143 0   0   612000034016 0            707070000000 
IT1	031143 0      0   0   612000034016 0            707070000000 
AT3	031143 0      0   0   000000034016 0            612000034016 
AT6	031143 034016 0   0   000000034016 0            612000034016 
FT0	031143 034016 0   0   707070707070 0            612000034016 
FT1A	031143 034016 0   0   707070707070 0            707070707070 
FT2	031143 034016 0   0   0            0            707070707070 
FT2RQ	031143 034016 0   0   777777000000 0            707070707070 
FT3	031143 034016 0   0   777777000000 0            707070707070 
FT9	031144 034016 0   0   777777000000 0            707070707070 
ET0	031144 034016 0   0   777777000000 0            707070707070 
ET1	031144 034016 0   0   777777000000 0            707070000000 
ET2	031144 034016 0   0   777777000000 0            707070000000 
ST1A	031144 034016 0   0   777777000000 0            707070000000 
ST9	031144 034016 0   0   777777000000 0            707070000000 


*031144 SKIPA	0,000000
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031144 031144 0   0   334000000000 0            777777000000 
IT1	031144 0      0   0   334000000000 0            777777000000 
AT3	031144 0      0   0   0            0            334000000000 
AT6	031144 0      0   0   0            0            334000000000 
FT0	031144 0      0   0   777777000000 0            334000000000 
FT1A	031144 0      0   0   777777000000 0            777777000000 
FT9	031145 0      0   0   777777000000 0            777777000000 
ET0	031146 0      0   0   777777000000 0            777777000000 
ST1A	031146 0      0   0   777777000000 0            777777000000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 58
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0248

ST9	031146 0      0   0   777777000000 0            777777000000 


*031146 JUMPA	0,031147
INITIAL
C(AC)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031146 031146 0   0   324000031147 0            000000031147 
IT1	031146 0      0   0   324000031147 0            000000031147 
AT3	031146 0      0   0   000000031147 0            324000031147 
AT6	031146 031147 0   0   000000031147 0            324000031147 
FT1A	031146 031147 0   0   000000031147 0            000000031147 
FT2	031146 031147 0   0   0            0            000000031147 
FT2RQ	031146 031147 0   0   777777000000 0            000000031147 
FT3	031146 031147 0   0   777777000000 0            000000031147 
FT9	031147 031147 0   0   777777000000 0            000000031147 
ET0	031147 031147 0   0   777777000000 0            000000031147 
ST1A	031147 031147 0   0   777777000000 0            000000031147 
ST9	031147 031147 0   0   777777000000 0            000000031147 


*031147 SETZ 	0,000000
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031147 031147 0   0   400000000000 0            0            
IT1	031147 0      0   0   400000000000 0            0            
AT3	031147 0      0   0   0            0            400000000000 
AT6	031147 0      0   0   0            0            400000000000 
FT1A	031147 0      0   0   0            0            0            
FT9	031150 0      0   0   0            0            0            
ET0	031150 0      0   0   0            0            0            
ST1	031150 0      0   0   0            0            0            
ST2	031150 0      0   0   0            0            0            
ST9	031150 0      0   0   0            0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 59
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0249

*031150 TDNE	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031150 031150 0   0   612000000000 0            0            
IT1	031150 0      0   0   612000000000 0            0            
AT3	031150 0      0   0   0            0            612000000000 
AT6	031150 0      0   0   0            0            612000000000 
FT0	031150 0      0   0   0            0            612000000000 
FT1A	031150 0      0   0   0            0            0            
FT2	031150 0      0   0   0            0            0            
FT2RQ	031150 0      0   0   0            0            0            
FT3	031150 0      0   0   0            0            0            
FT9	031151 0      0   0   0            0            0            
ET0	031151 0      0   0   0            0            0            
ET1	031151 0      0   0   0            0            0            
ET2	031152 0      0   0   0            0            0            
ST1A	031152 0      0   0   0            0            0            
ST9	031152 0      0   0   0            0            0            


*031152 JUMPA	0,031153
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031152 031152 0   0   324000031153 0            000000031153 
IT1	031152 0      0   0   324000031153 0            000000031153 
AT3	031152 0      0   0   000000031153 0            324000031153 
AT6	031152 031153 0   0   000000031153 0            324000031153 
FT1A	031152 031153 0   0   000000031153 0            000000031153 
FT2	031152 031153 0   0   0            0            000000031153 
FT2RQ	031152 031153 0   0   0            0            000000031153 
FT3	031152 031153 0   0   0            0            000000031153 
FT9	031153 031153 0   0   0            0            000000031153 
ET0	031153 031153 0   0   0            0            000000031153 
ST1A	031153 031153 0   0   0            0            000000031153 
ST9	031153 031153 0   0   0            0            000000031153 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 60
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0250

*031153 SETZ 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031153 031153 0   0   400000000000 0            0            
IT1	031153 0      0   0   400000000000 0            0            
AT3	031153 0      0   0   0            0            400000000000 
AT6	031153 0      0   0   0            0            400000000000 
FT1A	031153 0      0   0   0            0            0            
FT9	031154 0      0   0   0            0            0            
ET0	031154 0      0   0   0            0            0            
ST1	031154 0      0   0   0            0            0            
ST2	031154 0      0   0   0            0            0            
ST9	031154 0      0   0   0            0            0            


*031154 TDNN	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031154 031154 0   0   616000000000 0            0            
IT1	031154 0      0   0   616000000000 0            0            
AT3	031154 0      0   0   0            0            616000000000 
AT6	031154 0      0   0   0            0            616000000000 
FT0	031154 0      0   0   0            0            616000000000 
FT1A	031154 0      0   0   0            0            0            
FT2	031154 0      0   0   0            0            0            
FT2RQ	031154 0      0   0   0            0            0            
FT3	031154 0      0   0   0            0            0            
FT9	031155 0      0   0   0            0            0            
ET0	031155 0      0   0   0            0            0            
ET1	031155 0      0   0   0            0            0            
ET2	031155 0      0   0   0            0            0            
ST1A	031155 0      0   0   0            0            0            
ST9	031155 0      0   0   0            0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 61
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0251

*031155 SKIPA	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031155 031155 0   0   334000000000 0            0            
IT1	031155 0      0   0   334000000000 0            0            
AT3	031155 0      0   0   0            0            334000000000 
AT6	031155 0      0   0   0            0            334000000000 
FT0	031155 0      0   0   0            0            334000000000 
FT1A	031155 0      0   0   0            0            0            
FT9	031156 0      0   0   0            0            0            
ET0	031157 0      0   0   0            0            0            
ST1A	031157 0      0   0   0            0            0            
ST9	031157 0      0   0   0            0            0            


*031157 JUMPA	0,031160
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031157 031157 0   0   324000031160 0            000000031160 
IT1	031157 0      0   0   324000031160 0            000000031160 
AT3	031157 0      0   0   000000031160 0            324000031160 
AT6	031157 031160 0   0   000000031160 0            324000031160 
FT1A	031157 031160 0   0   000000031160 0            000000031160 
FT2	031157 031160 0   0   0            0            000000031160 
FT2RQ	031157 031160 0   0   0            0            000000031160 
FT3	031157 031160 0   0   0            0            000000031160 
FT9	031160 031160 0   0   0            0            000000031160 
ET0	031160 031160 0   0   0            0            000000031160 
ST1A	031160 031160 0   0   0            0            000000031160 
ST9	031160 031160 0   0   0            0            000000031160 


*031160 SETO 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031160 031160 0   0   474000000000 0            0            
IT1	031160 0      0   0   474000000000 0            0            
AT3	031160 0      0   0   0            0            474000000000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 62
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0252

AT6	031160 0      0   0   0            0            474000000000 
FT1A	031160 0      0   0   0            0            0            
FT9	031161 0      0   0   0            0            0            
ET0	031161 0      0   0   777777777777 0            0            
ST1	031161 0      0   0   777777777777 0            0            
ST2	031161 0      0   0   777777777777 0            0            
ST9	031161 0      0   0   777777777777 0            0            


*031161 TDNA	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031161 031161 0   0   614000000000 0            777777777777 
IT1	031161 0      0   0   614000000000 0            777777777777 
AT3	031161 0      0   0   0            0            614000000000 
AT6	031161 0      0   0   0            0            614000000000 
FT0	031161 0      0   0   777777777777 0            614000000000 
FT1A	031161 0      0   0   777777777777 0            777777777777 
FT2	031161 0      0   0   0            0            777777777777 
FT2RQ	031161 0      0   0   777777777777 0            777777777777 
FT3	031161 0      0   0   777777777777 0            777777777777 
FT9	031162 0      0   0   777777777777 0            777777777777 
ET0	031162 0      0   0   777777777777 0            777777777777 
ET1	031162 0      0   0   777777777777 0            777777777777 
ET2	031163 0      0   0   777777777777 0            777777777777 
ST1A	031163 0      0   0   777777777777 0            777777777777 
ST9	031163 0      0   0   777777777777 0            777777777777 


*031163 JUMPA	0,031164
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031163 031163 0   0   324000031164 0            000000031164 
IT1	031163 0      0   0   324000031164 0            000000031164 
AT3	031163 0      0   0   000000031164 0            324000031164 
AT6	031163 031164 0   0   000000031164 0            324000031164 
FT1A	031163 031164 0   0   000000031164 0            000000031164 
FT2	031163 031164 0   0   0            0            000000031164 
FT2RQ	031163 031164 0   0   777777777777 0            000000031164 
FT3	031163 031164 0   0   777777777777 0            000000031164 
FT9	031164 031164 0   0   777777777777 0            000000031164 
ET0	031164 031164 0   0   777777777777 0            000000031164 
ST1A	031164 031164 0   0   777777777777 0            000000031164 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 63
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0253

ST9	031164 031164 0   0   777777777777 0            000000031164 


*031164 MOVE 	0,034013
INITIAL
C(AC)=777777 777777 
C(E)=777777 000000 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031164 031164 0   0   200000034013 0            777777000000 
IT1	031164 0      0   0   200000034013 0            777777000000 
AT3	031164 0      0   0   000000034013 0            200000034013 
AT6	031164 034013 0   0   000000034013 0            200000034013 
FT0	031164 034013 0   0   777777000000 0            200000034013 
FT1A	031164 034013 0   0   777777000000 0            777777000000 
FT9	031165 034013 0   0   777777000000 0            777777000000 
ET0	031165 034013 0   0   777777000000 0            777777000000 
ST1	031165 034013 0   0   777777000000 0            777777000000 
ST2	031165 034013 0   0   777777000000 0            777777000000 
ST9	031165 034013 0   0   777777000000 0            777777000000 


*031165 TDNN	0,034016
INITIAL
C(AC)=777777 000000 
C(E)=707070 707070 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031165 031165 0   0   616000034016 0            707070000000 
IT1	031165 0      0   0   616000034016 0            707070000000 
AT3	031165 0      0   0   000000034016 0            616000034016 
AT6	031165 034016 0   0   000000034016 0            616000034016 
FT0	031165 034016 0   0   707070707070 0            616000034016 
FT1A	031165 034016 0   0   707070707070 0            707070707070 
FT2	031165 034016 0   0   0            0            707070707070 
FT2RQ	031165 034016 0   0   777777000000 0            707070707070 
FT3	031165 034016 0   0   777777000000 0            707070707070 
FT9	031166 034016 0   0   777777000000 0            707070707070 
ET0	031166 034016 0   0   777777000000 0            707070707070 
ET1	031166 034016 0   0   777777000000 0            707070000000 
ET2	031167 034016 0   0   777777000000 0            707070000000 
ST1A	031167 034016 0   0   777777000000 0            707070000000 
ST9	031167 034016 0   0   777777000000 0            707070000000 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 64
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0254

*031167 JUMPA	0,031170
INITIAL
C(AC)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031167 031167 0   0   324000031170 0            000000031170 
IT1	031167 0      0   0   324000031170 0            000000031170 
AT3	031167 0      0   0   000000031170 0            324000031170 
AT6	031167 031170 0   0   000000031170 0            324000031170 
FT1A	031167 031170 0   0   000000031170 0            000000031170 
FT2	031167 031170 0   0   0            0            000000031170 
FT2RQ	031167 031170 0   0   777777000000 0            000000031170 
FT3	031167 031170 0   0   777777000000 0            000000031170 
FT9	031170 031170 0   0   777777000000 0            000000031170 
ET0	031170 031170 0   0   777777000000 0            000000031170 
ST1A	031170 031170 0   0   777777000000 0            000000031170 
ST9	031170 031170 0   0   777777000000 0            000000031170 


*031170 SETO 	0,000000
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031170 031170 0   0   474000000000 0            0            
IT1	031170 0      0   0   474000000000 0            0            
AT3	031170 0      0   0   0            0            474000000000 
AT6	031170 0      0   0   0            0            474000000000 
FT1A	031170 0      0   0   0            0            0            
FT9	031171 0      0   0   0            0            0            
ET0	031171 0      0   0   777777777777 0            0            
ST1	031171 0      0   0   777777777777 0            0            
ST2	031171 0      0   0   777777777777 0            0            
ST9	031171 0      0   0   777777777777 0            0            


*031171 TDNE	0,034014
INITIAL
C(AC)=777777 777777 
C(E)=000000 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031171 031171 0   0   612000034014 0            0            
IT1	031171 0      0   0   612000034014 0            0            
AT3	031171 0      0   0   000000034014 0            612000034014 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 65
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0255

AT6	031171 034014 0   0   000000034014 0            612000034014 
FT0	031171 034014 0   0   0            0            612000034014 
FT1A	031171 034014 0   0   0            0            0            
FT2	031171 034014 0   0   0            0            0            
FT2RQ	031171 034014 0   0   777777777777 0            0            
FT3	031171 034014 0   0   777777777777 0            0            
FT9	031172 034014 0   0   777777777777 0            0            
ET0	031172 034014 0   0   777777777777 0            0            
ET1	031172 034014 0   0   777777777777 0            0            
ET2	031173 034014 0   0   777777777777 0            0            
ST1A	031173 034014 0   0   777777777777 0            0            
ST9	031173 034014 0   0   777777777777 0            0            


*031173 JUMPA	0,031174
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031173 031173 0   0   324000031174 0            000000031174 
IT1	031173 0      0   0   324000031174 0            000000031174 
AT3	031173 0      0   0   000000031174 0            324000031174 
AT6	031173 031174 0   0   000000031174 0            324000031174 
FT1A	031173 031174 0   0   000000031174 0            000000031174 
FT2	031173 031174 0   0   0            0            000000031174 
FT2RQ	031173 031174 0   0   777777777777 0            000000031174 
FT3	031173 031174 0   0   777777777777 0            000000031174 
FT9	031174 031174 0   0   777777777777 0            000000031174 
ET0	031174 031174 0   0   777777777777 0            000000031174 
ST1A	031174 031174 0   0   777777777777 0            000000031174 
ST9	031174 031174 0   0   777777777777 0            000000031174 


*031174 SETZ 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031174 031174 0   0   400000000000 0            0            
IT1	031174 0      0   0   400000000000 0            0            
AT3	031174 0      0   0   0            0            400000000000 
AT6	031174 0      0   0   0            0            400000000000 
FT1A	031174 0      0   0   0            0            0            
FT9	031175 0      0   0   0            0            0            
ET0	031175 0      0   0   0            0            0            
ST1	031175 0      0   0   0            0            0            
ST2	031175 0      0   0   0            0            0            
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 66
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0256

ST9	031175 0      0   0   0            0            0            


*031175 TDNE	0,034012
INITIAL
C(AC)=000000 000000 
C(E)=777777 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031175 031175 0   0   612000034012 0            0            
IT1	031175 0      0   0   612000034012 0            0            
AT3	031175 0      0   0   000000034012 0            612000034012 
AT6	031175 034012 0   0   000000034012 0            612000034012 
FT0	031175 034012 0   0   777777777777 0            612000034012 
FT1A	031175 034012 0   0   777777777777 0            777777777777 
FT2	031175 034012 0   0   0            0            777777777777 
FT2RQ	031175 034012 0   0   0            0            777777777777 
FT3	031175 034012 0   0   0            0            777777777777 
FT9	031176 034012 0   0   0            0            777777777777 
ET0	031176 034012 0   0   0            0            777777777777 
ET1	031176 034012 0   0   0            0            0            
ET2	031177 034012 0   0   0            0            0            
ST1A	031177 034012 0   0   0            0            0            
ST9	031177 034012 0   0   0            0            0            


*031177 JUMPA	0,031200
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031177 031177 0   0   324000031200 0            000000031200 
IT1	031177 0      0   0   324000031200 0            000000031200 
AT3	031177 0      0   0   000000031200 0            324000031200 
AT6	031177 0      0   0   000000031200 0            324000031200 
FT1A	031177 0      0   0   000000031200 0            000000031200 
FT2	031177 0      0   0   0            0            000000031200 
FT2RQ	031177 0      0   0   0            0            000000031200 
FT3	031177 0      0   0   0            0            000000031200 
FT9	0      0      0   0   0            0            000000031200 
ET0	0      0      0   0   0            0            000000031200 
ST1A	0      0      0   0   0            0            000000031200 
ST9	0      0      0   0   0            0            000000031200 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 67
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0257

*031200 SETO 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	0      0      0   0   474000000000 0            0            
IT1	0      0      0   0   474000000000 0            0            
AT3	0      0      0   0   0            0            474000000000 
AT6	0      0      0   0   0            0            474000000000 
FT1A	0      0      0   0   0            0            0            
FT9	031201 0      0   0   0            0            0            
ET0	031201 0      0   0   777777777777 0            0            
ST1	031201 0      0   0   777777777777 0            0            
ST2	031201 0      0   0   777777777777 0            0            
ST9	031201 0      0   0   777777777777 0            0            


*031201 TDN 	0,034014
INITIAL
C(AC)=777777 777777 
C(E)=000000 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031201 031201 0   0   610000034014 0            0            
IT1	031201 0      0   0   610000034014 0            0            
AT3	031201 0      0   0   000000034014 0            610000034014 
AT6	031201 034014 0   0   000000034014 0            610000034014 
FT0	031201 034014 0   0   0            0            610000034014 
FT1A	031201 034014 0   0   0            0            0            
FT2	031201 034014 0   0   0            0            0            
FT2RQ	031201 034014 0   0   777777777777 0            0            
FT3	031201 034014 0   0   777777777777 0            0            
FT9	031202 034014 0   0   777777777777 0            0            
ET0	031202 034014 0   0   777777777777 0            0            
ET1	031202 034014 0   0   777777777777 0            0            
ET2	031202 034014 0   0   777777777777 0            0            
ST1A	031202 034014 0   0   777777777777 0            0            
ST9	031202 034014 0   0   777777777777 0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 68
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0258

*031202 SKIPA	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031202 031202 0   0   334000000000 0            777777777777 
IT1	031202 0      0   0   334000000000 0            777777777777 
AT3	031202 0      0   0   0            0            334000000000 
AT6	031202 0      0   0   0            0            334000000000 
FT0	031202 0      0   0   777777777777 0            334000000000 
FT1A	031202 0      0   0   777777777777 0            777777777777 
FT9	031203 0      0   0   777777777777 0            777777777777 
ET0	031204 0      0   0   777777777777 0            777777777777 
ST1A	031204 0      0   0   777777777777 0            777777777777 
ST9	031204 0      0   0   777777777777 0            777777777777 


*031204 JUMPA	0,031205
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031204 031204 0   0   324000031205 0            000000031205 
IT1	031204 0      0   0   324000031205 0            000000031205 
AT3	031204 0      0   0   000000031205 0            324000031205 
AT6	031204 031205 0   0   000000031205 0            324000031205 
FT1A	031204 031205 0   0   000000031205 0            000000031205 
FT2	031204 031205 0   0   0            0            000000031205 
FT2RQ	031204 031205 0   0   777777777777 0            000000031205 
FT3	031204 031205 0   0   777777777777 0            000000031205 
FT9	031205 031205 0   0   777777777777 0            000000031205 
ET0	031205 031205 0   0   777777777777 0            000000031205 
ST1A	031205 031205 0   0   777777777777 0            000000031205 
ST9	031205 031205 0   0   777777777777 0            000000031205 


*031205 SETZ 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031205 031205 0   0   400000000000 0            0            
IT1	031205 0      0   0   400000000000 0            0            
AT3	031205 0      0   0   0            0            400000000000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 69
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0259

AT6	031205 0      0   0   0            0            400000000000 
FT1A	031205 0      0   0   0            0            0            
FT9	031206 0      0   0   0            0            0            
ET0	031206 0      0   0   0            0            0            
ST1	031206 0      0   0   0            0            0            
ST2	031206 0      0   0   0            0            0            
ST9	031206 0      0   0   0            0            0            


*031206 TDN 	0,034012
INITIAL
C(AC)=000000 000000 
C(E)=777777 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031206 031206 0   0   610000034012 0            0            
IT1	031206 0      0   0   610000034012 0            0            
AT3	031206 0      0   0   000000034012 0            610000034012 
AT6	031206 034012 0   0   000000034012 0            610000034012 
FT0	031206 034012 0   0   777777777777 0            610000034012 
FT1A	031206 034012 0   0   777777777777 0            777777777777 
FT2	031206 034012 0   0   0            0            777777777777 
FT2RQ	031206 034012 0   0   0            0            777777777777 
FT3	031206 034012 0   0   0            0            777777777777 
FT9	031207 034012 0   0   0            0            777777777777 
ET0	031207 034012 0   0   0            0            777777777777 
ET1	031207 034012 0   0   0            0            0            
ET2	031207 034012 0   0   0            0            0            
ST1A	031207 034012 0   0   0            0            0            
ST9	031207 034012 0   0   0            0            0            


*031207 SKIPA	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031207 031207 0   0   334000000000 0            0            
IT1	031207 0      0   0   334000000000 0            0            
AT3	031207 0      0   0   0            0            334000000000 
AT6	031207 0      0   0   0            0            334000000000 
FT0	031207 0      0   0   0            0            334000000000 
FT1A	031207 0      0   0   0            0            0            
FT9	031210 0      0   0   0            0            0            
ET0	031211 0      0   0   0            0            0            
ST1A	031211 0      0   0   0            0            0            
ST9	031211 0      0   0   0            0            0            
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 70
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0260



*031211 JUMPA	0,031212
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031211 031211 0   0   324000031212 0            000000031212 
IT1	031211 0      0   0   324000031212 0            000000031212 
AT3	031211 0      0   0   000000031212 0            324000031212 
AT6	031211 031212 0   0   000000031212 0            324000031212 
FT1A	031211 031212 0   0   000000031212 0            000000031212 
FT2	031211 031212 0   0   0            0            000000031212 
FT2RQ	031211 031212 0   0   0            0            000000031212 
FT3	031211 031212 0   0   0            0            000000031212 
FT9	031212 031212 0   0   0            0            000000031212 
ET0	031212 031212 0   0   0            0            000000031212 
ST1A	031212 031212 0   0   0            0            000000031212 
ST9	031212 031212 0   0   0            0            000000031212 


*031212 SETO 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031212 031212 0   0   474000000000 0            0            
IT1	031212 0      0   0   474000000000 0            0            
AT3	031212 0      0   0   0            0            474000000000 
AT6	031212 0      0   0   0            0            474000000000 
FT1A	031212 0      0   0   0            0            0            
FT9	031213 0      0   0   0            0            0            
ET0	031213 0      0   0   777777777777 0            0            
ST1	031213 0      0   0   777777777777 0            0            
ST2	031213 0      0   0   777777777777 0            0            
ST9	031213 0      0   0   777777777777 0            0            


*031213 TDNA	0,034014
INITIAL
C(AC)=777777 777777 
C(E)=000000 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031213 031213 0   0   614000034014 0            0            
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 71
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0261

IT1	031213 0      0   0   614000034014 0            0            
AT3	031213 0      0   0   000000034014 0            614000034014 
AT6	031213 034014 0   0   000000034014 0            614000034014 
FT0	031213 034014 0   0   0            0            614000034014 
FT1A	031213 034014 0   0   0            0            0            
FT2	031213 034014 0   0   0            0            0            
FT2RQ	031213 034014 0   0   777777777777 0            0            
FT3	031213 034014 0   0   777777777777 0            0            
FT9	031214 034014 0   0   777777777777 0            0            
ET0	031214 034014 0   0   777777777777 0            0            
ET1	031214 034014 0   0   777777777777 0            0            
ET2	031215 034014 0   0   777777777777 0            0            
ST1A	031215 034014 0   0   777777777777 0            0            
ST9	031215 034014 0   0   777777777777 0            0            


*031215 JUMPA	0,031216
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031215 031215 0   0   324000031216 0            000000031216 
IT1	031215 0      0   0   324000031216 0            000000031216 
AT3	031215 0      0   0   000000031216 0            324000031216 
AT6	031215 031216 0   0   000000031216 0            324000031216 
FT1A	031215 031216 0   0   000000031216 0            000000031216 
FT2	031215 031216 0   0   0            0            000000031216 
FT2RQ	031215 031216 0   0   777777777777 0            000000031216 
FT3	031215 031216 0   0   777777777777 0            000000031216 
FT9	031216 031216 0   0   777777777777 0            000000031216 
ET0	031216 031216 0   0   777777777777 0            000000031216 
ST1A	031216 031216 0   0   777777777777 0            000000031216 
ST9	031216 031216 0   0   777777777777 0            000000031216 


*031216 SETZ 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031216 031216 0   0   400000000000 0            0            
IT1	031216 0      0   0   400000000000 0            0            
AT3	031216 0      0   0   0            0            400000000000 
AT6	031216 0      0   0   0            0            400000000000 
FT1A	031216 0      0   0   0            0            0            
FT9	031217 0      0   0   0            0            0            
ET0	031217 0      0   0   0            0            0            
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 72
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0262

ST1	031217 0      0   0   0            0            0            
ST2	031217 0      0   0   0            0            0            
ST9	031217 0      0   0   0            0            0            


*031217 TDNA	0,034012
INITIAL
C(AC)=000000 000000 
C(E)=777777 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031217 031217 0   0   614000034012 0            0            
IT1	031217 0      0   0   614000034012 0            0            
AT3	031217 0      0   0   000000034012 0            614000034012 
AT6	031217 034012 0   0   000000034012 0            614000034012 
FT0	031217 034012 0   0   777777777777 0            614000034012 
FT1A	031217 034012 0   0   777777777777 0            777777777777 
FT2	031217 034012 0   0   0            0            777777777777 
FT2RQ	031217 034012 0   0   0            0            777777777777 
FT3	031217 034012 0   0   0            0            777777777777 
FT9	031220 034012 0   0   0            0            777777777777 
ET0	031220 034012 0   0   0            0            777777777777 
ET1	031220 034012 0   0   0            0            0            
ET2	031221 034012 0   0   0            0            0            
ST1A	031221 034012 0   0   0            0            0            
ST9	031221 034012 0   0   0            0            0            


*031221 JUMPA	0,031222
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031221 031221 0   0   324000031222 0            000000031222 
IT1	031221 0      0   0   324000031222 0            000000031222 
AT3	031221 0      0   0   000000031222 0            324000031222 
AT6	031221 031222 0   0   000000031222 0            324000031222 
FT1A	031221 031222 0   0   000000031222 0            000000031222 
FT2	031221 031222 0   0   0            0            000000031222 
FT2RQ	031221 031222 0   0   0            0            000000031222 
FT3	031221 031222 0   0   0            0            000000031222 
FT9	031222 031222 0   0   0            0            000000031222 
ET0	031222 031222 0   0   0            0            000000031222 
ST1A	031222 031222 0   0   0            0            000000031222 
ST9	031222 031222 0   0   0            0            000000031222 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 73
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0263

*031222 SETO 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031222 031222 0   0   474000000000 0            0            
IT1	031222 0      0   0   474000000000 0            0            
AT3	031222 0      0   0   0            0            474000000000 
AT6	031222 0      0   0   0            0            474000000000 
FT1A	031222 0      0   0   0            0            0            
FT9	031223 0      0   0   0            0            0            
ET0	031223 0      0   0   777777777777 0            0            
ST1	031223 0      0   0   777777777777 0            0            
ST2	031223 0      0   0   777777777777 0            0            
ST9	031223 0      0   0   777777777777 0            0            


*031223 TDNE	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031223 031223 0   0   612000000000 0            777777777777 
IT1	031223 0      0   0   612000000000 0            777777777777 
AT3	031223 0      0   0   0            0            612000000000 
AT6	031223 0      0   0   0            0            612000000000 
FT0	031223 0      0   0   777777777777 0            612000000000 
FT1A	031223 0      0   0   777777777777 0            777777777777 
FT2	031223 0      0   0   0            0            777777777777 
FT2RQ	031223 0      0   0   777777777777 0            777777777777 
FT3	031223 0      0   0   777777777777 0            777777777777 
FT9	031224 0      0   0   777777777777 0            777777777777 
ET0	031224 0      0   0   777777777777 0            777777777777 
ET1	031224 0      0   0   777777777777 0            777777777777 
ET2	031224 0      0   0   777777777777 0            777777777777 
ST1A	031224 0      0   0   777777777777 0            777777777777 
ST9	031224 0      0   0   777777777777 0            777777777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 74
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0264

*031224 SKIPA	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031224 031224 0   0   334000000000 0            777777777777 
IT1	031224 0      0   0   334000000000 0            777777777777 
AT3	031224 0      0   0   0            0            334000000000 
AT6	031224 0      0   0   0            0            334000000000 
FT0	031224 0      0   0   777777777777 0            334000000000 
FT1A	031224 0      0   0   777777777777 0            777777777777 
FT9	031225 0      0   0   777777777777 0            777777777777 
ET0	031226 0      0   0   777777777777 0            777777777777 
ST1A	031226 0      0   0   777777777777 0            777777777777 
ST9	031226 0      0   0   777777777777 0            777777777777 


*031226 JUMPA	0,031227
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031226 031226 0   0   324000031227 0            000000031227 
IT1	031226 0      0   0   324000031227 0            000000031227 
AT3	031226 0      0   0   000000031227 0            324000031227 
AT6	031226 031227 0   0   000000031227 0            324000031227 
FT1A	031226 031227 0   0   000000031227 0            000000031227 
FT2	031226 031227 0   0   0            0            000000031227 
FT2RQ	031226 031227 0   0   777777777777 0            000000031227 
FT3	031226 031227 0   0   777777777777 0            000000031227 
FT9	031227 031227 0   0   777777777777 0            000000031227 
ET0	031227 031227 0   0   777777777777 0            000000031227 
ST1A	031227 031227 0   0   777777777777 0            000000031227 
ST9	031227 031227 0   0   777777777777 0            000000031227 


*031227 SETO 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031227 031227 0   0   474000000000 0            0            
IT1	031227 0      0   0   474000000000 0            0            
AT3	031227 0      0   0   0            0            474000000000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 75
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0265

AT6	031227 0      0   0   0            0            474000000000 
FT1A	031227 0      0   0   0            0            0            
FT9	031230 0      0   0   0            0            0            
ET0	031230 0      0   0   777777777777 0            0            
ST1	031230 0      0   0   777777777777 0            0            
ST2	031230 0      0   0   777777777777 0            0            
ST9	031230 0      0   0   777777777777 0            0            


*031230 TDNN	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031230 031230 0   0   616000000000 0            777777777777 
IT1	031230 0      0   0   616000000000 0            777777777777 
AT3	031230 0      0   0   0            0            616000000000 
AT6	031230 0      0   0   0            0            616000000000 
FT0	031230 0      0   0   777777777777 0            616000000000 
FT1A	031230 0      0   0   777777777777 0            777777777777 
FT2	031230 0      0   0   0            0            777777777777 
FT2RQ	031230 0      0   0   777777777777 0            777777777777 
FT3	031230 0      0   0   777777777777 0            777777777777 
FT9	031231 0      0   0   777777777777 0            777777777777 
ET0	031231 0      0   0   777777777777 0            777777777777 
ET1	031231 0      0   0   777777777777 0            777777777777 
ET2	031232 0      0   0   777777777777 0            777777777777 
ST1A	031232 0      0   0   777777777777 0            777777777777 
ST9	031232 0      0   0   777777777777 0            777777777777 


*031232 JUMPA	0,031233
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031232 031232 0   0   324000031233 0            000000031233 
IT1	031232 0      0   0   324000031233 0            000000031233 
AT3	031232 0      0   0   000000031233 0            324000031233 
AT6	031232 031233 0   0   000000031233 0            324000031233 
FT1A	031232 031233 0   0   000000031233 0            000000031233 
FT2	031232 031233 0   0   0            0            000000031233 
FT2RQ	031232 031233 0   0   777777777777 0            000000031233 
FT3	031232 031233 0   0   777777777777 0            000000031233 
FT9	031233 031233 0   0   777777777777 0            000000031233 
ET0	031233 031233 0   0   777777777777 0            000000031233 
ST1A	031233 031233 0   0   777777777777 0            000000031233 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 76
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0266

ST9	031233 031233 0   0   777777777777 0            000000031233 


*031233 SETZ 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031233 031233 0   0   400000000000 0            0            
IT1	031233 0      0   0   400000000000 0            0            
AT3	031233 0      0   0   0            0            400000000000 
AT6	031233 0      0   0   0            0            400000000000 
FT1A	031233 0      0   0   0            0            0            
FT9	031234 0      0   0   0            0            0            
ET0	031234 0      0   0   0            0            0            
ST1	031234 0      0   0   0            0            0            
ST2	031234 0      0   0   0            0            0            
ST9	031234 0      0   0   0            0            0            


*031234 TDNN	0,034012
INITIAL
C(AC)=000000 000000 
C(E)=777777 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031234 031234 0   0   616000034012 0            0            
IT1	031234 0      0   0   616000034012 0            0            
AT3	031234 0      0   0   000000034012 0            616000034012 
AT6	031234 034012 0   0   000000034012 0            616000034012 
FT0	031234 034012 0   0   777777777777 0            616000034012 
FT1A	031234 034012 0   0   777777777777 0            777777777777 
FT2	031234 034012 0   0   0            0            777777777777 
FT2RQ	031234 034012 0   0   0            0            777777777777 
FT3	031234 034012 0   0   0            0            777777777777 
FT9	031235 034012 0   0   0            0            777777777777 
ET0	031235 034012 0   0   0            0            777777777777 
ET1	031235 034012 0   0   0            0            0            
ET2	031235 034012 0   0   0            0            0            
ST1A	031235 034012 0   0   0            0            0            
ST9	031235 034012 0   0   0            0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 77
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0267

*031235 SKIPA	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031235 031235 0   0   334000000000 0            0            
IT1	031235 0      0   0   334000000000 0            0            
AT3	031235 0      0   0   0            0            334000000000 
AT6	031235 0      0   0   0            0            334000000000 
FT0	031235 0      0   0   0            0            334000000000 
FT1A	031235 0      0   0   0            0            0            
FT9	031236 0      0   0   0            0            0            
ET0	031237 0      0   0   0            0            0            
ST1A	031237 0      0   0   0            0            0            
ST9	031237 0      0   0   0            0            0            


*031237 JUMPA	0,031240
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031237 031237 0   0   324000031240 0            000000031240 
IT1	031237 0      0   0   324000031240 0            000000031240 
AT3	031237 0      0   0   000000031240 0            324000031240 
AT6	031237 031240 0   0   000000031240 0            324000031240 
FT1A	031237 031240 0   0   000000031240 0            000000031240 
FT2	031237 031240 0   0   0            0            000000031240 
FT2RQ	031237 031240 0   0   0            0            000000031240 
FT3	031237 031240 0   0   0            0            000000031240 
FT9	031240 031240 0   0   0            0            000000031240 
ET0	031240 031240 0   0   0            0            000000031240 
ST1A	031240 031240 0   0   0            0            000000031240 
ST9	031240 031240 0   0   0            0            000000031240 


*031240 SETO 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031240 031240 0   0   474000000000 0            0            
IT1	031240 0      0   0   474000000000 0            0            
AT3	031240 0      0   0   0            0            474000000000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 78
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0268

AT6	031240 0      0   0   0            0            474000000000 
FT1A	031240 0      0   0   0            0            0            
FT9	031241 0      0   0   0            0            0            
ET0	031241 0      0   0   777777777777 0            0            
ST1	031241 0      0   0   777777777777 0            0            
ST2	031241 0      0   0   777777777777 0            0            
ST9	031241 0      0   0   777777777777 0            0            


*031241 TDNN	0,034014
INITIAL
C(AC)=777777 777777 
C(E)=000000 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031241 031241 0   0   616000034014 0            0            
IT1	031241 0      0   0   616000034014 0            0            
AT3	031241 0      0   0   000000034014 0            616000034014 
AT6	031241 034014 0   0   000000034014 0            616000034014 
FT0	031241 034014 0   0   0            0            616000034014 
FT1A	031241 034014 0   0   0            0            0            
FT2	031241 034014 0   0   0            0            0            
FT2RQ	031241 034014 0   0   777777777777 0            0            
FT3	031241 034014 0   0   777777777777 0            0            
FT9	031242 034014 0   0   777777777777 0            0            
ET0	031242 034014 0   0   777777777777 0            0            
ET1	031242 034014 0   0   777777777777 0            0            
ET2	031242 034014 0   0   777777777777 0            0            
ST1A	031242 034014 0   0   777777777777 0            0            
ST9	031242 034014 0   0   777777777777 0            0            


*031242 SKIPA	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031242 031242 0   0   334000000000 0            777777777777 
IT1	031242 0      0   0   334000000000 0            777777777777 
AT3	031242 0      0   0   0            0            334000000000 
AT6	031242 0      0   0   0            0            334000000000 
FT0	031242 0      0   0   777777777777 0            334000000000 
FT1A	031242 0      0   0   777777777777 0            777777777777 
FT9	031243 0      0   0   777777777777 0            777777777777 
ET0	031244 0      0   0   777777777777 0            777777777777 
ST1A	031244 0      0   0   777777777777 0            777777777777 
ST9	031244 0      0   0   777777777777 0            777777777777 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 79
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0269



*031244 JUMPA	0,031245
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031244 031244 0   0   324000031245 0            000000031245 
IT1	031244 0      0   0   324000031245 0            000000031245 
AT3	031244 0      0   0   000000031245 0            324000031245 
AT6	031244 031245 0   0   000000031245 0            324000031245 
FT1A	031244 031245 0   0   000000031245 0            000000031245 
FT2	031244 031245 0   0   0            0            000000031245 
FT2RQ	031244 031245 0   0   777777777777 0            000000031245 
FT3	031244 031245 0   0   777777777777 0            000000031245 
FT9	031245 031245 0   0   777777777777 0            000000031245 
ET0	031245 031245 0   0   777777777777 0            000000031245 
ST1A	031245 031245 0   0   777777777777 0            000000031245 
ST9	031245 031245 0   0   777777777777 0            000000031245 


*031245 SETZ 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031245 031245 0   0   400000000000 0            0            
IT1	031245 0      0   0   400000000000 0            0            
AT3	031245 0      0   0   0            0            400000000000 
AT6	031245 0      0   0   0            0            400000000000 
FT1A	031245 0      0   0   0            0            0            
FT9	031246 0      0   0   0            0            0            
ET0	031246 0      0   0   0            0            0            
ST1	031246 0      0   0   0            0            0            
ST2	031246 0      0   0   0            0            0            
ST9	031246 0      0   0   0            0            0            


*031246 TDO 	0,034013
INITIAL
C(AC)=000000 000000 
C(E)=777777 000000 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031246 031246 0   0   670000034013 0            0            
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 80
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0270

IT1	031246 0      0   0   670000034013 0            0            
AT3	031246 0      0   0   000000034013 0            670000034013 
AT6	031246 034013 0   0   000000034013 0            670000034013 
FT0	031246 034013 0   0   777777000000 0            670000034013 
FT1A	031246 034013 0   0   777777000000 0            777777000000 
FT2	031246 034013 0   0   0            0            777777000000 
FT2RQ	031246 034013 0   0   0            0            777777000000 
FT3	031246 034013 0   0   0            0            777777000000 
FT9	031247 034013 0   0   0            0            777777000000 
ET0	031247 034013 0   0   0            0            777777000000 
ET1	031247 034013 0   0   777777000000 0            0            
ET2	031247 034013 0   0   777777000000 0            0            
ST1	031247 034013 0   0   777777000000 0            0            
ST2	031247 034013 0   0   777777000000 0            0            
ST9	031247 034013 0   0   777777000000 0            0            


*031247 CAME	0,034013
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031247 031247 0   0   312000034013 0            777777000000 
IT1	031247 0      0   0   312000034013 0            777777000000 
AT3	031247 0      0   0   000000034013 0            312000034013 
AT6	031247 034013 0   0   000000034013 0            312000034013 
FT0	031247 034013 0   0   777777000000 0            312000034013 
FT1A	031247 034013 0   0   777777000000 0            777777000000 
FT2	031247 034013 0   0   0            0            777777000000 
FT2RQ	031247 034013 0   0   777777000000 0            777777000000 
FT3	031247 034013 0   0   777777000000 0            777777000000 
FT9	031250 034013 0   0   777777000000 0            777777000000 
ET0	031251 034013 0   0   0            0            777777000000 
ST1A	031251 034013 0   0   0            0            777777000000 
ST9	031251 034013 0   0   0            0            777777000000 


*031251 JUMPA	0,031252
INITIAL
C(AC)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031251 031251 0   0   324000031252 0            000000031252 
IT1	031251 0      0   0   324000031252 0            000000031252 
AT3	031251 0      0   0   000000031252 0            324000031252 
AT6	031251 031252 0   0   000000031252 0            324000031252 
FT1A	031251 031252 0   0   000000031252 0            000000031252 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 81
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0271

FT2	031251 031252 0   0   0            0            000000031252 
FT2RQ	031251 031252 0   0   777777000000 0            000000031252 
FT3	031251 031252 0   0   777777000000 0            000000031252 
FT9	031252 031252 0   0   777777000000 0            000000031252 
ET0	031252 031252 0   0   777777000000 0            000000031252 
ST1A	031252 031252 0   0   777777000000 0            000000031252 
ST9	031252 031252 0   0   777777000000 0            000000031252 


*031252 SETZ 	0,000000
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031252 031252 0   0   400000000000 0            0            
IT1	031252 0      0   0   400000000000 0            0            
AT3	031252 0      0   0   0            0            400000000000 
AT6	031252 0      0   0   0            0            400000000000 
FT1A	031252 0      0   0   0            0            0            
FT9	031253 0      0   0   0            0            0            
ET0	031253 0      0   0   0            0            0            
ST1	031253 0      0   0   0            0            0            
ST2	031253 0      0   0   0            0            0            
ST9	031253 0      0   0   0            0            0            


*031253 TSO 	0,034013
INITIAL
C(AC)=000000 000000 
C(E)=777777 000000 
FINAL
C(AC)=000000 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031253 031253 0   0   671000034013 0            0            
IT1	031253 0      0   0   671000034013 0            0            
AT3	031253 0      0   0   000000034013 0            671000034013 
AT6	031253 034013 0   0   000000034013 0            671000034013 
FT0	031253 034013 0   0   777777000000 0            671000034013 
FT1A	031253 034013 0   0   777777000000 0            777777000000 
FT2	031253 034013 0   0   0            0            777777000000 
FT2RQ	031253 034013 0   0   0            0            777777000000 
FT3	031253 034013 0   0   0            0            777777000000 
FT9	031254 034013 0   0   0            0            777777000000 
ET0	031254 034013 0   0   0            0            777777000000 
ET1	031254 034013 0   0   777777000000 0            0            
ET2	031254 034013 0   0   000000777777 0            0            
ST1	031254 034013 0   0   000000777777 0            0            
ST2	031254 034013 0   0   000000777777 0            0            
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 82
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0272

ST9	031254 034013 0   0   000000777777 0            0            


*031254 CAME	0,034015
INITIAL
C(AC)=000000 777777 
C(E)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031254 031254 0   0   312000034015 0            000000777777 
IT1	031254 0      0   0   312000034015 0            000000777777 
AT3	031254 0      0   0   000000034015 0            312000034015 
AT6	031254 034015 0   0   000000034015 0            312000034015 
FT0	031254 034015 0   0   000000777777 0            312000034015 
FT1A	031254 034015 0   0   000000777777 0            000000777777 
FT2	031254 034015 0   0   0            0            000000777777 
FT2RQ	031254 034015 0   0   000000777777 0            000000777777 
FT3	031254 034015 0   0   000000777777 0            000000777777 
FT9	031255 034015 0   0   000000777777 0            000000777777 
ET0	031256 034015 0   0   0            0            000000777777 
ST1A	031256 034015 0   0   0            0            000000777777 
ST9	031256 034015 0   0   0            0            000000777777 


*031256 JUMPA	0,031257
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031256 031256 0   0   324000031257 0            000000031257 
IT1	031256 0      0   0   324000031257 0            000000031257 
AT3	031256 0      0   0   000000031257 0            324000031257 
AT6	031256 031257 0   0   000000031257 0            324000031257 
FT1A	031256 031257 0   0   000000031257 0            000000031257 
FT2	031256 031257 0   0   0            0            000000031257 
FT2RQ	031256 031257 0   0   000000777777 0            000000031257 
FT3	031256 031257 0   0   000000777777 0            000000031257 
FT9	031257 031257 0   0   000000777777 0            000000031257 
ET0	031257 031257 0   0   000000777777 0            000000031257 
ST1A	031257 031257 0   0   000000777777 0            000000031257 
ST9	031257 031257 0   0   000000777777 0            000000031257 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 83
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0273

*031257 SETZ 	0,000000
INITIAL
C(AC)=000000 777777 
C(E)=000000 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031257 031257 0   0   400000000000 0            0            
IT1	031257 0      0   0   400000000000 0            0            
AT3	031257 0      0   0   0            0            400000000000 
AT6	031257 0      0   0   0            0            400000000000 
FT1A	031257 0      0   0   0            0            0            
FT9	031260 0      0   0   0            0            0            
ET0	031260 0      0   0   0            0            0            
ST1	031260 0      0   0   0            0            0            
ST2	031260 0      0   0   0            0            0            
ST9	031260 0      0   0   0            0            0            


*031260 TSO 	0,034015
INITIAL
C(AC)=000000 000000 
C(E)=000000 777777 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031260 031260 0   0   671000034015 0            0            
IT1	031260 0      0   0   671000034015 0            0            
AT3	031260 0      0   0   000000034015 0            671000034015 
AT6	031260 034015 0   0   000000034015 0            671000034015 
FT0	031260 034015 0   0   000000777777 0            671000034015 
FT1A	031260 034015 0   0   000000777777 0            000000777777 
FT2	031260 034015 0   0   0            0            000000777777 
FT2RQ	031260 034015 0   0   0            0            000000777777 
FT3	031260 034015 0   0   0            0            000000777777 
FT9	031261 034015 0   0   0            0            000000777777 
ET0	031261 034015 0   0   0            0            000000777777 
ET1	031261 034015 0   0   000000777777 0            0            
ET2	031261 034015 0   0   777777000000 0            0            
ST1	031261 034015 0   0   777777000000 0            0            
ST2	031261 034015 0   0   777777000000 0            0            
ST9	031261 034015 0   0   777777000000 0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 84
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0274

*031261 CAME	0,034013
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031261 031261 0   0   312000034013 0            777777000000 
IT1	031261 0      0   0   312000034013 0            777777000000 
AT3	031261 0      0   0   000000034013 0            312000034013 
AT6	031261 034013 0   0   000000034013 0            312000034013 
FT0	031261 034013 0   0   777777000000 0            312000034013 
FT1A	031261 034013 0   0   777777000000 0            777777000000 
FT2	031261 034013 0   0   0            0            777777000000 
FT2RQ	031261 034013 0   0   777777000000 0            777777000000 
FT3	031261 034013 0   0   777777000000 0            777777000000 
FT9	031262 034013 0   0   777777000000 0            777777000000 
ET0	031263 034013 0   0   0            0            777777000000 
ST1A	031263 034013 0   0   0            0            777777000000 
ST9	031263 034013 0   0   0            0            777777000000 


*031263 JUMPA	0,031264
INITIAL
C(AC)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031263 031263 0   0   324000031264 0            000000031264 
IT1	031263 0      0   0   324000031264 0            000000031264 
AT3	031263 0      0   0   000000031264 0            324000031264 
AT6	031263 031264 0   0   000000031264 0            324000031264 
FT1A	031263 031264 0   0   000000031264 0            000000031264 
FT2	031263 031264 0   0   0            0            000000031264 
FT2RQ	031263 031264 0   0   777777000000 0            000000031264 
FT3	031263 031264 0   0   777777000000 0            000000031264 
FT9	031264 031264 0   0   777777000000 0            000000031264 
ET0	031264 031264 0   0   777777000000 0            000000031264 
ST1A	031264 031264 0   0   777777000000 0            000000031264 
ST9	031264 031264 0   0   777777000000 0            000000031264 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 85
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0275

*031264 SETZ 	0,000000
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031264 031264 0   0   400000000000 0            0            
IT1	031264 0      0   0   400000000000 0            0            
AT3	031264 0      0   0   0            0            400000000000 
AT6	031264 0      0   0   0            0            400000000000 
FT1A	031264 0      0   0   0            0            0            
FT9	031265 0      0   0   0            0            0            
ET0	031265 0      0   0   0            0            0            
ST1	031265 0      0   0   0            0            0            
ST2	031265 0      0   0   0            0            0            
ST9	031265 0      0   0   0            0            0            


*031265 TSO 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031265 031265 0   0   671000000000 0            0            
IT1	031265 0      0   0   671000000000 0            0            
AT3	031265 0      0   0   0            0            671000000000 
AT6	031265 0      0   0   0            0            671000000000 
FT0	031265 0      0   0   0            0            671000000000 
FT1A	031265 0      0   0   0            0            0            
FT2	031265 0      0   0   0            0            0            
FT2RQ	031265 0      0   0   0            0            0            
FT3	031265 0      0   0   0            0            0            
FT9	031266 0      0   0   0            0            0            
ET0	031266 0      0   0   0            0            0            
ET1	031266 0      0   0   0            0            0            
ET2	031266 0      0   0   0            0            0            
ST1	031266 0      0   0   0            0            0            
ST2	031266 0      0   0   0            0            0            
ST9	031266 0      0   0   0            0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 86
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0276

*031266 SKIPE	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031266 031266 0   0   332000000000 0            0            
IT1	031266 0      0   0   332000000000 0            0            
AT3	031266 0      0   0   0            0            332000000000 
AT6	031266 0      0   0   0            0            332000000000 
FT0	031266 0      0   0   0            0            332000000000 
FT1A	031266 0      0   0   0            0            0            
FT9	031267 0      0   0   0            0            0            
ET0	031270 0      0   0   0            0            0            
ST1A	031270 0      0   0   0            0            0            
ST9	031270 0      0   0   0            0            0            


*031270 JUMPA	0,031271
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031270 031270 0   0   324000031271 0            000000031271 
IT1	031270 0      0   0   324000031271 0            000000031271 
AT3	031270 0      0   0   000000031271 0            324000031271 
AT6	031270 031271 0   0   000000031271 0            324000031271 
FT1A	031270 031271 0   0   000000031271 0            000000031271 
FT2	031270 031271 0   0   0            0            000000031271 
FT2RQ	031270 031271 0   0   0            0            000000031271 
FT3	031270 031271 0   0   0            0            000000031271 
FT9	031271 031271 0   0   0            0            000000031271 
ET0	031271 031271 0   0   0            0            000000031271 
ST1A	031271 031271 0   0   0            0            000000031271 
ST9	031271 031271 0   0   0            0            000000031271 


*031271 SETO 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031271 031271 0   0   474000000000 0            0            
IT1	031271 0      0   0   474000000000 0            0            
AT3	031271 0      0   0   0            0            474000000000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 87
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0277

AT6	031271 0      0   0   0            0            474000000000 
FT1A	031271 0      0   0   0            0            0            
FT9	031272 0      0   0   0            0            0            
ET0	031272 0      0   0   777777777777 0            0            
ST1	031272 0      0   0   777777777777 0            0            
ST2	031272 0      0   0   777777777777 0            0            
ST9	031272 0      0   0   777777777777 0            0            


*031272 TSO 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031272 031272 0   0   671000000000 0            777777777777 
IT1	031272 0      0   0   671000000000 0            777777777777 
AT3	031272 0      0   0   0            0            671000000000 
AT6	031272 0      0   0   0            0            671000000000 
FT0	031272 0      0   0   777777777777 0            671000000000 
FT1A	031272 0      0   0   777777777777 0            777777777777 
FT2	031272 0      0   0   0            0            777777777777 
FT2RQ	031272 0      0   0   777777777777 0            777777777777 
FT3	031272 0      0   0   777777777777 0            777777777777 
FT9	031273 0      0   0   777777777777 0            777777777777 
ET0	031273 0      0   0   777777777777 0            777777777777 
ET1	031273 0      0   0   777777777777 0            777777777777 
ET2	031273 0      0   0   777777777777 0            777777777777 
ST1	031273 0      0   0   777777777777 0            777777777777 
ST2	031273 0      0   0   777777777777 0            777777777777 
ST9	031273 0      0   0   777777777777 0            777777777777 


*031273 CAME	0,034012
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031273 031273 0   0   312000034012 0            777777777777 
IT1	031273 0      0   0   312000034012 0            777777777777 
AT3	031273 0      0   0   000000034012 0            312000034012 
AT6	031273 034012 0   0   000000034012 0            312000034012 
FT0	031273 034012 0   0   777777777777 0            312000034012 
FT1A	031273 034012 0   0   777777777777 0            777777777777 
FT2	031273 034012 0   0   0            0            777777777777 
FT2RQ	031273 034012 0   0   777777777777 0            777777777777 
FT3	031273 034012 0   0   777777777777 0            777777777777 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 88
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0278

FT9	031274 034012 0   0   777777777777 0            777777777777 
ET0	031275 034012 0   0   0            0            777777777777 
ST1A	031275 034012 0   0   0            0            777777777777 
ST9	031275 034012 0   0   0            0            777777777777 


*031275 JUMPA	0,031276
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031275 031275 0   0   324000031276 0            000000031276 
IT1	031275 0      0   0   324000031276 0            000000031276 
AT3	031275 0      0   0   000000031276 0            324000031276 
AT6	031275 031276 0   0   000000031276 0            324000031276 
FT1A	031275 031276 0   0   000000031276 0            000000031276 
FT2	031275 031276 0   0   0            0            000000031276 
FT2RQ	031275 031276 0   0   777777777777 0            000000031276 
FT3	031275 031276 0   0   777777777777 0            000000031276 
FT9	031276 031276 0   0   777777777777 0            000000031276 
ET0	031276 031276 0   0   777777777777 0            000000031276 
ST1A	031276 031276 0   0   777777777777 0            000000031276 
ST9	031276 031276 0   0   777777777777 0            000000031276 


*031276 MOVE 	0,034013
INITIAL
C(AC)=777777 777777 
C(E)=777777 000000 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031276 031276 0   0   200000034013 0            777777000000 
IT1	031276 0      0   0   200000034013 0            777777000000 
AT3	031276 0      0   0   000000034013 0            200000034013 
AT6	031276 034013 0   0   000000034013 0            200000034013 
FT0	031276 034013 0   0   777777000000 0            200000034013 
FT1A	031276 034013 0   0   777777000000 0            777777000000 
FT9	031277 034013 0   0   777777000000 0            777777000000 
ET0	031277 034013 0   0   777777000000 0            777777000000 
ST1	031277 034013 0   0   777777000000 0            777777000000 
ST2	031277 034013 0   0   777777000000 0            777777000000 
ST9	031277 034013 0   0   777777000000 0            777777000000 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 89
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0279

*031277 TSO 	0,034015
INITIAL
C(AC)=777777 000000 
C(E)=000000 777777 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031277 031277 0   0   671000034015 0            000000777777 
IT1	031277 0      0   0   671000034015 0            000000777777 
AT3	031277 0      0   0   000000034015 0            671000034015 
AT6	031277 034015 0   0   000000034015 0            671000034015 
FT0	031277 034015 0   0   000000777777 0            671000034015 
FT1A	031277 034015 0   0   000000777777 0            000000777777 
FT2	031277 034015 0   0   0            0            000000777777 
FT2RQ	031277 034015 0   0   777777000000 0            000000777777 
FT3	031277 034015 0   0   777777000000 0            000000777777 
FT9	0      034015 0   0   777777000000 0            000000777777 
ET0	0      034015 0   0   000000777777 0            000000777777 
ET1	0      034015 0   0   000000777777 0            000000777777 
ET2	0      034015 0   0   777777000000 0            000000777777 
ST1	0      034015 0   0   777777000000 0            000000777777 
ST2	0      034015 0   0   777777000000 0            000000777777 
ST9	0      034015 0   0   777777000000 0            000000777777 


*031300 CAME	0,034013
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	0      0      0   0   312000034013 0            777777000000 
IT1	0      0      0   0   312000034013 0            777777000000 
AT3	0      0      0   0   000000034013 0            312000034013 
AT6	0      034013 0   0   000000034013 0            312000034013 
FT0	0      034013 0   0   777777000000 0            312000034013 
FT1A	0      034013 0   0   777777000000 0            777777000000 
FT2	0      034013 0   0   0            0            777777000000 
FT2RQ	0      034013 0   0   777777000000 0            777777000000 
FT3	0      034013 0   0   777777000000 0            777777000000 
FT9	031301 034013 0   0   777777000000 0            777777000000 
ET0	031302 034013 0   0   0            0            777777000000 
ST1A	031302 034013 0   0   0            0            777777000000 
ST9	031302 034013 0   0   0            0            777777000000 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 90
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0280

*031302 JUMPA	0,031303
INITIAL
C(AC)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031302 031302 0   0   324000031303 0            000000031303 
IT1	031302 0      0   0   324000031303 0            000000031303 
AT3	031302 0      0   0   000000031303 0            324000031303 
AT6	031302 031303 0   0   000000031303 0            324000031303 
FT1A	031302 031303 0   0   000000031303 0            000000031303 
FT2	031302 031303 0   0   0            0            000000031303 
FT2RQ	031302 031303 0   0   777777000000 0            000000031303 
FT3	031302 031303 0   0   777777000000 0            000000031303 
FT9	031303 031303 0   0   777777000000 0            000000031303 
ET0	031303 031303 0   0   777777000000 0            000000031303 
ST1A	031303 031303 0   0   777777000000 0            000000031303 
ST9	031303 031303 0   0   777777000000 0            000000031303 


*031303 MOVEI	0,777777
INITIAL
C(AC)=777777 000000 
FINAL
C(AC)=000000 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031303 031303 0   0   201000777777 0            000000777777 
IT1	031303 0      0   0   201000777777 0            000000777777 
AT3	031303 0      0   0   000000777777 0            201000777777 
AT6	031303 777777 0   0   000000777777 0            201000777777 
FT1A	031303 777777 0   0   000000777777 0            000000777777 
FT9	031304 777777 0   0   000000777777 0            000000777777 
ET0	031304 777777 0   0   000000777777 0            000000777777 
ST1	031304 777777 0   0   000000777777 0            000000777777 
ST2	031304 777777 0   0   000000777777 0            000000777777 
ST9	031304 777777 0   0   000000777777 0            000000777777 


*031304 TSO 	0,034014
INITIAL
C(AC)=000000 777777 
C(E)=000000 000000 
FINAL
C(AC)=000000 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031304 031304 0   0   671000034014 0            0            
IT1	031304 0      0   0   671000034014 0            0            
AT3	031304 0      0   0   000000034014 0            671000034014 
AT6	031304 034014 0   0   000000034014 0            671000034014 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 91
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0281

FT0	031304 034014 0   0   0            0            671000034014 
FT1A	031304 034014 0   0   0            0            0            
FT2	031304 034014 0   0   0            0            0            
FT2RQ	031304 034014 0   0   000000777777 0            0            
FT3	031304 034014 0   0   000000777777 0            0            
FT9	031305 034014 0   0   000000777777 0            0            
ET0	031305 034014 0   0   777777000000 0            0            
ET1	031305 034014 0   0   777777000000 0            0            
ET2	031305 034014 0   0   000000777777 0            0            
ST1	031305 034014 0   0   000000777777 0            0            
ST2	031305 034014 0   0   000000777777 0            0            
ST9	031305 034014 0   0   000000777777 0            0            


*031305 CAME	0,034015
INITIAL
C(AC)=000000 777777 
C(E)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031305 031305 0   0   312000034015 0            000000777777 
IT1	031305 0      0   0   312000034015 0            000000777777 
AT3	031305 0      0   0   000000034015 0            312000034015 
AT6	031305 034015 0   0   000000034015 0            312000034015 
FT0	031305 034015 0   0   000000777777 0            312000034015 
FT1A	031305 034015 0   0   000000777777 0            000000777777 
FT2	031305 034015 0   0   0            0            000000777777 
FT2RQ	031305 034015 0   0   000000777777 0            000000777777 
FT3	031305 034015 0   0   000000777777 0            000000777777 
FT9	031306 034015 0   0   000000777777 0            000000777777 
ET0	031307 034015 0   0   0            0            000000777777 
ST1A	031307 034015 0   0   0            0            000000777777 
ST9	031307 034015 0   0   0            0            000000777777 


*031307 JUMPA	0,031310
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031307 031307 0   0   324000031310 0            000000031310 
IT1	031307 0      0   0   324000031310 0            000000031310 
AT3	031307 0      0   0   000000031310 0            324000031310 
AT6	031307 031310 0   0   000000031310 0            324000031310 
FT1A	031307 031310 0   0   000000031310 0            000000031310 
FT2	031307 031310 0   0   0            0            000000031310 
FT2RQ	031307 031310 0   0   000000777777 0            000000031310 
FT3	031307 031310 0   0   000000777777 0            000000031310 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 92
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0282

FT9	031310 031310 0   0   000000777777 0            000000031310 
ET0	031310 031310 0   0   000000777777 0            000000031310 
ST1A	031310 031310 0   0   000000777777 0            000000031310 
ST9	031310 031310 0   0   000000777777 0            000000031310 


*031310 MOVE 	0,034013
INITIAL
C(AC)=000000 777777 
C(E)=777777 000000 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031310 031310 0   0   200000034013 0            777777000000 
IT1	031310 0      0   0   200000034013 0            777777000000 
AT3	031310 0      0   0   000000034013 0            200000034013 
AT6	031310 034013 0   0   000000034013 0            200000034013 
FT0	031310 034013 0   0   777777000000 0            200000034013 
FT1A	031310 034013 0   0   777777000000 0            777777000000 
FT9	031311 034013 0   0   777777000000 0            777777000000 
ET0	031311 034013 0   0   777777000000 0            777777000000 
ST1	031311 034013 0   0   777777000000 0            777777000000 
ST2	031311 034013 0   0   777777000000 0            777777000000 
ST9	031311 034013 0   0   777777000000 0            777777000000 


*031311 TSO 	0,034014
INITIAL
C(AC)=777777 000000 
C(E)=000000 000000 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031311 031311 0   0   671000034014 0            0            
IT1	031311 0      0   0   671000034014 0            0            
AT3	031311 0      0   0   000000034014 0            671000034014 
AT6	031311 034014 0   0   000000034014 0            671000034014 
FT0	031311 034014 0   0   0            0            671000034014 
FT1A	031311 034014 0   0   0            0            0            
FT2	031311 034014 0   0   0            0            0            
FT2RQ	031311 034014 0   0   777777000000 0            0            
FT3	031311 034014 0   0   777777000000 0            0            
FT9	031312 034014 0   0   777777000000 0            0            
ET0	031312 034014 0   0   000000777777 0            0            
ET1	031312 034014 0   0   000000777777 0            0            
ET2	031312 034014 0   0   777777000000 0            0            
ST1	031312 034014 0   0   777777000000 0            0            
ST2	031312 034014 0   0   777777000000 0            0            
ST9	031312 034014 0   0   777777000000 0            0            

PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 93
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0283


*031312 CAME	0,034013
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031312 031312 0   0   312000034013 0            777777000000 
IT1	031312 0      0   0   312000034013 0            777777000000 
AT3	031312 0      0   0   000000034013 0            312000034013 
AT6	031312 034013 0   0   000000034013 0            312000034013 
FT0	031312 034013 0   0   777777000000 0            312000034013 
FT1A	031312 034013 0   0   777777000000 0            777777000000 
FT2	031312 034013 0   0   0            0            777777000000 
FT2RQ	031312 034013 0   0   777777000000 0            777777000000 
FT3	031312 034013 0   0   777777000000 0            777777000000 
FT9	031313 034013 0   0   777777000000 0            777777000000 
ET0	031314 034013 0   0   0            0            777777000000 
ST1A	031314 034013 0   0   0            0            777777000000 
ST9	031314 034013 0   0   0            0            777777000000 


*031314 JUMPA	0,031315
INITIAL
C(AC)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031314 031314 0   0   324000031315 0            000000031315 
IT1	031314 0      0   0   324000031315 0            000000031315 
AT3	031314 0      0   0   000000031315 0            324000031315 
AT6	031314 031315 0   0   000000031315 0            324000031315 
FT1A	031314 031315 0   0   000000031315 0            000000031315 
FT2	031314 031315 0   0   0            0            000000031315 
FT2RQ	031314 031315 0   0   777777000000 0            000000031315 
FT3	031314 031315 0   0   777777000000 0            000000031315 
FT9	031315 031315 0   0   777777000000 0            000000031315 
ET0	031315 031315 0   0   777777000000 0            000000031315 
ST1A	031315 031315 0   0   777777000000 0            000000031315 
ST9	031315 031315 0   0   777777000000 0            000000031315 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 94
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0284

*031315 MOVEI	0,777777
INITIAL
C(AC)=777777 000000 
FINAL
C(AC)=000000 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031315 031315 0   0   201000777777 0            000000777777 
IT1	031315 0      0   0   201000777777 0            000000777777 
AT3	031315 0      0   0   000000777777 0            201000777777 
AT6	031315 777777 0   0   000000777777 0            201000777777 
FT1A	031315 777777 0   0   000000777777 0            000000777777 
FT9	031316 777777 0   0   000000777777 0            000000777777 
ET0	031316 777777 0   0   000000777777 0            000000777777 
ST1	031316 777777 0   0   000000777777 0            000000777777 
ST2	031316 777777 0   0   000000777777 0            000000777777 
ST9	031316 777777 0   0   000000777777 0            000000777777 


*031316 TSO 	0,034012
INITIAL
C(AC)=000000 777777 
C(E)=777777 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031316 031316 0   0   671000034012 0            777777000000 
IT1	031316 0      0   0   671000034012 0            777777000000 
AT3	031316 0      0   0   000000034012 0            671000034012 
AT6	031316 034012 0   0   000000034012 0            671000034012 
FT0	031316 034012 0   0   777777777777 0            671000034012 
FT1A	031316 034012 0   0   777777777777 0            777777777777 
FT2	031316 034012 0   0   0            0            777777777777 
FT2RQ	031316 034012 0   0   000000777777 0            777777777777 
FT3	031316 034012 0   0   000000777777 0            777777777777 
FT9	031317 034012 0   0   000000777777 0            777777777777 
ET0	031317 034012 0   0   777777000000 0            777777777777 
ET1	031317 034012 0   0   777777777777 0            777777000000 
ET2	031317 034012 0   0   777777777777 0            777777000000 
ST1	031317 034012 0   0   777777777777 0            777777000000 
ST2	031317 034012 0   0   777777777777 0            777777000000 
ST9	031317 034012 0   0   777777777777 0            777777000000 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 95
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0285

*031317 CAME	0,034012
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031317 031317 0   0   312000034012 0            777777777777 
IT1	031317 0      0   0   312000034012 0            777777777777 
AT3	031317 0      0   0   000000034012 0            312000034012 
AT6	031317 034012 0   0   000000034012 0            312000034012 
FT0	031317 034012 0   0   777777777777 0            312000034012 
FT1A	031317 034012 0   0   777777777777 0            777777777777 
FT2	031317 034012 0   0   0            0            777777777777 
FT2RQ	031317 034012 0   0   777777777777 0            777777777777 
FT3	031317 034012 0   0   777777777777 0            777777777777 
FT9	031320 034012 0   0   777777777777 0            777777777777 
ET0	031321 034012 0   0   0            0            777777777777 
ST1A	031321 034012 0   0   0            0            777777777777 
ST9	031321 034012 0   0   0            0            777777777777 


*031321 JUMPA	0,031322
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031321 031321 0   0   324000031322 0            000000031322 
IT1	031321 0      0   0   324000031322 0            000000031322 
AT3	031321 0      0   0   000000031322 0            324000031322 
AT6	031321 031322 0   0   000000031322 0            324000031322 
FT1A	031321 031322 0   0   000000031322 0            000000031322 
FT2	031321 031322 0   0   0            0            000000031322 
FT2RQ	031321 031322 0   0   777777777777 0            000000031322 
FT3	031321 031322 0   0   777777777777 0            000000031322 
FT9	031322 031322 0   0   777777777777 0            000000031322 
ET0	031322 031322 0   0   777777777777 0            000000031322 
ST1A	031322 031322 0   0   777777777777 0            000000031322 
ST9	031322 031322 0   0   777777777777 0            000000031322 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 96
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0286

*031322 MOVE 	0,034013
INITIAL
C(AC)=777777 777777 
C(E)=777777 000000 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031322 031322 0   0   200000034013 0            777777000000 
IT1	031322 0      0   0   200000034013 0            777777000000 
AT3	031322 0      0   0   000000034013 0            200000034013 
AT6	031322 034013 0   0   000000034013 0            200000034013 
FT0	031322 034013 0   0   777777000000 0            200000034013 
FT1A	031322 034013 0   0   777777000000 0            777777000000 
FT9	031323 034013 0   0   777777000000 0            777777000000 
ET0	031323 034013 0   0   777777000000 0            777777000000 
ST1	031323 034013 0   0   777777000000 0            777777000000 
ST2	031323 034013 0   0   777777000000 0            777777000000 
ST9	031323 034013 0   0   777777000000 0            777777000000 


*031323 TSO 	0,034012
INITIAL
C(AC)=777777 000000 
C(E)=777777 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031323 031323 0   0   671000034012 0            000000777777 
IT1	031323 0      0   0   671000034012 0            000000777777 
AT3	031323 0      0   0   000000034012 0            671000034012 
AT6	031323 034012 0   0   000000034012 0            671000034012 
FT0	031323 034012 0   0   777777777777 0            671000034012 
FT1A	031323 034012 0   0   777777777777 0            777777777777 
FT2	031323 034012 0   0   0            0            777777777777 
FT2RQ	031323 034012 0   0   777777000000 0            777777777777 
FT3	031323 034012 0   0   777777000000 0            777777777777 
FT9	031324 034012 0   0   777777000000 0            777777777777 
ET0	031324 034012 0   0   000000777777 0            777777777777 
ET1	031324 034012 0   0   777777777777 0            000000777777 
ET2	031324 034012 0   0   777777777777 0            000000777777 
ST1	031324 034012 0   0   777777777777 0            000000777777 
ST2	031324 034012 0   0   777777777777 0            000000777777 
ST9	031324 034012 0   0   777777777777 0            000000777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 97
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0287

*031324 CAME	0,034012
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031324 031324 0   0   312000034012 0            777777777777 
IT1	031324 0      0   0   312000034012 0            777777777777 
AT3	031324 0      0   0   000000034012 0            312000034012 
AT6	031324 034012 0   0   000000034012 0            312000034012 
FT0	031324 034012 0   0   777777777777 0            312000034012 
FT1A	031324 034012 0   0   777777777777 0            777777777777 
FT2	031324 034012 0   0   0            0            777777777777 
FT2RQ	031324 034012 0   0   777777777777 0            777777777777 
FT3	031324 034012 0   0   777777777777 0            777777777777 
FT9	031325 034012 0   0   777777777777 0            777777777777 
ET0	031326 034012 0   0   0            0            777777777777 
ST1A	031326 034012 0   0   0            0            777777777777 
ST9	031326 034012 0   0   0            0            777777777777 


*031326 JUMPA	0,031327
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031326 031326 0   0   324000031327 0            000000031327 
IT1	031326 0      0   0   324000031327 0            000000031327 
AT3	031326 0      0   0   000000031327 0            324000031327 
AT6	031326 031327 0   0   000000031327 0            324000031327 
FT1A	031326 031327 0   0   000000031327 0            000000031327 
FT2	031326 031327 0   0   0            0            000000031327 
FT2RQ	031326 031327 0   0   777777777777 0            000000031327 
FT3	031326 031327 0   0   777777777777 0            000000031327 
FT9	031327 031327 0   0   777777777777 0            000000031327 
ET0	031327 031327 0   0   777777777777 0            000000031327 
ST1A	031327 031327 0   0   777777777777 0            000000031327 
ST9	031327 031327 0   0   777777777777 0            000000031327 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 98
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0288

*031327 SETZ 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031327 031327 0   0   400000000000 0            0            
IT1	031327 0      0   0   400000000000 0            0            
AT3	031327 0      0   0   0            0            400000000000 
AT6	031327 0      0   0   0            0            400000000000 
FT1A	031327 0      0   0   0            0            0            
FT9	031330 0      0   0   0            0            0            
ET0	031330 0      0   0   0            0            0            
ST1	031330 0      0   0   0            0            0            
ST2	031330 0      0   0   0            0            0            
ST9	031330 0      0   0   0            0            0            


*031330 HLL 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031330 031330 0   0   500000000000 0            0            
IT1	031330 0      0   0   500000000000 0            0            
AT3	031330 0      0   0   0            0            500000000000 
AT6	031330 0      0   0   0            0            500000000000 
FT0	031330 0      0   0   0            0            500000000000 
FT1A	031330 0      0   0   0            0            0            
FT2	031330 0      0   0   0            0            0            
FT2RQ	031330 0      0   0   0            0            0            
FT3	031330 0      0   0   0            0            0            
FT9	031331 0      0   0   0            0            0            
ET0	031331 0      0   0   0            0            0            
ST1	031331 0      0   0   0            0            0            
ST2	031331 0      0   0   0            0            0            
ST9	031331 0      0   0   0            0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 99
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0289

*031331 SKIPE	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031331 031331 0   0   332000000000 0            0            
IT1	031331 0      0   0   332000000000 0            0            
AT3	031331 0      0   0   0            0            332000000000 
AT6	031331 0      0   0   0            0            332000000000 
FT0	031331 0      0   0   0            0            332000000000 
FT1A	031331 0      0   0   0            0            0            
FT9	031332 0      0   0   0            0            0            
ET0	031333 0      0   0   0            0            0            
ST1A	031333 0      0   0   0            0            0            
ST9	031333 0      0   0   0            0            0            


*031333 JUMPA	0,031334
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031333 031333 0   0   324000031334 0            000000031334 
IT1	031333 0      0   0   324000031334 0            000000031334 
AT3	031333 0      0   0   000000031334 0            324000031334 
AT6	031333 031334 0   0   000000031334 0            324000031334 
FT1A	031333 031334 0   0   000000031334 0            000000031334 
FT2	031333 031334 0   0   0            0            000000031334 
FT2RQ	031333 031334 0   0   0            0            000000031334 
FT3	031333 031334 0   0   0            0            000000031334 
FT9	031334 031334 0   0   0            0            000000031334 
ET0	031334 031334 0   0   0            0            000000031334 
ST1A	031334 031334 0   0   0            0            000000031334 
ST9	031334 031334 0   0   0            0            000000031334 


*031334 SETO 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031334 031334 0   0   474000000000 0            0            
IT1	031334 0      0   0   474000000000 0            0            
AT3	031334 0      0   0   0            0            474000000000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 100
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0290

AT6	031334 0      0   0   0            0            474000000000 
FT1A	031334 0      0   0   0            0            0            
FT9	031335 0      0   0   0            0            0            
ET0	031335 0      0   0   777777777777 0            0            
ST1	031335 0      0   0   777777777777 0            0            
ST2	031335 0      0   0   777777777777 0            0            
ST9	031335 0      0   0   777777777777 0            0            


*031335 HLL 	0,034014
INITIAL
C(AC)=777777 777777 
C(E)=000000 000000 
FINAL
C(AC)=000000 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031335 031335 0   0   500000034014 0            777777777777 
IT1	031335 0      0   0   500000034014 0            777777777777 
AT3	031335 0      0   0   000000034014 0            500000034014 
AT6	031335 034014 0   0   000000034014 0            500000034014 
FT0	031335 034014 0   0   0            0            500000034014 
FT1A	031335 034014 0   0   0            0            0            
FT2	031335 034014 0   0   0            0            0            
FT2RQ	031335 034014 0   0   777777777777 0            0            
FT3	031335 034014 0   0   777777777777 0            0            
FT9	031336 034014 0   0   777777777777 0            0            
ET0	031336 034014 0   0   000000777777 0            777777777777 
ST1	031336 034014 0   0   000000777777 0            777777777777 
ST2	031336 034014 0   0   000000777777 0            777777777777 
ST9	031336 034014 0   0   000000777777 0            777777777777 


*031336 CAIE	0,777777
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031336 031336 0   0   302000777777 0            000000777777 
IT1	031336 0      0   0   302000777777 0            000000777777 
AT3	031336 0      0   0   000000777777 0            302000777777 
AT6	031336 777777 0   0   000000777777 0            302000777777 
FT1A	031336 777777 0   0   000000777777 0            000000777777 
FT2	031336 777777 0   0   0            0            000000777777 
FT2RQ	031336 777777 0   0   000000777777 0            000000777777 
FT3	031336 777777 0   0   000000777777 0            000000777777 
FT9	031337 777777 0   0   000000777777 0            000000777777 
ET0	031340 777777 0   0   0            0            000000777777 
ST1A	031340 777777 0   0   0            0            000000777777 
ST9	031340 777777 0   0   0            0            000000777777 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 101
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0291



*031340 JUMPA	0,031341
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031340 031340 0   0   324000031341 0            000000031341 
IT1	031340 0      0   0   324000031341 0            000000031341 
AT3	031340 0      0   0   000000031341 0            324000031341 
AT6	031340 031341 0   0   000000031341 0            324000031341 
FT1A	031340 031341 0   0   000000031341 0            000000031341 
FT2	031340 031341 0   0   0            0            000000031341 
FT2RQ	031340 031341 0   0   000000777777 0            000000031341 
FT3	031340 031341 0   0   000000777777 0            000000031341 
FT9	031341 031341 0   0   000000777777 0            000000031341 
ET0	031341 031341 0   0   000000777777 0            000000031341 
ST1A	031341 031341 0   0   000000777777 0            000000031341 
ST9	031341 031341 0   0   000000777777 0            000000031341 


*031341 SETO 	0,000000
INITIAL
C(AC)=000000 777777 
C(E)=000000 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031341 031341 0   0   474000000000 0            0            
IT1	031341 0      0   0   474000000000 0            0            
AT3	031341 0      0   0   0            0            474000000000 
AT6	031341 0      0   0   0            0            474000000000 
FT1A	031341 0      0   0   0            0            0            
FT9	031342 0      0   0   0            0            0            
ET0	031342 0      0   0   777777777777 0            0            
ST1	031342 0      0   0   777777777777 0            0            
ST2	031342 0      0   0   777777777777 0            0            
ST9	031342 0      0   0   777777777777 0            0            


*031342 HLL 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031342 031342 0   0   500000000000 0            777777777777 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 102
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0292

IT1	031342 0      0   0   500000000000 0            777777777777 
AT3	031342 0      0   0   0            0            500000000000 
AT6	031342 0      0   0   0            0            500000000000 
FT0	031342 0      0   0   777777777777 0            500000000000 
FT1A	031342 0      0   0   777777777777 0            777777777777 
FT2	031342 0      0   0   0            0            777777777777 
FT2RQ	031342 0      0   0   777777777777 0            777777777777 
FT3	031342 0      0   0   777777777777 0            777777777777 
FT9	031343 0      0   0   777777777777 0            777777777777 
ET0	031343 0      0   0   777777777777 0            777777777777 
ST1	031343 0      0   0   777777777777 0            777777777777 
ST2	031343 0      0   0   777777777777 0            777777777777 
ST9	031343 0      0   0   777777777777 0            777777777777 


*031343 CAME	0,034012
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031343 031343 0   0   312000034012 0            777777777777 
IT1	031343 0      0   0   312000034012 0            777777777777 
AT3	031343 0      0   0   000000034012 0            312000034012 
AT6	031343 034012 0   0   000000034012 0            312000034012 
FT0	031343 034012 0   0   777777777777 0            312000034012 
FT1A	031343 034012 0   0   777777777777 0            777777777777 
FT2	031343 034012 0   0   0            0            777777777777 
FT2RQ	031343 034012 0   0   777777777777 0            777777777777 
FT3	031343 034012 0   0   777777777777 0            777777777777 
FT9	031344 034012 0   0   777777777777 0            777777777777 
ET0	031345 034012 0   0   0            0            777777777777 
ST1A	031345 034012 0   0   0            0            777777777777 
ST9	031345 034012 0   0   0            0            777777777777 


*031345 JUMPA	0,031346
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031345 031345 0   0   324000031346 0            000000031346 
IT1	031345 0      0   0   324000031346 0            000000031346 
AT3	031345 0      0   0   000000031346 0            324000031346 
AT6	031345 031346 0   0   000000031346 0            324000031346 
FT1A	031345 031346 0   0   000000031346 0            000000031346 
FT2	031345 031346 0   0   0            0            000000031346 
FT2RQ	031345 031346 0   0   777777777777 0            000000031346 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 103
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0293

FT3	031345 031346 0   0   777777777777 0            000000031346 
FT9	031346 031346 0   0   777777777777 0            000000031346 
ET0	031346 031346 0   0   777777777777 0            000000031346 
ST1A	031346 031346 0   0   777777777777 0            000000031346 
ST9	031346 031346 0   0   777777777777 0            000000031346 


*031346 SETZ 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031346 031346 0   0   400000000000 0            0            
IT1	031346 0      0   0   400000000000 0            0            
AT3	031346 0      0   0   0            0            400000000000 
AT6	031346 0      0   0   0            0            400000000000 
FT1A	031346 0      0   0   0            0            0            
FT9	031347 0      0   0   0            0            0            
ET0	031347 0      0   0   0            0            0            
ST1	031347 0      0   0   0            0            0            
ST2	031347 0      0   0   0            0            0            
ST9	031347 0      0   0   0            0            0            


*031347 HLL 	0,034012
INITIAL
C(AC)=000000 000000 
C(E)=777777 777777 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031347 031347 0   0   500000034012 0            0            
IT1	031347 0      0   0   500000034012 0            0            
AT3	031347 0      0   0   000000034012 0            500000034012 
AT6	031347 034012 0   0   000000034012 0            500000034012 
FT0	031347 034012 0   0   777777777777 0            500000034012 
FT1A	031347 034012 0   0   777777777777 0            777777777777 
FT2	031347 034012 0   0   0            0            777777777777 
FT2RQ	031347 034012 0   0   0            0            777777777777 
FT3	031347 034012 0   0   0            0            777777777777 
FT9	031350 034012 0   0   0            0            777777777777 
ET0	031350 034012 0   0   777777000000 0            0            
ST1	031350 034012 0   0   777777000000 0            0            
ST2	031350 034012 0   0   777777000000 0            0            
ST9	031350 034012 0   0   777777000000 0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 104
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0294

*031350 CAME	0,034013
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031350 031350 0   0   312000034013 0            777777000000 
IT1	031350 0      0   0   312000034013 0            777777000000 
AT3	031350 0      0   0   000000034013 0            312000034013 
AT6	031350 034013 0   0   000000034013 0            312000034013 
FT0	031350 034013 0   0   777777000000 0            312000034013 
FT1A	031350 034013 0   0   777777000000 0            777777000000 
FT2	031350 034013 0   0   0            0            777777000000 
FT2RQ	031350 034013 0   0   777777000000 0            777777000000 
FT3	031350 034013 0   0   777777000000 0            777777000000 
FT9	031351 034013 0   0   777777000000 0            777777000000 
ET0	031352 034013 0   0   0            0            777777000000 
ST1A	031352 034013 0   0   0            0            777777000000 
ST9	031352 034013 0   0   0            0            777777000000 


*031352 JUMPA	0,031353
INITIAL
C(AC)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031352 031352 0   0   324000031353 0            000000031353 
IT1	031352 0      0   0   324000031353 0            000000031353 
AT3	031352 0      0   0   000000031353 0            324000031353 
AT6	031352 031353 0   0   000000031353 0            324000031353 
FT1A	031352 031353 0   0   000000031353 0            000000031353 
FT2	031352 031353 0   0   0            0            000000031353 
FT2RQ	031352 031353 0   0   777777000000 0            000000031353 
FT3	031352 031353 0   0   777777000000 0            000000031353 
FT9	031353 031353 0   0   777777000000 0            000000031353 
ET0	031353 031353 0   0   777777000000 0            000000031353 
ST1A	031353 031353 0   0   777777000000 0            000000031353 
ST9	031353 031353 0   0   777777000000 0            000000031353 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 105
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0295

*031353 SETZ 	0,000000
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031353 031353 0   0   400000000000 0            0            
IT1	031353 0      0   0   400000000000 0            0            
AT3	031353 0      0   0   0            0            400000000000 
AT6	031353 0      0   0   0            0            400000000000 
FT1A	031353 0      0   0   0            0            0            
FT9	031354 0      0   0   0            0            0            
ET0	031354 0      0   0   0            0            0            
ST1	031354 0      0   0   0            0            0            
ST2	031354 0      0   0   0            0            0            
ST9	031354 0      0   0   0            0            0            


*031354 HLL 	0,034013
INITIAL
C(AC)=000000 000000 
C(E)=777777 000000 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031354 031354 0   0   500000034013 0            0            
IT1	031354 0      0   0   500000034013 0            0            
AT3	031354 0      0   0   000000034013 0            500000034013 
AT6	031354 034013 0   0   000000034013 0            500000034013 
FT0	031354 034013 0   0   777777000000 0            500000034013 
FT1A	031354 034013 0   0   777777000000 0            777777000000 
FT2	031354 034013 0   0   0            0            777777000000 
FT2RQ	031354 034013 0   0   0            0            777777000000 
FT3	031354 034013 0   0   0            0            777777000000 
FT9	031355 034013 0   0   0            0            777777000000 
ET0	031355 034013 0   0   777777000000 0            0            
ST1	031355 034013 0   0   777777000000 0            0            
ST2	031355 034013 0   0   777777000000 0            0            
ST9	031355 034013 0   0   777777000000 0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 106
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0296

*031355 CAME	0,034013
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031355 031355 0   0   312000034013 0            777777000000 
IT1	031355 0      0   0   312000034013 0            777777000000 
AT3	031355 0      0   0   000000034013 0            312000034013 
AT6	031355 034013 0   0   000000034013 0            312000034013 
FT0	031355 034013 0   0   777777000000 0            312000034013 
FT1A	031355 034013 0   0   777777000000 0            777777000000 
FT2	031355 034013 0   0   0            0            777777000000 
FT2RQ	031355 034013 0   0   777777000000 0            777777000000 
FT3	031355 034013 0   0   777777000000 0            777777000000 
FT9	031356 034013 0   0   777777000000 0            777777000000 
ET0	031357 034013 0   0   0            0            777777000000 
ST1A	031357 034013 0   0   0            0            777777000000 
ST9	031357 034013 0   0   0            0            777777000000 


*031357 JUMPA	0,031360
INITIAL
C(AC)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031357 031357 0   0   324000031360 0            000000031360 
IT1	031357 0      0   0   324000031360 0            000000031360 
AT3	031357 0      0   0   000000031360 0            324000031360 
AT6	031357 031360 0   0   000000031360 0            324000031360 
FT1A	031357 031360 0   0   000000031360 0            000000031360 
FT2	031357 031360 0   0   0            0            000000031360 
FT2RQ	031357 031360 0   0   777777000000 0            000000031360 
FT3	031357 031360 0   0   777777000000 0            000000031360 
FT9	031360 031360 0   0   777777000000 0            000000031360 
ET0	031360 031360 0   0   777777000000 0            000000031360 
ST1A	031360 031360 0   0   777777000000 0            000000031360 
ST9	031360 031360 0   0   777777000000 0            000000031360 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 107
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0297

*031360 SETO 	0,000000
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031360 031360 0   0   474000000000 0            0            
IT1	031360 0      0   0   474000000000 0            0            
AT3	031360 0      0   0   0            0            474000000000 
AT6	031360 0      0   0   0            0            474000000000 
FT1A	031360 0      0   0   0            0            0            
FT9	031361 0      0   0   0            0            0            
ET0	031361 0      0   0   777777777777 0            0            
ST1	031361 0      0   0   777777777777 0            0            
ST2	031361 0      0   0   777777777777 0            0            
ST9	031361 0      0   0   777777777777 0            0            


*031361 HLL 	0,034015
INITIAL
C(AC)=777777 777777 
C(E)=000000 777777 
FINAL
C(AC)=000000 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031361 031361 0   0   500000034015 0            777777777777 
IT1	031361 0      0   0   500000034015 0            777777777777 
AT3	031361 0      0   0   000000034015 0            500000034015 
AT6	031361 034015 0   0   000000034015 0            500000034015 
FT0	031361 034015 0   0   000000777777 0            500000034015 
FT1A	031361 034015 0   0   000000777777 0            000000777777 
FT2	031361 034015 0   0   0            0            000000777777 
FT2RQ	031361 034015 0   0   777777777777 0            000000777777 
FT3	031361 034015 0   0   777777777777 0            000000777777 
FT9	031362 034015 0   0   777777777777 0            000000777777 
ET0	031362 034015 0   0   000000777777 0            777777777777 
ST1	031362 034015 0   0   000000777777 0            777777777777 
ST2	031362 034015 0   0   000000777777 0            777777777777 
ST9	031362 034015 0   0   000000777777 0            777777777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 108
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0298

*031362 CAIE	0,777777
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031362 031362 0   0   302000777777 0            000000777777 
IT1	031362 0      0   0   302000777777 0            000000777777 
AT3	031362 0      0   0   000000777777 0            302000777777 
AT6	031362 777777 0   0   000000777777 0            302000777777 
FT1A	031362 777777 0   0   000000777777 0            000000777777 
FT2	031362 777777 0   0   0            0            000000777777 
FT2RQ	031362 777777 0   0   000000777777 0            000000777777 
FT3	031362 777777 0   0   000000777777 0            000000777777 
FT9	031363 777777 0   0   000000777777 0            000000777777 
ET0	031364 777777 0   0   0            0            000000777777 
ST1A	031364 777777 0   0   0            0            000000777777 
ST9	031364 777777 0   0   0            0            000000777777 


*031364 JUMPA	0,031365
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031364 031364 0   0   324000031365 0            000000031365 
IT1	031364 0      0   0   324000031365 0            000000031365 
AT3	031364 0      0   0   000000031365 0            324000031365 
AT6	031364 031365 0   0   000000031365 0            324000031365 
FT1A	031364 031365 0   0   000000031365 0            000000031365 
FT2	031364 031365 0   0   0            0            000000031365 
FT2RQ	031364 031365 0   0   000000777777 0            000000031365 
FT3	031364 031365 0   0   000000777777 0            000000031365 
FT9	031365 031365 0   0   000000777777 0            000000031365 
ET0	031365 031365 0   0   000000777777 0            000000031365 
ST1A	031365 031365 0   0   000000777777 0            000000031365 
ST9	031365 031365 0   0   000000777777 0            000000031365 


*031365 SETZ 	0,000000
INITIAL
C(AC)=000000 777777 
C(E)=000000 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031365 031365 0   0   400000000000 0            0            
IT1	031365 0      0   0   400000000000 0            0            
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 109
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0299

AT3	031365 0      0   0   0            0            400000000000 
AT6	031365 0      0   0   0            0            400000000000 
FT1A	031365 0      0   0   0            0            0            
FT9	031366 0      0   0   0            0            0            
ET0	031366 0      0   0   0            0            0            
ST1	031366 0      0   0   0            0            0            
ST2	031366 0      0   0   0            0            0            
ST9	031366 0      0   0   0            0            0            


*031366 HLLZ 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031366 031366 0   0   510000000000 0            0            
IT1	031366 0      0   0   510000000000 0            0            
AT3	031366 0      0   0   0            0            510000000000 
AT6	031366 0      0   0   0            0            510000000000 
FT0	031366 0      0   0   0            0            510000000000 
FT1A	031366 0      0   0   0            0            0            
FT9	031367 0      0   0   0            0            0            
ET0	031367 0      0   0   0            0            0            
ST1	031367 0      0   0   0            0            0            
ST2	031367 0      0   0   0            0            0            
ST9	031367 0      0   0   0            0            0            


*031367 SKIPE	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031367 031367 0   0   332000000000 0            0            
IT1	031367 0      0   0   332000000000 0            0            
AT3	031367 0      0   0   0            0            332000000000 
AT6	031367 0      0   0   0            0            332000000000 
FT0	031367 0      0   0   0            0            332000000000 
FT1A	031367 0      0   0   0            0            0            
FT9	031370 0      0   0   0            0            0            
ET0	031371 0      0   0   0            0            0            
ST1A	031371 0      0   0   0            0            0            
ST9	031371 0      0   0   0            0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 110
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0300

*031371 JUMPA	0,031372
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031371 031371 0   0   324000031372 0            000000031372 
IT1	031371 0      0   0   324000031372 0            000000031372 
AT3	031371 0      0   0   000000031372 0            324000031372 
AT6	031371 031372 0   0   000000031372 0            324000031372 
FT1A	031371 031372 0   0   000000031372 0            000000031372 
FT2	031371 031372 0   0   0            0            000000031372 
FT2RQ	031371 031372 0   0   0            0            000000031372 
FT3	031371 031372 0   0   0            0            000000031372 
FT9	031372 031372 0   0   0            0            000000031372 
ET0	031372 031372 0   0   0            0            000000031372 
ST1A	031372 031372 0   0   0            0            000000031372 
ST9	031372 031372 0   0   0            0            000000031372 


*031372 SETO 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031372 031372 0   0   474000000000 0            0            
IT1	031372 0      0   0   474000000000 0            0            
AT3	031372 0      0   0   0            0            474000000000 
AT6	031372 0      0   0   0            0            474000000000 
FT1A	031372 0      0   0   0            0            0            
FT9	031373 0      0   0   0            0            0            
ET0	031373 0      0   0   777777777777 0            0            
ST1	031373 0      0   0   777777777777 0            0            
ST2	031373 0      0   0   777777777777 0            0            
ST9	031373 0      0   0   777777777777 0            0            


*031373 HLLZ 	0,034012
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031373 031373 0   0   510000034012 0            777777777777 
IT1	031373 0      0   0   510000034012 0            777777777777 
AT3	031373 0      0   0   000000034012 0            510000034012 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 111
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0301

AT6	031373 034012 0   0   000000034012 0            510000034012 
FT0	031373 034012 0   0   777777777777 0            510000034012 
FT1A	031373 034012 0   0   777777777777 0            777777777777 
FT9	031374 034012 0   0   777777777777 0            777777777777 
ET0	031374 034012 0   0   777777000000 0            777777777777 
ST1	031374 034012 0   0   777777000000 0            777777777777 
ST2	031374 034012 0   0   777777000000 0            777777777777 
ST9	031374 034012 0   0   777777000000 0            777777777777 


*031374 CAME	0,034013
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031374 031374 0   0   312000034013 0            777777000000 
IT1	031374 0      0   0   312000034013 0            777777000000 
AT3	031374 0      0   0   000000034013 0            312000034013 
AT6	031374 034013 0   0   000000034013 0            312000034013 
FT0	031374 034013 0   0   777777000000 0            312000034013 
FT1A	031374 034013 0   0   777777000000 0            777777000000 
FT2	031374 034013 0   0   0            0            777777000000 
FT2RQ	031374 034013 0   0   777777000000 0            777777000000 
FT3	031374 034013 0   0   777777000000 0            777777000000 
FT9	031375 034013 0   0   777777000000 0            777777000000 
ET0	031376 034013 0   0   0            0            777777000000 
ST1A	031376 034013 0   0   0            0            777777000000 
ST9	031376 034013 0   0   0            0            777777000000 


*031376 JUMPA	0,031377
INITIAL
C(AC)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031376 031376 0   0   324000031377 0            000000031377 
IT1	031376 0      0   0   324000031377 0            000000031377 
AT3	031376 0      0   0   000000031377 0            324000031377 
AT6	031376 031377 0   0   000000031377 0            324000031377 
FT1A	031376 031377 0   0   000000031377 0            000000031377 
FT2	031376 031377 0   0   0            0            000000031377 
FT2RQ	031376 031377 0   0   777777000000 0            000000031377 
FT3	031376 031377 0   0   777777000000 0            000000031377 
FT9	031377 031377 0   0   777777000000 0            000000031377 
ET0	031377 031377 0   0   777777000000 0            000000031377 
ST1A	031377 031377 0   0   777777000000 0            000000031377 
ST9	031377 031377 0   0   777777000000 0            000000031377 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 112
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0302



*031377 SETZ 	0,000000
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031377 031377 0   0   400000000000 0            0            
IT1	031377 0      0   0   400000000000 0            0            
AT3	031377 0      0   0   0            0            400000000000 
AT6	031377 0      0   0   0            0            400000000000 
FT1A	031377 0      0   0   0            0            0            
FT9	0      0      0   0   0            0            0            
ET0	0      0      0   0   0            0            0            
ST1	0      0      0   0   0            0            0            
ST2	0      0      0   0   0            0            0            
ST9	0      0      0   0   0            0            0            


*031400 HLLZ 	0,034012
INITIAL
C(AC)=000000 000000 
C(E)=777777 777777 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	0      0      0   0   510000034012 0            777777777777 
IT1	0      0      0   0   510000034012 0            777777777777 
AT3	0      0      0   0   000000034012 0            510000034012 
AT6	0      034012 0   0   000000034012 0            510000034012 
FT0	0      034012 0   0   777777777777 0            510000034012 
FT1A	0      034012 0   0   777777777777 0            777777777777 
FT9	031401 034012 0   0   777777777777 0            777777777777 
ET0	031401 034012 0   0   777777000000 0            777777777777 
ST1	031401 034012 0   0   777777000000 0            777777777777 
ST2	031401 034012 0   0   777777000000 0            777777777777 
ST9	031401 034012 0   0   777777000000 0            777777777777 


*031401 CAME	0,034013
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031401 031401 0   0   312000034013 0            777777000000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 113
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0303

IT1	031401 0      0   0   312000034013 0            777777000000 
AT3	031401 0      0   0   000000034013 0            312000034013 
AT6	031401 034013 0   0   000000034013 0            312000034013 
FT0	031401 034013 0   0   777777000000 0            312000034013 
FT1A	031401 034013 0   0   777777000000 0            777777000000 
FT2	031401 034013 0   0   0            0            777777000000 
FT2RQ	031401 034013 0   0   777777000000 0            777777000000 
FT3	031401 034013 0   0   777777000000 0            777777000000 
FT9	031402 034013 0   0   777777000000 0            777777000000 
ET0	031403 034013 0   0   0            0            777777000000 
ST1A	031403 034013 0   0   0            0            777777000000 
ST9	031403 034013 0   0   0            0            777777000000 


*031403 JUMPA	0,031404
INITIAL
C(AC)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031403 031403 0   0   324000031404 0            000000031404 
IT1	031403 0      0   0   324000031404 0            000000031404 
AT3	031403 0      0   0   000000031404 0            324000031404 
AT6	031403 031404 0   0   000000031404 0            324000031404 
FT1A	031403 031404 0   0   000000031404 0            000000031404 
FT2	031403 031404 0   0   0            0            000000031404 
FT2RQ	031403 031404 0   0   777777000000 0            000000031404 
FT3	031403 031404 0   0   777777000000 0            000000031404 
FT9	031404 031404 0   0   777777000000 0            000000031404 
ET0	031404 031404 0   0   777777000000 0            000000031404 
ST1A	031404 031404 0   0   777777000000 0            000000031404 
ST9	031404 031404 0   0   777777000000 0            000000031404 


*031404 SETO 	0,000000
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031404 031404 0   0   474000000000 0            0            
IT1	031404 0      0   0   474000000000 0            0            
AT3	031404 0      0   0   0            0            474000000000 
AT6	031404 0      0   0   0            0            474000000000 
FT1A	031404 0      0   0   0            0            0            
FT9	031405 0      0   0   0            0            0            
ET0	031405 0      0   0   777777777777 0            0            
ST1	031405 0      0   0   777777777777 0            0            
ST2	031405 0      0   0   777777777777 0            0            
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 114
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0304

ST9	031405 0      0   0   777777777777 0            0            


*031405 HLLZ 	0,034014
INITIAL
C(AC)=777777 777777 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031405 031405 0   0   510000034014 0            0            
IT1	031405 0      0   0   510000034014 0            0            
AT3	031405 0      0   0   000000034014 0            510000034014 
AT6	031405 034014 0   0   000000034014 0            510000034014 
FT0	031405 034014 0   0   0            0            510000034014 
FT1A	031405 034014 0   0   0            0            0            
FT9	031406 034014 0   0   0            0            0            
ET0	031406 034014 0   0   0            0            0            
ST1	031406 034014 0   0   0            0            0            
ST2	031406 034014 0   0   0            0            0            
ST9	031406 034014 0   0   0            0            0            


*031406 SKIPE	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031406 031406 0   0   332000000000 0            0            
IT1	031406 0      0   0   332000000000 0            0            
AT3	031406 0      0   0   0            0            332000000000 
AT6	031406 0      0   0   0            0            332000000000 
FT0	031406 0      0   0   0            0            332000000000 
FT1A	031406 0      0   0   0            0            0            
FT9	031407 0      0   0   0            0            0            
ET0	031410 0      0   0   0            0            0            
ST1A	031410 0      0   0   0            0            0            
ST9	031410 0      0   0   0            0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 115
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0305

*031410 JUMPA	0,031411
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031410 031410 0   0   324000031411 0            000000031411 
IT1	031410 0      0   0   324000031411 0            000000031411 
AT3	031410 0      0   0   000000031411 0            324000031411 
AT6	031410 031411 0   0   000000031411 0            324000031411 
FT1A	031410 031411 0   0   000000031411 0            000000031411 
FT2	031410 031411 0   0   0            0            000000031411 
FT2RQ	031410 031411 0   0   0            0            000000031411 
FT3	031410 031411 0   0   0            0            000000031411 
FT9	031411 031411 0   0   0            0            000000031411 
ET0	031411 031411 0   0   0            0            000000031411 
ST1A	031411 031411 0   0   0            0            000000031411 
ST9	031411 031411 0   0   0            0            000000031411 


*031411 SETZ 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031411 031411 0   0   400000000000 0            0            
IT1	031411 0      0   0   400000000000 0            0            
AT3	031411 0      0   0   0            0            400000000000 
AT6	031411 0      0   0   0            0            400000000000 
FT1A	031411 0      0   0   0            0            0            
FT9	031412 0      0   0   0            0            0            
ET0	031412 0      0   0   0            0            0            
ST1	031412 0      0   0   0            0            0            
ST2	031412 0      0   0   0            0            0            
ST9	031412 0      0   0   0            0            0            


*031412 HLLZ 	0,034014
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031412 031412 0   0   510000034014 0            0            
IT1	031412 0      0   0   510000034014 0            0            
AT3	031412 0      0   0   000000034014 0            510000034014 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 116
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0306

AT6	031412 034014 0   0   000000034014 0            510000034014 
FT0	031412 034014 0   0   0            0            510000034014 
FT1A	031412 034014 0   0   0            0            0            
FT9	031413 034014 0   0   0            0            0            
ET0	031413 034014 0   0   0            0            0            
ST1	031413 034014 0   0   0            0            0            
ST2	031413 034014 0   0   0            0            0            
ST9	031413 034014 0   0   0            0            0            


*031413 SKIPE	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031413 031413 0   0   332000000000 0            0            
IT1	031413 0      0   0   332000000000 0            0            
AT3	031413 0      0   0   0            0            332000000000 
AT6	031413 0      0   0   0            0            332000000000 
FT0	031413 0      0   0   0            0            332000000000 
FT1A	031413 0      0   0   0            0            0            
FT9	031414 0      0   0   0            0            0            
ET0	031415 0      0   0   0            0            0            
ST1A	031415 0      0   0   0            0            0            
ST9	031415 0      0   0   0            0            0            


*031415 JUMPA	0,031416
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031415 031415 0   0   324000031416 0            000000031416 
IT1	031415 0      0   0   324000031416 0            000000031416 
AT3	031415 0      0   0   000000031416 0            324000031416 
AT6	031415 031416 0   0   000000031416 0            324000031416 
FT1A	031415 031416 0   0   000000031416 0            000000031416 
FT2	031415 031416 0   0   0            0            000000031416 
FT2RQ	031415 031416 0   0   0            0            000000031416 
FT3	031415 031416 0   0   0            0            000000031416 
FT9	031416 031416 0   0   0            0            000000031416 
ET0	031416 031416 0   0   0            0            000000031416 
ST1A	031416 031416 0   0   0            0            000000031416 
ST9	031416 031416 0   0   0            0            000000031416 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 117
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0307

*031416 SETO 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031416 031416 0   0   474000000000 0            0            
IT1	031416 0      0   0   474000000000 0            0            
AT3	031416 0      0   0   0            0            474000000000 
AT6	031416 0      0   0   0            0            474000000000 
FT1A	031416 0      0   0   0            0            0            
FT9	031417 0      0   0   0            0            0            
ET0	031417 0      0   0   777777777777 0            0            
ST1	031417 0      0   0   777777777777 0            0            
ST2	031417 0      0   0   777777777777 0            0            
ST9	031417 0      0   0   777777777777 0            0            


*031417 HLLZI	0,777777
INITIAL
C(AC)=777777 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031417 031417 0   0   511000777777 0            000000777777 
IT1	031417 0      0   0   511000777777 0            000000777777 
AT3	031417 0      0   0   000000777777 0            511000777777 
AT6	031417 777777 0   0   000000777777 0            511000777777 
FT1A	031417 777777 0   0   000000777777 0            000000777777 
FT9	031420 777777 0   0   000000777777 0            000000777777 
ET0	031420 777777 0   0   0            0            000000777777 
ST1	031420 777777 0   0   0            0            000000777777 
ST2	031420 777777 0   0   0            0            000000777777 
ST9	031420 777777 0   0   0            0            000000777777 


*031420 SKIPE	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031420 031420 0   0   332000000000 0            0            
IT1	031420 0      0   0   332000000000 0            0            
AT3	031420 0      0   0   0            0            332000000000 
AT6	031420 0      0   0   0            0            332000000000 
FT0	031420 0      0   0   0            0            332000000000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 118
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0308

FT1A	031420 0      0   0   0            0            0            
FT9	031421 0      0   0   0            0            0            
ET0	031422 0      0   0   0            0            0            
ST1A	031422 0      0   0   0            0            0            
ST9	031422 0      0   0   0            0            0            


*031422 JUMPA	0,031423
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031422 031422 0   0   324000031423 0            000000031423 
IT1	031422 0      0   0   324000031423 0            000000031423 
AT3	031422 0      0   0   000000031423 0            324000031423 
AT6	031422 031423 0   0   000000031423 0            324000031423 
FT1A	031422 031423 0   0   000000031423 0            000000031423 
FT2	031422 031423 0   0   0            0            000000031423 
FT2RQ	031422 031423 0   0   0            0            000000031423 
FT3	031422 031423 0   0   0            0            000000031423 
FT9	031423 031423 0   0   0            0            000000031423 
ET0	031423 031423 0   0   0            0            000000031423 
ST1A	031423 031423 0   0   0            0            000000031423 
ST9	031423 031423 0   0   0            0            000000031423 


*031423 SETZ 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031423 031423 0   0   400000000000 0            0            
IT1	031423 0      0   0   400000000000 0            0            
AT3	031423 0      0   0   0            0            400000000000 
AT6	031423 0      0   0   0            0            400000000000 
FT1A	031423 0      0   0   0            0            0            
FT9	031424 0      0   0   0            0            0            
ET0	031424 0      0   0   0            0            0            
ST1	031424 0      0   0   0            0            0            
ST2	031424 0      0   0   0            0            0            
ST9	031424 0      0   0   0            0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 119
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0309

*031424 HLLZI	0,777777
INITIAL
C(AC)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031424 031424 0   0   511000777777 0            000000777777 
IT1	031424 0      0   0   511000777777 0            000000777777 
AT3	031424 0      0   0   000000777777 0            511000777777 
AT6	031424 777777 0   0   000000777777 0            511000777777 
FT1A	031424 777777 0   0   000000777777 0            000000777777 
FT9	031425 777777 0   0   000000777777 0            000000777777 
ET0	031425 777777 0   0   0            0            000000777777 
ST1	031425 777777 0   0   0            0            000000777777 
ST2	031425 777777 0   0   0            0            000000777777 
ST9	031425 777777 0   0   0            0            000000777777 


*031425 SKIPE	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031425 031425 0   0   332000000000 0            0            
IT1	031425 0      0   0   332000000000 0            0            
AT3	031425 0      0   0   0            0            332000000000 
AT6	031425 0      0   0   0            0            332000000000 
FT0	031425 0      0   0   0            0            332000000000 
FT1A	031425 0      0   0   0            0            0            
FT9	031426 0      0   0   0            0            0            
ET0	031427 0      0   0   0            0            0            
ST1A	031427 0      0   0   0            0            0            
ST9	031427 0      0   0   0            0            0            


*031427 JUMPA	0,031430
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031427 031427 0   0   324000031430 0            000000031430 
IT1	031427 0      0   0   324000031430 0            000000031430 
AT3	031427 0      0   0   000000031430 0            324000031430 
AT6	031427 031430 0   0   000000031430 0            324000031430 
FT1A	031427 031430 0   0   000000031430 0            000000031430 
FT2	031427 031430 0   0   0            0            000000031430 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 120
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0310

FT2RQ	031427 031430 0   0   0            0            000000031430 
FT3	031427 031430 0   0   0            0            000000031430 
FT9	031430 031430 0   0   0            0            000000031430 
ET0	031430 031430 0   0   0            0            000000031430 
ST1A	031430 031430 0   0   0            0            000000031430 
ST9	031430 031430 0   0   0            0            000000031430 


*031430 SETO 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031430 031430 0   0   474000000000 0            0            
IT1	031430 0      0   0   474000000000 0            0            
AT3	031430 0      0   0   0            0            474000000000 
AT6	031430 0      0   0   0            0            474000000000 
FT1A	031430 0      0   0   0            0            0            
FT9	031431 0      0   0   0            0            0            
ET0	031431 0      0   0   777777777777 0            0            
ST1	031431 0      0   0   777777777777 0            0            
ST2	031431 0      0   0   777777777777 0            0            
ST9	031431 0      0   0   777777777777 0            0            


*031431 HLLZ 	0,034013
INITIAL
C(AC)=777777 777777 
C(E)=777777 000000 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031431 031431 0   0   510000034013 0            777777000000 
IT1	031431 0      0   0   510000034013 0            777777000000 
AT3	031431 0      0   0   000000034013 0            510000034013 
AT6	031431 034013 0   0   000000034013 0            510000034013 
FT0	031431 034013 0   0   777777000000 0            510000034013 
FT1A	031431 034013 0   0   777777000000 0            777777000000 
FT9	031432 034013 0   0   777777000000 0            777777000000 
ET0	031432 034013 0   0   777777000000 0            777777000000 
ST1	031432 034013 0   0   777777000000 0            777777000000 
ST2	031432 034013 0   0   777777000000 0            777777000000 
ST9	031432 034013 0   0   777777000000 0            777777000000 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 121
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0311

*031432 CAME	0,034013
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031432 031432 0   0   312000034013 0            777777000000 
IT1	031432 0      0   0   312000034013 0            777777000000 
AT3	031432 0      0   0   000000034013 0            312000034013 
AT6	031432 034013 0   0   000000034013 0            312000034013 
FT0	031432 034013 0   0   777777000000 0            312000034013 
FT1A	031432 034013 0   0   777777000000 0            777777000000 
FT2	031432 034013 0   0   0            0            777777000000 
FT2RQ	031432 034013 0   0   777777000000 0            777777000000 
FT3	031432 034013 0   0   777777000000 0            777777000000 
FT9	031433 034013 0   0   777777000000 0            777777000000 
ET0	031434 034013 0   0   0            0            777777000000 
ST1A	031434 034013 0   0   0            0            777777000000 
ST9	031434 034013 0   0   0            0            777777000000 


*031434 JUMPA	0,031435
INITIAL
C(AC)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031434 031434 0   0   324000031435 0            000000031435 
IT1	031434 0      0   0   324000031435 0            000000031435 
AT3	031434 0      0   0   000000031435 0            324000031435 
AT6	031434 031435 0   0   000000031435 0            324000031435 
FT1A	031434 031435 0   0   000000031435 0            000000031435 
FT2	031434 031435 0   0   0            0            000000031435 
FT2RQ	031434 031435 0   0   777777000000 0            000000031435 
FT3	031434 031435 0   0   777777000000 0            000000031435 
FT9	031435 031435 0   0   777777000000 0            000000031435 
ET0	031435 031435 0   0   777777000000 0            000000031435 
ST1A	031435 031435 0   0   777777000000 0            000000031435 
ST9	031435 031435 0   0   777777000000 0            000000031435 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 122
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0312

*031435 SETZ 	0,000000
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031435 031435 0   0   400000000000 0            0            
IT1	031435 0      0   0   400000000000 0            0            
AT3	031435 0      0   0   0            0            400000000000 
AT6	031435 0      0   0   0            0            400000000000 
FT1A	031435 0      0   0   0            0            0            
FT9	031436 0      0   0   0            0            0            
ET0	031436 0      0   0   0            0            0            
ST1	031436 0      0   0   0            0            0            
ST2	031436 0      0   0   0            0            0            
ST9	031436 0      0   0   0            0            0            


*031436 HLLZ 	0,034013
INITIAL
C(AC)=000000 000000 
C(E)=777777 000000 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031436 031436 0   0   510000034013 0            777777000000 
IT1	031436 0      0   0   510000034013 0            777777000000 
AT3	031436 0      0   0   000000034013 0            510000034013 
AT6	031436 034013 0   0   000000034013 0            510000034013 
FT0	031436 034013 0   0   777777000000 0            510000034013 
FT1A	031436 034013 0   0   777777000000 0            777777000000 
FT9	031437 034013 0   0   777777000000 0            777777000000 
ET0	031437 034013 0   0   777777000000 0            777777000000 
ST1	031437 034013 0   0   777777000000 0            777777000000 
ST2	031437 034013 0   0   777777000000 0            777777000000 
ST9	031437 034013 0   0   777777000000 0            777777000000 


*031437 CAME	0,034013
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031437 031437 0   0   312000034013 0            777777000000 
IT1	031437 0      0   0   312000034013 0            777777000000 
AT3	031437 0      0   0   000000034013 0            312000034013 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 123
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0313

AT6	031437 034013 0   0   000000034013 0            312000034013 
FT0	031437 034013 0   0   777777000000 0            312000034013 
FT1A	031437 034013 0   0   777777000000 0            777777000000 
FT2	031437 034013 0   0   0            0            777777000000 
FT2RQ	031437 034013 0   0   777777000000 0            777777000000 
FT3	031437 034013 0   0   777777000000 0            777777000000 
FT9	031440 034013 0   0   777777000000 0            777777000000 
ET0	031441 034013 0   0   0            0            777777000000 
ST1A	031441 034013 0   0   0            0            777777000000 
ST9	031441 034013 0   0   0            0            777777000000 


*031441 JUMPA	0,031442
INITIAL
C(AC)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031441 031441 0   0   324000031442 0            000000031442 
IT1	031441 0      0   0   324000031442 0            000000031442 
AT3	031441 0      0   0   000000031442 0            324000031442 
AT6	031441 031442 0   0   000000031442 0            324000031442 
FT1A	031441 031442 0   0   000000031442 0            000000031442 
FT2	031441 031442 0   0   0            0            000000031442 
FT2RQ	031441 031442 0   0   777777000000 0            000000031442 
FT3	031441 031442 0   0   777777000000 0            000000031442 
FT9	031442 031442 0   0   777777000000 0            000000031442 
ET0	031442 031442 0   0   777777000000 0            000000031442 
ST1A	031442 031442 0   0   777777000000 0            000000031442 
ST9	031442 031442 0   0   777777000000 0            000000031442 


*031442 MOVEI	0,777777
INITIAL
C(AC)=777777 000000 
FINAL
C(AC)=000000 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031442 031442 0   0   201000777777 0            000000777777 
IT1	031442 0      0   0   201000777777 0            000000777777 
AT3	031442 0      0   0   000000777777 0            201000777777 
AT6	031442 777777 0   0   000000777777 0            201000777777 
FT1A	031442 777777 0   0   000000777777 0            000000777777 
FT9	031443 777777 0   0   000000777777 0            000000777777 
ET0	031443 777777 0   0   000000777777 0            000000777777 
ST1	031443 777777 0   0   000000777777 0            000000777777 
ST2	031443 777777 0   0   000000777777 0            000000777777 
ST9	031443 777777 0   0   000000777777 0            000000777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 124
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0314

*031443 HLLZ 	0,034012
INITIAL
C(AC)=000000 777777 
C(E)=777777 777777 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031443 031443 0   0   510000034012 0            777777777777 
IT1	031443 0      0   0   510000034012 0            777777777777 
AT3	031443 0      0   0   000000034012 0            510000034012 
AT6	031443 034012 0   0   000000034012 0            510000034012 
FT0	031443 034012 0   0   777777777777 0            510000034012 
FT1A	031443 034012 0   0   777777777777 0            777777777777 
FT9	031444 034012 0   0   777777777777 0            777777777777 
ET0	031444 034012 0   0   777777000000 0            777777777777 
ST1	031444 034012 0   0   777777000000 0            777777777777 
ST2	031444 034012 0   0   777777000000 0            777777777777 
ST9	031444 034012 0   0   777777000000 0            777777777777 


*031444 CAME	0,034013
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031444 031444 0   0   312000034013 0            777777000000 
IT1	031444 0      0   0   312000034013 0            777777000000 
AT3	031444 0      0   0   000000034013 0            312000034013 
AT6	031444 034013 0   0   000000034013 0            312000034013 
FT0	031444 034013 0   0   777777000000 0            312000034013 
FT1A	031444 034013 0   0   777777000000 0            777777000000 
FT2	031444 034013 0   0   0            0            777777000000 
FT2RQ	031444 034013 0   0   777777000000 0            777777000000 
FT3	031444 034013 0   0   777777000000 0            777777000000 
FT9	031445 034013 0   0   777777000000 0            777777000000 
ET0	031446 034013 0   0   0            0            777777000000 
ST1A	031446 034013 0   0   0            0            777777000000 
ST9	031446 034013 0   0   0            0            777777000000 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 125
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0315

*031446 JUMPA	0,031447
INITIAL
C(AC)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031446 031446 0   0   324000031447 0            000000031447 
IT1	031446 0      0   0   324000031447 0            000000031447 
AT3	031446 0      0   0   000000031447 0            324000031447 
AT6	031446 031447 0   0   000000031447 0            324000031447 
FT1A	031446 031447 0   0   000000031447 0            000000031447 
FT2	031446 031447 0   0   0            0            000000031447 
FT2RQ	031446 031447 0   0   777777000000 0            000000031447 
FT3	031446 031447 0   0   777777000000 0            000000031447 
FT9	031447 031447 0   0   777777000000 0            000000031447 
ET0	031447 031447 0   0   777777000000 0            000000031447 
ST1A	031447 031447 0   0   777777000000 0            000000031447 
ST9	031447 031447 0   0   777777000000 0            000000031447 


*031447 MOVSI	0,777777
INITIAL
C(AC)=777777 000000 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031447 031447 0   0   205000777777 0            000000777777 
IT1	031447 0      0   0   205000777777 0            000000777777 
AT3	031447 0      0   0   000000777777 0            205000777777 
AT6	031447 777777 0   0   000000777777 0            205000777777 
FT1A	031447 777777 0   0   000000777777 0            000000777777 
FT9	031450 777777 0   0   000000777777 0            000000777777 
ET0	031450 777777 0   0   777777000000 0            000000777777 
ST1	031450 777777 0   0   777777000000 0            000000777777 
ST2	031450 777777 0   0   777777000000 0            000000777777 
ST9	031450 777777 0   0   777777000000 0            000000777777 


*031450 HLLZ 	0,034012
INITIAL
C(AC)=777777 000000 
C(E)=777777 777777 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031450 031450 0   0   510000034012 0            777777777777 
IT1	031450 0      0   0   510000034012 0            777777777777 
AT3	031450 0      0   0   000000034012 0            510000034012 
AT6	031450 034012 0   0   000000034012 0            510000034012 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 126
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0316

FT0	031450 034012 0   0   777777777777 0            510000034012 
FT1A	031450 034012 0   0   777777777777 0            777777777777 
FT9	031451 034012 0   0   777777777777 0            777777777777 
ET0	031451 034012 0   0   777777000000 0            777777777777 
ST1	031451 034012 0   0   777777000000 0            777777777777 
ST2	031451 034012 0   0   777777000000 0            777777777777 
ST9	031451 034012 0   0   777777000000 0            777777777777 


*031451 CAME	0,034013
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031451 031451 0   0   312000034013 0            777777000000 
IT1	031451 0      0   0   312000034013 0            777777000000 
AT3	031451 0      0   0   000000034013 0            312000034013 
AT6	031451 034013 0   0   000000034013 0            312000034013 
FT0	031451 034013 0   0   777777000000 0            312000034013 
FT1A	031451 034013 0   0   777777000000 0            777777000000 
FT2	031451 034013 0   0   0            0            777777000000 
FT2RQ	031451 034013 0   0   777777000000 0            777777000000 
FT3	031451 034013 0   0   777777000000 0            777777000000 
FT9	031452 034013 0   0   777777000000 0            777777000000 
ET0	031453 034013 0   0   0            0            777777000000 
ST1A	031453 034013 0   0   0            0            777777000000 
ST9	031453 034013 0   0   0            0            777777000000 


*031453 JUMPA	0,031454
INITIAL
C(AC)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031453 031453 0   0   324000031454 0            000000031454 
IT1	031453 0      0   0   324000031454 0            000000031454 
AT3	031453 0      0   0   000000031454 0            324000031454 
AT6	031453 031454 0   0   000000031454 0            324000031454 
FT1A	031453 031454 0   0   000000031454 0            000000031454 
FT2	031453 031454 0   0   0            0            000000031454 
FT2RQ	031453 031454 0   0   777777000000 0            000000031454 
FT3	031453 031454 0   0   777777000000 0            000000031454 
FT9	031454 031454 0   0   777777000000 0            000000031454 
ET0	031454 031454 0   0   777777000000 0            000000031454 
ST1A	031454 031454 0   0   777777000000 0            000000031454 
ST9	031454 031454 0   0   777777000000 0            000000031454 

PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 127
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0317


*031454 MOVEI	0,777777
INITIAL
C(AC)=777777 000000 
FINAL
C(AC)=000000 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031454 031454 0   0   201000777777 0            000000777777 
IT1	031454 0      0   0   201000777777 0            000000777777 
AT3	031454 0      0   0   000000777777 0            201000777777 
AT6	031454 777777 0   0   000000777777 0            201000777777 
FT1A	031454 777777 0   0   000000777777 0            000000777777 
FT9	031455 777777 0   0   000000777777 0            000000777777 
ET0	031455 777777 0   0   000000777777 0            000000777777 
ST1	031455 777777 0   0   000000777777 0            000000777777 
ST2	031455 777777 0   0   000000777777 0            000000777777 
ST9	031455 777777 0   0   000000777777 0            000000777777 


*031455 HLLZ 	0,034014
INITIAL
C(AC)=000000 777777 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031455 031455 0   0   510000034014 0            0            
IT1	031455 0      0   0   510000034014 0            0            
AT3	031455 0      0   0   000000034014 0            510000034014 
AT6	031455 034014 0   0   000000034014 0            510000034014 
FT0	031455 034014 0   0   0            0            510000034014 
FT1A	031455 034014 0   0   0            0            0            
FT9	031456 034014 0   0   0            0            0            
ET0	031456 034014 0   0   0            0            0            
ST1	031456 034014 0   0   0            0            0            
ST2	031456 034014 0   0   0            0            0            
ST9	031456 034014 0   0   0            0            0            


*031456 SKIPE	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031456 031456 0   0   332000000000 0            0            
IT1	031456 0      0   0   332000000000 0            0            
AT3	031456 0      0   0   0            0            332000000000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 128
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0318

AT6	031456 0      0   0   0            0            332000000000 
FT0	031456 0      0   0   0            0            332000000000 
FT1A	031456 0      0   0   0            0            0            
FT9	031457 0      0   0   0            0            0            
ET0	031460 0      0   0   0            0            0            
ST1A	031460 0      0   0   0            0            0            
ST9	031460 0      0   0   0            0            0            


*031460 JUMPA	0,031461
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031460 031460 0   0   324000031461 0            000000031461 
IT1	031460 0      0   0   324000031461 0            000000031461 
AT3	031460 0      0   0   000000031461 0            324000031461 
AT6	031460 031461 0   0   000000031461 0            324000031461 
FT1A	031460 031461 0   0   000000031461 0            000000031461 
FT2	031460 031461 0   0   0            0            000000031461 
FT2RQ	031460 031461 0   0   0            0            000000031461 
FT3	031460 031461 0   0   0            0            000000031461 
FT9	031461 031461 0   0   0            0            000000031461 
ET0	031461 031461 0   0   0            0            000000031461 
ST1A	031461 031461 0   0   0            0            000000031461 
ST9	031461 031461 0   0   0            0            000000031461 


*031461 MOVSI	0,777777
INITIAL
C(AC)=000000 000000 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031461 031461 0   0   205000777777 0            000000777777 
IT1	031461 0      0   0   205000777777 0            000000777777 
AT3	031461 0      0   0   000000777777 0            205000777777 
AT6	031461 777777 0   0   000000777777 0            205000777777 
FT1A	031461 777777 0   0   000000777777 0            000000777777 
FT9	031462 777777 0   0   000000777777 0            000000777777 
ET0	031462 777777 0   0   777777000000 0            000000777777 
ST1	031462 777777 0   0   777777000000 0            000000777777 
ST2	031462 777777 0   0   777777000000 0            000000777777 
ST9	031462 777777 0   0   777777000000 0            000000777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 129
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0319

*031462 HLLZ 	0,034014
INITIAL
C(AC)=777777 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031462 031462 0   0   510000034014 0            0            
IT1	031462 0      0   0   510000034014 0            0            
AT3	031462 0      0   0   000000034014 0            510000034014 
AT6	031462 034014 0   0   000000034014 0            510000034014 
FT0	031462 034014 0   0   0            0            510000034014 
FT1A	031462 034014 0   0   0            0            0            
FT9	031463 034014 0   0   0            0            0            
ET0	031463 034014 0   0   0            0            0            
ST1	031463 034014 0   0   0            0            0            
ST2	031463 034014 0   0   0            0            0            
ST9	031463 034014 0   0   0            0            0            


*031463 SKIPE	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031463 031463 0   0   332000000000 0            0            
IT1	031463 0      0   0   332000000000 0            0            
AT3	031463 0      0   0   0            0            332000000000 
AT6	031463 0      0   0   0            0            332000000000 
FT0	031463 0      0   0   0            0            332000000000 
FT1A	031463 0      0   0   0            0            0            
FT9	031464 0      0   0   0            0            0            
ET0	031465 0      0   0   0            0            0            
ST1A	031465 0      0   0   0            0            0            
ST9	031465 0      0   0   0            0            0            


*031465 JUMPA	0,031466
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031465 031465 0   0   324000031466 0            000000031466 
IT1	031465 0      0   0   324000031466 0            000000031466 
AT3	031465 0      0   0   000000031466 0            324000031466 
AT6	031465 031466 0   0   000000031466 0            324000031466 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 130
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0320

FT1A	031465 031466 0   0   000000031466 0            000000031466 
FT2	031465 031466 0   0   0            0            000000031466 
FT2RQ	031465 031466 0   0   0            0            000000031466 
FT3	031465 031466 0   0   0            0            000000031466 
FT9	031466 031466 0   0   0            0            000000031466 
ET0	031466 031466 0   0   0            0            000000031466 
ST1A	031466 031466 0   0   0            0            000000031466 
ST9	031466 031466 0   0   0            0            000000031466 


*031466 MOVEI	0,777777
INITIAL
C(AC)=000000 000000 
FINAL
C(AC)=000000 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031466 031466 0   0   201000777777 0            000000777777 
IT1	031466 0      0   0   201000777777 0            000000777777 
AT3	031466 0      0   0   000000777777 0            201000777777 
AT6	031466 777777 0   0   000000777777 0            201000777777 
FT1A	031466 777777 0   0   000000777777 0            000000777777 
FT9	031467 777777 0   0   000000777777 0            000000777777 
ET0	031467 777777 0   0   000000777777 0            000000777777 
ST1	031467 777777 0   0   000000777777 0            000000777777 
ST2	031467 777777 0   0   000000777777 0            000000777777 
ST9	031467 777777 0   0   000000777777 0            000000777777 


*031467 HLLZ 	0,034013
INITIAL
C(AC)=000000 777777 
C(E)=777777 000000 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031467 031467 0   0   510000034013 0            777777000000 
IT1	031467 0      0   0   510000034013 0            777777000000 
AT3	031467 0      0   0   000000034013 0            510000034013 
AT6	031467 034013 0   0   000000034013 0            510000034013 
FT0	031467 034013 0   0   777777000000 0            510000034013 
FT1A	031467 034013 0   0   777777000000 0            777777000000 
FT9	031470 034013 0   0   777777000000 0            777777000000 
ET0	031470 034013 0   0   777777000000 0            777777000000 
ST1	031470 034013 0   0   777777000000 0            777777000000 
ST2	031470 034013 0   0   777777000000 0            777777000000 
ST9	031470 034013 0   0   777777000000 0            777777000000 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 131
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0321

*031470 CAME	0,034013
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031470 031470 0   0   312000034013 0            777777000000 
IT1	031470 0      0   0   312000034013 0            777777000000 
AT3	031470 0      0   0   000000034013 0            312000034013 
AT6	031470 034013 0   0   000000034013 0            312000034013 
FT0	031470 034013 0   0   777777000000 0            312000034013 
FT1A	031470 034013 0   0   777777000000 0            777777000000 
FT2	031470 034013 0   0   0            0            777777000000 
FT2RQ	031470 034013 0   0   777777000000 0            777777000000 
FT3	031470 034013 0   0   777777000000 0            777777000000 
FT9	031471 034013 0   0   777777000000 0            777777000000 
ET0	031472 034013 0   0   0            0            777777000000 
ST1A	031472 034013 0   0   0            0            777777000000 
ST9	031472 034013 0   0   0            0            777777000000 


*031472 JUMPA	0,031473
INITIAL
C(AC)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031472 031472 0   0   324000031473 0            000000031473 
IT1	031472 0      0   0   324000031473 0            000000031473 
AT3	031472 0      0   0   000000031473 0            324000031473 
AT6	031472 031473 0   0   000000031473 0            324000031473 
FT1A	031472 031473 0   0   000000031473 0            000000031473 
FT2	031472 031473 0   0   0            0            000000031473 
FT2RQ	031472 031473 0   0   777777000000 0            000000031473 
FT3	031472 031473 0   0   777777000000 0            000000031473 
FT9	031473 031473 0   0   777777000000 0            000000031473 
ET0	031473 031473 0   0   777777000000 0            000000031473 
ST1A	031473 031473 0   0   777777000000 0            000000031473 
ST9	031473 031473 0   0   777777000000 0            000000031473 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 132
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0322

*031473 MOVEI	0,777777
INITIAL
C(AC)=777777 000000 
FINAL
C(AC)=000000 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031473 031473 0   0   201000777777 0            000000777777 
IT1	031473 0      0   0   201000777777 0            000000777777 
AT3	031473 0      0   0   000000777777 0            201000777777 
AT6	031473 777777 0   0   000000777777 0            201000777777 
FT1A	031473 777777 0   0   000000777777 0            000000777777 
FT9	031474 777777 0   0   000000777777 0            000000777777 
ET0	031474 777777 0   0   000000777777 0            000000777777 
ST1	031474 777777 0   0   000000777777 0            000000777777 
ST2	031474 777777 0   0   000000777777 0            000000777777 
ST9	031474 777777 0   0   000000777777 0            000000777777 


*031474 HLLZI	0,777777
INITIAL
C(AC)=000000 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031474 031474 0   0   511000777777 0            000000777777 
IT1	031474 0      0   0   511000777777 0            000000777777 
AT3	031474 0      0   0   000000777777 0            511000777777 
AT6	031474 777777 0   0   000000777777 0            511000777777 
FT1A	031474 777777 0   0   000000777777 0            000000777777 
FT9	031475 777777 0   0   000000777777 0            000000777777 
ET0	031475 777777 0   0   0            0            000000777777 
ST1	031475 777777 0   0   0            0            000000777777 
ST2	031475 777777 0   0   0            0            000000777777 
ST9	031475 777777 0   0   0            0            000000777777 


*031475 SKIPE	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031475 031475 0   0   332000000000 0            0            
IT1	031475 0      0   0   332000000000 0            0            
AT3	031475 0      0   0   0            0            332000000000 
AT6	031475 0      0   0   0            0            332000000000 
FT0	031475 0      0   0   0            0            332000000000 
FT1A	031475 0      0   0   0            0            0            
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 133
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0323

FT9	031476 0      0   0   0            0            0            
ET0	031477 0      0   0   0            0            0            
ST1A	031477 0      0   0   0            0            0            
ST9	031477 0      0   0   0            0            0            


*031477 JUMPA	0,031500
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031477 031477 0   0   324000031500 0            000000031500 
IT1	031477 0      0   0   324000031500 0            000000031500 
AT3	031477 0      0   0   000000031500 0            324000031500 
AT6	031477 0      0   0   000000031500 0            324000031500 
FT1A	031477 0      0   0   000000031500 0            000000031500 
FT2	031477 0      0   0   0            0            000000031500 
FT2RQ	031477 0      0   0   0            0            000000031500 
FT3	031477 0      0   0   0            0            000000031500 
FT9	0      0      0   0   0            0            000000031500 
ET0	0      0      0   0   0            0            000000031500 
ST1A	0      0      0   0   0            0            000000031500 
ST9	0      0      0   0   0            0            000000031500 


*031500 MOVSI	0,777777
INITIAL
C(AC)=000000 000000 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	0      0      0   0   205000777777 0            000000777777 
IT1	0      0      0   0   205000777777 0            000000777777 
AT3	0      0      0   0   000000777777 0            205000777777 
AT6	0      777777 0   0   000000777777 0            205000777777 
FT1A	0      777777 0   0   000000777777 0            000000777777 
FT9	031501 777777 0   0   000000777777 0            000000777777 
ET0	031501 777777 0   0   777777000000 0            000000777777 
ST1	031501 777777 0   0   777777000000 0            000000777777 
ST2	031501 777777 0   0   777777000000 0            000000777777 
ST9	031501 777777 0   0   777777000000 0            000000777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 134
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0324

*031501 HLLZ 	0,034013
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031501 031501 0   0   510000034013 0            777777000000 
IT1	031501 0      0   0   510000034013 0            777777000000 
AT3	031501 0      0   0   000000034013 0            510000034013 
AT6	031501 034013 0   0   000000034013 0            510000034013 
FT0	031501 034013 0   0   777777000000 0            510000034013 
FT1A	031501 034013 0   0   777777000000 0            777777000000 
FT9	031502 034013 0   0   777777000000 0            777777000000 
ET0	031502 034013 0   0   777777000000 0            777777000000 
ST1	031502 034013 0   0   777777000000 0            777777000000 
ST2	031502 034013 0   0   777777000000 0            777777000000 
ST9	031502 034013 0   0   777777000000 0            777777000000 


*031502 CAME	0,034013
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031502 031502 0   0   312000034013 0            777777000000 
IT1	031502 0      0   0   312000034013 0            777777000000 
AT3	031502 0      0   0   000000034013 0            312000034013 
AT6	031502 034013 0   0   000000034013 0            312000034013 
FT0	031502 034013 0   0   777777000000 0            312000034013 
FT1A	031502 034013 0   0   777777000000 0            777777000000 
FT2	031502 034013 0   0   0            0            777777000000 
FT2RQ	031502 034013 0   0   777777000000 0            777777000000 
FT3	031502 034013 0   0   777777000000 0            777777000000 
FT9	031503 034013 0   0   777777000000 0            777777000000 
ET0	031504 034013 0   0   0            0            777777000000 
ST1A	031504 034013 0   0   0            0            777777000000 
ST9	031504 034013 0   0   0            0            777777000000 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 135
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0325

*031504 JUMPA	0,031505
INITIAL
C(AC)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031504 031504 0   0   324000031505 0            000000031505 
IT1	031504 0      0   0   324000031505 0            000000031505 
AT3	031504 0      0   0   000000031505 0            324000031505 
AT6	031504 031505 0   0   000000031505 0            324000031505 
FT1A	031504 031505 0   0   000000031505 0            000000031505 
FT2	031504 031505 0   0   0            0            000000031505 
FT2RQ	031504 031505 0   0   777777000000 0            000000031505 
FT3	031504 031505 0   0   777777000000 0            000000031505 
FT9	031505 031505 0   0   777777000000 0            000000031505 
ET0	031505 031505 0   0   777777000000 0            000000031505 
ST1A	031505 031505 0   0   777777000000 0            000000031505 
ST9	031505 031505 0   0   777777000000 0            000000031505 


*031505 MOVSI	0,777777
INITIAL
C(AC)=777777 000000 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031505 031505 0   0   205000777777 0            000000777777 
IT1	031505 0      0   0   205000777777 0            000000777777 
AT3	031505 0      0   0   000000777777 0            205000777777 
AT6	031505 777777 0   0   000000777777 0            205000777777 
FT1A	031505 777777 0   0   000000777777 0            000000777777 
FT9	031506 777777 0   0   000000777777 0            000000777777 
ET0	031506 777777 0   0   777777000000 0            000000777777 
ST1	031506 777777 0   0   777777000000 0            000000777777 
ST2	031506 777777 0   0   777777000000 0            000000777777 
ST9	031506 777777 0   0   777777000000 0            000000777777 


*031506 HLLZI	0,777777
INITIAL
C(AC)=777777 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031506 031506 0   0   511000777777 0            000000777777 
IT1	031506 0      0   0   511000777777 0            000000777777 
AT3	031506 0      0   0   000000777777 0            511000777777 
AT6	031506 777777 0   0   000000777777 0            511000777777 
FT1A	031506 777777 0   0   000000777777 0            000000777777 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 136
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0326

FT9	031507 777777 0   0   000000777777 0            000000777777 
ET0	031507 777777 0   0   0            0            000000777777 
ST1	031507 777777 0   0   0            0            000000777777 
ST2	031507 777777 0   0   0            0            000000777777 
ST9	031507 777777 0   0   0            0            000000777777 


*031507 SKIPE	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031507 031507 0   0   332000000000 0            0            
IT1	031507 0      0   0   332000000000 0            0            
AT3	031507 0      0   0   0            0            332000000000 
AT6	031507 0      0   0   0            0            332000000000 
FT0	031507 0      0   0   0            0            332000000000 
FT1A	031507 0      0   0   0            0            0            
FT9	031510 0      0   0   0            0            0            
ET0	031511 0      0   0   0            0            0            
ST1A	031511 0      0   0   0            0            0            
ST9	031511 0      0   0   0            0            0            


*031511 JUMPA	0,031512
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031511 031511 0   0   324000031512 0            000000031512 
IT1	031511 0      0   0   324000031512 0            000000031512 
AT3	031511 0      0   0   000000031512 0            324000031512 
AT6	031511 031512 0   0   000000031512 0            324000031512 
FT1A	031511 031512 0   0   000000031512 0            000000031512 
FT2	031511 031512 0   0   0            0            000000031512 
FT2RQ	031511 031512 0   0   0            0            000000031512 
FT3	031511 031512 0   0   0            0            000000031512 
FT9	031512 031512 0   0   0            0            000000031512 
ET0	031512 031512 0   0   0            0            000000031512 
ST1A	031512 031512 0   0   0            0            000000031512 
ST9	031512 031512 0   0   0            0            000000031512 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 137
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0327

*031512 SETZ 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031512 031512 0   0   400000000000 0            0            
IT1	031512 0      0   0   400000000000 0            0            
AT3	031512 0      0   0   0            0            400000000000 
AT6	031512 0      0   0   0            0            400000000000 
FT1A	031512 0      0   0   0            0            0            
FT9	031513 0      0   0   0            0            0            
ET0	031513 0      0   0   0            0            0            
ST1	031513 0      0   0   0            0            0            
ST2	031513 0      0   0   0            0            0            
ST9	031513 0      0   0   0            0            0            


*031513 HRR 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031513 031513 0   0   540000000000 0            0            
IT1	031513 0      0   0   540000000000 0            0            
AT3	031513 0      0   0   0            0            540000000000 
AT6	031513 0      0   0   0            0            540000000000 
FT0	031513 0      0   0   0            0            540000000000 
FT1A	031513 0      0   0   0            0            0            
FT2	031513 0      0   0   0            0            0            
FT2RQ	031513 0      0   0   0            0            0            
FT3	031513 0      0   0   0            0            0            
FT9	031514 0      0   0   0            0            0            
ET0	031514 0      0   0   0            0            0            
ST1	031514 0      0   0   0            0            0            
ST2	031514 0      0   0   0            0            0            
ST9	031514 0      0   0   0            0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 138
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0328

*031514 SKIPE	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031514 031514 0   0   332000000000 0            0            
IT1	031514 0      0   0   332000000000 0            0            
AT3	031514 0      0   0   0            0            332000000000 
AT6	031514 0      0   0   0            0            332000000000 
FT0	031514 0      0   0   0            0            332000000000 
FT1A	031514 0      0   0   0            0            0            
FT9	031515 0      0   0   0            0            0            
ET0	031516 0      0   0   0            0            0            
ST1A	031516 0      0   0   0            0            0            
ST9	031516 0      0   0   0            0            0            


*031516 JUMPA	0,031517
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031516 031516 0   0   324000031517 0            000000031517 
IT1	031516 0      0   0   324000031517 0            000000031517 
AT3	031516 0      0   0   000000031517 0            324000031517 
AT6	031516 031517 0   0   000000031517 0            324000031517 
FT1A	031516 031517 0   0   000000031517 0            000000031517 
FT2	031516 031517 0   0   0            0            000000031517 
FT2RQ	031516 031517 0   0   0            0            000000031517 
FT3	031516 031517 0   0   0            0            000000031517 
FT9	031517 031517 0   0   0            0            000000031517 
ET0	031517 031517 0   0   0            0            000000031517 
ST1A	031517 031517 0   0   0            0            000000031517 
ST9	031517 031517 0   0   0            0            000000031517 


*031517 SETO 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031517 031517 0   0   474000000000 0            0            
IT1	031517 0      0   0   474000000000 0            0            
AT3	031517 0      0   0   0            0            474000000000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 139
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0329

AT6	031517 0      0   0   0            0            474000000000 
FT1A	031517 0      0   0   0            0            0            
FT9	031520 0      0   0   0            0            0            
ET0	031520 0      0   0   777777777777 0            0            
ST1	031520 0      0   0   777777777777 0            0            
ST2	031520 0      0   0   777777777777 0            0            
ST9	031520 0      0   0   777777777777 0            0            


*031520 HRR 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031520 031520 0   0   540000000000 0            777777777777 
IT1	031520 0      0   0   540000000000 0            777777777777 
AT3	031520 0      0   0   0            0            540000000000 
AT6	031520 0      0   0   0            0            540000000000 
FT0	031520 0      0   0   777777777777 0            540000000000 
FT1A	031520 0      0   0   777777777777 0            777777777777 
FT2	031520 0      0   0   0            0            777777777777 
FT2RQ	031520 0      0   0   777777777777 0            777777777777 
FT3	031520 0      0   0   777777777777 0            777777777777 
FT9	031521 0      0   0   777777777777 0            777777777777 
ET0	031521 0      0   0   777777777777 0            777777777777 
ST1	031521 0      0   0   777777777777 0            777777777777 
ST2	031521 0      0   0   777777777777 0            777777777777 
ST9	031521 0      0   0   777777777777 0            777777777777 


*031521 CAME	0,034012
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031521 031521 0   0   312000034012 0            777777777777 
IT1	031521 0      0   0   312000034012 0            777777777777 
AT3	031521 0      0   0   000000034012 0            312000034012 
AT6	031521 034012 0   0   000000034012 0            312000034012 
FT0	031521 034012 0   0   777777777777 0            312000034012 
FT1A	031521 034012 0   0   777777777777 0            777777777777 
FT2	031521 034012 0   0   0            0            777777777777 
FT2RQ	031521 034012 0   0   777777777777 0            777777777777 
FT3	031521 034012 0   0   777777777777 0            777777777777 
FT9	031522 034012 0   0   777777777777 0            777777777777 
ET0	031523 034012 0   0   0            0            777777777777 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 140
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0330

ST1A	031523 034012 0   0   0            0            777777777777 
ST9	031523 034012 0   0   0            0            777777777777 


*031523 JUMPA	0,031524
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031523 031523 0   0   324000031524 0            000000031524 
IT1	031523 0      0   0   324000031524 0            000000031524 
AT3	031523 0      0   0   000000031524 0            324000031524 
AT6	031523 031524 0   0   000000031524 0            324000031524 
FT1A	031523 031524 0   0   000000031524 0            000000031524 
FT2	031523 031524 0   0   0            0            000000031524 
FT2RQ	031523 031524 0   0   777777777777 0            000000031524 
FT3	031523 031524 0   0   777777777777 0            000000031524 
FT9	031524 031524 0   0   777777777777 0            000000031524 
ET0	031524 031524 0   0   777777777777 0            000000031524 
ST1A	031524 031524 0   0   777777777777 0            000000031524 
ST9	031524 031524 0   0   777777777777 0            000000031524 


*031524 SETO 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031524 031524 0   0   474000000000 0            0            
IT1	031524 0      0   0   474000000000 0            0            
AT3	031524 0      0   0   0            0            474000000000 
AT6	031524 0      0   0   0            0            474000000000 
FT1A	031524 0      0   0   0            0            0            
FT9	031525 0      0   0   0            0            0            
ET0	031525 0      0   0   777777777777 0            0            
ST1	031525 0      0   0   777777777777 0            0            
ST2	031525 0      0   0   777777777777 0            0            
ST9	031525 0      0   0   777777777777 0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 141
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0331

*031525 HRR 	0,034013
INITIAL
C(AC)=777777 777777 
C(E)=777777 000000 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031525 031525 0   0   540000034013 0            777777777777 
IT1	031525 0      0   0   540000034013 0            777777777777 
AT3	031525 0      0   0   000000034013 0            540000034013 
AT6	031525 034013 0   0   000000034013 0            540000034013 
FT0	031525 034013 0   0   777777000000 0            540000034013 
FT1A	031525 034013 0   0   777777000000 0            777777000000 
FT2	031525 034013 0   0   0            0            777777000000 
FT2RQ	031525 034013 0   0   777777777777 0            777777000000 
FT3	031525 034013 0   0   777777777777 0            777777000000 
FT9	031526 034013 0   0   777777777777 0            777777000000 
ET0	031526 034013 0   0   777777000000 0            777777777777 
ST1	031526 034013 0   0   777777000000 0            777777777777 
ST2	031526 034013 0   0   777777000000 0            777777777777 
ST9	031526 034013 0   0   777777000000 0            777777777777 


*031526 CAME	0,034013
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031526 031526 0   0   312000034013 0            777777000000 
IT1	031526 0      0   0   312000034013 0            777777000000 
AT3	031526 0      0   0   000000034013 0            312000034013 
AT6	031526 034013 0   0   000000034013 0            312000034013 
FT0	031526 034013 0   0   777777000000 0            312000034013 
FT1A	031526 034013 0   0   777777000000 0            777777000000 
FT2	031526 034013 0   0   0            0            777777000000 
FT2RQ	031526 034013 0   0   777777000000 0            777777000000 
FT3	031526 034013 0   0   777777000000 0            777777000000 
FT9	031527 034013 0   0   777777000000 0            777777000000 
ET0	031530 034013 0   0   0            0            777777000000 
ST1A	031530 034013 0   0   0            0            777777000000 
ST9	031530 034013 0   0   0            0            777777000000 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 142
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0332

*031530 JUMPA	0,031531
INITIAL
C(AC)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031530 031530 0   0   324000031531 0            000000031531 
IT1	031530 0      0   0   324000031531 0            000000031531 
AT3	031530 0      0   0   000000031531 0            324000031531 
AT6	031530 031531 0   0   000000031531 0            324000031531 
FT1A	031530 031531 0   0   000000031531 0            000000031531 
FT2	031530 031531 0   0   0            0            000000031531 
FT2RQ	031530 031531 0   0   777777000000 0            000000031531 
FT3	031530 031531 0   0   777777000000 0            000000031531 
FT9	031531 031531 0   0   777777000000 0            000000031531 
ET0	031531 031531 0   0   777777000000 0            000000031531 
ST1A	031531 031531 0   0   777777000000 0            000000031531 
ST9	031531 031531 0   0   777777000000 0            000000031531 


*031531 SETO 	0,000000
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031531 031531 0   0   474000000000 0            0            
IT1	031531 0      0   0   474000000000 0            0            
AT3	031531 0      0   0   0            0            474000000000 
AT6	031531 0      0   0   0            0            474000000000 
FT1A	031531 0      0   0   0            0            0            
FT9	031532 0      0   0   0            0            0            
ET0	031532 0      0   0   777777777777 0            0            
ST1	031532 0      0   0   777777777777 0            0            
ST2	031532 0      0   0   777777777777 0            0            
ST9	031532 0      0   0   777777777777 0            0            


*031532 HRRI	0,777777
INITIAL
C(AC)=777777 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031532 031532 0   0   541000777777 0            777777777777 
IT1	031532 0      0   0   541000777777 0            777777777777 
AT3	031532 0      0   0   000000777777 0            541000777777 
AT6	031532 777777 0   0   000000777777 0            541000777777 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 143
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0333

FT1A	031532 777777 0   0   000000777777 0            000000777777 
FT2	031532 777777 0   0   0            0            000000777777 
FT2RQ	031532 777777 0   0   777777777777 0            000000777777 
FT3	031532 777777 0   0   777777777777 0            000000777777 
FT9	031533 777777 0   0   777777777777 0            000000777777 
ET0	031533 777777 0   0   777777777777 0            777777777777 
ST1	031533 777777 0   0   777777777777 0            777777777777 
ST2	031533 777777 0   0   777777777777 0            777777777777 
ST9	031533 777777 0   0   777777777777 0            777777777777 


*031533 CAME	0,034012
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031533 031533 0   0   312000034012 0            777777777777 
IT1	031533 0      0   0   312000034012 0            777777777777 
AT3	031533 0      0   0   000000034012 0            312000034012 
AT6	031533 034012 0   0   000000034012 0            312000034012 
FT0	031533 034012 0   0   777777777777 0            312000034012 
FT1A	031533 034012 0   0   777777777777 0            777777777777 
FT2	031533 034012 0   0   0            0            777777777777 
FT2RQ	031533 034012 0   0   777777777777 0            777777777777 
FT3	031533 034012 0   0   777777777777 0            777777777777 
FT9	031534 034012 0   0   777777777777 0            777777777777 
ET0	031535 034012 0   0   0            0            777777777777 
ST1A	031535 034012 0   0   0            0            777777777777 
ST9	031535 034012 0   0   0            0            777777777777 


*031535 JUMPA	0,031536
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031535 031535 0   0   324000031536 0            000000031536 
IT1	031535 0      0   0   324000031536 0            000000031536 
AT3	031535 0      0   0   000000031536 0            324000031536 
AT6	031535 031536 0   0   000000031536 0            324000031536 
FT1A	031535 031536 0   0   000000031536 0            000000031536 
FT2	031535 031536 0   0   0            0            000000031536 
FT2RQ	031535 031536 0   0   777777777777 0            000000031536 
FT3	031535 031536 0   0   777777777777 0            000000031536 
FT9	031536 031536 0   0   777777777777 0            000000031536 
ET0	031536 031536 0   0   777777777777 0            000000031536 
ST1A	031536 031536 0   0   777777777777 0            000000031536 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 144
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0334

ST9	031536 031536 0   0   777777777777 0            000000031536 


*031536 SETO 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031536 031536 0   0   474000000000 0            0            
IT1	031536 0      0   0   474000000000 0            0            
AT3	031536 0      0   0   0            0            474000000000 
AT6	031536 0      0   0   0            0            474000000000 
FT1A	031536 0      0   0   0            0            0            
FT9	031537 0      0   0   0            0            0            
ET0	031537 0      0   0   777777777777 0            0            
ST1	031537 0      0   0   777777777777 0            0            
ST2	031537 0      0   0   777777777777 0            0            
ST9	031537 0      0   0   777777777777 0            0            


*031537 HRR 	0,034014
INITIAL
C(AC)=777777 777777 
C(E)=000000 000000 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031537 031537 0   0   540000034014 0            777777777777 
IT1	031537 0      0   0   540000034014 0            777777777777 
AT3	031537 0      0   0   000000034014 0            540000034014 
AT6	031537 034014 0   0   000000034014 0            540000034014 
FT0	031537 034014 0   0   0            0            540000034014 
FT1A	031537 034014 0   0   0            0            0            
FT2	031537 034014 0   0   0            0            0            
FT2RQ	031537 034014 0   0   777777777777 0            0            
FT3	031537 034014 0   0   777777777777 0            0            
FT9	031540 034014 0   0   777777777777 0            0            
ET0	031540 034014 0   0   777777000000 0            777777777777 
ST1	031540 034014 0   0   777777000000 0            777777777777 
ST2	031540 034014 0   0   777777000000 0            777777777777 
ST9	031540 034014 0   0   777777000000 0            777777777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 145
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0335

*031540 CAME	0,034013
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031540 031540 0   0   312000034013 0            777777000000 
IT1	031540 0      0   0   312000034013 0            777777000000 
AT3	031540 0      0   0   000000034013 0            312000034013 
AT6	031540 034013 0   0   000000034013 0            312000034013 
FT0	031540 034013 0   0   777777000000 0            312000034013 
FT1A	031540 034013 0   0   777777000000 0            777777000000 
FT2	031540 034013 0   0   0            0            777777000000 
FT2RQ	031540 034013 0   0   777777000000 0            777777000000 
FT3	031540 034013 0   0   777777000000 0            777777000000 
FT9	031541 034013 0   0   777777000000 0            777777000000 
ET0	031542 034013 0   0   0            0            777777000000 
ST1A	031542 034013 0   0   0            0            777777000000 
ST9	031542 034013 0   0   0            0            777777000000 


*031542 JUMPA	0,031543
INITIAL
C(AC)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031542 031542 0   0   324000031543 0            000000031543 
IT1	031542 0      0   0   324000031543 0            000000031543 
AT3	031542 0      0   0   000000031543 0            324000031543 
AT6	031542 031543 0   0   000000031543 0            324000031543 
FT1A	031542 031543 0   0   000000031543 0            000000031543 
FT2	031542 031543 0   0   0            0            000000031543 
FT2RQ	031542 031543 0   0   777777000000 0            000000031543 
FT3	031542 031543 0   0   777777000000 0            000000031543 
FT9	031543 031543 0   0   777777000000 0            000000031543 
ET0	031543 031543 0   0   777777000000 0            000000031543 
ST1A	031543 031543 0   0   777777000000 0            000000031543 
ST9	031543 031543 0   0   777777000000 0            000000031543 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 146
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0336

*031543 SETZ 	0,000000
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031543 031543 0   0   400000000000 0            0            
IT1	031543 0      0   0   400000000000 0            0            
AT3	031543 0      0   0   0            0            400000000000 
AT6	031543 0      0   0   0            0            400000000000 
FT1A	031543 0      0   0   0            0            0            
FT9	031544 0      0   0   0            0            0            
ET0	031544 0      0   0   0            0            0            
ST1	031544 0      0   0   0            0            0            
ST2	031544 0      0   0   0            0            0            
ST9	031544 0      0   0   0            0            0            


*031544 HRR 	0,034014
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031544 031544 0   0   540000034014 0            0            
IT1	031544 0      0   0   540000034014 0            0            
AT3	031544 0      0   0   000000034014 0            540000034014 
AT6	031544 034014 0   0   000000034014 0            540000034014 
FT0	031544 034014 0   0   0            0            540000034014 
FT1A	031544 034014 0   0   0            0            0            
FT2	031544 034014 0   0   0            0            0            
FT2RQ	031544 034014 0   0   0            0            0            
FT3	031544 034014 0   0   0            0            0            
FT9	031545 034014 0   0   0            0            0            
ET0	031545 034014 0   0   0            0            0            
ST1	031545 034014 0   0   0            0            0            
ST2	031545 034014 0   0   0            0            0            
ST9	031545 034014 0   0   0            0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 147
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0337

*031545 SKIPE	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031545 031545 0   0   332000000000 0            0            
IT1	031545 0      0   0   332000000000 0            0            
AT3	031545 0      0   0   0            0            332000000000 
AT6	031545 0      0   0   0            0            332000000000 
FT0	031545 0      0   0   0            0            332000000000 
FT1A	031545 0      0   0   0            0            0            
FT9	031546 0      0   0   0            0            0            
ET0	031547 0      0   0   0            0            0            
ST1A	031547 0      0   0   0            0            0            
ST9	031547 0      0   0   0            0            0            


*031547 JUMPA	0,031550
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031547 031547 0   0   324000031550 0            000000031550 
IT1	031547 0      0   0   324000031550 0            000000031550 
AT3	031547 0      0   0   000000031550 0            324000031550 
AT6	031547 031550 0   0   000000031550 0            324000031550 
FT1A	031547 031550 0   0   000000031550 0            000000031550 
FT2	031547 031550 0   0   0            0            000000031550 
FT2RQ	031547 031550 0   0   0            0            000000031550 
FT3	031547 031550 0   0   0            0            000000031550 
FT9	031550 031550 0   0   0            0            000000031550 
ET0	031550 031550 0   0   0            0            000000031550 
ST1A	031550 031550 0   0   0            0            000000031550 
ST9	031550 031550 0   0   0            0            000000031550 


*031550 SETZ 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031550 031550 0   0   400000000000 0            0            
IT1	031550 0      0   0   400000000000 0            0            
AT3	031550 0      0   0   0            0            400000000000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 148
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0338

AT6	031550 0      0   0   0            0            400000000000 
FT1A	031550 0      0   0   0            0            0            
FT9	031551 0      0   0   0            0            0            
ET0	031551 0      0   0   0            0            0            
ST1	031551 0      0   0   0            0            0            
ST2	031551 0      0   0   0            0            0            
ST9	031551 0      0   0   0            0            0            


*031551 HRR 	0,034012
INITIAL
C(AC)=000000 000000 
C(E)=777777 777777 
FINAL
C(AC)=000000 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031551 031551 0   0   540000034012 0            0            
IT1	031551 0      0   0   540000034012 0            0            
AT3	031551 0      0   0   000000034012 0            540000034012 
AT6	031551 034012 0   0   000000034012 0            540000034012 
FT0	031551 034012 0   0   777777777777 0            540000034012 
FT1A	031551 034012 0   0   777777777777 0            777777777777 
FT2	031551 034012 0   0   0            0            777777777777 
FT2RQ	031551 034012 0   0   0            0            777777777777 
FT3	031551 034012 0   0   0            0            777777777777 
FT9	031552 034012 0   0   0            0            777777777777 
ET0	031552 034012 0   0   000000777777 0            0            
ST1	031552 034012 0   0   000000777777 0            0            
ST2	031552 034012 0   0   000000777777 0            0            
ST9	031552 034012 0   0   000000777777 0            0            


*031552 CAIE	0,777777
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031552 031552 0   0   302000777777 0            000000777777 
IT1	031552 0      0   0   302000777777 0            000000777777 
AT3	031552 0      0   0   000000777777 0            302000777777 
AT6	031552 777777 0   0   000000777777 0            302000777777 
FT1A	031552 777777 0   0   000000777777 0            000000777777 
FT2	031552 777777 0   0   0            0            000000777777 
FT2RQ	031552 777777 0   0   000000777777 0            000000777777 
FT3	031552 777777 0   0   000000777777 0            000000777777 
FT9	031553 777777 0   0   000000777777 0            000000777777 
ET0	031554 777777 0   0   0            0            000000777777 
ST1A	031554 777777 0   0   0            0            000000777777 
ST9	031554 777777 0   0   0            0            000000777777 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 149
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0339



*031554 JUMPA	0,031555
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031554 031554 0   0   324000031555 0            000000031555 
IT1	031554 0      0   0   324000031555 0            000000031555 
AT3	031554 0      0   0   000000031555 0            324000031555 
AT6	031554 031555 0   0   000000031555 0            324000031555 
FT1A	031554 031555 0   0   000000031555 0            000000031555 
FT2	031554 031555 0   0   0            0            000000031555 
FT2RQ	031554 031555 0   0   000000777777 0            000000031555 
FT3	031554 031555 0   0   000000777777 0            000000031555 
FT9	031555 031555 0   0   000000777777 0            000000031555 
ET0	031555 031555 0   0   000000777777 0            000000031555 
ST1A	031555 031555 0   0   000000777777 0            000000031555 
ST9	031555 031555 0   0   000000777777 0            000000031555 


*031555 SETZ 	0,000000
INITIAL
C(AC)=000000 777777 
C(E)=000000 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031555 031555 0   0   400000000000 0            0            
IT1	031555 0      0   0   400000000000 0            0            
AT3	031555 0      0   0   0            0            400000000000 
AT6	031555 0      0   0   0            0            400000000000 
FT1A	031555 0      0   0   0            0            0            
FT9	031556 0      0   0   0            0            0            
ET0	031556 0      0   0   0            0            0            
ST1	031556 0      0   0   0            0            0            
ST2	031556 0      0   0   0            0            0            
ST9	031556 0      0   0   0            0            0            


*031556 HRRI	0,777777
INITIAL
C(AC)=000000 000000 
FINAL
C(AC)=000000 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031556 031556 0   0   541000777777 0            0            
IT1	031556 0      0   0   541000777777 0            0            
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 150
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0340

AT3	031556 0      0   0   000000777777 0            541000777777 
AT6	031556 777777 0   0   000000777777 0            541000777777 
FT1A	031556 777777 0   0   000000777777 0            000000777777 
FT2	031556 777777 0   0   0            0            000000777777 
FT2RQ	031556 777777 0   0   0            0            000000777777 
FT3	031556 777777 0   0   0            0            000000777777 
FT9	031557 777777 0   0   0            0            000000777777 
ET0	031557 777777 0   0   000000777777 0            0            
ST1	031557 777777 0   0   000000777777 0            0            
ST2	031557 777777 0   0   000000777777 0            0            
ST9	031557 777777 0   0   000000777777 0            0            


*031557 CAIE	0,777777
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031557 031557 0   0   302000777777 0            000000777777 
IT1	031557 0      0   0   302000777777 0            000000777777 
AT3	031557 0      0   0   000000777777 0            302000777777 
AT6	031557 777777 0   0   000000777777 0            302000777777 
FT1A	031557 777777 0   0   000000777777 0            000000777777 
FT2	031557 777777 0   0   0            0            000000777777 
FT2RQ	031557 777777 0   0   000000777777 0            000000777777 
FT3	031557 777777 0   0   000000777777 0            000000777777 
FT9	031560 777777 0   0   000000777777 0            000000777777 
ET0	031561 777777 0   0   0            0            000000777777 
ST1A	031561 777777 0   0   0            0            000000777777 
ST9	031561 777777 0   0   0            0            000000777777 


*031561 JUMPA	0,031562
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031561 031561 0   0   324000031562 0            000000031562 
IT1	031561 0      0   0   324000031562 0            000000031562 
AT3	031561 0      0   0   000000031562 0            324000031562 
AT6	031561 031562 0   0   000000031562 0            324000031562 
FT1A	031561 031562 0   0   000000031562 0            000000031562 
FT2	031561 031562 0   0   0            0            000000031562 
FT2RQ	031561 031562 0   0   000000777777 0            000000031562 
FT3	031561 031562 0   0   000000777777 0            000000031562 
FT9	031562 031562 0   0   000000777777 0            000000031562 
ET0	031562 031562 0   0   000000777777 0            000000031562 
ST1A	031562 031562 0   0   000000777777 0            000000031562 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 151
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0341

ST9	031562 031562 0   0   000000777777 0            000000031562 


*031562 SETZ 	0,000000
INITIAL
C(AC)=000000 777777 
C(E)=000000 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031562 031562 0   0   400000000000 0            0            
IT1	031562 0      0   0   400000000000 0            0            
AT3	031562 0      0   0   0            0            400000000000 
AT6	031562 0      0   0   0            0            400000000000 
FT1A	031562 0      0   0   0            0            0            
FT9	031563 0      0   0   0            0            0            
ET0	031563 0      0   0   0            0            0            
ST1	031563 0      0   0   0            0            0            
ST2	031563 0      0   0   0            0            0            
ST9	031563 0      0   0   0            0            0            


*031563 HRR 	0,034013
INITIAL
C(AC)=000000 000000 
C(E)=777777 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031563 031563 0   0   540000034013 0            0            
IT1	031563 0      0   0   540000034013 0            0            
AT3	031563 0      0   0   000000034013 0            540000034013 
AT6	031563 034013 0   0   000000034013 0            540000034013 
FT0	031563 034013 0   0   777777000000 0            540000034013 
FT1A	031563 034013 0   0   777777000000 0            777777000000 
FT2	031563 034013 0   0   0            0            777777000000 
FT2RQ	031563 034013 0   0   0            0            777777000000 
FT3	031563 034013 0   0   0            0            777777000000 
FT9	031564 034013 0   0   0            0            777777000000 
ET0	031564 034013 0   0   0            0            0            
ST1	031564 034013 0   0   0            0            0            
ST2	031564 034013 0   0   0            0            0            
ST9	031564 034013 0   0   0            0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 152
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0342

*031564 SKIPE	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031564 031564 0   0   332000000000 0            0            
IT1	031564 0      0   0   332000000000 0            0            
AT3	031564 0      0   0   0            0            332000000000 
AT6	031564 0      0   0   0            0            332000000000 
FT0	031564 0      0   0   0            0            332000000000 
FT1A	031564 0      0   0   0            0            0            
FT9	031565 0      0   0   0            0            0            
ET0	031566 0      0   0   0            0            0            
ST1A	031566 0      0   0   0            0            0            
ST9	031566 0      0   0   0            0            0            


*031566 JUMPA	0,031567
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031566 031566 0   0   324000031567 0            000000031567 
IT1	031566 0      0   0   324000031567 0            000000031567 
AT3	031566 0      0   0   000000031567 0            324000031567 
AT6	031566 031567 0   0   000000031567 0            324000031567 
FT1A	031566 031567 0   0   000000031567 0            000000031567 
FT2	031566 031567 0   0   0            0            000000031567 
FT2RQ	031566 031567 0   0   0            0            000000031567 
FT3	031566 031567 0   0   0            0            000000031567 
FT9	031567 031567 0   0   0            0            000000031567 
ET0	031567 031567 0   0   0            0            000000031567 
ST1A	031567 031567 0   0   0            0            000000031567 
ST9	031567 031567 0   0   0            0            000000031567 


*031567 MOVEI	0,777777
INITIAL
C(AC)=000000 000000 
FINAL
C(AC)=000000 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031567 031567 0   0   201000777777 0            000000777777 
IT1	031567 0      0   0   201000777777 0            000000777777 
AT3	031567 0      0   0   000000777777 0            201000777777 
AT6	031567 777777 0   0   000000777777 0            201000777777 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 153
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0343

FT1A	031567 777777 0   0   000000777777 0            000000777777 
FT9	031570 777777 0   0   000000777777 0            000000777777 
ET0	031570 777777 0   0   000000777777 0            000000777777 
ST1	031570 777777 0   0   000000777777 0            000000777777 
ST2	031570 777777 0   0   000000777777 0            000000777777 
ST9	031570 777777 0   0   000000777777 0            000000777777 


*031570 HRR 	0,034013
INITIAL
C(AC)=000000 777777 
C(E)=777777 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031570 031570 0   0   540000034013 0            000000777777 
IT1	031570 0      0   0   540000034013 0            000000777777 
AT3	031570 0      0   0   000000034013 0            540000034013 
AT6	031570 034013 0   0   000000034013 0            540000034013 
FT0	031570 034013 0   0   777777000000 0            540000034013 
FT1A	031570 034013 0   0   777777000000 0            777777000000 
FT2	031570 034013 0   0   0            0            777777000000 
FT2RQ	031570 034013 0   0   000000777777 0            777777000000 
FT3	031570 034013 0   0   000000777777 0            777777000000 
FT9	031571 034013 0   0   000000777777 0            777777000000 
ET0	031571 034013 0   0   0            0            000000777777 
ST1	031571 034013 0   0   0            0            000000777777 
ST2	031571 034013 0   0   0            0            000000777777 
ST9	031571 034013 0   0   0            0            000000777777 


*031571 SKIPE	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031571 031571 0   0   332000000000 0            0            
IT1	031571 0      0   0   332000000000 0            0            
AT3	031571 0      0   0   0            0            332000000000 
AT6	031571 0      0   0   0            0            332000000000 
FT0	031571 0      0   0   0            0            332000000000 
FT1A	031571 0      0   0   0            0            0            
FT9	031572 0      0   0   0            0            0            
ET0	031573 0      0   0   0            0            0            
ST1A	031573 0      0   0   0            0            0            
ST9	031573 0      0   0   0            0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 154
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0344

*031573 JUMPA	0,031574
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031573 031573 0   0   324000031574 0            000000031574 
IT1	031573 0      0   0   324000031574 0            000000031574 
AT3	031573 0      0   0   000000031574 0            324000031574 
AT6	031573 031574 0   0   000000031574 0            324000031574 
FT1A	031573 031574 0   0   000000031574 0            000000031574 
FT2	031573 031574 0   0   0            0            000000031574 
FT2RQ	031573 031574 0   0   0            0            000000031574 
FT3	031573 031574 0   0   0            0            000000031574 
FT9	031574 031574 0   0   0            0            000000031574 
ET0	031574 031574 0   0   0            0            000000031574 
ST1A	031574 031574 0   0   0            0            000000031574 
ST9	031574 031574 0   0   0            0            000000031574 


*031574 MOVSI	0,777777
INITIAL
C(AC)=000000 000000 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031574 031574 0   0   205000777777 0            000000777777 
IT1	031574 0      0   0   205000777777 0            000000777777 
AT3	031574 0      0   0   000000777777 0            205000777777 
AT6	031574 777777 0   0   000000777777 0            205000777777 
FT1A	031574 777777 0   0   000000777777 0            000000777777 
FT9	031575 777777 0   0   000000777777 0            000000777777 
ET0	031575 777777 0   0   777777000000 0            000000777777 
ST1	031575 777777 0   0   777777000000 0            000000777777 
ST2	031575 777777 0   0   777777000000 0            000000777777 
ST9	031575 777777 0   0   777777000000 0            000000777777 


*031575 HRRI	0,777777
INITIAL
C(AC)=777777 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031575 031575 0   0   541000777777 0            777777000000 
IT1	031575 0      0   0   541000777777 0            777777000000 
AT3	031575 0      0   0   000000777777 0            541000777777 
AT6	031575 777777 0   0   000000777777 0            541000777777 
FT1A	031575 777777 0   0   000000777777 0            000000777777 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 155
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0345

FT2	031575 777777 0   0   0            0            000000777777 
FT2RQ	031575 777777 0   0   777777000000 0            000000777777 
FT3	031575 777777 0   0   777777000000 0            000000777777 
FT9	031576 777777 0   0   777777000000 0            000000777777 
ET0	031576 777777 0   0   777777777777 0            777777000000 
ST1	031576 777777 0   0   777777777777 0            777777000000 
ST2	031576 777777 0   0   777777777777 0            777777000000 
ST9	031576 777777 0   0   777777777777 0            777777000000 


*031576 CAME	0,034012
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031576 031576 0   0   312000034012 0            777777777777 
IT1	031576 0      0   0   312000034012 0            777777777777 
AT3	031576 0      0   0   000000034012 0            312000034012 
AT6	031576 034012 0   0   000000034012 0            312000034012 
FT0	031576 034012 0   0   777777777777 0            312000034012 
FT1A	031576 034012 0   0   777777777777 0            777777777777 
FT2	031576 034012 0   0   0            0            777777777777 
FT2RQ	031576 034012 0   0   777777777777 0            777777777777 
FT3	031576 034012 0   0   777777777777 0            777777777777 
FT9	031577 034012 0   0   777777777777 0            777777777777 
ET0	0      034012 0   0   0            0            777777777777 
ST1A	0      034012 0   0   0            0            777777777777 
ST9	0      034012 0   0   0            0            777777777777 


*031600 JUMPA	0,031601
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	0      0      0   0   324000031601 0            000000031601 
IT1	0      0      0   0   324000031601 0            000000031601 
AT3	0      0      0   0   000000031601 0            324000031601 
AT6	0      031601 0   0   000000031601 0            324000031601 
FT1A	0      031601 0   0   000000031601 0            000000031601 
FT2	0      031601 0   0   0            0            000000031601 
FT2RQ	0      031601 0   0   777777777777 0            000000031601 
FT3	0      031601 0   0   777777777777 0            000000031601 
FT9	031601 031601 0   0   777777777777 0            000000031601 
ET0	031601 031601 0   0   777777777777 0            000000031601 
ST1A	031601 031601 0   0   777777777777 0            000000031601 
ST9	031601 031601 0   0   777777777777 0            000000031601 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 156
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0346



*031601 MOVEI	0,777777
INITIAL
C(AC)=777777 777777 
FINAL
C(AC)=000000 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031601 031601 0   0   201000777777 0            000000777777 
IT1	031601 0      0   0   201000777777 0            000000777777 
AT3	031601 0      0   0   000000777777 0            201000777777 
AT6	031601 777777 0   0   000000777777 0            201000777777 
FT1A	031601 777777 0   0   000000777777 0            000000777777 
FT9	031602 777777 0   0   000000777777 0            000000777777 
ET0	031602 777777 0   0   000000777777 0            000000777777 
ST1	031602 777777 0   0   000000777777 0            000000777777 
ST2	031602 777777 0   0   000000777777 0            000000777777 
ST9	031602 777777 0   0   000000777777 0            000000777777 


*031602 HRRI	0,777777
INITIAL
C(AC)=000000 777777 
FINAL
C(AC)=000000 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031602 031602 0   0   541000777777 0            000000777777 
IT1	031602 0      0   0   541000777777 0            000000777777 
AT3	031602 0      0   0   000000777777 0            541000777777 
AT6	031602 777777 0   0   000000777777 0            541000777777 
FT1A	031602 777777 0   0   000000777777 0            000000777777 
FT2	031602 777777 0   0   0            0            000000777777 
FT2RQ	031602 777777 0   0   000000777777 0            000000777777 
FT3	031602 777777 0   0   000000777777 0            000000777777 
FT9	031603 777777 0   0   000000777777 0            000000777777 
ET0	031603 777777 0   0   000000777777 0            000000777777 
ST1	031603 777777 0   0   000000777777 0            000000777777 
ST2	031603 777777 0   0   000000777777 0            000000777777 
ST9	031603 777777 0   0   000000777777 0            000000777777 


*031603 CAIE	0,777777
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031603 031603 0   0   302000777777 0            000000777777 
IT1	031603 0      0   0   302000777777 0            000000777777 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 157
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0347

AT3	031603 0      0   0   000000777777 0            302000777777 
AT6	031603 777777 0   0   000000777777 0            302000777777 
FT1A	031603 777777 0   0   000000777777 0            000000777777 
FT2	031603 777777 0   0   0            0            000000777777 
FT2RQ	031603 777777 0   0   000000777777 0            000000777777 
FT3	031603 777777 0   0   000000777777 0            000000777777 
FT9	031604 777777 0   0   000000777777 0            000000777777 
ET0	031605 777777 0   0   0            0            000000777777 
ST1A	031605 777777 0   0   0            0            000000777777 
ST9	031605 777777 0   0   0            0            000000777777 


*031605 JUMPA	0,031606
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031605 031605 0   0   324000031606 0            000000031606 
IT1	031605 0      0   0   324000031606 0            000000031606 
AT3	031605 0      0   0   000000031606 0            324000031606 
AT6	031605 031606 0   0   000000031606 0            324000031606 
FT1A	031605 031606 0   0   000000031606 0            000000031606 
FT2	031605 031606 0   0   0            0            000000031606 
FT2RQ	031605 031606 0   0   000000777777 0            000000031606 
FT3	031605 031606 0   0   000000777777 0            000000031606 
FT9	031606 031606 0   0   000000777777 0            000000031606 
ET0	031606 031606 0   0   000000777777 0            000000031606 
ST1A	031606 031606 0   0   000000777777 0            000000031606 
ST9	031606 031606 0   0   000000777777 0            000000031606 


*031606 MOVSI	0,777777
INITIAL
C(AC)=000000 777777 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031606 031606 0   0   205000777777 0            000000777777 
IT1	031606 0      0   0   205000777777 0            000000777777 
AT3	031606 0      0   0   000000777777 0            205000777777 
AT6	031606 777777 0   0   000000777777 0            205000777777 
FT1A	031606 777777 0   0   000000777777 0            000000777777 
FT9	031607 777777 0   0   000000777777 0            000000777777 
ET0	031607 777777 0   0   777777000000 0            000000777777 
ST1	031607 777777 0   0   777777000000 0            000000777777 
ST2	031607 777777 0   0   777777000000 0            000000777777 
ST9	031607 777777 0   0   777777000000 0            000000777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 158
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0348

*031607 HRR 	0,034013
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031607 031607 0   0   540000034013 0            777777000000 
IT1	031607 0      0   0   540000034013 0            777777000000 
AT3	031607 0      0   0   000000034013 0            540000034013 
AT6	031607 034013 0   0   000000034013 0            540000034013 
FT0	031607 034013 0   0   777777000000 0            540000034013 
FT1A	031607 034013 0   0   777777000000 0            777777000000 
FT2	031607 034013 0   0   0            0            777777000000 
FT2RQ	031607 034013 0   0   777777000000 0            777777000000 
FT3	031607 034013 0   0   777777000000 0            777777000000 
FT9	031610 034013 0   0   777777000000 0            777777000000 
ET0	031610 034013 0   0   777777000000 0            777777000000 
ST1	031610 034013 0   0   777777000000 0            777777000000 
ST2	031610 034013 0   0   777777000000 0            777777000000 
ST9	031610 034013 0   0   777777000000 0            777777000000 


*031610 CAME	0,034013
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031610 031610 0   0   312000034013 0            777777000000 
IT1	031610 0      0   0   312000034013 0            777777000000 
AT3	031610 0      0   0   000000034013 0            312000034013 
AT6	031610 034013 0   0   000000034013 0            312000034013 
FT0	031610 034013 0   0   777777000000 0            312000034013 
FT1A	031610 034013 0   0   777777000000 0            777777000000 
FT2	031610 034013 0   0   0            0            777777000000 
FT2RQ	031610 034013 0   0   777777000000 0            777777000000 
FT3	031610 034013 0   0   777777000000 0            777777000000 
FT9	031611 034013 0   0   777777000000 0            777777000000 
ET0	031612 034013 0   0   0            0            777777000000 
ST1A	031612 034013 0   0   0            0            777777000000 
ST9	031612 034013 0   0   0            0            777777000000 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 159
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0349

*031612 JUMPA	0,031613
INITIAL
C(AC)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031612 031612 0   0   324000031613 0            000000031613 
IT1	031612 0      0   0   324000031613 0            000000031613 
AT3	031612 0      0   0   000000031613 0            324000031613 
AT6	031612 031613 0   0   000000031613 0            324000031613 
FT1A	031612 031613 0   0   000000031613 0            000000031613 
FT2	031612 031613 0   0   0            0            000000031613 
FT2RQ	031612 031613 0   0   777777000000 0            000000031613 
FT3	031612 031613 0   0   777777000000 0            000000031613 
FT9	031613 031613 0   0   777777000000 0            000000031613 
ET0	031613 031613 0   0   777777000000 0            000000031613 
ST1A	031613 031613 0   0   777777000000 0            000000031613 
ST9	031613 031613 0   0   777777000000 0            000000031613 


*031613 SETZ 	0,000000
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031613 031613 0   0   400000000000 0            0            
IT1	031613 0      0   0   400000000000 0            0            
AT3	031613 0      0   0   0            0            400000000000 
AT6	031613 0      0   0   0            0            400000000000 
FT1A	031613 0      0   0   0            0            0            
FT9	031614 0      0   0   0            0            0            
ET0	031614 0      0   0   0            0            0            
ST1	031614 0      0   0   0            0            0            
ST2	031614 0      0   0   0            0            0            
ST9	031614 0      0   0   0            0            0            


*031614 HRRZ 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031614 031614 0   0   550000000000 0            0            
IT1	031614 0      0   0   550000000000 0            0            
AT3	031614 0      0   0   0            0            550000000000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 160
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0350

AT6	031614 0      0   0   0            0            550000000000 
FT0	031614 0      0   0   0            0            550000000000 
FT1A	031614 0      0   0   0            0            0            
FT9	031615 0      0   0   0            0            0            
ET0	031615 0      0   0   0            0            0            
ST1	031615 0      0   0   0            0            0            
ST2	031615 0      0   0   0            0            0            
ST9	031615 0      0   0   0            0            0            


*031615 SKIPE	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031615 031615 0   0   332000000000 0            0            
IT1	031615 0      0   0   332000000000 0            0            
AT3	031615 0      0   0   0            0            332000000000 
AT6	031615 0      0   0   0            0            332000000000 
FT0	031615 0      0   0   0            0            332000000000 
FT1A	031615 0      0   0   0            0            0            
FT9	031616 0      0   0   0            0            0            
ET0	031617 0      0   0   0            0            0            
ST1A	031617 0      0   0   0            0            0            
ST9	031617 0      0   0   0            0            0            


*031617 JUMPA	0,031620
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031617 031617 0   0   324000031620 0            000000031620 
IT1	031617 0      0   0   324000031620 0            000000031620 
AT3	031617 0      0   0   000000031620 0            324000031620 
AT6	031617 031620 0   0   000000031620 0            324000031620 
FT1A	031617 031620 0   0   000000031620 0            000000031620 
FT2	031617 031620 0   0   0            0            000000031620 
FT2RQ	031617 031620 0   0   0            0            000000031620 
FT3	031617 031620 0   0   0            0            000000031620 
FT9	031620 031620 0   0   0            0            000000031620 
ET0	031620 031620 0   0   0            0            000000031620 
ST1A	031620 031620 0   0   0            0            000000031620 
ST9	031620 031620 0   0   0            0            000000031620 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 161
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0351

*031620 SETO 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031620 031620 0   0   474000000000 0            0            
IT1	031620 0      0   0   474000000000 0            0            
AT3	031620 0      0   0   0            0            474000000000 
AT6	031620 0      0   0   0            0            474000000000 
FT1A	031620 0      0   0   0            0            0            
FT9	031621 0      0   0   0            0            0            
ET0	031621 0      0   0   777777777777 0            0            
ST1	031621 0      0   0   777777777777 0            0            
ST2	031621 0      0   0   777777777777 0            0            
ST9	031621 0      0   0   777777777777 0            0            


*031621 HRRZI	0,777777
INITIAL
C(AC)=777777 777777 
FINAL
C(AC)=000000 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031621 031621 0   0   551000777777 0            000000777777 
IT1	031621 0      0   0   551000777777 0            000000777777 
AT3	031621 0      0   0   000000777777 0            551000777777 
AT6	031621 777777 0   0   000000777777 0            551000777777 
FT1A	031621 777777 0   0   000000777777 0            000000777777 
FT9	031622 777777 0   0   000000777777 0            000000777777 
ET0	031622 777777 0   0   000000777777 0            000000777777 
ST1	031622 777777 0   0   000000777777 0            000000777777 
ST2	031622 777777 0   0   000000777777 0            000000777777 
ST9	031622 777777 0   0   000000777777 0            000000777777 


*031622 CAIE	0,777777
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031622 031622 0   0   302000777777 0            000000777777 
IT1	031622 0      0   0   302000777777 0            000000777777 
AT3	031622 0      0   0   000000777777 0            302000777777 
AT6	031622 777777 0   0   000000777777 0            302000777777 
FT1A	031622 777777 0   0   000000777777 0            000000777777 
FT2	031622 777777 0   0   0            0            000000777777 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 162
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0352

FT2RQ	031622 777777 0   0   000000777777 0            000000777777 
FT3	031622 777777 0   0   000000777777 0            000000777777 
FT9	031623 777777 0   0   000000777777 0            000000777777 
ET0	031624 777777 0   0   0            0            000000777777 
ST1A	031624 777777 0   0   0            0            000000777777 
ST9	031624 777777 0   0   0            0            000000777777 


*031624 JUMPA	0,031625
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031624 031624 0   0   324000031625 0            000000031625 
IT1	031624 0      0   0   324000031625 0            000000031625 
AT3	031624 0      0   0   000000031625 0            324000031625 
AT6	031624 031625 0   0   000000031625 0            324000031625 
FT1A	031624 031625 0   0   000000031625 0            000000031625 
FT2	031624 031625 0   0   0            0            000000031625 
FT2RQ	031624 031625 0   0   000000777777 0            000000031625 
FT3	031624 031625 0   0   000000777777 0            000000031625 
FT9	031625 031625 0   0   000000777777 0            000000031625 
ET0	031625 031625 0   0   000000777777 0            000000031625 
ST1A	031625 031625 0   0   000000777777 0            000000031625 
ST9	031625 031625 0   0   000000777777 0            000000031625 


*031625 SETO 	0,000000
INITIAL
C(AC)=000000 777777 
C(E)=000000 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031625 031625 0   0   474000000000 0            0            
IT1	031625 0      0   0   474000000000 0            0            
AT3	031625 0      0   0   0            0            474000000000 
AT6	031625 0      0   0   0            0            474000000000 
FT1A	031625 0      0   0   0            0            0            
FT9	031626 0      0   0   0            0            0            
ET0	031626 0      0   0   777777777777 0            0            
ST1	031626 0      0   0   777777777777 0            0            
ST2	031626 0      0   0   777777777777 0            0            
ST9	031626 0      0   0   777777777777 0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 163
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0353

*031626 HRRZI	0,000000
INITIAL
C(AC)=777777 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031626 031626 0   0   551000000000 0            0            
IT1	031626 0      0   0   551000000000 0            0            
AT3	031626 0      0   0   0            0            551000000000 
AT6	031626 0      0   0   0            0            551000000000 
FT1A	031626 0      0   0   0            0            0            
FT9	031627 0      0   0   0            0            0            
ET0	031627 0      0   0   0            0            0            
ST1	031627 0      0   0   0            0            0            
ST2	031627 0      0   0   0            0            0            
ST9	031627 0      0   0   0            0            0            


*031627 SKIPE	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031627 031627 0   0   332000000000 0            0            
IT1	031627 0      0   0   332000000000 0            0            
AT3	031627 0      0   0   0            0            332000000000 
AT6	031627 0      0   0   0            0            332000000000 
FT0	031627 0      0   0   0            0            332000000000 
FT1A	031627 0      0   0   0            0            0            
FT9	031630 0      0   0   0            0            0            
ET0	031631 0      0   0   0            0            0            
ST1A	031631 0      0   0   0            0            0            
ST9	031631 0      0   0   0            0            0            


*031631 JUMPA	0,031632
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031631 031631 0   0   324000031632 0            000000031632 
IT1	031631 0      0   0   324000031632 0            000000031632 
AT3	031631 0      0   0   000000031632 0            324000031632 
AT6	031631 031632 0   0   000000031632 0            324000031632 
FT1A	031631 031632 0   0   000000031632 0            000000031632 
FT2	031631 031632 0   0   0            0            000000031632 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 164
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0354

FT2RQ	031631 031632 0   0   0            0            000000031632 
FT3	031631 031632 0   0   0            0            000000031632 
FT9	031632 031632 0   0   0            0            000000031632 
ET0	031632 031632 0   0   0            0            000000031632 
ST1A	031632 031632 0   0   0            0            000000031632 
ST9	031632 031632 0   0   0            0            000000031632 


*031632 SETO 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031632 031632 0   0   474000000000 0            0            
IT1	031632 0      0   0   474000000000 0            0            
AT3	031632 0      0   0   0            0            474000000000 
AT6	031632 0      0   0   0            0            474000000000 
FT1A	031632 0      0   0   0            0            0            
FT9	031633 0      0   0   0            0            0            
ET0	031633 0      0   0   777777777777 0            0            
ST1	031633 0      0   0   777777777777 0            0            
ST2	031633 0      0   0   777777777777 0            0            
ST9	031633 0      0   0   777777777777 0            0            


*031633 HRRZ 	0,034013
INITIAL
C(AC)=777777 777777 
C(E)=777777 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031633 031633 0   0   550000034013 0            777777000000 
IT1	031633 0      0   0   550000034013 0            777777000000 
AT3	031633 0      0   0   000000034013 0            550000034013 
AT6	031633 034013 0   0   000000034013 0            550000034013 
FT0	031633 034013 0   0   777777000000 0            550000034013 
FT1A	031633 034013 0   0   777777000000 0            777777000000 
FT9	031634 034013 0   0   777777000000 0            777777000000 
ET0	031634 034013 0   0   0            0            777777000000 
ST1	031634 034013 0   0   0            0            777777000000 
ST2	031634 034013 0   0   0            0            777777000000 
ST9	031634 034013 0   0   0            0            777777000000 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 165
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0355

*031634 SKIPE	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031634 031634 0   0   332000000000 0            0            
IT1	031634 0      0   0   332000000000 0            0            
AT3	031634 0      0   0   0            0            332000000000 
AT6	031634 0      0   0   0            0            332000000000 
FT0	031634 0      0   0   0            0            332000000000 
FT1A	031634 0      0   0   0            0            0            
FT9	031635 0      0   0   0            0            0            
ET0	031636 0      0   0   0            0            0            
ST1A	031636 0      0   0   0            0            0            
ST9	031636 0      0   0   0            0            0            


*031636 JUMPA	0,031637
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031636 031636 0   0   324000031637 0            000000031637 
IT1	031636 0      0   0   324000031637 0            000000031637 
AT3	031636 0      0   0   000000031637 0            324000031637 
AT6	031636 031637 0   0   000000031637 0            324000031637 
FT1A	031636 031637 0   0   000000031637 0            000000031637 
FT2	031636 031637 0   0   0            0            000000031637 
FT2RQ	031636 031637 0   0   0            0            000000031637 
FT3	031636 031637 0   0   0            0            000000031637 
FT9	031637 031637 0   0   0            0            000000031637 
ET0	031637 031637 0   0   0            0            000000031637 
ST1A	031637 031637 0   0   0            0            000000031637 
ST9	031637 031637 0   0   0            0            000000031637 


*031637 SETO 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031637 031637 0   0   474000000000 0            0            
IT1	031637 0      0   0   474000000000 0            0            
AT3	031637 0      0   0   0            0            474000000000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 166
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0356

AT6	031637 0      0   0   0            0            474000000000 
FT1A	031637 0      0   0   0            0            0            
FT9	031640 0      0   0   0            0            0            
ET0	031640 0      0   0   777777777777 0            0            
ST1	031640 0      0   0   777777777777 0            0            
ST2	031640 0      0   0   777777777777 0            0            
ST9	031640 0      0   0   777777777777 0            0            


*031640 HRRZ 	0,034012
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=000000 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031640 031640 0   0   550000034012 0            777777777777 
IT1	031640 0      0   0   550000034012 0            777777777777 
AT3	031640 0      0   0   000000034012 0            550000034012 
AT6	031640 034012 0   0   000000034012 0            550000034012 
FT0	031640 034012 0   0   777777777777 0            550000034012 
FT1A	031640 034012 0   0   777777777777 0            777777777777 
FT9	031641 034012 0   0   777777777777 0            777777777777 
ET0	031641 034012 0   0   000000777777 0            777777777777 
ST1	031641 034012 0   0   000000777777 0            777777777777 
ST2	031641 034012 0   0   000000777777 0            777777777777 
ST9	031641 034012 0   0   000000777777 0            777777777777 


*031641 CAIE	0,777777
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031641 031641 0   0   302000777777 0            000000777777 
IT1	031641 0      0   0   302000777777 0            000000777777 
AT3	031641 0      0   0   000000777777 0            302000777777 
AT6	031641 777777 0   0   000000777777 0            302000777777 
FT1A	031641 777777 0   0   000000777777 0            000000777777 
FT2	031641 777777 0   0   0            0            000000777777 
FT2RQ	031641 777777 0   0   000000777777 0            000000777777 
FT3	031641 777777 0   0   000000777777 0            000000777777 
FT9	031642 777777 0   0   000000777777 0            000000777777 
ET0	031643 777777 0   0   0            0            000000777777 
ST1A	031643 777777 0   0   0            0            000000777777 
ST9	031643 777777 0   0   0            0            000000777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 167
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0357

*031643 JUMPA	0,031644
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031643 031643 0   0   324000031644 0            000000031644 
IT1	031643 0      0   0   324000031644 0            000000031644 
AT3	031643 0      0   0   000000031644 0            324000031644 
AT6	031643 031644 0   0   000000031644 0            324000031644 
FT1A	031643 031644 0   0   000000031644 0            000000031644 
FT2	031643 031644 0   0   0            0            000000031644 
FT2RQ	031643 031644 0   0   000000777777 0            000000031644 
FT3	031643 031644 0   0   000000777777 0            000000031644 
FT9	031644 031644 0   0   000000777777 0            000000031644 
ET0	031644 031644 0   0   000000777777 0            000000031644 
ST1A	031644 031644 0   0   000000777777 0            000000031644 
ST9	031644 031644 0   0   000000777777 0            000000031644 


*031644 MOVEI	0,777777
INITIAL
C(AC)=000000 777777 
FINAL
C(AC)=000000 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031644 031644 0   0   201000777777 0            000000777777 
IT1	031644 0      0   0   201000777777 0            000000777777 
AT3	031644 0      0   0   000000777777 0            201000777777 
AT6	031644 777777 0   0   000000777777 0            201000777777 
FT1A	031644 777777 0   0   000000777777 0            000000777777 
FT9	031645 777777 0   0   000000777777 0            000000777777 
ET0	031645 777777 0   0   000000777777 0            000000777777 
ST1	031645 777777 0   0   000000777777 0            000000777777 
ST2	031645 777777 0   0   000000777777 0            000000777777 
ST9	031645 777777 0   0   000000777777 0            000000777777 


*031645 HRRZ 	0,034012
INITIAL
C(AC)=000000 777777 
C(E)=777777 777777 
FINAL
C(AC)=000000 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031645 031645 0   0   550000034012 0            777777777777 
IT1	031645 0      0   0   550000034012 0            777777777777 
AT3	031645 0      0   0   000000034012 0            550000034012 
AT6	031645 034012 0   0   000000034012 0            550000034012 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 168
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0358

FT0	031645 034012 0   0   777777777777 0            550000034012 
FT1A	031645 034012 0   0   777777777777 0            777777777777 
FT9	031646 034012 0   0   777777777777 0            777777777777 
ET0	031646 034012 0   0   000000777777 0            777777777777 
ST1	031646 034012 0   0   000000777777 0            777777777777 
ST2	031646 034012 0   0   000000777777 0            777777777777 
ST9	031646 034012 0   0   000000777777 0            777777777777 


*031646 CAIE	0,777777
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031646 031646 0   0   302000777777 0            000000777777 
IT1	031646 0      0   0   302000777777 0            000000777777 
AT3	031646 0      0   0   000000777777 0            302000777777 
AT6	031646 777777 0   0   000000777777 0            302000777777 
FT1A	031646 777777 0   0   000000777777 0            000000777777 
FT2	031646 777777 0   0   0            0            000000777777 
FT2RQ	031646 777777 0   0   000000777777 0            000000777777 
FT3	031646 777777 0   0   000000777777 0            000000777777 
FT9	031647 777777 0   0   000000777777 0            000000777777 
ET0	031650 777777 0   0   0            0            000000777777 
ST1A	031650 777777 0   0   0            0            000000777777 
ST9	031650 777777 0   0   0            0            000000777777 


*031650 JUMPA	0,031651
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031650 031650 0   0   324000031651 0            000000031651 
IT1	031650 0      0   0   324000031651 0            000000031651 
AT3	031650 0      0   0   000000031651 0            324000031651 
AT6	031650 031651 0   0   000000031651 0            324000031651 
FT1A	031650 031651 0   0   000000031651 0            000000031651 
FT2	031650 031651 0   0   0            0            000000031651 
FT2RQ	031650 031651 0   0   000000777777 0            000000031651 
FT3	031650 031651 0   0   000000777777 0            000000031651 
FT9	031651 031651 0   0   000000777777 0            000000031651 
ET0	031651 031651 0   0   000000777777 0            000000031651 
ST1A	031651 031651 0   0   000000777777 0            000000031651 
ST9	031651 031651 0   0   000000777777 0            000000031651 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 169
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0359

*031651 MOVEI	0,777777
INITIAL
C(AC)=000000 777777 
FINAL
C(AC)=000000 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031651 031651 0   0   201000777777 0            000000777777 
IT1	031651 0      0   0   201000777777 0            000000777777 
AT3	031651 0      0   0   000000777777 0            201000777777 
AT6	031651 777777 0   0   000000777777 0            201000777777 
FT1A	031651 777777 0   0   000000777777 0            000000777777 
FT9	031652 777777 0   0   000000777777 0            000000777777 
ET0	031652 777777 0   0   000000777777 0            000000777777 
ST1	031652 777777 0   0   000000777777 0            000000777777 
ST2	031652 777777 0   0   000000777777 0            000000777777 
ST9	031652 777777 0   0   000000777777 0            000000777777 


*031652 HRRZ 	0,034014
INITIAL
C(AC)=000000 777777 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031652 031652 0   0   550000034014 0            0            
IT1	031652 0      0   0   550000034014 0            0            
AT3	031652 0      0   0   000000034014 0            550000034014 
AT6	031652 034014 0   0   000000034014 0            550000034014 
FT0	031652 034014 0   0   0            0            550000034014 
FT1A	031652 034014 0   0   0            0            0            
FT9	031653 034014 0   0   0            0            0            
ET0	031653 034014 0   0   0            0            0            
ST1	031653 034014 0   0   0            0            0            
ST2	031653 034014 0   0   0            0            0            
ST9	031653 034014 0   0   0            0            0            


*031653 CAIE	0,000000
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031653 031653 0   0   302000000000 0            0            
IT1	031653 0      0   0   302000000000 0            0            
AT3	031653 0      0   0   0            0            302000000000 
AT6	031653 0      0   0   0            0            302000000000 
FT1A	031653 0      0   0   0            0            0            
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 170
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0360

FT2	031653 0      0   0   0            0            0            
FT2RQ	031653 0      0   0   0            0            0            
FT3	031653 0      0   0   0            0            0            
FT9	031654 0      0   0   0            0            0            
ET0	031655 0      0   0   0            0            0            
ST1A	031655 0      0   0   0            0            0            
ST9	031655 0      0   0   0            0            0            


*031655 JUMPA	0,031656
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031655 031655 0   0   324000031656 0            000000031656 
IT1	031655 0      0   0   324000031656 0            000000031656 
AT3	031655 0      0   0   000000031656 0            324000031656 
AT6	031655 031656 0   0   000000031656 0            324000031656 
FT1A	031655 031656 0   0   000000031656 0            000000031656 
FT2	031655 031656 0   0   0            0            000000031656 
FT2RQ	031655 031656 0   0   0            0            000000031656 
FT3	031655 031656 0   0   0            0            000000031656 
FT9	031656 031656 0   0   0            0            000000031656 
ET0	031656 031656 0   0   0            0            000000031656 
ST1A	031656 031656 0   0   0            0            000000031656 
ST9	031656 031656 0   0   0            0            000000031656 


*031656 MOVSI	0,777777
INITIAL
C(AC)=000000 000000 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031656 031656 0   0   205000777777 0            000000777777 
IT1	031656 0      0   0   205000777777 0            000000777777 
AT3	031656 0      0   0   000000777777 0            205000777777 
AT6	031656 777777 0   0   000000777777 0            205000777777 
FT1A	031656 777777 0   0   000000777777 0            000000777777 
FT9	031657 777777 0   0   000000777777 0            000000777777 
ET0	031657 777777 0   0   777777000000 0            000000777777 
ST1	031657 777777 0   0   777777000000 0            000000777777 
ST2	031657 777777 0   0   777777000000 0            000000777777 
ST9	031657 777777 0   0   777777000000 0            000000777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 171
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0361

*031657 HRRZ 	0,034012
INITIAL
C(AC)=777777 000000 
C(E)=777777 777777 
FINAL
C(AC)=000000 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031657 031657 0   0   550000034012 0            777777777777 
IT1	031657 0      0   0   550000034012 0            777777777777 
AT3	031657 0      0   0   000000034012 0            550000034012 
AT6	031657 034012 0   0   000000034012 0            550000034012 
FT0	031657 034012 0   0   777777777777 0            550000034012 
FT1A	031657 034012 0   0   777777777777 0            777777777777 
FT9	031660 034012 0   0   777777777777 0            777777777777 
ET0	031660 034012 0   0   000000777777 0            777777777777 
ST1	031660 034012 0   0   000000777777 0            777777777777 
ST2	031660 034012 0   0   000000777777 0            777777777777 
ST9	031660 034012 0   0   000000777777 0            777777777777 


*031660 CAIE	0,777777
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031660 031660 0   0   302000777777 0            000000777777 
IT1	031660 0      0   0   302000777777 0            000000777777 
AT3	031660 0      0   0   000000777777 0            302000777777 
AT6	031660 777777 0   0   000000777777 0            302000777777 
FT1A	031660 777777 0   0   000000777777 0            000000777777 
FT2	031660 777777 0   0   0            0            000000777777 
FT2RQ	031660 777777 0   0   000000777777 0            000000777777 
FT3	031660 777777 0   0   000000777777 0            000000777777 
FT9	031661 777777 0   0   000000777777 0            000000777777 
ET0	031662 777777 0   0   0            0            000000777777 
ST1A	031662 777777 0   0   0            0            000000777777 
ST9	031662 777777 0   0   0            0            000000777777 


*031662 JUMPA	0,031663
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031662 031662 0   0   324000031663 0            000000031663 
IT1	031662 0      0   0   324000031663 0            000000031663 
AT3	031662 0      0   0   000000031663 0            324000031663 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 172
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0362

AT6	031662 031663 0   0   000000031663 0            324000031663 
FT1A	031662 031663 0   0   000000031663 0            000000031663 
FT2	031662 031663 0   0   0            0            000000031663 
FT2RQ	031662 031663 0   0   000000777777 0            000000031663 
FT3	031662 031663 0   0   000000777777 0            000000031663 
FT9	031663 031663 0   0   000000777777 0            000000031663 
ET0	031663 031663 0   0   000000777777 0            000000031663 
ST1A	031663 031663 0   0   000000777777 0            000000031663 
ST9	031663 031663 0   0   000000777777 0            000000031663 


*031663 MOVSI	0,777777
INITIAL
C(AC)=000000 777777 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031663 031663 0   0   205000777777 0            000000777777 
IT1	031663 0      0   0   205000777777 0            000000777777 
AT3	031663 0      0   0   000000777777 0            205000777777 
AT6	031663 777777 0   0   000000777777 0            205000777777 
FT1A	031663 777777 0   0   000000777777 0            000000777777 
FT9	031664 777777 0   0   000000777777 0            000000777777 
ET0	031664 777777 0   0   777777000000 0            000000777777 
ST1	031664 777777 0   0   777777000000 0            000000777777 
ST2	031664 777777 0   0   777777000000 0            000000777777 
ST9	031664 777777 0   0   777777000000 0            000000777777 


*031664 HRRZ 	0,034014
INITIAL
C(AC)=777777 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031664 031664 0   0   550000034014 0            0            
IT1	031664 0      0   0   550000034014 0            0            
AT3	031664 0      0   0   000000034014 0            550000034014 
AT6	031664 034014 0   0   000000034014 0            550000034014 
FT0	031664 034014 0   0   0            0            550000034014 
FT1A	031664 034014 0   0   0            0            0            
FT9	031665 034014 0   0   0            0            0            
ET0	031665 034014 0   0   0            0            0            
ST1	031665 034014 0   0   0            0            0            
ST2	031665 034014 0   0   0            0            0            
ST9	031665 034014 0   0   0            0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 173
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0363

*031665 CAIE	0,000000
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031665 031665 0   0   302000000000 0            0            
IT1	031665 0      0   0   302000000000 0            0            
AT3	031665 0      0   0   0            0            302000000000 
AT6	031665 0      0   0   0            0            302000000000 
FT1A	031665 0      0   0   0            0            0            
FT2	031665 0      0   0   0            0            0            
FT2RQ	031665 0      0   0   0            0            0            
FT3	031665 0      0   0   0            0            0            
FT9	031666 0      0   0   0            0            0            
ET0	031667 0      0   0   0            0            0            
ST1A	031667 0      0   0   0            0            0            
ST9	031667 0      0   0   0            0            0            


*031667 JUMPA	0,031670
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031667 031667 0   0   324000031670 0            000000031670 
IT1	031667 0      0   0   324000031670 0            000000031670 
AT3	031667 0      0   0   000000031670 0            324000031670 
AT6	031667 031670 0   0   000000031670 0            324000031670 
FT1A	031667 031670 0   0   000000031670 0            000000031670 
FT2	031667 031670 0   0   0            0            000000031670 
FT2RQ	031667 031670 0   0   0            0            000000031670 
FT3	031667 031670 0   0   0            0            000000031670 
FT9	031670 031670 0   0   0            0            000000031670 
ET0	031670 031670 0   0   0            0            000000031670 
ST1A	031670 031670 0   0   0            0            000000031670 
ST9	031670 031670 0   0   0            0            000000031670 


*031670 MOVEI	0,777777
INITIAL
C(AC)=000000 000000 
FINAL
C(AC)=000000 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031670 031670 0   0   201000777777 0            000000777777 
IT1	031670 0      0   0   201000777777 0            000000777777 
AT3	031670 0      0   0   000000777777 0            201000777777 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 174
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0364

AT6	031670 777777 0   0   000000777777 0            201000777777 
FT1A	031670 777777 0   0   000000777777 0            000000777777 
FT9	031671 777777 0   0   000000777777 0            000000777777 
ET0	031671 777777 0   0   000000777777 0            000000777777 
ST1	031671 777777 0   0   000000777777 0            000000777777 
ST2	031671 777777 0   0   000000777777 0            000000777777 
ST9	031671 777777 0   0   000000777777 0            000000777777 


*031671 HRRZ 	0,034013
INITIAL
C(AC)=000000 777777 
C(E)=777777 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031671 031671 0   0   550000034013 0            777777000000 
IT1	031671 0      0   0   550000034013 0            777777000000 
AT3	031671 0      0   0   000000034013 0            550000034013 
AT6	031671 034013 0   0   000000034013 0            550000034013 
FT0	031671 034013 0   0   777777000000 0            550000034013 
FT1A	031671 034013 0   0   777777000000 0            777777000000 
FT9	031672 034013 0   0   777777000000 0            777777000000 
ET0	031672 034013 0   0   0            0            777777000000 
ST1	031672 034013 0   0   0            0            777777000000 
ST2	031672 034013 0   0   0            0            777777000000 
ST9	031672 034013 0   0   0            0            777777000000 


*031672 SKIPE	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031672 031672 0   0   332000000000 0            0            
IT1	031672 0      0   0   332000000000 0            0            
AT3	031672 0      0   0   0            0            332000000000 
AT6	031672 0      0   0   0            0            332000000000 
FT0	031672 0      0   0   0            0            332000000000 
FT1A	031672 0      0   0   0            0            0            
FT9	031673 0      0   0   0            0            0            
ET0	031674 0      0   0   0            0            0            
ST1A	031674 0      0   0   0            0            0            
ST9	031674 0      0   0   0            0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 175
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0365

*031674 JUMPA	0,031675
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031674 031674 0   0   324000031675 0            000000031675 
IT1	031674 0      0   0   324000031675 0            000000031675 
AT3	031674 0      0   0   000000031675 0            324000031675 
AT6	031674 031675 0   0   000000031675 0            324000031675 
FT1A	031674 031675 0   0   000000031675 0            000000031675 
FT2	031674 031675 0   0   0            0            000000031675 
FT2RQ	031674 031675 0   0   0            0            000000031675 
FT3	031674 031675 0   0   0            0            000000031675 
FT9	031675 031675 0   0   0            0            000000031675 
ET0	031675 031675 0   0   0            0            000000031675 
ST1A	031675 031675 0   0   0            0            000000031675 
ST9	031675 031675 0   0   0            0            000000031675 


*031675 MOVSI	0,777777
INITIAL
C(AC)=000000 000000 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031675 031675 0   0   205000777777 0            000000777777 
IT1	031675 0      0   0   205000777777 0            000000777777 
AT3	031675 0      0   0   000000777777 0            205000777777 
AT6	031675 777777 0   0   000000777777 0            205000777777 
FT1A	031675 777777 0   0   000000777777 0            000000777777 
FT9	031676 777777 0   0   000000777777 0            000000777777 
ET0	031676 777777 0   0   777777000000 0            000000777777 
ST1	031676 777777 0   0   777777000000 0            000000777777 
ST2	031676 777777 0   0   777777000000 0            000000777777 
ST9	031676 777777 0   0   777777000000 0            000000777777 


*031676 HRRZ 	0,034015
INITIAL
C(AC)=777777 000000 
C(E)=000000 777777 
FINAL
C(AC)=000000 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031676 031676 0   0   550000034015 0            000000777777 
IT1	031676 0      0   0   550000034015 0            000000777777 
AT3	031676 0      0   0   000000034015 0            550000034015 
AT6	031676 034015 0   0   000000034015 0            550000034015 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 176
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0366

FT0	031676 034015 0   0   000000777777 0            550000034015 
FT1A	031676 034015 0   0   000000777777 0            000000777777 
FT9	031677 034015 0   0   000000777777 0            000000777777 
ET0	031677 034015 0   0   000000777777 0            000000777777 
ST1	031677 034015 0   0   000000777777 0            000000777777 
ST2	031677 034015 0   0   000000777777 0            000000777777 
ST9	031677 034015 0   0   000000777777 0            000000777777 


*031677 CAIE	0,777777
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031677 031677 0   0   302000777777 0            000000777777 
IT1	031677 0      0   0   302000777777 0            000000777777 
AT3	031677 0      0   0   000000777777 0            302000777777 
AT6	031677 777777 0   0   000000777777 0            302000777777 
FT1A	031677 777777 0   0   000000777777 0            000000777777 
FT2	031677 777777 0   0   0            0            000000777777 
FT2RQ	031677 777777 0   0   000000777777 0            000000777777 
FT3	031677 777777 0   0   000000777777 0            000000777777 
FT9	0      777777 0   0   000000777777 0            000000777777 
ET0	031701 777777 0   0   0            0            000000777777 
ST1A	031701 777777 0   0   0            0            000000777777 
ST9	031701 777777 0   0   0            0            000000777777 


*031701 JUMPA	0,031702
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031701 031701 0   0   324000031702 0            000000031702 
IT1	031701 0      0   0   324000031702 0            000000031702 
AT3	031701 0      0   0   000000031702 0            324000031702 
AT6	031701 031702 0   0   000000031702 0            324000031702 
FT1A	031701 031702 0   0   000000031702 0            000000031702 
FT2	031701 031702 0   0   0            0            000000031702 
FT2RQ	031701 031702 0   0   000000777777 0            000000031702 
FT3	031701 031702 0   0   000000777777 0            000000031702 
FT9	031702 031702 0   0   000000777777 0            000000031702 
ET0	031702 031702 0   0   000000777777 0            000000031702 
ST1A	031702 031702 0   0   000000777777 0            000000031702 
ST9	031702 031702 0   0   000000777777 0            000000031702 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 177
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0367

*031702 MOVEI	0,777777
INITIAL
C(AC)=000000 777777 
FINAL
C(AC)=000000 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031702 031702 0   0   201000777777 0            000000777777 
IT1	031702 0      0   0   201000777777 0            000000777777 
AT3	031702 0      0   0   000000777777 0            201000777777 
AT6	031702 777777 0   0   000000777777 0            201000777777 
FT1A	031702 777777 0   0   000000777777 0            000000777777 
FT9	031703 777777 0   0   000000777777 0            000000777777 
ET0	031703 777777 0   0   000000777777 0            000000777777 
ST1	031703 777777 0   0   000000777777 0            000000777777 
ST2	031703 777777 0   0   000000777777 0            000000777777 
ST9	031703 777777 0   0   000000777777 0            000000777777 


*031703 HRRZI	0,777777
INITIAL
C(AC)=000000 777777 
FINAL
C(AC)=000000 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031703 031703 0   0   551000777777 0            000000777777 
IT1	031703 0      0   0   551000777777 0            000000777777 
AT3	031703 0      0   0   000000777777 0            551000777777 
AT6	031703 777777 0   0   000000777777 0            551000777777 
FT1A	031703 777777 0   0   000000777777 0            000000777777 
FT9	031704 777777 0   0   000000777777 0            000000777777 
ET0	031704 777777 0   0   000000777777 0            000000777777 
ST1	031704 777777 0   0   000000777777 0            000000777777 
ST2	031704 777777 0   0   000000777777 0            000000777777 
ST9	031704 777777 0   0   000000777777 0            000000777777 


*031704 CAIE	0,777777
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031704 031704 0   0   302000777777 0            000000777777 
IT1	031704 0      0   0   302000777777 0            000000777777 
AT3	031704 0      0   0   000000777777 0            302000777777 
AT6	031704 777777 0   0   000000777777 0            302000777777 
FT1A	031704 777777 0   0   000000777777 0            000000777777 
FT2	031704 777777 0   0   0            0            000000777777 
FT2RQ	031704 777777 0   0   000000777777 0            000000777777 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 178
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0368

FT3	031704 777777 0   0   000000777777 0            000000777777 
FT9	031705 777777 0   0   000000777777 0            000000777777 
ET0	031706 777777 0   0   0            0            000000777777 
ST1A	031706 777777 0   0   0            0            000000777777 
ST9	031706 777777 0   0   0            0            000000777777 


*031706 JUMPA	0,031707
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031706 031706 0   0   324000031707 0            000000031707 
IT1	031706 0      0   0   324000031707 0            000000031707 
AT3	031706 0      0   0   000000031707 0            324000031707 
AT6	031706 031707 0   0   000000031707 0            324000031707 
FT1A	031706 031707 0   0   000000031707 0            000000031707 
FT2	031706 031707 0   0   0            0            000000031707 
FT2RQ	031706 031707 0   0   000000777777 0            000000031707 
FT3	031706 031707 0   0   000000777777 0            000000031707 
FT9	031707 031707 0   0   000000777777 0            000000031707 
ET0	031707 031707 0   0   000000777777 0            000000031707 
ST1A	031707 031707 0   0   000000777777 0            000000031707 
ST9	031707 031707 0   0   000000777777 0            000000031707 


*031707 MOVSI	0,777777
INITIAL
C(AC)=000000 777777 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031707 031707 0   0   205000777777 0            000000777777 
IT1	031707 0      0   0   205000777777 0            000000777777 
AT3	031707 0      0   0   000000777777 0            205000777777 
AT6	031707 777777 0   0   000000777777 0            205000777777 
FT1A	031707 777777 0   0   000000777777 0            000000777777 
FT9	031710 777777 0   0   000000777777 0            000000777777 
ET0	031710 777777 0   0   777777000000 0            000000777777 
ST1	031710 777777 0   0   777777000000 0            000000777777 
ST2	031710 777777 0   0   777777000000 0            000000777777 
ST9	031710 777777 0   0   777777000000 0            000000777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 179
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0369

*031710 HRRZ 	0,034013
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031710 031710 0   0   550000034013 0            777777000000 
IT1	031710 0      0   0   550000034013 0            777777000000 
AT3	031710 0      0   0   000000034013 0            550000034013 
AT6	031710 034013 0   0   000000034013 0            550000034013 
FT0	031710 034013 0   0   777777000000 0            550000034013 
FT1A	031710 034013 0   0   777777000000 0            777777000000 
FT9	031711 034013 0   0   777777000000 0            777777000000 
ET0	031711 034013 0   0   0            0            777777000000 
ST1	031711 034013 0   0   0            0            777777000000 
ST2	031711 034013 0   0   0            0            777777000000 
ST9	031711 034013 0   0   0            0            777777000000 


*031711 CAIE	0,000000
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031711 031711 0   0   302000000000 0            0            
IT1	031711 0      0   0   302000000000 0            0            
AT3	031711 0      0   0   0            0            302000000000 
AT6	031711 0      0   0   0            0            302000000000 
FT1A	031711 0      0   0   0            0            0            
FT2	031711 0      0   0   0            0            0            
FT2RQ	031711 0      0   0   0            0            0            
FT3	031711 0      0   0   0            0            0            
FT9	031712 0      0   0   0            0            0            
ET0	031713 0      0   0   0            0            0            
ST1A	031713 0      0   0   0            0            0            
ST9	031713 0      0   0   0            0            0            


*031713 JUMPA	0,031714
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031713 031713 0   0   324000031714 0            000000031714 
IT1	031713 0      0   0   324000031714 0            000000031714 
AT3	031713 0      0   0   000000031714 0            324000031714 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 180
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0370

AT6	031713 031714 0   0   000000031714 0            324000031714 
FT1A	031713 031714 0   0   000000031714 0            000000031714 
FT2	031713 031714 0   0   0            0            000000031714 
FT2RQ	031713 031714 0   0   0            0            000000031714 
FT3	031713 031714 0   0   0            0            000000031714 
FT9	031714 031714 0   0   0            0            000000031714 
ET0	031714 031714 0   0   0            0            000000031714 
ST1A	031714 031714 0   0   0            0            000000031714 
ST9	031714 031714 0   0   0            0            000000031714 


*031714 SETZ 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031714 031714 0   0   400000000000 0            0            
IT1	031714 0      0   0   400000000000 0            0            
AT3	031714 0      0   0   0            0            400000000000 
AT6	031714 0      0   0   0            0            400000000000 
FT1A	031714 0      0   0   0            0            0            
FT9	031715 0      0   0   0            0            0            
ET0	031715 0      0   0   0            0            0            
ST1	031715 0      0   0   0            0            0            
ST2	031715 0      0   0   0            0            0            
ST9	031715 0      0   0   0            0            0            


*031715 HRL 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031715 031715 0   0   504000000000 0            0            
IT1	031715 0      0   0   504000000000 0            0            
AT3	031715 0      0   0   0            0            504000000000 
AT6	031715 0      0   0   0            0            504000000000 
FT0	031715 0      0   0   0            0            504000000000 
FT1A	031715 0      0   0   0            0            0            
FT2	031715 0      0   0   0            0            0            
FT2RQ	031715 0      0   0   0            0            0            
FT3	031715 0      0   0   0            0            0            
FT9	031716 0      0   0   0            0            0            
ET0	031716 0      0   0   0            0            0            
ET1	031716 0      0   0   0            0            0            
ST1	031716 0      0   0   0            0            0            
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 181
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0371

ST2	031716 0      0   0   0            0            0            
ST9	031716 0      0   0   0            0            0            


*031716 SKIPE	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031716 031716 0   0   332000000000 0            0            
IT1	031716 0      0   0   332000000000 0            0            
AT3	031716 0      0   0   0            0            332000000000 
AT6	031716 0      0   0   0            0            332000000000 
FT0	031716 0      0   0   0            0            332000000000 
FT1A	031716 0      0   0   0            0            0            
FT9	031717 0      0   0   0            0            0            
ET0	031720 0      0   0   0            0            0            
ST1A	031720 0      0   0   0            0            0            
ST9	031720 0      0   0   0            0            0            


*031720 JUMPA	0,031721
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031720 031720 0   0   324000031721 0            000000031721 
IT1	031720 0      0   0   324000031721 0            000000031721 
AT3	031720 0      0   0   000000031721 0            324000031721 
AT6	031720 031721 0   0   000000031721 0            324000031721 
FT1A	031720 031721 0   0   000000031721 0            000000031721 
FT2	031720 031721 0   0   0            0            000000031721 
FT2RQ	031720 031721 0   0   0            0            000000031721 
FT3	031720 031721 0   0   0            0            000000031721 
FT9	031721 031721 0   0   0            0            000000031721 
ET0	031721 031721 0   0   0            0            000000031721 
ST1A	031721 031721 0   0   0            0            000000031721 
ST9	031721 031721 0   0   0            0            000000031721 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 182
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0372

*031721 SETO 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031721 031721 0   0   474000000000 0            0            
IT1	031721 0      0   0   474000000000 0            0            
AT3	031721 0      0   0   0            0            474000000000 
AT6	031721 0      0   0   0            0            474000000000 
FT1A	031721 0      0   0   0            0            0            
FT9	031722 0      0   0   0            0            0            
ET0	031722 0      0   0   777777777777 0            0            
ST1	031722 0      0   0   777777777777 0            0            
ST2	031722 0      0   0   777777777777 0            0            
ST9	031722 0      0   0   777777777777 0            0            


*031722 HRL 	0,034012
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031722 031722 0   0   504000034012 0            777777777777 
IT1	031722 0      0   0   504000034012 0            777777777777 
AT3	031722 0      0   0   000000034012 0            504000034012 
AT6	031722 034012 0   0   000000034012 0            504000034012 
FT0	031722 034012 0   0   777777777777 0            504000034012 
FT1A	031722 034012 0   0   777777777777 0            777777777777 
FT2	031722 034012 0   0   0            0            777777777777 
FT2RQ	031722 034012 0   0   777777777777 0            777777777777 
FT3	031722 034012 0   0   777777777777 0            777777777777 
FT9	031723 034012 0   0   777777777777 0            777777777777 
ET0	031723 034012 0   0   777777777777 0            777777777777 
ET1	031723 034012 0   0   777777777777 0            777777777777 
ST1	031723 034012 0   0   777777777777 0            777777777777 
ST2	031723 034012 0   0   777777777777 0            777777777777 
ST9	031723 034012 0   0   777777777777 0            777777777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 183
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0373

*031723 CAME	0,034012
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031723 031723 0   0   312000034012 0            777777777777 
IT1	031723 0      0   0   312000034012 0            777777777777 
AT3	031723 0      0   0   000000034012 0            312000034012 
AT6	031723 034012 0   0   000000034012 0            312000034012 
FT0	031723 034012 0   0   777777777777 0            312000034012 
FT1A	031723 034012 0   0   777777777777 0            777777777777 
FT2	031723 034012 0   0   0            0            777777777777 
FT2RQ	031723 034012 0   0   777777777777 0            777777777777 
FT3	031723 034012 0   0   777777777777 0            777777777777 
FT9	031724 034012 0   0   777777777777 0            777777777777 
ET0	031725 034012 0   0   0            0            777777777777 
ST1A	031725 034012 0   0   0            0            777777777777 
ST9	031725 034012 0   0   0            0            777777777777 


*031725 JUMPA	0,031726
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031725 031725 0   0   324000031726 0            000000031726 
IT1	031725 0      0   0   324000031726 0            000000031726 
AT3	031725 0      0   0   000000031726 0            324000031726 
AT6	031725 031726 0   0   000000031726 0            324000031726 
FT1A	031725 031726 0   0   000000031726 0            000000031726 
FT2	031725 031726 0   0   0            0            000000031726 
FT2RQ	031725 031726 0   0   777777777777 0            000000031726 
FT3	031725 031726 0   0   777777777777 0            000000031726 
FT9	031726 031726 0   0   777777777777 0            000000031726 
ET0	031726 031726 0   0   777777777777 0            000000031726 
ST1A	031726 031726 0   0   777777777777 0            000000031726 
ST9	031726 031726 0   0   777777777777 0            000000031726 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 184
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0374

*031726 SETO 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031726 031726 0   0   474000000000 0            0            
IT1	031726 0      0   0   474000000000 0            0            
AT3	031726 0      0   0   0            0            474000000000 
AT6	031726 0      0   0   0            0            474000000000 
FT1A	031726 0      0   0   0            0            0            
FT9	031727 0      0   0   0            0            0            
ET0	031727 0      0   0   777777777777 0            0            
ST1	031727 0      0   0   777777777777 0            0            
ST2	031727 0      0   0   777777777777 0            0            
ST9	031727 0      0   0   777777777777 0            0            


*031727 HRL 	0,034014
INITIAL
C(AC)=777777 777777 
C(E)=000000 000000 
FINAL
C(AC)=000000 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031727 031727 0   0   504000034014 0            777777777777 
IT1	031727 0      0   0   504000034014 0            777777777777 
AT3	031727 0      0   0   000000034014 0            504000034014 
AT6	031727 034014 0   0   000000034014 0            504000034014 
FT0	031727 034014 0   0   0            0            504000034014 
FT1A	031727 034014 0   0   0            0            0            
FT2	031727 034014 0   0   0            0            0            
FT2RQ	031727 034014 0   0   777777777777 0            0            
FT3	031727 034014 0   0   777777777777 0            0            
FT9	031730 034014 0   0   777777777777 0            0            
ET0	031730 034014 0   0   0            0            777777777777 
ET1	031730 034014 0   0   000000777777 0            777777777777 
ST1	031730 034014 0   0   000000777777 0            777777777777 
ST2	031730 034014 0   0   000000777777 0            777777777777 
ST9	031730 034014 0   0   000000777777 0            777777777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 185
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0375

*031730 CAIE	0,777777
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031730 031730 0   0   302000777777 0            000000777777 
IT1	031730 0      0   0   302000777777 0            000000777777 
AT3	031730 0      0   0   000000777777 0            302000777777 
AT6	031730 777777 0   0   000000777777 0            302000777777 
FT1A	031730 777777 0   0   000000777777 0            000000777777 
FT2	031730 777777 0   0   0            0            000000777777 
FT2RQ	031730 777777 0   0   000000777777 0            000000777777 
FT3	031730 777777 0   0   000000777777 0            000000777777 
FT9	031731 777777 0   0   000000777777 0            000000777777 
ET0	031732 777777 0   0   0            0            000000777777 
ST1A	031732 777777 0   0   0            0            000000777777 
ST9	031732 777777 0   0   0            0            000000777777 


*031732 JUMPA	0,031733
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031732 031732 0   0   324000031733 0            000000031733 
IT1	031732 0      0   0   324000031733 0            000000031733 
AT3	031732 0      0   0   000000031733 0            324000031733 
AT6	031732 031733 0   0   000000031733 0            324000031733 
FT1A	031732 031733 0   0   000000031733 0            000000031733 
FT2	031732 031733 0   0   0            0            000000031733 
FT2RQ	031732 031733 0   0   000000777777 0            000000031733 
FT3	031732 031733 0   0   000000777777 0            000000031733 
FT9	031733 031733 0   0   000000777777 0            000000031733 
ET0	031733 031733 0   0   000000777777 0            000000031733 
ST1A	031733 031733 0   0   000000777777 0            000000031733 
ST9	031733 031733 0   0   000000777777 0            000000031733 


*031733 SETO 	0,000000
INITIAL
C(AC)=000000 777777 
C(E)=000000 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031733 031733 0   0   474000000000 0            0            
IT1	031733 0      0   0   474000000000 0            0            
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 186
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0376

AT3	031733 0      0   0   0            0            474000000000 
AT6	031733 0      0   0   0            0            474000000000 
FT1A	031733 0      0   0   0            0            0            
FT9	031734 0      0   0   0            0            0            
ET0	031734 0      0   0   777777777777 0            0            
ST1	031734 0      0   0   777777777777 0            0            
ST2	031734 0      0   0   777777777777 0            0            
ST9	031734 0      0   0   777777777777 0            0            


*031734 HLR 	0,034014
INITIAL
C(AC)=777777 777777 
C(E)=000000 000000 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031734 031734 0   0   544000034014 0            777777777777 
IT1	031734 0      0   0   544000034014 0            777777777777 
AT3	031734 0      0   0   000000034014 0            544000034014 
AT6	031734 034014 0   0   000000034014 0            544000034014 
FT0	031734 034014 0   0   0            0            544000034014 
FT1A	031734 034014 0   0   0            0            0            
FT2	031734 034014 0   0   0            0            0            
FT2RQ	031734 034014 0   0   777777777777 0            0            
FT3	031734 034014 0   0   777777777777 0            0            
FT9	031735 034014 0   0   777777777777 0            0            
ET0	031735 034014 0   0   0            0            777777777777 
ET1	031735 034014 0   0   777777000000 0            777777777777 
ST1	031735 034014 0   0   777777000000 0            777777777777 
ST2	031735 034014 0   0   777777000000 0            777777777777 
ST9	031735 034014 0   0   777777000000 0            777777777777 


*031735 CAME	0,034013
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031735 031735 0   0   312000034013 0            777777000000 
IT1	031735 0      0   0   312000034013 0            777777000000 
AT3	031735 0      0   0   000000034013 0            312000034013 
AT6	031735 034013 0   0   000000034013 0            312000034013 
FT0	031735 034013 0   0   777777000000 0            312000034013 
FT1A	031735 034013 0   0   777777000000 0            777777000000 
FT2	031735 034013 0   0   0            0            777777000000 
FT2RQ	031735 034013 0   0   777777000000 0            777777000000 
FT3	031735 034013 0   0   777777000000 0            777777000000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 187
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0377

FT9	031736 034013 0   0   777777000000 0            777777000000 
ET0	031737 034013 0   0   0            0            777777000000 
ST1A	031737 034013 0   0   0            0            777777000000 
ST9	031737 034013 0   0   0            0            777777000000 


*031737 JUMPA	0,031740
INITIAL
C(AC)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031737 031737 0   0   324000031740 0            000000031740 
IT1	031737 0      0   0   324000031740 0            000000031740 
AT3	031737 0      0   0   000000031740 0            324000031740 
AT6	031737 031740 0   0   000000031740 0            324000031740 
FT1A	031737 031740 0   0   000000031740 0            000000031740 
FT2	031737 031740 0   0   0            0            000000031740 
FT2RQ	031737 031740 0   0   777777000000 0            000000031740 
FT3	031737 031740 0   0   777777000000 0            000000031740 
FT9	031740 031740 0   0   777777000000 0            000000031740 
ET0	031740 031740 0   0   777777000000 0            000000031740 
ST1A	031740 031740 0   0   777777000000 0            000000031740 
ST9	031740 031740 0   0   777777000000 0            000000031740 


*031740 SETZ 	0,000000
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031740 031740 0   0   400000000000 0            0            
IT1	031740 0      0   0   400000000000 0            0            
AT3	031740 0      0   0   0            0            400000000000 
AT6	031740 0      0   0   0            0            400000000000 
FT1A	031740 0      0   0   0            0            0            
FT9	031741 0      0   0   0            0            0            
ET0	031741 0      0   0   0            0            0            
ST1	031741 0      0   0   0            0            0            
ST2	031741 0      0   0   0            0            0            
ST9	031741 0      0   0   0            0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 188
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0378

*031741 HRL 	0,034012
INITIAL
C(AC)=000000 000000 
C(E)=777777 777777 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031741 031741 0   0   504000034012 0            0            
IT1	031741 0      0   0   504000034012 0            0            
AT3	031741 0      0   0   000000034012 0            504000034012 
AT6	031741 034012 0   0   000000034012 0            504000034012 
FT0	031741 034012 0   0   777777777777 0            504000034012 
FT1A	031741 034012 0   0   777777777777 0            777777777777 
FT2	031741 034012 0   0   0            0            777777777777 
FT2RQ	031741 034012 0   0   0            0            777777777777 
FT3	031741 034012 0   0   0            0            777777777777 
FT9	031742 034012 0   0   0            0            777777777777 
ET0	031742 034012 0   0   777777777777 0            0            
ET1	031742 034012 0   0   777777000000 0            0            
ST1	031742 034012 0   0   777777000000 0            0            
ST2	031742 034012 0   0   777777000000 0            0            
ST9	031742 034012 0   0   777777000000 0            0            


*031742 CAME	0,034013
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031742 031742 0   0   312000034013 0            777777000000 
IT1	031742 0      0   0   312000034013 0            777777000000 
AT3	031742 0      0   0   000000034013 0            312000034013 
AT6	031742 034013 0   0   000000034013 0            312000034013 
FT0	031742 034013 0   0   777777000000 0            312000034013 
FT1A	031742 034013 0   0   777777000000 0            777777000000 
FT2	031742 034013 0   0   0            0            777777000000 
FT2RQ	031742 034013 0   0   777777000000 0            777777000000 
FT3	031742 034013 0   0   777777000000 0            777777000000 
FT9	031743 034013 0   0   777777000000 0            777777000000 
ET0	031744 034013 0   0   0            0            777777000000 
ST1A	031744 034013 0   0   0            0            777777000000 
ST9	031744 034013 0   0   0            0            777777000000 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 189
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0379

*031744 JUMPA	0,031745
INITIAL
C(AC)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031744 031744 0   0   324000031745 0            000000031745 
IT1	031744 0      0   0   324000031745 0            000000031745 
AT3	031744 0      0   0   000000031745 0            324000031745 
AT6	031744 031745 0   0   000000031745 0            324000031745 
FT1A	031744 031745 0   0   000000031745 0            000000031745 
FT2	031744 031745 0   0   0            0            000000031745 
FT2RQ	031744 031745 0   0   777777000000 0            000000031745 
FT3	031744 031745 0   0   777777000000 0            000000031745 
FT9	031745 031745 0   0   777777000000 0            000000031745 
ET0	031745 031745 0   0   777777000000 0            000000031745 
ST1A	031745 031745 0   0   777777000000 0            000000031745 
ST9	031745 031745 0   0   777777000000 0            000000031745 


*031745 SETZ 	0,000000
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031745 031745 0   0   400000000000 0            0            
IT1	031745 0      0   0   400000000000 0            0            
AT3	031745 0      0   0   0            0            400000000000 
AT6	031745 0      0   0   0            0            400000000000 
FT1A	031745 0      0   0   0            0            0            
FT9	031746 0      0   0   0            0            0            
ET0	031746 0      0   0   0            0            0            
ST1	031746 0      0   0   0            0            0            
ST2	031746 0      0   0   0            0            0            
ST9	031746 0      0   0   0            0            0            


*031746 HLR 	0,034012
INITIAL
C(AC)=000000 000000 
C(E)=777777 777777 
FINAL
C(AC)=000000 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031746 031746 0   0   544000034012 0            0            
IT1	031746 0      0   0   544000034012 0            0            
AT3	031746 0      0   0   000000034012 0            544000034012 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 190
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0380

AT6	031746 034012 0   0   000000034012 0            544000034012 
FT0	031746 034012 0   0   777777777777 0            544000034012 
FT1A	031746 034012 0   0   777777777777 0            777777777777 
FT2	031746 034012 0   0   0            0            777777777777 
FT2RQ	031746 034012 0   0   0            0            777777777777 
FT3	031746 034012 0   0   0            0            777777777777 
FT9	031747 034012 0   0   0            0            777777777777 
ET0	031747 034012 0   0   777777777777 0            0            
ET1	031747 034012 0   0   000000777777 0            0            
ST1	031747 034012 0   0   000000777777 0            0            
ST2	031747 034012 0   0   000000777777 0            0            
ST9	031747 034012 0   0   000000777777 0            0            


*031747 CAIE	0,777777
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031747 031747 0   0   302000777777 0            000000777777 
IT1	031747 0      0   0   302000777777 0            000000777777 
AT3	031747 0      0   0   000000777777 0            302000777777 
AT6	031747 777777 0   0   000000777777 0            302000777777 
FT1A	031747 777777 0   0   000000777777 0            000000777777 
FT2	031747 777777 0   0   0            0            000000777777 
FT2RQ	031747 777777 0   0   000000777777 0            000000777777 
FT3	031747 777777 0   0   000000777777 0            000000777777 
FT9	031750 777777 0   0   000000777777 0            000000777777 
ET0	031751 777777 0   0   0            0            000000777777 
ST1A	031751 777777 0   0   0            0            000000777777 
ST9	031751 777777 0   0   0            0            000000777777 


*031751 JUMPA	0,031752
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031751 031751 0   0   324000031752 0            000000031752 
IT1	031751 0      0   0   324000031752 0            000000031752 
AT3	031751 0      0   0   000000031752 0            324000031752 
AT6	031751 031752 0   0   000000031752 0            324000031752 
FT1A	031751 031752 0   0   000000031752 0            000000031752 
FT2	031751 031752 0   0   0            0            000000031752 
FT2RQ	031751 031752 0   0   000000777777 0            000000031752 
FT3	031751 031752 0   0   000000777777 0            000000031752 
FT9	031752 031752 0   0   000000777777 0            000000031752 
ET0	031752 031752 0   0   000000777777 0            000000031752 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 191
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0381

ST1A	031752 031752 0   0   000000777777 0            000000031752 
ST9	031752 031752 0   0   000000777777 0            000000031752 


*031752 SETZ 	0,000000
INITIAL
C(AC)=000000 777777 
C(E)=000000 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031752 031752 0   0   400000000000 0            0            
IT1	031752 0      0   0   400000000000 0            0            
AT3	031752 0      0   0   0            0            400000000000 
AT6	031752 0      0   0   0            0            400000000000 
FT1A	031752 0      0   0   0            0            0            
FT9	031753 0      0   0   0            0            0            
ET0	031753 0      0   0   0            0            0            
ST1	031753 0      0   0   0            0            0            
ST2	031753 0      0   0   0            0            0            
ST9	031753 0      0   0   0            0            0            


*031753 HRLI	0,777777
INITIAL
C(AC)=000000 000000 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031753 031753 0   0   505000777777 0            0            
IT1	031753 0      0   0   505000777777 0            0            
AT3	031753 0      0   0   000000777777 0            505000777777 
AT6	031753 777777 0   0   000000777777 0            505000777777 
FT1A	031753 777777 0   0   000000777777 0            000000777777 
FT2	031753 777777 0   0   0            0            000000777777 
FT2RQ	031753 777777 0   0   0            0            000000777777 
FT3	031753 777777 0   0   0            0            000000777777 
FT9	031754 777777 0   0   0            0            000000777777 
ET0	031754 777777 0   0   000000777777 0            0            
ET1	031754 777777 0   0   777777000000 0            0            
ST1	031754 777777 0   0   777777000000 0            0            
ST2	031754 777777 0   0   777777000000 0            0            
ST9	031754 777777 0   0   777777000000 0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 192
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0382

*031754 CAME	0,034013
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031754 031754 0   0   312000034013 0            777777000000 
IT1	031754 0      0   0   312000034013 0            777777000000 
AT3	031754 0      0   0   000000034013 0            312000034013 
AT6	031754 034013 0   0   000000034013 0            312000034013 
FT0	031754 034013 0   0   777777000000 0            312000034013 
FT1A	031754 034013 0   0   777777000000 0            777777000000 
FT2	031754 034013 0   0   0            0            777777000000 
FT2RQ	031754 034013 0   0   777777000000 0            777777000000 
FT3	031754 034013 0   0   777777000000 0            777777000000 
FT9	031755 034013 0   0   777777000000 0            777777000000 
ET0	031756 034013 0   0   0            0            777777000000 
ST1A	031756 034013 0   0   0            0            777777000000 
ST9	031756 034013 0   0   0            0            777777000000 


*031756 JUMPA	0,031757
INITIAL
C(AC)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031756 031756 0   0   324000031757 0            000000031757 
IT1	031756 0      0   0   324000031757 0            000000031757 
AT3	031756 0      0   0   000000031757 0            324000031757 
AT6	031756 031757 0   0   000000031757 0            324000031757 
FT1A	031756 031757 0   0   000000031757 0            000000031757 
FT2	031756 031757 0   0   0            0            000000031757 
FT2RQ	031756 031757 0   0   777777000000 0            000000031757 
FT3	031756 031757 0   0   777777000000 0            000000031757 
FT9	031757 031757 0   0   777777000000 0            000000031757 
ET0	031757 031757 0   0   777777000000 0            000000031757 
ST1A	031757 031757 0   0   777777000000 0            000000031757 
ST9	031757 031757 0   0   777777000000 0            000000031757 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 193
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0383

*031757 SETZ 	0,000000
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031757 031757 0   0   400000000000 0            0            
IT1	031757 0      0   0   400000000000 0            0            
AT3	031757 0      0   0   0            0            400000000000 
AT6	031757 0      0   0   0            0            400000000000 
FT1A	031757 0      0   0   0            0            0            
FT9	031760 0      0   0   0            0            0            
ET0	031760 0      0   0   0            0            0            
ST1	031760 0      0   0   0            0            0            
ST2	031760 0      0   0   0            0            0            
ST9	031760 0      0   0   0            0            0            


*031760 HLR 	0,034013
INITIAL
C(AC)=000000 000000 
C(E)=777777 000000 
FINAL
C(AC)=000000 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031760 031760 0   0   544000034013 0            0            
IT1	031760 0      0   0   544000034013 0            0            
AT3	031760 0      0   0   000000034013 0            544000034013 
AT6	031760 034013 0   0   000000034013 0            544000034013 
FT0	031760 034013 0   0   777777000000 0            544000034013 
FT1A	031760 034013 0   0   777777000000 0            777777000000 
FT2	031760 034013 0   0   0            0            777777000000 
FT2RQ	031760 034013 0   0   0            0            777777000000 
FT3	031760 034013 0   0   0            0            777777000000 
FT9	031761 034013 0   0   0            0            777777000000 
ET0	031761 034013 0   0   777777000000 0            0            
ET1	031761 034013 0   0   000000777777 0            0            
ST1	031761 034013 0   0   000000777777 0            0            
ST2	031761 034013 0   0   000000777777 0            0            
ST9	031761 034013 0   0   000000777777 0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 194
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0384

*031761 CAIE	0,777777
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031761 031761 0   0   302000777777 0            000000777777 
IT1	031761 0      0   0   302000777777 0            000000777777 
AT3	031761 0      0   0   000000777777 0            302000777777 
AT6	031761 777777 0   0   000000777777 0            302000777777 
FT1A	031761 777777 0   0   000000777777 0            000000777777 
FT2	031761 777777 0   0   0            0            000000777777 
FT2RQ	031761 777777 0   0   000000777777 0            000000777777 
FT3	031761 777777 0   0   000000777777 0            000000777777 
FT9	031762 777777 0   0   000000777777 0            000000777777 
ET0	031763 777777 0   0   0            0            000000777777 
ST1A	031763 777777 0   0   0            0            000000777777 
ST9	031763 777777 0   0   0            0            000000777777 


*031763 JUMPA	0,031764
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031763 031763 0   0   324000031764 0            000000031764 
IT1	031763 0      0   0   324000031764 0            000000031764 
AT3	031763 0      0   0   000000031764 0            324000031764 
AT6	031763 031764 0   0   000000031764 0            324000031764 
FT1A	031763 031764 0   0   000000031764 0            000000031764 
FT2	031763 031764 0   0   0            0            000000031764 
FT2RQ	031763 031764 0   0   000000777777 0            000000031764 
FT3	031763 031764 0   0   000000777777 0            000000031764 
FT9	031764 031764 0   0   000000777777 0            000000031764 
ET0	031764 031764 0   0   000000777777 0            000000031764 
ST1A	031764 031764 0   0   000000777777 0            000000031764 
ST9	031764 031764 0   0   000000777777 0            000000031764 


*031764 SETZ 	0,000000
INITIAL
C(AC)=000000 777777 
C(E)=000000 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031764 031764 0   0   400000000000 0            0            
IT1	031764 0      0   0   400000000000 0            0            
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 195
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0385

AT3	031764 0      0   0   0            0            400000000000 
AT6	031764 0      0   0   0            0            400000000000 
FT1A	031764 0      0   0   0            0            0            
FT9	031765 0      0   0   0            0            0            
ET0	031765 0      0   0   0            0            0            
ST1	031765 0      0   0   0            0            0            
ST2	031765 0      0   0   0            0            0            
ST9	031765 0      0   0   0            0            0            


*031765 HRL 	0,034013
INITIAL
C(AC)=000000 000000 
C(E)=777777 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031765 031765 0   0   504000034013 0            0            
IT1	031765 0      0   0   504000034013 0            0            
AT3	031765 0      0   0   000000034013 0            504000034013 
AT6	031765 034013 0   0   000000034013 0            504000034013 
FT0	031765 034013 0   0   777777000000 0            504000034013 
FT1A	031765 034013 0   0   777777000000 0            777777000000 
FT2	031765 034013 0   0   0            0            777777000000 
FT2RQ	031765 034013 0   0   0            0            777777000000 
FT3	031765 034013 0   0   0            0            777777000000 
FT9	031766 034013 0   0   0            0            777777000000 
ET0	031766 034013 0   0   777777000000 0            0            
ET1	031766 034013 0   0   0            0            0            
ST1	031766 034013 0   0   0            0            0            
ST2	031766 034013 0   0   0            0            0            
ST9	031766 034013 0   0   0            0            0            


*031766 SKIPE	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031766 031766 0   0   332000000000 0            0            
IT1	031766 0      0   0   332000000000 0            0            
AT3	031766 0      0   0   0            0            332000000000 
AT6	031766 0      0   0   0            0            332000000000 
FT0	031766 0      0   0   0            0            332000000000 
FT1A	031766 0      0   0   0            0            0            
FT9	031767 0      0   0   0            0            0            
ET0	031770 0      0   0   0            0            0            
ST1A	031770 0      0   0   0            0            0            
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 196
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0386

ST9	031770 0      0   0   0            0            0            


*031770 JUMPA	0,031771
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031770 031770 0   0   324000031771 0            000000031771 
IT1	031770 0      0   0   324000031771 0            000000031771 
AT3	031770 0      0   0   000000031771 0            324000031771 
AT6	031770 031771 0   0   000000031771 0            324000031771 
FT1A	031770 031771 0   0   000000031771 0            000000031771 
FT2	031770 031771 0   0   0            0            000000031771 
FT2RQ	031770 031771 0   0   0            0            000000031771 
FT3	031770 031771 0   0   0            0            000000031771 
FT9	031771 031771 0   0   0            0            000000031771 
ET0	031771 031771 0   0   0            0            000000031771 
ST1A	031771 031771 0   0   0            0            000000031771 
ST9	031771 031771 0   0   0            0            000000031771 


*031771 SETZ 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031771 031771 0   0   400000000000 0            0            
IT1	031771 0      0   0   400000000000 0            0            
AT3	031771 0      0   0   0            0            400000000000 
AT6	031771 0      0   0   0            0            400000000000 
FT1A	031771 0      0   0   0            0            0            
FT9	031772 0      0   0   0            0            0            
ET0	031772 0      0   0   0            0            0            
ST1	031772 0      0   0   0            0            0            
ST2	031772 0      0   0   0            0            0            
ST9	031772 0      0   0   0            0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 197
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0387

*031772 HLRI	0,777777
INITIAL
C(AC)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031772 031772 0   0   545000777777 0            0            
IT1	031772 0      0   0   545000777777 0            0            
AT3	031772 0      0   0   000000777777 0            545000777777 
AT6	031772 777777 0   0   000000777777 0            545000777777 
FT1A	031772 777777 0   0   000000777777 0            000000777777 
FT2	031772 777777 0   0   0            0            000000777777 
FT2RQ	031772 777777 0   0   0            0            000000777777 
FT3	031772 777777 0   0   0            0            000000777777 
FT9	031773 777777 0   0   0            0            000000777777 
ET0	031773 777777 0   0   000000777777 0            0            
ET1	031773 777777 0   0   0            0            0            
ST1	031773 777777 0   0   0            0            0            
ST2	031773 777777 0   0   0            0            0            
ST9	031773 777777 0   0   0            0            0            


*031773 SKIPE	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031773 031773 0   0   332000000000 0            0            
IT1	031773 0      0   0   332000000000 0            0            
AT3	031773 0      0   0   0            0            332000000000 
AT6	031773 0      0   0   0            0            332000000000 
FT0	031773 0      0   0   0            0            332000000000 
FT1A	031773 0      0   0   0            0            0            
FT9	031774 0      0   0   0            0            0            
ET0	031775 0      0   0   0            0            0            
ST1A	031775 0      0   0   0            0            0            
ST9	031775 0      0   0   0            0            0            


*031775 JUMPA	0,031776
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031775 031775 0   0   324000031776 0            000000031776 
IT1	031775 0      0   0   324000031776 0            000000031776 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 198
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0388

AT3	031775 0      0   0   000000031776 0            324000031776 
AT6	031775 031776 0   0   000000031776 0            324000031776 
FT1A	031775 031776 0   0   000000031776 0            000000031776 
FT2	031775 031776 0   0   0            0            000000031776 
FT2RQ	031775 031776 0   0   0            0            000000031776 
FT3	031775 031776 0   0   0            0            000000031776 
FT9	031776 031776 0   0   0            0            000000031776 
ET0	031776 031776 0   0   0            0            000000031776 
ST1A	031776 031776 0   0   0            0            000000031776 
ST9	031776 031776 0   0   0            0            000000031776 


*031776 SETO 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031776 031776 0   0   474000000000 0            0            
IT1	031776 0      0   0   474000000000 0            0            
AT3	031776 0      0   0   0            0            474000000000 
AT6	031776 0      0   0   0            0            474000000000 
FT1A	031776 0      0   0   0            0            0            
FT9	031777 0      0   0   0            0            0            
ET0	031777 0      0   0   777777777777 0            0            
ST1	031777 0      0   0   777777777777 0            0            
ST2	031777 0      0   0   777777777777 0            0            
ST9	031777 0      0   0   777777777777 0            0            


*031777 HRLI	0,777777
INITIAL
C(AC)=777777 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	031777 031777 0   0   505000777777 0            777777777777 
IT1	031777 0      0   0   505000777777 0            777777777777 
AT3	031777 0      0   0   000000777777 0            505000777777 
AT6	031777 777777 0   0   000000777777 0            505000777777 
FT1A	031777 777777 0   0   000000777777 0            000000777777 
FT2	031777 777777 0   0   0            0            000000777777 
FT2RQ	031777 777777 0   0   777777777777 0            000000777777 
FT3	031777 777777 0   0   777777777777 0            000000777777 
FT9	0      777777 0   0   777777777777 0            000000777777 
ET0	0      777777 0   0   000000777777 0            777777777777 
ET1	0      777777 0   0   777777777777 0            777777777777 
ST1	0      777777 0   0   777777777777 0            777777777777 
ST2	0      777777 0   0   777777777777 0            777777777777 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 199
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0389

ST9	0      777777 0   0   777777777777 0            777777777777 


*032000 CAME	0,034012
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	0      0      0   0   312000034012 0            777777777777 
IT1	0      0      0   0   312000034012 0            777777777777 
AT3	0      0      0   0   000000034012 0            312000034012 
AT6	0      034012 0   0   000000034012 0            312000034012 
FT0	0      034012 0   0   777777777777 0            312000034012 
FT1A	0      034012 0   0   777777777777 0            777777777777 
FT2	0      034012 0   0   0            0            777777777777 
FT2RQ	0      034012 0   0   777777777777 0            777777777777 
FT3	0      034012 0   0   777777777777 0            777777777777 
FT9	032001 034012 0   0   777777777777 0            777777777777 
ET0	032002 034012 0   0   0            0            777777777777 
ST1A	032002 034012 0   0   0            0            777777777777 
ST9	032002 034012 0   0   0            0            777777777777 


*032002 JUMPA	0,032003
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032002 032002 0   0   324000032003 0            000000032003 
IT1	032002 0      0   0   324000032003 0            000000032003 
AT3	032002 0      0   0   000000032003 0            324000032003 
AT6	032002 032003 0   0   000000032003 0            324000032003 
FT1A	032002 032003 0   0   000000032003 0            000000032003 
FT2	032002 032003 0   0   0            0            000000032003 
FT2RQ	032002 032003 0   0   777777777777 0            000000032003 
FT3	032002 032003 0   0   777777777777 0            000000032003 
FT9	032003 032003 0   0   777777777777 0            000000032003 
ET0	032003 032003 0   0   777777777777 0            000000032003 
ST1A	032003 032003 0   0   777777777777 0            000000032003 
ST9	032003 032003 0   0   777777777777 0            000000032003 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 200
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0390

*032003 SETO 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032003 032003 0   0   474000000000 0            0            
IT1	032003 0      0   0   474000000000 0            0            
AT3	032003 0      0   0   0            0            474000000000 
AT6	032003 0      0   0   0            0            474000000000 
FT1A	032003 0      0   0   0            0            0            
FT9	032004 0      0   0   0            0            0            
ET0	032004 0      0   0   777777777777 0            0            
ST1	032004 0      0   0   777777777777 0            0            
ST2	032004 0      0   0   777777777777 0            0            
ST9	032004 0      0   0   777777777777 0            0            


*032004 HLR 	0,034013
INITIAL
C(AC)=777777 777777 
C(E)=777777 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032004 032004 0   0   544000034013 0            777777777777 
IT1	032004 0      0   0   544000034013 0            777777777777 
AT3	032004 0      0   0   000000034013 0            544000034013 
AT6	032004 034013 0   0   000000034013 0            544000034013 
FT0	032004 034013 0   0   777777000000 0            544000034013 
FT1A	032004 034013 0   0   777777000000 0            777777000000 
FT2	032004 034013 0   0   0            0            777777000000 
FT2RQ	032004 034013 0   0   777777777777 0            777777000000 
FT3	032004 034013 0   0   777777777777 0            777777000000 
FT9	032005 034013 0   0   777777777777 0            777777000000 
ET0	032005 034013 0   0   777777000000 0            777777777777 
ET1	032005 034013 0   0   777777777777 0            777777777777 
ST1	032005 034013 0   0   777777777777 0            777777777777 
ST2	032005 034013 0   0   777777777777 0            777777777777 
ST9	032005 034013 0   0   777777777777 0            777777777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 201
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0391

*032005 CAME	0,034012
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032005 032005 0   0   312000034012 0            777777777777 
IT1	032005 0      0   0   312000034012 0            777777777777 
AT3	032005 0      0   0   000000034012 0            312000034012 
AT6	032005 034012 0   0   000000034012 0            312000034012 
FT0	032005 034012 0   0   777777777777 0            312000034012 
FT1A	032005 034012 0   0   777777777777 0            777777777777 
FT2	032005 034012 0   0   0            0            777777777777 
FT2RQ	032005 034012 0   0   777777777777 0            777777777777 
FT3	032005 034012 0   0   777777777777 0            777777777777 
FT9	032006 034012 0   0   777777777777 0            777777777777 
ET0	032007 034012 0   0   0            0            777777777777 
ST1A	032007 034012 0   0   0            0            777777777777 
ST9	032007 034012 0   0   0            0            777777777777 


*032007 JUMPA	0,032010
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032007 032007 0   0   324000032010 0            000000032010 
IT1	032007 0      0   0   324000032010 0            000000032010 
AT3	032007 0      0   0   000000032010 0            324000032010 
AT6	032007 032010 0   0   000000032010 0            324000032010 
FT1A	032007 032010 0   0   000000032010 0            000000032010 
FT2	032007 032010 0   0   0            0            000000032010 
FT2RQ	032007 032010 0   0   777777777777 0            000000032010 
FT3	032007 032010 0   0   777777777777 0            000000032010 
FT9	032010 032010 0   0   777777777777 0            000000032010 
ET0	032010 032010 0   0   777777777777 0            000000032010 
ST1A	032010 032010 0   0   777777777777 0            000000032010 
ST9	032010 032010 0   0   777777777777 0            000000032010 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 202
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0392

*032010 SETO 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032010 032010 0   0   474000000000 0            0            
IT1	032010 0      0   0   474000000000 0            0            
AT3	032010 0      0   0   0            0            474000000000 
AT6	032010 0      0   0   0            0            474000000000 
FT1A	032010 0      0   0   0            0            0            
FT9	032011 0      0   0   0            0            0            
ET0	032011 0      0   0   777777777777 0            0            
ST1	032011 0      0   0   777777777777 0            0            
ST2	032011 0      0   0   777777777777 0            0            
ST9	032011 0      0   0   777777777777 0            0            


*032011 HRL 	0,034013
INITIAL
C(AC)=777777 777777 
C(E)=777777 000000 
FINAL
C(AC)=000000 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032011 032011 0   0   504000034013 0            777777777777 
IT1	032011 0      0   0   504000034013 0            777777777777 
AT3	032011 0      0   0   000000034013 0            504000034013 
AT6	032011 034013 0   0   000000034013 0            504000034013 
FT0	032011 034013 0   0   777777000000 0            504000034013 
FT1A	032011 034013 0   0   777777000000 0            777777000000 
FT2	032011 034013 0   0   0            0            777777000000 
FT2RQ	032011 034013 0   0   777777777777 0            777777000000 
FT3	032011 034013 0   0   777777777777 0            777777000000 
FT9	032012 034013 0   0   777777777777 0            777777000000 
ET0	032012 034013 0   0   777777000000 0            777777777777 
ET1	032012 034013 0   0   000000777777 0            777777777777 
ST1	032012 034013 0   0   000000777777 0            777777777777 
ST2	032012 034013 0   0   000000777777 0            777777777777 
ST9	032012 034013 0   0   000000777777 0            777777777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 203
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0393

*032012 CAME	0,034015
INITIAL
C(AC)=000000 777777 
C(E)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032012 032012 0   0   312000034015 0            000000777777 
IT1	032012 0      0   0   312000034015 0            000000777777 
AT3	032012 0      0   0   000000034015 0            312000034015 
AT6	032012 034015 0   0   000000034015 0            312000034015 
FT0	032012 034015 0   0   000000777777 0            312000034015 
FT1A	032012 034015 0   0   000000777777 0            000000777777 
FT2	032012 034015 0   0   0            0            000000777777 
FT2RQ	032012 034015 0   0   000000777777 0            000000777777 
FT3	032012 034015 0   0   000000777777 0            000000777777 
FT9	032013 034015 0   0   000000777777 0            000000777777 
ET0	032014 034015 0   0   0            0            000000777777 
ST1A	032014 034015 0   0   0            0            000000777777 
ST9	032014 034015 0   0   0            0            000000777777 


*032014 JUMPA	0,032015
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032014 032014 0   0   324000032015 0            000000032015 
IT1	032014 0      0   0   324000032015 0            000000032015 
AT3	032014 0      0   0   000000032015 0            324000032015 
AT6	032014 032015 0   0   000000032015 0            324000032015 
FT1A	032014 032015 0   0   000000032015 0            000000032015 
FT2	032014 032015 0   0   0            0            000000032015 
FT2RQ	032014 032015 0   0   000000777777 0            000000032015 
FT3	032014 032015 0   0   000000777777 0            000000032015 
FT9	032015 032015 0   0   000000777777 0            000000032015 
ET0	032015 032015 0   0   000000777777 0            000000032015 
ST1A	032015 032015 0   0   000000777777 0            000000032015 
ST9	032015 032015 0   0   000000777777 0            000000032015 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 204
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0394

*032015 SETO 	0,000000
INITIAL
C(AC)=000000 777777 
C(E)=000000 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032015 032015 0   0   474000000000 0            0            
IT1	032015 0      0   0   474000000000 0            0            
AT3	032015 0      0   0   0            0            474000000000 
AT6	032015 0      0   0   0            0            474000000000 
FT1A	032015 0      0   0   0            0            0            
FT9	032016 0      0   0   0            0            0            
ET0	032016 0      0   0   777777777777 0            0            
ST1	032016 0      0   0   777777777777 0            0            
ST2	032016 0      0   0   777777777777 0            0            
ST9	032016 0      0   0   777777777777 0            0            


*032016 HLRI	0,777777
INITIAL
C(AC)=777777 777777 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032016 032016 0   0   545000777777 0            777777777777 
IT1	032016 0      0   0   545000777777 0            777777777777 
AT3	032016 0      0   0   000000777777 0            545000777777 
AT6	032016 777777 0   0   000000777777 0            545000777777 
FT1A	032016 777777 0   0   000000777777 0            000000777777 
FT2	032016 777777 0   0   0            0            000000777777 
FT2RQ	032016 777777 0   0   777777777777 0            000000777777 
FT3	032016 777777 0   0   777777777777 0            000000777777 
FT9	032017 777777 0   0   777777777777 0            000000777777 
ET0	032017 777777 0   0   000000777777 0            777777777777 
ET1	032017 777777 0   0   777777000000 0            777777777777 
ST1	032017 777777 0   0   777777000000 0            777777777777 
ST2	032017 777777 0   0   777777000000 0            777777777777 
ST9	032017 777777 0   0   777777000000 0            777777777777 


*032017 CAME	0,034013
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032017 032017 0   0   312000034013 0            777777000000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 205
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0395

IT1	032017 0      0   0   312000034013 0            777777000000 
AT3	032017 0      0   0   000000034013 0            312000034013 
AT6	032017 034013 0   0   000000034013 0            312000034013 
FT0	032017 034013 0   0   777777000000 0            312000034013 
FT1A	032017 034013 0   0   777777000000 0            777777000000 
FT2	032017 034013 0   0   0            0            777777000000 
FT2RQ	032017 034013 0   0   777777000000 0            777777000000 
FT3	032017 034013 0   0   777777000000 0            777777000000 
FT9	032020 034013 0   0   777777000000 0            777777000000 
ET0	032021 034013 0   0   0            0            777777000000 
ST1A	032021 034013 0   0   0            0            777777000000 
ST9	032021 034013 0   0   0            0            777777000000 


*032021 JUMPA	0,032022
INITIAL
C(AC)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032021 032021 0   0   324000032022 0            000000032022 
IT1	032021 0      0   0   324000032022 0            000000032022 
AT3	032021 0      0   0   000000032022 0            324000032022 
AT6	032021 032022 0   0   000000032022 0            324000032022 
FT1A	032021 032022 0   0   000000032022 0            000000032022 
FT2	032021 032022 0   0   0            0            000000032022 
FT2RQ	032021 032022 0   0   777777000000 0            000000032022 
FT3	032021 032022 0   0   777777000000 0            000000032022 
FT9	032022 032022 0   0   777777000000 0            000000032022 
ET0	032022 032022 0   0   777777000000 0            000000032022 
ST1A	032022 032022 0   0   777777000000 0            000000032022 
ST9	032022 032022 0   0   777777000000 0            000000032022 


*032022 MOVEI	0,777777
INITIAL
C(AC)=777777 000000 
FINAL
C(AC)=000000 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032022 032022 0   0   201000777777 0            000000777777 
IT1	032022 0      0   0   201000777777 0            000000777777 
AT3	032022 0      0   0   000000777777 0            201000777777 
AT6	032022 777777 0   0   000000777777 0            201000777777 
FT1A	032022 777777 0   0   000000777777 0            000000777777 
FT9	032023 777777 0   0   000000777777 0            000000777777 
ET0	032023 777777 0   0   000000777777 0            000000777777 
ST1	032023 777777 0   0   000000777777 0            000000777777 
ST2	032023 777777 0   0   000000777777 0            000000777777 
ST9	032023 777777 0   0   000000777777 0            000000777777 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 206
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0396



*032023 HRL 	0,034014
INITIAL
C(AC)=000000 777777 
C(E)=000000 000000 
FINAL
C(AC)=000000 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032023 032023 0   0   504000034014 0            000000777777 
IT1	032023 0      0   0   504000034014 0            000000777777 
AT3	032023 0      0   0   000000034014 0            504000034014 
AT6	032023 034014 0   0   000000034014 0            504000034014 
FT0	032023 034014 0   0   0            0            504000034014 
FT1A	032023 034014 0   0   0            0            0            
FT2	032023 034014 0   0   0            0            0            
FT2RQ	032023 034014 0   0   000000777777 0            0            
FT3	032023 034014 0   0   000000777777 0            0            
FT9	032024 034014 0   0   000000777777 0            0            
ET0	032024 034014 0   0   0            0            000000777777 
ET1	032024 034014 0   0   000000777777 0            000000777777 
ST1	032024 034014 0   0   000000777777 0            000000777777 
ST2	032024 034014 0   0   000000777777 0            000000777777 
ST9	032024 034014 0   0   000000777777 0            000000777777 


*032024 CAIE	0,777777
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032024 032024 0   0   302000777777 0            000000777777 
IT1	032024 0      0   0   302000777777 0            000000777777 
AT3	032024 0      0   0   000000777777 0            302000777777 
AT6	032024 777777 0   0   000000777777 0            302000777777 
FT1A	032024 777777 0   0   000000777777 0            000000777777 
FT2	032024 777777 0   0   0            0            000000777777 
FT2RQ	032024 777777 0   0   000000777777 0            000000777777 
FT3	032024 777777 0   0   000000777777 0            000000777777 
FT9	032025 777777 0   0   000000777777 0            000000777777 
ET0	032026 777777 0   0   0            0            000000777777 
ST1A	032026 777777 0   0   0            0            000000777777 
ST9	032026 777777 0   0   0            0            000000777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 207
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0397

*032026 JUMPA	0,032027
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032026 032026 0   0   324000032027 0            000000032027 
IT1	032026 0      0   0   324000032027 0            000000032027 
AT3	032026 0      0   0   000000032027 0            324000032027 
AT6	032026 032027 0   0   000000032027 0            324000032027 
FT1A	032026 032027 0   0   000000032027 0            000000032027 
FT2	032026 032027 0   0   0            0            000000032027 
FT2RQ	032026 032027 0   0   000000777777 0            000000032027 
FT3	032026 032027 0   0   000000777777 0            000000032027 
FT9	032027 032027 0   0   000000777777 0            000000032027 
ET0	032027 032027 0   0   000000777777 0            000000032027 
ST1A	032027 032027 0   0   000000777777 0            000000032027 
ST9	032027 032027 0   0   000000777777 0            000000032027 


*032027 MOVEI	0,777777
INITIAL
C(AC)=000000 777777 
FINAL
C(AC)=000000 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032027 032027 0   0   201000777777 0            000000777777 
IT1	032027 0      0   0   201000777777 0            000000777777 
AT3	032027 0      0   0   000000777777 0            201000777777 
AT6	032027 777777 0   0   000000777777 0            201000777777 
FT1A	032027 777777 0   0   000000777777 0            000000777777 
FT9	032030 777777 0   0   000000777777 0            000000777777 
ET0	032030 777777 0   0   000000777777 0            000000777777 
ST1	032030 777777 0   0   000000777777 0            000000777777 
ST2	032030 777777 0   0   000000777777 0            000000777777 
ST9	032030 777777 0   0   000000777777 0            000000777777 


*032030 HLRI	0,000000
INITIAL
C(AC)=000000 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032030 032030 0   0   545000000000 0            000000777777 
IT1	032030 0      0   0   545000000000 0            000000777777 
AT3	032030 0      0   0   0            0            545000000000 
AT6	032030 0      0   0   0            0            545000000000 
FT1A	032030 0      0   0   0            0            0            
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 208
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0398

FT2	032030 0      0   0   0            0            0            
FT2RQ	032030 0      0   0   000000777777 0            0            
FT3	032030 0      0   0   000000777777 0            0            
FT9	032031 0      0   0   000000777777 0            0            
ET0	032031 0      0   0   0            0            000000777777 
ET1	032031 0      0   0   0            0            000000777777 
ST1	032031 0      0   0   0            0            000000777777 
ST2	032031 0      0   0   0            0            000000777777 
ST9	032031 0      0   0   0            0            000000777777 


*032031 SKIPE	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032031 032031 0   0   332000000000 0            0            
IT1	032031 0      0   0   332000000000 0            0            
AT3	032031 0      0   0   0            0            332000000000 
AT6	032031 0      0   0   0            0            332000000000 
FT0	032031 0      0   0   0            0            332000000000 
FT1A	032031 0      0   0   0            0            0            
FT9	032032 0      0   0   0            0            0            
ET0	032033 0      0   0   0            0            0            
ST1A	032033 0      0   0   0            0            0            
ST9	032033 0      0   0   0            0            0            


*032033 JUMPA	0,032034
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032033 032033 0   0   324000032034 0            000000032034 
IT1	032033 0      0   0   324000032034 0            000000032034 
AT3	032033 0      0   0   000000032034 0            324000032034 
AT6	032033 032034 0   0   000000032034 0            324000032034 
FT1A	032033 032034 0   0   000000032034 0            000000032034 
FT2	032033 032034 0   0   0            0            000000032034 
FT2RQ	032033 032034 0   0   0            0            000000032034 
FT3	032033 032034 0   0   0            0            000000032034 
FT9	032034 032034 0   0   0            0            000000032034 
ET0	032034 032034 0   0   0            0            000000032034 
ST1A	032034 032034 0   0   0            0            000000032034 
ST9	032034 032034 0   0   0            0            000000032034 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 209
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0399

*032034 MOVEI	0,777777
INITIAL
C(AC)=000000 000000 
FINAL
C(AC)=000000 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032034 032034 0   0   201000777777 0            000000777777 
IT1	032034 0      0   0   201000777777 0            000000777777 
AT3	032034 0      0   0   000000777777 0            201000777777 
AT6	032034 777777 0   0   000000777777 0            201000777777 
FT1A	032034 777777 0   0   000000777777 0            000000777777 
FT9	032035 777777 0   0   000000777777 0            000000777777 
ET0	032035 777777 0   0   000000777777 0            000000777777 
ST1	032035 777777 0   0   000000777777 0            000000777777 
ST2	032035 777777 0   0   000000777777 0            000000777777 
ST9	032035 777777 0   0   000000777777 0            000000777777 


*032035 HRL 	0,034012
INITIAL
C(AC)=000000 777777 
C(E)=777777 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032035 032035 0   0   504000034012 0            000000777777 
IT1	032035 0      0   0   504000034012 0            000000777777 
AT3	032035 0      0   0   000000034012 0            504000034012 
AT6	032035 034012 0   0   000000034012 0            504000034012 
FT0	032035 034012 0   0   777777777777 0            504000034012 
FT1A	032035 034012 0   0   777777777777 0            777777777777 
FT2	032035 034012 0   0   0            0            777777777777 
FT2RQ	032035 034012 0   0   000000777777 0            777777777777 
FT3	032035 034012 0   0   000000777777 0            777777777777 
FT9	032036 034012 0   0   000000777777 0            777777777777 
ET0	032036 034012 0   0   777777777777 0            000000777777 
ET1	032036 034012 0   0   777777777777 0            000000777777 
ST1	032036 034012 0   0   777777777777 0            000000777777 
ST2	032036 034012 0   0   777777777777 0            000000777777 
ST9	032036 034012 0   0   777777777777 0            000000777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 210
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0400

*032036 CAME	0,034012
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032036 032036 0   0   312000034012 0            777777777777 
IT1	032036 0      0   0   312000034012 0            777777777777 
AT3	032036 0      0   0   000000034012 0            312000034012 
AT6	032036 034012 0   0   000000034012 0            312000034012 
FT0	032036 034012 0   0   777777777777 0            312000034012 
FT1A	032036 034012 0   0   777777777777 0            777777777777 
FT2	032036 034012 0   0   0            0            777777777777 
FT2RQ	032036 034012 0   0   777777777777 0            777777777777 
FT3	032036 034012 0   0   777777777777 0            777777777777 
FT9	032037 034012 0   0   777777777777 0            777777777777 
ET0	032040 034012 0   0   0            0            777777777777 
ST1A	032040 034012 0   0   0            0            777777777777 
ST9	032040 034012 0   0   0            0            777777777777 


*032040 JUMPA	0,032041
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032040 032040 0   0   324000032041 0            000000032041 
IT1	032040 0      0   0   324000032041 0            000000032041 
AT3	032040 0      0   0   000000032041 0            324000032041 
AT6	032040 032041 0   0   000000032041 0            324000032041 
FT1A	032040 032041 0   0   000000032041 0            000000032041 
FT2	032040 032041 0   0   0            0            000000032041 
FT2RQ	032040 032041 0   0   777777777777 0            000000032041 
FT3	032040 032041 0   0   777777777777 0            000000032041 
FT9	032041 032041 0   0   777777777777 0            000000032041 
ET0	032041 032041 0   0   777777777777 0            000000032041 
ST1A	032041 032041 0   0   777777777777 0            000000032041 
ST9	032041 032041 0   0   777777777777 0            000000032041 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 211
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0401

*032041 MOVEI	0,777777
INITIAL
C(AC)=777777 777777 
FINAL
C(AC)=000000 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032041 032041 0   0   201000777777 0            000000777777 
IT1	032041 0      0   0   201000777777 0            000000777777 
AT3	032041 0      0   0   000000777777 0            201000777777 
AT6	032041 777777 0   0   000000777777 0            201000777777 
FT1A	032041 777777 0   0   000000777777 0            000000777777 
FT9	032042 777777 0   0   000000777777 0            000000777777 
ET0	032042 777777 0   0   000000777777 0            000000777777 
ST1	032042 777777 0   0   000000777777 0            000000777777 
ST2	032042 777777 0   0   000000777777 0            000000777777 
ST9	032042 777777 0   0   000000777777 0            000000777777 


*032042 HLR 	0,034012
INITIAL
C(AC)=000000 777777 
C(E)=777777 777777 
FINAL
C(AC)=000000 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032042 032042 0   0   544000034012 0            000000777777 
IT1	032042 0      0   0   544000034012 0            000000777777 
AT3	032042 0      0   0   000000034012 0            544000034012 
AT6	032042 034012 0   0   000000034012 0            544000034012 
FT0	032042 034012 0   0   777777777777 0            544000034012 
FT1A	032042 034012 0   0   777777777777 0            777777777777 
FT2	032042 034012 0   0   0            0            777777777777 
FT2RQ	032042 034012 0   0   000000777777 0            777777777777 
FT3	032042 034012 0   0   000000777777 0            777777777777 
FT9	032043 034012 0   0   000000777777 0            777777777777 
ET0	032043 034012 0   0   777777777777 0            000000777777 
ET1	032043 034012 0   0   000000777777 0            000000777777 
ST1	032043 034012 0   0   000000777777 0            000000777777 
ST2	032043 034012 0   0   000000777777 0            000000777777 
ST9	032043 034012 0   0   000000777777 0            000000777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 212
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0402

*032043 CAIE	0,777777
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032043 032043 0   0   302000777777 0            000000777777 
IT1	032043 0      0   0   302000777777 0            000000777777 
AT3	032043 0      0   0   000000777777 0            302000777777 
AT6	032043 777777 0   0   000000777777 0            302000777777 
FT1A	032043 777777 0   0   000000777777 0            000000777777 
FT2	032043 777777 0   0   0            0            000000777777 
FT2RQ	032043 777777 0   0   000000777777 0            000000777777 
FT3	032043 777777 0   0   000000777777 0            000000777777 
FT9	032044 777777 0   0   000000777777 0            000000777777 
ET0	032045 777777 0   0   0            0            000000777777 
ST1A	032045 777777 0   0   0            0            000000777777 
ST9	032045 777777 0   0   0            0            000000777777 


*032045 JUMPA	0,032046
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032045 032045 0   0   324000032046 0            000000032046 
IT1	032045 0      0   0   324000032046 0            000000032046 
AT3	032045 0      0   0   000000032046 0            324000032046 
AT6	032045 032046 0   0   000000032046 0            324000032046 
FT1A	032045 032046 0   0   000000032046 0            000000032046 
FT2	032045 032046 0   0   0            0            000000032046 
FT2RQ	032045 032046 0   0   000000777777 0            000000032046 
FT3	032045 032046 0   0   000000777777 0            000000032046 
FT9	032046 032046 0   0   000000777777 0            000000032046 
ET0	032046 032046 0   0   000000777777 0            000000032046 
ST1A	032046 032046 0   0   000000777777 0            000000032046 
ST9	032046 032046 0   0   000000777777 0            000000032046 


*032046 MOVSI	0,777777
INITIAL
C(AC)=000000 777777 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032046 032046 0   0   205000777777 0            000000777777 
IT1	032046 0      0   0   205000777777 0            000000777777 
AT3	032046 0      0   0   000000777777 0            205000777777 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 213
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0403

AT6	032046 777777 0   0   000000777777 0            205000777777 
FT1A	032046 777777 0   0   000000777777 0            000000777777 
FT9	032047 777777 0   0   000000777777 0            000000777777 
ET0	032047 777777 0   0   777777000000 0            000000777777 
ST1	032047 777777 0   0   777777000000 0            000000777777 
ST2	032047 777777 0   0   777777000000 0            000000777777 
ST9	032047 777777 0   0   777777000000 0            000000777777 


*032047 HRL 	0,034014
INITIAL
C(AC)=777777 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032047 032047 0   0   504000034014 0            777777000000 
IT1	032047 0      0   0   504000034014 0            777777000000 
AT3	032047 0      0   0   000000034014 0            504000034014 
AT6	032047 034014 0   0   000000034014 0            504000034014 
FT0	032047 034014 0   0   0            0            504000034014 
FT1A	032047 034014 0   0   0            0            0            
FT2	032047 034014 0   0   0            0            0            
FT2RQ	032047 034014 0   0   777777000000 0            0            
FT3	032047 034014 0   0   777777000000 0            0            
FT9	032050 034014 0   0   777777000000 0            0            
ET0	032050 034014 0   0   0            0            777777000000 
ET1	032050 034014 0   0   0            0            777777000000 
ST1	032050 034014 0   0   0            0            777777000000 
ST2	032050 034014 0   0   0            0            777777000000 
ST9	032050 034014 0   0   0            0            777777000000 


*032050 CAIE	0,000000
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032050 032050 0   0   302000000000 0            0            
IT1	032050 0      0   0   302000000000 0            0            
AT3	032050 0      0   0   0            0            302000000000 
AT6	032050 0      0   0   0            0            302000000000 
FT1A	032050 0      0   0   0            0            0            
FT2	032050 0      0   0   0            0            0            
FT2RQ	032050 0      0   0   0            0            0            
FT3	032050 0      0   0   0            0            0            
FT9	032051 0      0   0   0            0            0            
ET0	032052 0      0   0   0            0            0            
ST1A	032052 0      0   0   0            0            0            
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 214
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0404

ST9	032052 0      0   0   0            0            0            


*032052 JUMPA	0,032053
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032052 032052 0   0   324000032053 0            000000032053 
IT1	032052 0      0   0   324000032053 0            000000032053 
AT3	032052 0      0   0   000000032053 0            324000032053 
AT6	032052 032053 0   0   000000032053 0            324000032053 
FT1A	032052 032053 0   0   000000032053 0            000000032053 
FT2	032052 032053 0   0   0            0            000000032053 
FT2RQ	032052 032053 0   0   0            0            000000032053 
FT3	032052 032053 0   0   0            0            000000032053 
FT9	032053 032053 0   0   0            0            000000032053 
ET0	032053 032053 0   0   0            0            000000032053 
ST1A	032053 032053 0   0   0            0            000000032053 
ST9	032053 032053 0   0   0            0            000000032053 


*032053 MOVSI	0,777777
INITIAL
C(AC)=000000 000000 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032053 032053 0   0   205000777777 0            000000777777 
IT1	032053 0      0   0   205000777777 0            000000777777 
AT3	032053 0      0   0   000000777777 0            205000777777 
AT6	032053 777777 0   0   000000777777 0            205000777777 
FT1A	032053 777777 0   0   000000777777 0            000000777777 
FT9	032054 777777 0   0   000000777777 0            000000777777 
ET0	032054 777777 0   0   777777000000 0            000000777777 
ST1	032054 777777 0   0   777777000000 0            000000777777 
ST2	032054 777777 0   0   777777000000 0            000000777777 
ST9	032054 777777 0   0   777777000000 0            000000777777 


*032054 HLR 	0,034014
INITIAL
C(AC)=777777 000000 
C(E)=000000 000000 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032054 032054 0   0   544000034014 0            777777000000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 215
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0405

IT1	032054 0      0   0   544000034014 0            777777000000 
AT3	032054 0      0   0   000000034014 0            544000034014 
AT6	032054 034014 0   0   000000034014 0            544000034014 
FT0	032054 034014 0   0   0            0            544000034014 
FT1A	032054 034014 0   0   0            0            0            
FT2	032054 034014 0   0   0            0            0            
FT2RQ	032054 034014 0   0   777777000000 0            0            
FT3	032054 034014 0   0   777777000000 0            0            
FT9	032055 034014 0   0   777777000000 0            0            
ET0	032055 034014 0   0   0            0            777777000000 
ET1	032055 034014 0   0   777777000000 0            777777000000 
ST1	032055 034014 0   0   777777000000 0            777777000000 
ST2	032055 034014 0   0   777777000000 0            777777000000 
ST9	032055 034014 0   0   777777000000 0            777777000000 


*032055 CAME	0,034013
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032055 032055 0   0   312000034013 0            777777000000 
IT1	032055 0      0   0   312000034013 0            777777000000 
AT3	032055 0      0   0   000000034013 0            312000034013 
AT6	032055 034013 0   0   000000034013 0            312000034013 
FT0	032055 034013 0   0   777777000000 0            312000034013 
FT1A	032055 034013 0   0   777777000000 0            777777000000 
FT2	032055 034013 0   0   0            0            777777000000 
FT2RQ	032055 034013 0   0   777777000000 0            777777000000 
FT3	032055 034013 0   0   777777000000 0            777777000000 
FT9	032056 034013 0   0   777777000000 0            777777000000 
ET0	032057 034013 0   0   0            0            777777000000 
ST1A	032057 034013 0   0   0            0            777777000000 
ST9	032057 034013 0   0   0            0            777777000000 


*032057 JUMPA	0,032060
INITIAL
C(AC)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032057 032057 0   0   324000032060 0            000000032060 
IT1	032057 0      0   0   324000032060 0            000000032060 
AT3	032057 0      0   0   000000032060 0            324000032060 
AT6	032057 032060 0   0   000000032060 0            324000032060 
FT1A	032057 032060 0   0   000000032060 0            000000032060 
FT2	032057 032060 0   0   0            0            000000032060 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 216
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0406

FT2RQ	032057 032060 0   0   777777000000 0            000000032060 
FT3	032057 032060 0   0   777777000000 0            000000032060 
FT9	032060 032060 0   0   777777000000 0            000000032060 
ET0	032060 032060 0   0   777777000000 0            000000032060 
ST1A	032060 032060 0   0   777777000000 0            000000032060 
ST9	032060 032060 0   0   777777000000 0            000000032060 


*032060 MOVSI	0,777777
INITIAL
C(AC)=777777 000000 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032060 032060 0   0   205000777777 0            000000777777 
IT1	032060 0      0   0   205000777777 0            000000777777 
AT3	032060 0      0   0   000000777777 0            205000777777 
AT6	032060 777777 0   0   000000777777 0            205000777777 
FT1A	032060 777777 0   0   000000777777 0            000000777777 
FT9	032061 777777 0   0   000000777777 0            000000777777 
ET0	032061 777777 0   0   777777000000 0            000000777777 
ST1	032061 777777 0   0   777777000000 0            000000777777 
ST2	032061 777777 0   0   777777000000 0            000000777777 
ST9	032061 777777 0   0   777777000000 0            000000777777 


*032061 HRL 	0,034012
INITIAL
C(AC)=777777 000000 
C(E)=777777 777777 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032061 032061 0   0   504000034012 0            777777000000 
IT1	032061 0      0   0   504000034012 0            777777000000 
AT3	032061 0      0   0   000000034012 0            504000034012 
AT6	032061 034012 0   0   000000034012 0            504000034012 
FT0	032061 034012 0   0   777777777777 0            504000034012 
FT1A	032061 034012 0   0   777777777777 0            777777777777 
FT2	032061 034012 0   0   0            0            777777777777 
FT2RQ	032061 034012 0   0   777777000000 0            777777777777 
FT3	032061 034012 0   0   777777000000 0            777777777777 
FT9	032062 034012 0   0   777777000000 0            777777777777 
ET0	032062 034012 0   0   777777777777 0            777777000000 
ET1	032062 034012 0   0   777777000000 0            777777000000 
ST1	032062 034012 0   0   777777000000 0            777777000000 
ST2	032062 034012 0   0   777777000000 0            777777000000 
ST9	032062 034012 0   0   777777000000 0            777777000000 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 217
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0407

*032062 CAME	0,034013
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032062 032062 0   0   312000034013 0            777777000000 
IT1	032062 0      0   0   312000034013 0            777777000000 
AT3	032062 0      0   0   000000034013 0            312000034013 
AT6	032062 034013 0   0   000000034013 0            312000034013 
FT0	032062 034013 0   0   777777000000 0            312000034013 
FT1A	032062 034013 0   0   777777000000 0            777777000000 
FT2	032062 034013 0   0   0            0            777777000000 
FT2RQ	032062 034013 0   0   777777000000 0            777777000000 
FT3	032062 034013 0   0   777777000000 0            777777000000 
FT9	032063 034013 0   0   777777000000 0            777777000000 
ET0	032064 034013 0   0   0            0            777777000000 
ST1A	032064 034013 0   0   0            0            777777000000 
ST9	032064 034013 0   0   0            0            777777000000 


*032064 JUMPA	0,032065
INITIAL
C(AC)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032064 032064 0   0   324000032065 0            000000032065 
IT1	032064 0      0   0   324000032065 0            000000032065 
AT3	032064 0      0   0   000000032065 0            324000032065 
AT6	032064 032065 0   0   000000032065 0            324000032065 
FT1A	032064 032065 0   0   000000032065 0            000000032065 
FT2	032064 032065 0   0   0            0            000000032065 
FT2RQ	032064 032065 0   0   777777000000 0            000000032065 
FT3	032064 032065 0   0   777777000000 0            000000032065 
FT9	032065 032065 0   0   777777000000 0            000000032065 
ET0	032065 032065 0   0   777777000000 0            000000032065 
ST1A	032065 032065 0   0   777777000000 0            000000032065 
ST9	032065 032065 0   0   777777000000 0            000000032065 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 218
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0408

*032065 MOVSI	0,777777
INITIAL
C(AC)=777777 000000 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032065 032065 0   0   205000777777 0            000000777777 
IT1	032065 0      0   0   205000777777 0            000000777777 
AT3	032065 0      0   0   000000777777 0            205000777777 
AT6	032065 777777 0   0   000000777777 0            205000777777 
FT1A	032065 777777 0   0   000000777777 0            000000777777 
FT9	032066 777777 0   0   000000777777 0            000000777777 
ET0	032066 777777 0   0   777777000000 0            000000777777 
ST1	032066 777777 0   0   777777000000 0            000000777777 
ST2	032066 777777 0   0   777777000000 0            000000777777 
ST9	032066 777777 0   0   777777000000 0            000000777777 


*032066 HLR 	0,034012
INITIAL
C(AC)=777777 000000 
C(E)=777777 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032066 032066 0   0   544000034012 0            777777000000 
IT1	032066 0      0   0   544000034012 0            777777000000 
AT3	032066 0      0   0   000000034012 0            544000034012 
AT6	032066 034012 0   0   000000034012 0            544000034012 
FT0	032066 034012 0   0   777777777777 0            544000034012 
FT1A	032066 034012 0   0   777777777777 0            777777777777 
FT2	032066 034012 0   0   0            0            777777777777 
FT2RQ	032066 034012 0   0   777777000000 0            777777777777 
FT3	032066 034012 0   0   777777000000 0            777777777777 
FT9	032067 034012 0   0   777777000000 0            777777777777 
ET0	032067 034012 0   0   777777777777 0            777777000000 
ET1	032067 034012 0   0   777777777777 0            777777000000 
ST1	032067 034012 0   0   777777777777 0            777777000000 
ST2	032067 034012 0   0   777777777777 0            777777000000 
ST9	032067 034012 0   0   777777777777 0            777777000000 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 219
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0409

*032067 CAME	0,034012
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032067 032067 0   0   312000034012 0            777777777777 
IT1	032067 0      0   0   312000034012 0            777777777777 
AT3	032067 0      0   0   000000034012 0            312000034012 
AT6	032067 034012 0   0   000000034012 0            312000034012 
FT0	032067 034012 0   0   777777777777 0            312000034012 
FT1A	032067 034012 0   0   777777777777 0            777777777777 
FT2	032067 034012 0   0   0            0            777777777777 
FT2RQ	032067 034012 0   0   777777777777 0            777777777777 
FT3	032067 034012 0   0   777777777777 0            777777777777 
FT9	032070 034012 0   0   777777777777 0            777777777777 
ET0	032071 034012 0   0   0            0            777777777777 
ST1A	032071 034012 0   0   0            0            777777777777 
ST9	032071 034012 0   0   0            0            777777777777 


*032071 JUMPA	0,032072
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032071 032071 0   0   324000032072 0            000000032072 
IT1	032071 0      0   0   324000032072 0            000000032072 
AT3	032071 0      0   0   000000032072 0            324000032072 
AT6	032071 032072 0   0   000000032072 0            324000032072 
FT1A	032071 032072 0   0   000000032072 0            000000032072 
FT2	032071 032072 0   0   0            0            000000032072 
FT2RQ	032071 032072 0   0   777777777777 0            000000032072 
FT3	032071 032072 0   0   777777777777 0            000000032072 
FT9	032072 032072 0   0   777777777777 0            000000032072 
ET0	032072 032072 0   0   777777777777 0            000000032072 
ST1A	032072 032072 0   0   777777777777 0            000000032072 
ST9	032072 032072 0   0   777777777777 0            000000032072 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 220
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0410

*032072 SETZ 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032072 032072 0   0   400000000000 0            0            
IT1	032072 0      0   0   400000000000 0            0            
AT3	032072 0      0   0   0            0            400000000000 
AT6	032072 0      0   0   0            0            400000000000 
FT1A	032072 0      0   0   0            0            0            
FT9	032073 0      0   0   0            0            0            
ET0	032073 0      0   0   0            0            0            
ST1	032073 0      0   0   0            0            0            
ST2	032073 0      0   0   0            0            0            
ST9	032073 0      0   0   0            0            0            


*032073 HLLM	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL

C(E)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032073 032073 0   0   502000000000 0            0            
IT1	032073 0      0   0   502000000000 0            0            
AT3	032073 0      0   0   0            0            502000000000 
AT6	032073 0      0   0   0            0            502000000000 
FT0	032073 0      0   0   0            0            502000000000 
FT1A	032073 0      0   0   0            0            0            
FT2	032073 0      0   0   0            0            0            
FT2RQ	032073 0      0   0   0            0            0            
FT3	032073 0      0   0   0            0            0            
FT9	032074 0      0   0   0            0            0            
ET0	032074 0      0   0   0            0            0            
ST5	032074 0      0   0   0            0            0            
ST6A	032074 0      0   0   0            0            0            
ST9	032074 0      0   0   0            0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 221
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0411

*032074 SKIPE	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032074 032074 0   0   332000000000 0            0            
IT1	032074 0      0   0   332000000000 0            0            
AT3	032074 0      0   0   0            0            332000000000 
AT6	032074 0      0   0   0            0            332000000000 
FT0	032074 0      0   0   0            0            332000000000 
FT1A	032074 0      0   0   0            0            0            
FT9	032075 0      0   0   0            0            0            
ET0	032076 0      0   0   0            0            0            
ST1A	032076 0      0   0   0            0            0            
ST9	032076 0      0   0   0            0            0            


*032076 JUMPA	0,032077
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032076 032076 0   0   324000032077 0            000000032077 
IT1	032076 0      0   0   324000032077 0            000000032077 
AT3	032076 0      0   0   000000032077 0            324000032077 
AT6	032076 032077 0   0   000000032077 0            324000032077 
FT1A	032076 032077 0   0   000000032077 0            000000032077 
FT2	032076 032077 0   0   0            0            000000032077 
FT2RQ	032076 032077 0   0   0            0            000000032077 
FT3	032076 032077 0   0   0            0            000000032077 
FT9	032077 032077 0   0   0            0            000000032077 
ET0	032077 032077 0   0   0            0            000000032077 
ST1A	032077 032077 0   0   0            0            000000032077 
ST9	032077 032077 0   0   0            0            000000032077 


*032077 SETZ 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032077 032077 0   0   400000000000 0            0            
IT1	032077 0      0   0   400000000000 0            0            
AT3	032077 0      0   0   0            0            400000000000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 222
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0412

AT6	032077 0      0   0   0            0            400000000000 
FT1A	032077 0      0   0   0            0            0            
FT9	0      0      0   0   0            0            0            
ET0	0      0      0   0   0            0            0            
ST1	0      0      0   0   0            0            0            
ST2	0      0      0   0   0            0            0            
ST9	0      0      0   0   0            0            0            


*032100 SETO 	1,000000
INITIAL
C(AC)=000001 000001 
C(E)=000000 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	0      0      0   0   474040000000 0            0            
IT1	0      0      0   0   474040000000 0            0            
AT3	0      0      0   0   0            0            474040000000 
AT6	0      0      0   0   0            0            474040000000 
FT1A	0      0      0   0   0            0            0            
FT9	032101 0      0   0   0            0            0            
ET0	032101 0      0   0   777777777777 0            0            
ST1	032101 0      0   0   777777777777 0            0            
ST2	032101 0      0   0   777777777777 0            0            
ST9	032101 0      0   0   777777777777 0            0            


*032101 HLLM	0,000001
INITIAL
C(AC)=000000 000000 
C(E)=777777 777777 
FINAL

C(E)=000000 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032101 032101 0   0   502000000001 0            777777777777 
IT1	032101 0      0   0   502000000001 0            777777777777 
AT3	032101 0      0   0   000000000001 0            502000000001 
AT6	032101 000001 0   0   000000000001 0            502000000001 
FT0	032101 000001 0   0   777777777777 0            502000000001 
FT1A	032101 000001 0   0   777777777777 0            777777777777 
FT2	032101 000001 0   0   0            0            777777777777 
FT2RQ	032101 000001 0   0   0            0            777777777777 
FT3	032101 000001 0   0   0            0            777777777777 
FT9	032102 000001 0   0   0            0            777777777777 
ET0	032102 000001 0   0   000000777777 0            777777777777 
ST5	032102 000001 0   0   000000777777 0            777777777777 
ST6A	032102 000001 0   0   000000777777 0            777777777777 
ST9	032102 000001 0   0   000000777777 0            777777777777 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 223
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0413



*032102 CAIE	1,777777
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032102 032102 0   0   302040777777 0            000000777777 
IT1	032102 0      0   0   302040777777 0            000000777777 
AT3	032102 0      0   0   000000777777 0            302040777777 
AT6	032102 777777 0   0   000000777777 0            302040777777 
FT1A	032102 777777 0   0   000000777777 0            000000777777 
FT2	032102 777777 0   0   0            0            000000777777 
FT2RQ	032102 777777 0   0   000000777777 0            000000777777 
FT3	032102 777777 0   0   000000777777 0            000000777777 
FT9	032103 777777 0   0   000000777777 0            000000777777 
ET0	032104 777777 0   0   0            0            000000777777 
ST1A	032104 777777 0   0   0            0            000000777777 
ST9	032104 777777 0   0   0            0            000000777777 


*032104 JUMPA	0,032105
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032104 032104 0   0   324000032105 0            000000032105 
IT1	032104 0      0   0   324000032105 0            000000032105 
AT3	032104 0      0   0   000000032105 0            324000032105 
AT6	032104 032105 0   0   000000032105 0            324000032105 
FT1A	032104 032105 0   0   000000032105 0            000000032105 
FT2	032104 032105 0   0   0            0            000000032105 
FT2RQ	032104 032105 0   0   0            0            000000032105 
FT3	032104 032105 0   0   0            0            000000032105 
FT9	032105 032105 0   0   0            0            000000032105 
ET0	032105 032105 0   0   0            0            000000032105 
ST1A	032105 032105 0   0   0            0            000000032105 
ST9	032105 032105 0   0   0            0            000000032105 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 224
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0414

*032105 SETO 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032105 032105 0   0   474000000000 0            0            
IT1	032105 0      0   0   474000000000 0            0            
AT3	032105 0      0   0   0            0            474000000000 
AT6	032105 0      0   0   0            0            474000000000 
FT1A	032105 0      0   0   0            0            0            
FT9	032106 0      0   0   0            0            0            
ET0	032106 0      0   0   777777777777 0            0            
ST1	032106 0      0   0   777777777777 0            0            
ST2	032106 0      0   0   777777777777 0            0            
ST9	032106 0      0   0   777777777777 0            0            


*032106 SETZ 	1,000000
INITIAL
C(AC)=000000 777777 
C(E)=777777 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032106 032106 0   0   400040000000 0            0            
IT1	032106 0      0   0   400040000000 0            0            
AT3	032106 0      0   0   0            0            400040000000 
AT6	032106 0      0   0   0            0            400040000000 
FT1A	032106 0      0   0   0            0            0            
FT9	032107 0      0   0   0            0            0            
ET0	032107 0      0   0   0            0            0            
ST1	032107 0      0   0   0            0            0            
ST2	032107 0      0   0   0            0            0            
ST9	032107 0      0   0   0            0            0            


*032107 HLLM	0,000001
INITIAL
C(AC)=777777 777777 
C(E)=000000 000000 
FINAL

C(E)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032107 032107 0   0   502000000001 0            0            
IT1	032107 0      0   0   502000000001 0            0            
AT3	032107 0      0   0   000000000001 0            502000000001 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 225
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0415

AT6	032107 000001 0   0   000000000001 0            502000000001 
FT0	032107 000001 0   0   0            0            502000000001 
FT1A	032107 000001 0   0   0            0            0            
FT2	032107 000001 0   0   0            0            0            
FT2RQ	032107 000001 0   0   777777777777 0            0            
FT3	032107 000001 0   0   777777777777 0            0            
FT9	032110 000001 0   0   777777777777 0            0            
ET0	032110 000001 0   0   777777000000 0            0            
ST5	032110 000001 0   0   777777000000 0            0            
ST6A	032110 000001 0   0   777777000000 0            0            
ST9	032110 000001 0   0   777777000000 0            0            


*032110 CAME	1,034013
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032110 032110 0   0   312040034013 0            777777000000 
IT1	032110 0      0   0   312040034013 0            777777000000 
AT3	032110 0      0   0   000000034013 0            312040034013 
AT6	032110 034013 0   0   000000034013 0            312040034013 
FT0	032110 034013 0   0   777777000000 0            312040034013 
FT1A	032110 034013 0   0   777777000000 0            777777000000 
FT2	032110 034013 0   0   0            0            777777000000 
FT2RQ	032110 034013 0   0   777777000000 0            777777000000 
FT3	032110 034013 0   0   777777000000 0            777777000000 
FT9	032111 034013 0   0   777777000000 0            777777000000 
ET0	032112 034013 0   0   0            0            777777000000 
ST1A	032112 034013 0   0   0            0            777777000000 
ST9	032112 034013 0   0   0            0            777777000000 


*032112 JUMPA	0,032113
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032112 032112 0   0   324000032113 0            000000032113 
IT1	032112 0      0   0   324000032113 0            000000032113 
AT3	032112 0      0   0   000000032113 0            324000032113 
AT6	032112 032113 0   0   000000032113 0            324000032113 
FT1A	032112 032113 0   0   000000032113 0            000000032113 
FT2	032112 032113 0   0   0            0            000000032113 
FT2RQ	032112 032113 0   0   777777777777 0            000000032113 
FT3	032112 032113 0   0   777777777777 0            000000032113 
FT9	032113 032113 0   0   777777777777 0            000000032113 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 226
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0416

ET0	032113 032113 0   0   777777777777 0            000000032113 
ST1A	032113 032113 0   0   777777777777 0            000000032113 
ST9	032113 032113 0   0   777777777777 0            000000032113 


*032113 SETZ 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032113 032113 0   0   400000000000 0            0            
IT1	032113 0      0   0   400000000000 0            0            
AT3	032113 0      0   0   0            0            400000000000 
AT6	032113 0      0   0   0            0            400000000000 
FT1A	032113 0      0   0   0            0            0            
FT9	032114 0      0   0   0            0            0            
ET0	032114 0      0   0   0            0            0            
ST1	032114 0      0   0   0            0            0            
ST2	032114 0      0   0   0            0            0            
ST9	032114 0      0   0   0            0            0            


*032114 SETO 	1,000000
INITIAL
C(AC)=777777 000000 
C(E)=000000 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032114 032114 0   0   474040000000 0            0            
IT1	032114 0      0   0   474040000000 0            0            
AT3	032114 0      0   0   0            0            474040000000 
AT6	032114 0      0   0   0            0            474040000000 
FT1A	032114 0      0   0   0            0            0            
FT9	032115 0      0   0   0            0            0            
ET0	032115 0      0   0   777777777777 0            0            
ST1	032115 0      0   0   777777777777 0            0            
ST2	032115 0      0   0   777777777777 0            0            
ST9	032115 0      0   0   777777777777 0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 227
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0417

*032115 HRRM	0,000001
INITIAL
C(AC)=000000 000000 
C(E)=777777 777777 
FINAL

C(E)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032115 032115 0   0   542000000001 0            777777777777 
IT1	032115 0      0   0   542000000001 0            777777777777 
AT3	032115 0      0   0   000000000001 0            542000000001 
AT6	032115 000001 0   0   000000000001 0            542000000001 
FT0	032115 000001 0   0   777777777777 0            542000000001 
FT1A	032115 000001 0   0   777777777777 0            777777777777 
FT2	032115 000001 0   0   0            0            777777777777 
FT2RQ	032115 000001 0   0   0            0            777777777777 
FT3	032115 000001 0   0   0            0            777777777777 
FT9	032116 000001 0   0   0            0            777777777777 
ET0	032116 000001 0   0   777777000000 0            777777777777 
ST5	032116 000001 0   0   777777000000 0            777777777777 
ST6A	032116 000001 0   0   777777000000 0            777777777777 
ST9	032116 000001 0   0   777777000000 0            777777777777 


*032116 CAME	1,034013
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032116 032116 0   0   312040034013 0            777777000000 
IT1	032116 0      0   0   312040034013 0            777777000000 
AT3	032116 0      0   0   000000034013 0            312040034013 
AT6	032116 034013 0   0   000000034013 0            312040034013 
FT0	032116 034013 0   0   777777000000 0            312040034013 
FT1A	032116 034013 0   0   777777000000 0            777777000000 
FT2	032116 034013 0   0   0            0            777777000000 
FT2RQ	032116 034013 0   0   777777000000 0            777777000000 
FT3	032116 034013 0   0   777777000000 0            777777000000 
FT9	032117 034013 0   0   777777000000 0            777777000000 
ET0	032120 034013 0   0   0            0            777777000000 
ST1A	032120 034013 0   0   0            0            777777000000 
ST9	032120 034013 0   0   0            0            777777000000 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 228
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0418

*032120 JUMPA	0,032121
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032120 032120 0   0   324000032121 0            000000032121 
IT1	032120 0      0   0   324000032121 0            000000032121 
AT3	032120 0      0   0   000000032121 0            324000032121 
AT6	032120 032121 0   0   000000032121 0            324000032121 
FT1A	032120 032121 0   0   000000032121 0            000000032121 
FT2	032120 032121 0   0   0            0            000000032121 
FT2RQ	032120 032121 0   0   0            0            000000032121 
FT3	032120 032121 0   0   0            0            000000032121 
FT9	032121 032121 0   0   0            0            000000032121 
ET0	032121 032121 0   0   0            0            000000032121 
ST1A	032121 032121 0   0   0            0            000000032121 
ST9	032121 032121 0   0   0            0            000000032121 


*032121 SETO 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032121 032121 0   0   474000000000 0            0            
IT1	032121 0      0   0   474000000000 0            0            
AT3	032121 0      0   0   0            0            474000000000 
AT6	032121 0      0   0   0            0            474000000000 
FT1A	032121 0      0   0   0            0            0            
FT9	032122 0      0   0   0            0            0            
ET0	032122 0      0   0   777777777777 0            0            
ST1	032122 0      0   0   777777777777 0            0            
ST2	032122 0      0   0   777777777777 0            0            
ST9	032122 0      0   0   777777777777 0            0            


*032122 SETZ 	1,000000
INITIAL
C(AC)=777777 000000 
C(E)=777777 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032122 032122 0   0   400040000000 0            0            
IT1	032122 0      0   0   400040000000 0            0            
AT3	032122 0      0   0   0            0            400040000000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 229
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0419

AT6	032122 0      0   0   0            0            400040000000 
FT1A	032122 0      0   0   0            0            0            
FT9	032123 0      0   0   0            0            0            
ET0	032123 0      0   0   0            0            0            
ST1	032123 0      0   0   0            0            0            
ST2	032123 0      0   0   0            0            0            
ST9	032123 0      0   0   0            0            0            


*032123 HRRM	0,000001
INITIAL
C(AC)=777777 777777 
C(E)=000000 000000 
FINAL

C(E)=000000 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032123 032123 0   0   542000000001 0            0            
IT1	032123 0      0   0   542000000001 0            0            
AT3	032123 0      0   0   000000000001 0            542000000001 
AT6	032123 000001 0   0   000000000001 0            542000000001 
FT0	032123 000001 0   0   0            0            542000000001 
FT1A	032123 000001 0   0   0            0            0            
FT2	032123 000001 0   0   0            0            0            
FT2RQ	032123 000001 0   0   777777777777 0            0            
FT3	032123 000001 0   0   777777777777 0            0            
FT9	032124 000001 0   0   777777777777 0            0            
ET0	032124 000001 0   0   000000777777 0            0            
ST5	032124 000001 0   0   000000777777 0            0            
ST6A	032124 000001 0   0   000000777777 0            0            
ST9	032124 000001 0   0   000000777777 0            0            


*032124 CAIE	1,777777
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032124 032124 0   0   302040777777 0            000000777777 
IT1	032124 0      0   0   302040777777 0            000000777777 
AT3	032124 0      0   0   000000777777 0            302040777777 
AT6	032124 777777 0   0   000000777777 0            302040777777 
FT1A	032124 777777 0   0   000000777777 0            000000777777 
FT2	032124 777777 0   0   0            0            000000777777 
FT2RQ	032124 777777 0   0   000000777777 0            000000777777 
FT3	032124 777777 0   0   000000777777 0            000000777777 
FT9	032125 777777 0   0   000000777777 0            000000777777 
ET0	032126 777777 0   0   0            0            000000777777 
ST1A	032126 777777 0   0   0            0            000000777777 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 230
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0420

ST9	032126 777777 0   0   0            0            000000777777 


*032126 JUMPA	0,032127
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032126 032126 0   0   324000032127 0            000000032127 
IT1	032126 0      0   0   324000032127 0            000000032127 
AT3	032126 0      0   0   000000032127 0            324000032127 
AT6	032126 032127 0   0   000000032127 0            324000032127 
FT1A	032126 032127 0   0   000000032127 0            000000032127 
FT2	032126 032127 0   0   0            0            000000032127 
FT2RQ	032126 032127 0   0   777777777777 0            000000032127 
FT3	032126 032127 0   0   777777777777 0            000000032127 
FT9	032127 032127 0   0   777777777777 0            000000032127 
ET0	032127 032127 0   0   777777777777 0            000000032127 
ST1A	032127 032127 0   0   777777777777 0            000000032127 
ST9	032127 032127 0   0   777777777777 0            000000032127 


*032127 SETO 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032127 032127 0   0   474000000000 0            0            
IT1	032127 0      0   0   474000000000 0            0            
AT3	032127 0      0   0   0            0            474000000000 
AT6	032127 0      0   0   0            0            474000000000 
FT1A	032127 0      0   0   0            0            0            
FT9	032130 0      0   0   0            0            0            
ET0	032130 0      0   0   777777777777 0            0            
ST1	032130 0      0   0   777777777777 0            0            
ST2	032130 0      0   0   777777777777 0            0            
ST9	032130 0      0   0   777777777777 0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 231
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0421

*032130 HLLO 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032130 032130 0   0   520000000000 0            777777777777 
IT1	032130 0      0   0   520000000000 0            777777777777 
AT3	032130 0      0   0   0            0            520000000000 
AT6	032130 0      0   0   0            0            520000000000 
FT0	032130 0      0   0   777777777777 0            520000000000 
FT1A	032130 0      0   0   777777777777 0            777777777777 
FT9	032131 0      0   0   777777777777 0            777777777777 
ET0	032131 0      0   0   777777777777 0            777777777777 
ST1	032131 0      0   0   777777777777 0            777777777777 
ST2	032131 0      0   0   777777777777 0            777777777777 
ST9	032131 0      0   0   777777777777 0            777777777777 


*032131 CAME	0,034012
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032131 032131 0   0   312000034012 0            777777777777 
IT1	032131 0      0   0   312000034012 0            777777777777 
AT3	032131 0      0   0   000000034012 0            312000034012 
AT6	032131 034012 0   0   000000034012 0            312000034012 
FT0	032131 034012 0   0   777777777777 0            312000034012 
FT1A	032131 034012 0   0   777777777777 0            777777777777 
FT2	032131 034012 0   0   0            0            777777777777 
FT2RQ	032131 034012 0   0   777777777777 0            777777777777 
FT3	032131 034012 0   0   777777777777 0            777777777777 
FT9	032132 034012 0   0   777777777777 0            777777777777 
ET0	032133 034012 0   0   0            0            777777777777 
ST1A	032133 034012 0   0   0            0            777777777777 
ST9	032133 034012 0   0   0            0            777777777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 232
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0422

*032133 JUMPA	0,032134
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032133 032133 0   0   324000032134 0            000000032134 
IT1	032133 0      0   0   324000032134 0            000000032134 
AT3	032133 0      0   0   000000032134 0            324000032134 
AT6	032133 032134 0   0   000000032134 0            324000032134 
FT1A	032133 032134 0   0   000000032134 0            000000032134 
FT2	032133 032134 0   0   0            0            000000032134 
FT2RQ	032133 032134 0   0   777777777777 0            000000032134 
FT3	032133 032134 0   0   777777777777 0            000000032134 
FT9	032134 032134 0   0   777777777777 0            000000032134 
ET0	032134 032134 0   0   777777777777 0            000000032134 
ST1A	032134 032134 0   0   777777777777 0            000000032134 
ST9	032134 032134 0   0   777777777777 0            000000032134 


*032134 SETZ 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032134 032134 0   0   400000000000 0            0            
IT1	032134 0      0   0   400000000000 0            0            
AT3	032134 0      0   0   0            0            400000000000 
AT6	032134 0      0   0   0            0            400000000000 
FT1A	032134 0      0   0   0            0            0            
FT9	032135 0      0   0   0            0            0            
ET0	032135 0      0   0   0            0            0            
ST1	032135 0      0   0   0            0            0            
ST2	032135 0      0   0   0            0            0            
ST9	032135 0      0   0   0            0            0            


*032135 HLLO 	0,034015
INITIAL
C(AC)=000000 000000 
C(E)=000000 777777 
FINAL
C(AC)=000000 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032135 032135 0   0   520000034015 0            000000777777 
IT1	032135 0      0   0   520000034015 0            000000777777 
AT3	032135 0      0   0   000000034015 0            520000034015 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 233
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0423

AT6	032135 034015 0   0   000000034015 0            520000034015 
FT0	032135 034015 0   0   000000777777 0            520000034015 
FT1A	032135 034015 0   0   000000777777 0            000000777777 
FT9	032136 034015 0   0   000000777777 0            000000777777 
ET0	032136 034015 0   0   000000777777 0            000000777777 
ST1	032136 034015 0   0   000000777777 0            000000777777 
ST2	032136 034015 0   0   000000777777 0            000000777777 
ST9	032136 034015 0   0   000000777777 0            000000777777 


*032136 CAIE	0,777777
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032136 032136 0   0   302000777777 0            000000777777 
IT1	032136 0      0   0   302000777777 0            000000777777 
AT3	032136 0      0   0   000000777777 0            302000777777 
AT6	032136 777777 0   0   000000777777 0            302000777777 
FT1A	032136 777777 0   0   000000777777 0            000000777777 
FT2	032136 777777 0   0   0            0            000000777777 
FT2RQ	032136 777777 0   0   000000777777 0            000000777777 
FT3	032136 777777 0   0   000000777777 0            000000777777 
FT9	032137 777777 0   0   000000777777 0            000000777777 
ET0	032140 777777 0   0   0            0            000000777777 
ST1A	032140 777777 0   0   0            0            000000777777 
ST9	032140 777777 0   0   0            0            000000777777 


*032140 JUMPA	0,032141
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032140 032140 0   0   324000032141 0            000000032141 
IT1	032140 0      0   0   324000032141 0            000000032141 
AT3	032140 0      0   0   000000032141 0            324000032141 
AT6	032140 032141 0   0   000000032141 0            324000032141 
FT1A	032140 032141 0   0   000000032141 0            000000032141 
FT2	032140 032141 0   0   0            0            000000032141 
FT2RQ	032140 032141 0   0   000000777777 0            000000032141 
FT3	032140 032141 0   0   000000777777 0            000000032141 
FT9	032141 032141 0   0   000000777777 0            000000032141 
ET0	032141 032141 0   0   000000777777 0            000000032141 
ST1A	032141 032141 0   0   000000777777 0            000000032141 
ST9	032141 032141 0   0   000000777777 0            000000032141 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 234
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0424

*032141 SETO 	0,000000
INITIAL
C(AC)=000000 777777 
C(E)=000000 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032141 032141 0   0   474000000000 0            0            
IT1	032141 0      0   0   474000000000 0            0            
AT3	032141 0      0   0   0            0            474000000000 
AT6	032141 0      0   0   0            0            474000000000 
FT1A	032141 0      0   0   0            0            0            
FT9	032142 0      0   0   0            0            0            
ET0	032142 0      0   0   777777777777 0            0            
ST1	032142 0      0   0   777777777777 0            0            
ST2	032142 0      0   0   777777777777 0            0            
ST9	032142 0      0   0   777777777777 0            0            


*032142 HRRO 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032142 032142 0   0   560000000000 0            777777777777 
IT1	032142 0      0   0   560000000000 0            777777777777 
AT3	032142 0      0   0   0            0            560000000000 
AT6	032142 0      0   0   0            0            560000000000 
FT0	032142 0      0   0   777777777777 0            560000000000 
FT1A	032142 0      0   0   777777777777 0            777777777777 
FT9	032143 0      0   0   777777777777 0            777777777777 
ET0	032143 0      0   0   777777777777 0            777777777777 
ST1	032143 0      0   0   777777777777 0            777777777777 
ST2	032143 0      0   0   777777777777 0            777777777777 
ST9	032143 0      0   0   777777777777 0            777777777777 


*032143 CAME	0,034012
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032143 032143 0   0   312000034012 0            777777777777 
IT1	032143 0      0   0   312000034012 0            777777777777 
AT3	032143 0      0   0   000000034012 0            312000034012 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 235
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0425

AT6	032143 034012 0   0   000000034012 0            312000034012 
FT0	032143 034012 0   0   777777777777 0            312000034012 
FT1A	032143 034012 0   0   777777777777 0            777777777777 
FT2	032143 034012 0   0   0            0            777777777777 
FT2RQ	032143 034012 0   0   777777777777 0            777777777777 
FT3	032143 034012 0   0   777777777777 0            777777777777 
FT9	032144 034012 0   0   777777777777 0            777777777777 
ET0	032145 034012 0   0   0            0            777777777777 
ST1A	032145 034012 0   0   0            0            777777777777 
ST9	032145 034012 0   0   0            0            777777777777 


*032145 JUMPA	0,032146
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032145 032145 0   0   324000032146 0            000000032146 
IT1	032145 0      0   0   324000032146 0            000000032146 
AT3	032145 0      0   0   000000032146 0            324000032146 
AT6	032145 032146 0   0   000000032146 0            324000032146 
FT1A	032145 032146 0   0   000000032146 0            000000032146 
FT2	032145 032146 0   0   0            0            000000032146 
FT2RQ	032145 032146 0   0   777777777777 0            000000032146 
FT3	032145 032146 0   0   777777777777 0            000000032146 
FT9	032146 032146 0   0   777777777777 0            000000032146 
ET0	032146 032146 0   0   777777777777 0            000000032146 
ST1A	032146 032146 0   0   777777777777 0            000000032146 
ST9	032146 032146 0   0   777777777777 0            000000032146 


*032146 SETZ 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032146 032146 0   0   400000000000 0            0            
IT1	032146 0      0   0   400000000000 0            0            
AT3	032146 0      0   0   0            0            400000000000 
AT6	032146 0      0   0   0            0            400000000000 
FT1A	032146 0      0   0   0            0            0            
FT9	032147 0      0   0   0            0            0            
ET0	032147 0      0   0   0            0            0            
ST1	032147 0      0   0   0            0            0            
ST2	032147 0      0   0   0            0            0            
ST9	032147 0      0   0   0            0            0            

PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 236
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0426


*032147 HRRO 	0,034013
INITIAL
C(AC)=000000 000000 
C(E)=777777 000000 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032147 032147 0   0   560000034013 0            777777000000 
IT1	032147 0      0   0   560000034013 0            777777000000 
AT3	032147 0      0   0   000000034013 0            560000034013 
AT6	032147 034013 0   0   000000034013 0            560000034013 
FT0	032147 034013 0   0   777777000000 0            560000034013 
FT1A	032147 034013 0   0   777777000000 0            777777000000 
FT9	032150 034013 0   0   777777000000 0            777777000000 
ET0	032150 034013 0   0   777777000000 0            777777000000 
ST1	032150 034013 0   0   777777000000 0            777777000000 
ST2	032150 034013 0   0   777777000000 0            777777000000 
ST9	032150 034013 0   0   777777000000 0            777777000000 


*032150 CAME	0,034013
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032150 032150 0   0   312000034013 0            777777000000 
IT1	032150 0      0   0   312000034013 0            777777000000 
AT3	032150 0      0   0   000000034013 0            312000034013 
AT6	032150 034013 0   0   000000034013 0            312000034013 
FT0	032150 034013 0   0   777777000000 0            312000034013 
FT1A	032150 034013 0   0   777777000000 0            777777000000 
FT2	032150 034013 0   0   0            0            777777000000 
FT2RQ	032150 034013 0   0   777777000000 0            777777000000 
FT3	032150 034013 0   0   777777000000 0            777777000000 
FT9	032151 034013 0   0   777777000000 0            777777000000 
ET0	032152 034013 0   0   0            0            777777000000 
ST1A	032152 034013 0   0   0            0            777777000000 
ST9	032152 034013 0   0   0            0            777777000000 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 237
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0427

*032152 JUMPA	0,032153
INITIAL
C(AC)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032152 032152 0   0   324000032153 0            000000032153 
IT1	032152 0      0   0   324000032153 0            000000032153 
AT3	032152 0      0   0   000000032153 0            324000032153 
AT6	032152 032153 0   0   000000032153 0            324000032153 
FT1A	032152 032153 0   0   000000032153 0            000000032153 
FT2	032152 032153 0   0   0            0            000000032153 
FT2RQ	032152 032153 0   0   777777000000 0            000000032153 
FT3	032152 032153 0   0   777777000000 0            000000032153 
FT9	032153 032153 0   0   777777000000 0            000000032153 
ET0	032153 032153 0   0   777777000000 0            000000032153 
ST1A	032153 032153 0   0   777777000000 0            000000032153 
ST9	032153 032153 0   0   777777000000 0            000000032153 


*032153 SETZ 	0,000000
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032153 032153 0   0   400000000000 0            0            
IT1	032153 0      0   0   400000000000 0            0            
AT3	032153 0      0   0   0            0            400000000000 
AT6	032153 0      0   0   0            0            400000000000 
FT1A	032153 0      0   0   0            0            0            
FT9	032154 0      0   0   0            0            0            
ET0	032154 0      0   0   0            0            0            
ST1	032154 0      0   0   0            0            0            
ST2	032154 0      0   0   0            0            0            
ST9	032154 0      0   0   0            0            0            


*032154 HLLO 	0,034014
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032154 032154 0   0   520000034014 0            0            
IT1	032154 0      0   0   520000034014 0            0            
AT3	032154 0      0   0   000000034014 0            520000034014 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 238
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0428

AT6	032154 034014 0   0   000000034014 0            520000034014 
FT0	032154 034014 0   0   0            0            520000034014 
FT1A	032154 034014 0   0   0            0            0            
FT9	032155 034014 0   0   0            0            0            
ET0	032155 034014 0   0   000000777777 0            0            
ST1	032155 034014 0   0   000000777777 0            0            
ST2	032155 034014 0   0   000000777777 0            0            
ST9	032155 034014 0   0   000000777777 0            0            


*032155 CAIE	0,777777
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032155 032155 0   0   302000777777 0            000000777777 
IT1	032155 0      0   0   302000777777 0            000000777777 
AT3	032155 0      0   0   000000777777 0            302000777777 
AT6	032155 777777 0   0   000000777777 0            302000777777 
FT1A	032155 777777 0   0   000000777777 0            000000777777 
FT2	032155 777777 0   0   0            0            000000777777 
FT2RQ	032155 777777 0   0   000000777777 0            000000777777 
FT3	032155 777777 0   0   000000777777 0            000000777777 
FT9	032156 777777 0   0   000000777777 0            000000777777 
ET0	032157 777777 0   0   0            0            000000777777 
ST1A	032157 777777 0   0   0            0            000000777777 
ST9	032157 777777 0   0   0            0            000000777777 


*032157 JUMPA	0,032160
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032157 032157 0   0   324000032160 0            000000032160 
IT1	032157 0      0   0   324000032160 0            000000032160 
AT3	032157 0      0   0   000000032160 0            324000032160 
AT6	032157 032160 0   0   000000032160 0            324000032160 
FT1A	032157 032160 0   0   000000032160 0            000000032160 
FT2	032157 032160 0   0   0            0            000000032160 
FT2RQ	032157 032160 0   0   000000777777 0            000000032160 
FT3	032157 032160 0   0   000000777777 0            000000032160 
FT9	032160 032160 0   0   000000777777 0            000000032160 
ET0	032160 032160 0   0   000000777777 0            000000032160 
ST1A	032160 032160 0   0   000000777777 0            000000032160 
ST9	032160 032160 0   0   000000777777 0            000000032160 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 239
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0429

*032160 SETZ 	0,000000
INITIAL
C(AC)=000000 777777 
C(E)=000000 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032160 032160 0   0   400000000000 0            0            
IT1	032160 0      0   0   400000000000 0            0            
AT3	032160 0      0   0   0            0            400000000000 
AT6	032160 0      0   0   0            0            400000000000 
FT1A	032160 0      0   0   0            0            0            
FT9	032161 0      0   0   0            0            0            
ET0	032161 0      0   0   0            0            0            
ST1	032161 0      0   0   0            0            0            
ST2	032161 0      0   0   0            0            0            
ST9	032161 0      0   0   0            0            0            


*032161 HRRO 	0,034014
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032161 032161 0   0   560000034014 0            0            
IT1	032161 0      0   0   560000034014 0            0            
AT3	032161 0      0   0   000000034014 0            560000034014 
AT6	032161 034014 0   0   000000034014 0            560000034014 
FT0	032161 034014 0   0   0            0            560000034014 
FT1A	032161 034014 0   0   0            0            0            
FT9	032162 034014 0   0   0            0            0            
ET0	032162 034014 0   0   777777000000 0            0            
ST1	032162 034014 0   0   777777000000 0            0            
ST2	032162 034014 0   0   777777000000 0            0            
ST9	032162 034014 0   0   777777000000 0            0            


*032162 CAME	0,034013
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032162 032162 0   0   312000034013 0            777777000000 
IT1	032162 0      0   0   312000034013 0            777777000000 
AT3	032162 0      0   0   000000034013 0            312000034013 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 240
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0430

AT6	032162 034013 0   0   000000034013 0            312000034013 
FT0	032162 034013 0   0   777777000000 0            312000034013 
FT1A	032162 034013 0   0   777777000000 0            777777000000 
FT2	032162 034013 0   0   0            0            777777000000 
FT2RQ	032162 034013 0   0   777777000000 0            777777000000 
FT3	032162 034013 0   0   777777000000 0            777777000000 
FT9	032163 034013 0   0   777777000000 0            777777000000 
ET0	032164 034013 0   0   0            0            777777000000 
ST1A	032164 034013 0   0   0            0            777777000000 
ST9	032164 034013 0   0   0            0            777777000000 


*032164 JUMPA	0,032165
INITIAL
C(AC)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032164 032164 0   0   324000032165 0            000000032165 
IT1	032164 0      0   0   324000032165 0            000000032165 
AT3	032164 0      0   0   000000032165 0            324000032165 
AT6	032164 032165 0   0   000000032165 0            324000032165 
FT1A	032164 032165 0   0   000000032165 0            000000032165 
FT2	032164 032165 0   0   0            0            000000032165 
FT2RQ	032164 032165 0   0   777777000000 0            000000032165 
FT3	032164 032165 0   0   777777000000 0            000000032165 
FT9	032165 032165 0   0   777777000000 0            000000032165 
ET0	032165 032165 0   0   777777000000 0            000000032165 
ST1A	032165 032165 0   0   777777000000 0            000000032165 
ST9	032165 032165 0   0   777777000000 0            000000032165 


*032165 SETZ 	0,000000
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032165 032165 0   0   400000000000 0            0            
IT1	032165 0      0   0   400000000000 0            0            
AT3	032165 0      0   0   0            0            400000000000 
AT6	032165 0      0   0   0            0            400000000000 
FT1A	032165 0      0   0   0            0            0            
FT9	032166 0      0   0   0            0            0            
ET0	032166 0      0   0   0            0            0            
ST1	032166 0      0   0   0            0            0            
ST2	032166 0      0   0   0            0            0            
ST9	032166 0      0   0   0            0            0            

PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 241
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0431


*032166 HLLOI	0,000000
INITIAL
C(AC)=000000 000000 
FINAL
C(AC)=000000 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032166 032166 0   0   521000000000 0            0            
IT1	032166 0      0   0   521000000000 0            0            
AT3	032166 0      0   0   0            0            521000000000 
AT6	032166 0      0   0   0            0            521000000000 
FT1A	032166 0      0   0   0            0            0            
FT9	032167 0      0   0   0            0            0            
ET0	032167 0      0   0   000000777777 0            0            
ST1	032167 0      0   0   000000777777 0            0            
ST2	032167 0      0   0   000000777777 0            0            
ST9	032167 0      0   0   000000777777 0            0            


*032167 CAIE	0,777777
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032167 032167 0   0   302000777777 0            000000777777 
IT1	032167 0      0   0   302000777777 0            000000777777 
AT3	032167 0      0   0   000000777777 0            302000777777 
AT6	032167 777777 0   0   000000777777 0            302000777777 
FT1A	032167 777777 0   0   000000777777 0            000000777777 
FT2	032167 777777 0   0   0            0            000000777777 
FT2RQ	032167 777777 0   0   000000777777 0            000000777777 
FT3	032167 777777 0   0   000000777777 0            000000777777 
FT9	032170 777777 0   0   000000777777 0            000000777777 
ET0	032171 777777 0   0   0            0            000000777777 
ST1A	032171 777777 0   0   0            0            000000777777 
ST9	032171 777777 0   0   0            0            000000777777 


*032171 JUMPA	0,032172
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032171 032171 0   0   324000032172 0            000000032172 
IT1	032171 0      0   0   324000032172 0            000000032172 
AT3	032171 0      0   0   000000032172 0            324000032172 
AT6	032171 032172 0   0   000000032172 0            324000032172 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 242
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0432

FT1A	032171 032172 0   0   000000032172 0            000000032172 
FT2	032171 032172 0   0   0            0            000000032172 
FT2RQ	032171 032172 0   0   000000777777 0            000000032172 
FT3	032171 032172 0   0   000000777777 0            000000032172 
FT9	032172 032172 0   0   000000777777 0            000000032172 
ET0	032172 032172 0   0   000000777777 0            000000032172 
ST1A	032172 032172 0   0   000000777777 0            000000032172 
ST9	032172 032172 0   0   000000777777 0            000000032172 


*032172 SETZ 	0,000000
INITIAL
C(AC)=000000 777777 
C(E)=000000 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032172 032172 0   0   400000000000 0            0            
IT1	032172 0      0   0   400000000000 0            0            
AT3	032172 0      0   0   0            0            400000000000 
AT6	032172 0      0   0   0            0            400000000000 
FT1A	032172 0      0   0   0            0            0            
FT9	032173 0      0   0   0            0            0            
ET0	032173 0      0   0   0            0            0            
ST1	032173 0      0   0   0            0            0            
ST2	032173 0      0   0   0            0            0            
ST9	032173 0      0   0   0            0            0            


*032173 HRROI	0,000000
INITIAL
C(AC)=000000 000000 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032173 032173 0   0   561000000000 0            0            
IT1	032173 0      0   0   561000000000 0            0            
AT3	032173 0      0   0   0            0            561000000000 
AT6	032173 0      0   0   0            0            561000000000 
FT1A	032173 0      0   0   0            0            0            
FT9	032174 0      0   0   0            0            0            
ET0	032174 0      0   0   777777000000 0            0            
ST1	032174 0      0   0   777777000000 0            0            
ST2	032174 0      0   0   777777000000 0            0            
ST9	032174 0      0   0   777777000000 0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 243
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0433

*032174 CAME	0,034013
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032174 032174 0   0   312000034013 0            777777000000 
IT1	032174 0      0   0   312000034013 0            777777000000 
AT3	032174 0      0   0   000000034013 0            312000034013 
AT6	032174 034013 0   0   000000034013 0            312000034013 
FT0	032174 034013 0   0   777777000000 0            312000034013 
FT1A	032174 034013 0   0   777777000000 0            777777000000 
FT2	032174 034013 0   0   0            0            777777000000 
FT2RQ	032174 034013 0   0   777777000000 0            777777000000 
FT3	032174 034013 0   0   777777000000 0            777777000000 
FT9	032175 034013 0   0   777777000000 0            777777000000 
ET0	032176 034013 0   0   0            0            777777000000 
ST1A	032176 034013 0   0   0            0            777777000000 
ST9	032176 034013 0   0   0            0            777777000000 


*032176 JUMPA	0,032177
INITIAL
C(AC)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032176 032176 0   0   324000032177 0            000000032177 
IT1	032176 0      0   0   324000032177 0            000000032177 
AT3	032176 0      0   0   000000032177 0            324000032177 
AT6	032176 032177 0   0   000000032177 0            324000032177 
FT1A	032176 032177 0   0   000000032177 0            000000032177 
FT2	032176 032177 0   0   0            0            000000032177 
FT2RQ	032176 032177 0   0   777777000000 0            000000032177 
FT3	032176 032177 0   0   777777000000 0            000000032177 
FT9	032177 032177 0   0   777777000000 0            000000032177 
ET0	032177 032177 0   0   777777000000 0            000000032177 
ST1A	032177 032177 0   0   777777000000 0            000000032177 
ST9	032177 032177 0   0   777777000000 0            000000032177 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 244
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0434

*032177 SETZ 	0,000000
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032177 032177 0   0   400000000000 0            0            
IT1	032177 0      0   0   400000000000 0            0            
AT3	032177 0      0   0   0            0            400000000000 
AT6	032177 0      0   0   0            0            400000000000 
FT1A	032177 0      0   0   0            0            0            
FT9	0      0      0   0   0            0            0            
ET0	0      0      0   0   0            0            0            
ST1	0      0      0   0   0            0            0            
ST2	0      0      0   0   0            0            0            
ST9	0      0      0   0   0            0            0            


*032200 HLLO 	0,034013
INITIAL
C(AC)=000000 000000 
C(E)=777777 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	0      0      0   0   520000034013 0            777777000000 
IT1	0      0      0   0   520000034013 0            777777000000 
AT3	0      0      0   0   000000034013 0            520000034013 
AT6	0      034013 0   0   000000034013 0            520000034013 
FT0	0      034013 0   0   777777000000 0            520000034013 
FT1A	0      034013 0   0   777777000000 0            777777000000 
FT9	032201 034013 0   0   777777000000 0            777777000000 
ET0	032201 034013 0   0   777777777777 0            777777000000 
ST1	032201 034013 0   0   777777777777 0            777777000000 
ST2	032201 034013 0   0   777777777777 0            777777000000 
ST9	032201 034013 0   0   777777777777 0            777777000000 


*032201 CAME	0,034012
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032201 032201 0   0   312000034012 0            777777777777 
IT1	032201 0      0   0   312000034012 0            777777777777 
AT3	032201 0      0   0   000000034012 0            312000034012 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 245
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0435

AT6	032201 034012 0   0   000000034012 0            312000034012 
FT0	032201 034012 0   0   777777777777 0            312000034012 
FT1A	032201 034012 0   0   777777777777 0            777777777777 
FT2	032201 034012 0   0   0            0            777777777777 
FT2RQ	032201 034012 0   0   777777777777 0            777777777777 
FT3	032201 034012 0   0   777777777777 0            777777777777 
FT9	032202 034012 0   0   777777777777 0            777777777777 
ET0	032203 034012 0   0   0            0            777777777777 
ST1A	032203 034012 0   0   0            0            777777777777 
ST9	032203 034012 0   0   0            0            777777777777 


*032203 JUMPA	0,032204
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032203 032203 0   0   324000032204 0            000000032204 
IT1	032203 0      0   0   324000032204 0            000000032204 
AT3	032203 0      0   0   000000032204 0            324000032204 
AT6	032203 032204 0   0   000000032204 0            324000032204 
FT1A	032203 032204 0   0   000000032204 0            000000032204 
FT2	032203 032204 0   0   0            0            000000032204 
FT2RQ	032203 032204 0   0   777777777777 0            000000032204 
FT3	032203 032204 0   0   777777777777 0            000000032204 
FT9	032204 032204 0   0   777777777777 0            000000032204 
ET0	032204 032204 0   0   777777777777 0            000000032204 
ST1A	032204 032204 0   0   777777777777 0            000000032204 
ST9	032204 032204 0   0   777777777777 0            000000032204 


*032204 SETZ 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032204 032204 0   0   400000000000 0            0            
IT1	032204 0      0   0   400000000000 0            0            
AT3	032204 0      0   0   0            0            400000000000 
AT6	032204 0      0   0   0            0            400000000000 
FT1A	032204 0      0   0   0            0            0            
FT9	032205 0      0   0   0            0            0            
ET0	032205 0      0   0   0            0            0            
ST1	032205 0      0   0   0            0            0            
ST2	032205 0      0   0   0            0            0            
ST9	032205 0      0   0   0            0            0            

PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 246
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0436


*032205 HRROI	0,777777
INITIAL
C(AC)=000000 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032205 032205 0   0   561000777777 0            000000777777 
IT1	032205 0      0   0   561000777777 0            000000777777 
AT3	032205 0      0   0   000000777777 0            561000777777 
AT6	032205 777777 0   0   000000777777 0            561000777777 
FT1A	032205 777777 0   0   000000777777 0            000000777777 
FT9	032206 777777 0   0   000000777777 0            000000777777 
ET0	032206 777777 0   0   777777777777 0            000000777777 
ST1	032206 777777 0   0   777777777777 0            000000777777 
ST2	032206 777777 0   0   777777777777 0            000000777777 
ST9	032206 777777 0   0   777777777777 0            000000777777 


*032206 CAME	0,034012
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032206 032206 0   0   312000034012 0            777777777777 
IT1	032206 0      0   0   312000034012 0            777777777777 
AT3	032206 0      0   0   000000034012 0            312000034012 
AT6	032206 034012 0   0   000000034012 0            312000034012 
FT0	032206 034012 0   0   777777777777 0            312000034012 
FT1A	032206 034012 0   0   777777777777 0            777777777777 
FT2	032206 034012 0   0   0            0            777777777777 
FT2RQ	032206 034012 0   0   777777777777 0            777777777777 
FT3	032206 034012 0   0   777777777777 0            777777777777 
FT9	032207 034012 0   0   777777777777 0            777777777777 
ET0	032210 034012 0   0   0            0            777777777777 
ST1A	032210 034012 0   0   0            0            777777777777 
ST9	032210 034012 0   0   0            0            777777777777 


*032210 JUMPA	0,032211
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032210 032210 0   0   324000032211 0            000000032211 
IT1	032210 0      0   0   324000032211 0            000000032211 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 247
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0437

AT3	032210 0      0   0   000000032211 0            324000032211 
AT6	032210 032211 0   0   000000032211 0            324000032211 
FT1A	032210 032211 0   0   000000032211 0            000000032211 
FT2	032210 032211 0   0   0            0            000000032211 
FT2RQ	032210 032211 0   0   777777777777 0            000000032211 
FT3	032210 032211 0   0   777777777777 0            000000032211 
FT9	032211 032211 0   0   777777777777 0            000000032211 
ET0	032211 032211 0   0   777777777777 0            000000032211 
ST1A	032211 032211 0   0   777777777777 0            000000032211 
ST9	032211 032211 0   0   777777777777 0            000000032211 


*032211 SETO 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032211 032211 0   0   474000000000 0            0            
IT1	032211 0      0   0   474000000000 0            0            
AT3	032211 0      0   0   0            0            474000000000 
AT6	032211 0      0   0   0            0            474000000000 
FT1A	032211 0      0   0   0            0            0            
FT9	032212 0      0   0   0            0            0            
ET0	032212 0      0   0   777777777777 0            0            
ST1	032212 0      0   0   777777777777 0            0            
ST2	032212 0      0   0   777777777777 0            0            
ST9	032212 0      0   0   777777777777 0            0            


*032212 HLLOI	0,000000
INITIAL
C(AC)=777777 777777 
FINAL
C(AC)=000000 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032212 032212 0   0   521000000000 0            0            
IT1	032212 0      0   0   521000000000 0            0            
AT3	032212 0      0   0   0            0            521000000000 
AT6	032212 0      0   0   0            0            521000000000 
FT1A	032212 0      0   0   0            0            0            
FT9	032213 0      0   0   0            0            0            
ET0	032213 0      0   0   000000777777 0            0            
ST1	032213 0      0   0   000000777777 0            0            
ST2	032213 0      0   0   000000777777 0            0            
ST9	032213 0      0   0   000000777777 0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 248
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0438

*032213 CAIE	0,777777
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032213 032213 0   0   302000777777 0            000000777777 
IT1	032213 0      0   0   302000777777 0            000000777777 
AT3	032213 0      0   0   000000777777 0            302000777777 
AT6	032213 777777 0   0   000000777777 0            302000777777 
FT1A	032213 777777 0   0   000000777777 0            000000777777 
FT2	032213 777777 0   0   0            0            000000777777 
FT2RQ	032213 777777 0   0   000000777777 0            000000777777 
FT3	032213 777777 0   0   000000777777 0            000000777777 
FT9	032214 777777 0   0   000000777777 0            000000777777 
ET0	032215 777777 0   0   0            0            000000777777 
ST1A	032215 777777 0   0   0            0            000000777777 
ST9	032215 777777 0   0   0            0            000000777777 


*032215 JUMPA	0,032216
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032215 032215 0   0   324000032216 0            000000032216 
IT1	032215 0      0   0   324000032216 0            000000032216 
AT3	032215 0      0   0   000000032216 0            324000032216 
AT6	032215 032216 0   0   000000032216 0            324000032216 
FT1A	032215 032216 0   0   000000032216 0            000000032216 
FT2	032215 032216 0   0   0            0            000000032216 
FT2RQ	032215 032216 0   0   000000777777 0            000000032216 
FT3	032215 032216 0   0   000000777777 0            000000032216 
FT9	032216 032216 0   0   000000777777 0            000000032216 
ET0	032216 032216 0   0   000000777777 0            000000032216 
ST1A	032216 032216 0   0   000000777777 0            000000032216 
ST9	032216 032216 0   0   000000777777 0            000000032216 


*032216 SETO 	0,000000
INITIAL
C(AC)=000000 777777 
C(E)=000000 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032216 032216 0   0   474000000000 0            0            
IT1	032216 0      0   0   474000000000 0            0            
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 249
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0439

AT3	032216 0      0   0   0            0            474000000000 
AT6	032216 0      0   0   0            0            474000000000 
FT1A	032216 0      0   0   0            0            0            
FT9	032217 0      0   0   0            0            0            
ET0	032217 0      0   0   777777777777 0            0            
ST1	032217 0      0   0   777777777777 0            0            
ST2	032217 0      0   0   777777777777 0            0            
ST9	032217 0      0   0   777777777777 0            0            


*032217 HRROI	0,000000
INITIAL
C(AC)=777777 777777 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032217 032217 0   0   561000000000 0            0            
IT1	032217 0      0   0   561000000000 0            0            
AT3	032217 0      0   0   0            0            561000000000 
AT6	032217 0      0   0   0            0            561000000000 
FT1A	032217 0      0   0   0            0            0            
FT9	032220 0      0   0   0            0            0            
ET0	032220 0      0   0   777777000000 0            0            
ST1	032220 0      0   0   777777000000 0            0            
ST2	032220 0      0   0   777777000000 0            0            
ST9	032220 0      0   0   777777000000 0            0            


*032220 CAME	0,034013
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032220 032220 0   0   312000034013 0            777777000000 
IT1	032220 0      0   0   312000034013 0            777777000000 
AT3	032220 0      0   0   000000034013 0            312000034013 
AT6	032220 034013 0   0   000000034013 0            312000034013 
FT0	032220 034013 0   0   777777000000 0            312000034013 
FT1A	032220 034013 0   0   777777000000 0            777777000000 
FT2	032220 034013 0   0   0            0            777777000000 
FT2RQ	032220 034013 0   0   777777000000 0            777777000000 
FT3	032220 034013 0   0   777777000000 0            777777000000 
FT9	032221 034013 0   0   777777000000 0            777777000000 
ET0	032222 034013 0   0   0            0            777777000000 
ST1A	032222 034013 0   0   0            0            777777000000 
ST9	032222 034013 0   0   0            0            777777000000 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 250
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0440

*032222 JUMPA	0,032223
INITIAL
C(AC)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032222 032222 0   0   324000032223 0            000000032223 
IT1	032222 0      0   0   324000032223 0            000000032223 
AT3	032222 0      0   0   000000032223 0            324000032223 
AT6	032222 032223 0   0   000000032223 0            324000032223 
FT1A	032222 032223 0   0   000000032223 0            000000032223 
FT2	032222 032223 0   0   0            0            000000032223 
FT2RQ	032222 032223 0   0   777777000000 0            000000032223 
FT3	032222 032223 0   0   777777000000 0            000000032223 
FT9	032223 032223 0   0   777777000000 0            000000032223 
ET0	032223 032223 0   0   777777000000 0            000000032223 
ST1A	032223 032223 0   0   777777000000 0            000000032223 
ST9	032223 032223 0   0   777777000000 0            000000032223 


*032223 SETO 	0,000000
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032223 032223 0   0   474000000000 0            0            
IT1	032223 0      0   0   474000000000 0            0            
AT3	032223 0      0   0   0            0            474000000000 
AT6	032223 0      0   0   0            0            474000000000 
FT1A	032223 0      0   0   0            0            0            
FT9	032224 0      0   0   0            0            0            
ET0	032224 0      0   0   777777777777 0            0            
ST1	032224 0      0   0   777777777777 0            0            
ST2	032224 0      0   0   777777777777 0            0            
ST9	032224 0      0   0   777777777777 0            0            


*032224 HLLO 	0,034013
INITIAL
C(AC)=777777 777777 
C(E)=777777 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032224 032224 0   0   520000034013 0            777777000000 
IT1	032224 0      0   0   520000034013 0            777777000000 
AT3	032224 0      0   0   000000034013 0            520000034013 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 251
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0441

AT6	032224 034013 0   0   000000034013 0            520000034013 
FT0	032224 034013 0   0   777777000000 0            520000034013 
FT1A	032224 034013 0   0   777777000000 0            777777000000 
FT9	032225 034013 0   0   777777000000 0            777777000000 
ET0	032225 034013 0   0   777777777777 0            777777000000 
ST1	032225 034013 0   0   777777777777 0            777777000000 
ST2	032225 034013 0   0   777777777777 0            777777000000 
ST9	032225 034013 0   0   777777777777 0            777777000000 


*032225 CAME	0,034012
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032225 032225 0   0   312000034012 0            777777777777 
IT1	032225 0      0   0   312000034012 0            777777777777 
AT3	032225 0      0   0   000000034012 0            312000034012 
AT6	032225 034012 0   0   000000034012 0            312000034012 
FT0	032225 034012 0   0   777777777777 0            312000034012 
FT1A	032225 034012 0   0   777777777777 0            777777777777 
FT2	032225 034012 0   0   0            0            777777777777 
FT2RQ	032225 034012 0   0   777777777777 0            777777777777 
FT3	032225 034012 0   0   777777777777 0            777777777777 
FT9	032226 034012 0   0   777777777777 0            777777777777 
ET0	032227 034012 0   0   0            0            777777777777 
ST1A	032227 034012 0   0   0            0            777777777777 
ST9	032227 034012 0   0   0            0            777777777777 


*032227 JUMPA	0,032230
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032227 032227 0   0   324000032230 0            000000032230 
IT1	032227 0      0   0   324000032230 0            000000032230 
AT3	032227 0      0   0   000000032230 0            324000032230 
AT6	032227 032230 0   0   000000032230 0            324000032230 
FT1A	032227 032230 0   0   000000032230 0            000000032230 
FT2	032227 032230 0   0   0            0            000000032230 
FT2RQ	032227 032230 0   0   777777777777 0            000000032230 
FT3	032227 032230 0   0   777777777777 0            000000032230 
FT9	032230 032230 0   0   777777777777 0            000000032230 
ET0	032230 032230 0   0   777777777777 0            000000032230 
ST1A	032230 032230 0   0   777777777777 0            000000032230 
ST9	032230 032230 0   0   777777777777 0            000000032230 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 252
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0442



*032230 SETO 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032230 032230 0   0   474000000000 0            0            
IT1	032230 0      0   0   474000000000 0            0            
AT3	032230 0      0   0   0            0            474000000000 
AT6	032230 0      0   0   0            0            474000000000 
FT1A	032230 0      0   0   0            0            0            
FT9	032231 0      0   0   0            0            0            
ET0	032231 0      0   0   777777777777 0            0            
ST1	032231 0      0   0   777777777777 0            0            
ST2	032231 0      0   0   777777777777 0            0            
ST9	032231 0      0   0   777777777777 0            0            


*032231 HRROI	0,777777
INITIAL
C(AC)=777777 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032231 032231 0   0   561000777777 0            000000777777 
IT1	032231 0      0   0   561000777777 0            000000777777 
AT3	032231 0      0   0   000000777777 0            561000777777 
AT6	032231 777777 0   0   000000777777 0            561000777777 
FT1A	032231 777777 0   0   000000777777 0            000000777777 
FT9	032232 777777 0   0   000000777777 0            000000777777 
ET0	032232 777777 0   0   777777777777 0            000000777777 
ST1	032232 777777 0   0   777777777777 0            000000777777 
ST2	032232 777777 0   0   777777777777 0            000000777777 
ST9	032232 777777 0   0   777777777777 0            000000777777 


*032232 CAME	0,034012
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032232 032232 0   0   312000034012 0            777777777777 
IT1	032232 0      0   0   312000034012 0            777777777777 
AT3	032232 0      0   0   000000034012 0            312000034012 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 253
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0443

AT6	032232 034012 0   0   000000034012 0            312000034012 
FT0	032232 034012 0   0   777777777777 0            312000034012 
FT1A	032232 034012 0   0   777777777777 0            777777777777 
FT2	032232 034012 0   0   0            0            777777777777 
FT2RQ	032232 034012 0   0   777777777777 0            777777777777 
FT3	032232 034012 0   0   777777777777 0            777777777777 
FT9	032233 034012 0   0   777777777777 0            777777777777 
ET0	032234 034012 0   0   0            0            777777777777 
ST1A	032234 034012 0   0   0            0            777777777777 
ST9	032234 034012 0   0   0            0            777777777777 


*032234 JUMPA	0,032235
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032234 032234 0   0   324000032235 0            000000032235 
IT1	032234 0      0   0   324000032235 0            000000032235 
AT3	032234 0      0   0   000000032235 0            324000032235 
AT6	032234 032235 0   0   000000032235 0            324000032235 
FT1A	032234 032235 0   0   000000032235 0            000000032235 
FT2	032234 032235 0   0   0            0            000000032235 
FT2RQ	032234 032235 0   0   777777777777 0            000000032235 
FT3	032234 032235 0   0   777777777777 0            000000032235 
FT9	032235 032235 0   0   777777777777 0            000000032235 
ET0	032235 032235 0   0   777777777777 0            000000032235 
ST1A	032235 032235 0   0   777777777777 0            000000032235 
ST9	032235 032235 0   0   777777777777 0            000000032235 


*032235 MOVEI	0,777777
INITIAL
C(AC)=777777 777777 
FINAL
C(AC)=000000 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032235 032235 0   0   201000777777 0            000000777777 
IT1	032235 0      0   0   201000777777 0            000000777777 
AT3	032235 0      0   0   000000777777 0            201000777777 
AT6	032235 777777 0   0   000000777777 0            201000777777 
FT1A	032235 777777 0   0   000000777777 0            000000777777 
FT9	032236 777777 0   0   000000777777 0            000000777777 
ET0	032236 777777 0   0   000000777777 0            000000777777 
ST1	032236 777777 0   0   000000777777 0            000000777777 
ST2	032236 777777 0   0   000000777777 0            000000777777 
ST9	032236 777777 0   0   000000777777 0            000000777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 254
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0444

*032236 HRROI	0,000000
INITIAL
C(AC)=000000 777777 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032236 032236 0   0   561000000000 0            0            
IT1	032236 0      0   0   561000000000 0            0            
AT3	032236 0      0   0   0            0            561000000000 
AT6	032236 0      0   0   0            0            561000000000 
FT1A	032236 0      0   0   0            0            0            
FT9	032237 0      0   0   0            0            0            
ET0	032237 0      0   0   777777000000 0            0            
ST1	032237 0      0   0   777777000000 0            0            
ST2	032237 0      0   0   777777000000 0            0            
ST9	032237 0      0   0   777777000000 0            0            


*032237 CAME	0,034013
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032237 032237 0   0   312000034013 0            777777000000 
IT1	032237 0      0   0   312000034013 0            777777000000 
AT3	032237 0      0   0   000000034013 0            312000034013 
AT6	032237 034013 0   0   000000034013 0            312000034013 
FT0	032237 034013 0   0   777777000000 0            312000034013 
FT1A	032237 034013 0   0   777777000000 0            777777000000 
FT2	032237 034013 0   0   0            0            777777000000 
FT2RQ	032237 034013 0   0   777777000000 0            777777000000 
FT3	032237 034013 0   0   777777000000 0            777777000000 
FT9	032240 034013 0   0   777777000000 0            777777000000 
ET0	032241 034013 0   0   0            0            777777000000 
ST1A	032241 034013 0   0   0            0            777777000000 
ST9	032241 034013 0   0   0            0            777777000000 


*032241 JUMPA	0,032242
INITIAL
C(AC)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032241 032241 0   0   324000032242 0            000000032242 
IT1	032241 0      0   0   324000032242 0            000000032242 
AT3	032241 0      0   0   000000032242 0            324000032242 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 255
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0445

AT6	032241 032242 0   0   000000032242 0            324000032242 
FT1A	032241 032242 0   0   000000032242 0            000000032242 
FT2	032241 032242 0   0   0            0            000000032242 
FT2RQ	032241 032242 0   0   777777000000 0            000000032242 
FT3	032241 032242 0   0   777777000000 0            000000032242 
FT9	032242 032242 0   0   777777000000 0            000000032242 
ET0	032242 032242 0   0   777777000000 0            000000032242 
ST1A	032242 032242 0   0   777777000000 0            000000032242 
ST9	032242 032242 0   0   777777000000 0            000000032242 


*032242 MOVSI	0,777777
INITIAL
C(AC)=777777 000000 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032242 032242 0   0   205000777777 0            000000777777 
IT1	032242 0      0   0   205000777777 0            000000777777 
AT3	032242 0      0   0   000000777777 0            205000777777 
AT6	032242 777777 0   0   000000777777 0            205000777777 
FT1A	032242 777777 0   0   000000777777 0            000000777777 
FT9	032243 777777 0   0   000000777777 0            000000777777 
ET0	032243 777777 0   0   777777000000 0            000000777777 
ST1	032243 777777 0   0   777777000000 0            000000777777 
ST2	032243 777777 0   0   777777000000 0            000000777777 
ST9	032243 777777 0   0   777777000000 0            000000777777 


*032243 HLLO 	0,034015
INITIAL
C(AC)=777777 000000 
C(E)=000000 777777 
FINAL
C(AC)=000000 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032243 032243 0   0   520000034015 0            000000777777 
IT1	032243 0      0   0   520000034015 0            000000777777 
AT3	032243 0      0   0   000000034015 0            520000034015 
AT6	032243 034015 0   0   000000034015 0            520000034015 
FT0	032243 034015 0   0   000000777777 0            520000034015 
FT1A	032243 034015 0   0   000000777777 0            000000777777 
FT9	032244 034015 0   0   000000777777 0            000000777777 
ET0	032244 034015 0   0   000000777777 0            000000777777 
ST1	032244 034015 0   0   000000777777 0            000000777777 
ST2	032244 034015 0   0   000000777777 0            000000777777 
ST9	032244 034015 0   0   000000777777 0            000000777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 256
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0446

*032244 CAIE	0,777777
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032244 032244 0   0   302000777777 0            000000777777 
IT1	032244 0      0   0   302000777777 0            000000777777 
AT3	032244 0      0   0   000000777777 0            302000777777 
AT6	032244 777777 0   0   000000777777 0            302000777777 
FT1A	032244 777777 0   0   000000777777 0            000000777777 
FT2	032244 777777 0   0   0            0            000000777777 
FT2RQ	032244 777777 0   0   000000777777 0            000000777777 
FT3	032244 777777 0   0   000000777777 0            000000777777 
FT9	032245 777777 0   0   000000777777 0            000000777777 
ET0	032246 777777 0   0   0            0            000000777777 
ST1A	032246 777777 0   0   0            0            000000777777 
ST9	032246 777777 0   0   0            0            000000777777 


*032246 JUMPA	0,032247
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032246 032246 0   0   324000032247 0            000000032247 
IT1	032246 0      0   0   324000032247 0            000000032247 
AT3	032246 0      0   0   000000032247 0            324000032247 
AT6	032246 032247 0   0   000000032247 0            324000032247 
FT1A	032246 032247 0   0   000000032247 0            000000032247 
FT2	032246 032247 0   0   0            0            000000032247 
FT2RQ	032246 032247 0   0   000000777777 0            000000032247 
FT3	032246 032247 0   0   000000777777 0            000000032247 
FT9	032247 032247 0   0   000000777777 0            000000032247 
ET0	032247 032247 0   0   000000777777 0            000000032247 
ST1A	032247 032247 0   0   000000777777 0            000000032247 
ST9	032247 032247 0   0   000000777777 0            000000032247 


*032247 SETZ 	0,000000
INITIAL
C(AC)=000000 777777 
C(E)=000000 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032247 032247 0   0   400000000000 0            0            
IT1	032247 0      0   0   400000000000 0            0            
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 257
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0447

AT3	032247 0      0   0   0            0            400000000000 
AT6	032247 0      0   0   0            0            400000000000 
FT1A	032247 0      0   0   0            0            0            
FT9	032250 0      0   0   0            0            0            
ET0	032250 0      0   0   0            0            0            
ST1	032250 0      0   0   0            0            0            
ST2	032250 0      0   0   0            0            0            
ST9	032250 0      0   0   0            0            0            


*032250 HRLZ 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032250 032250 0   0   514000000000 0            0            
IT1	032250 0      0   0   514000000000 0            0            
AT3	032250 0      0   0   0            0            514000000000 
AT6	032250 0      0   0   0            0            514000000000 
FT0	032250 0      0   0   0            0            514000000000 
FT1A	032250 0      0   0   0            0            0            
FT9	032251 0      0   0   0            0            0            
ET0	032251 0      0   0   0            0            0            
ST1	032251 0      0   0   0            0            0            
ST2	032251 0      0   0   0            0            0            
ST9	032251 0      0   0   0            0            0            


*032251 SKIPE	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032251 032251 0   0   332000000000 0            0            
IT1	032251 0      0   0   332000000000 0            0            
AT3	032251 0      0   0   0            0            332000000000 
AT6	032251 0      0   0   0            0            332000000000 
FT0	032251 0      0   0   0            0            332000000000 
FT1A	032251 0      0   0   0            0            0            
FT9	032252 0      0   0   0            0            0            
ET0	032253 0      0   0   0            0            0            
ST1A	032253 0      0   0   0            0            0            
ST9	032253 0      0   0   0            0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 258
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0448

*032253 JUMPA	0,032254
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032253 032253 0   0   324000032254 0            000000032254 
IT1	032253 0      0   0   324000032254 0            000000032254 
AT3	032253 0      0   0   000000032254 0            324000032254 
AT6	032253 032254 0   0   000000032254 0            324000032254 
FT1A	032253 032254 0   0   000000032254 0            000000032254 
FT2	032253 032254 0   0   0            0            000000032254 
FT2RQ	032253 032254 0   0   0            0            000000032254 
FT3	032253 032254 0   0   0            0            000000032254 
FT9	032254 032254 0   0   0            0            000000032254 
ET0	032254 032254 0   0   0            0            000000032254 
ST1A	032254 032254 0   0   0            0            000000032254 
ST9	032254 032254 0   0   0            0            000000032254 


*032254 SETZ 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032254 032254 0   0   400000000000 0            0            
IT1	032254 0      0   0   400000000000 0            0            
AT3	032254 0      0   0   0            0            400000000000 
AT6	032254 0      0   0   0            0            400000000000 
FT1A	032254 0      0   0   0            0            0            
FT9	032255 0      0   0   0            0            0            
ET0	032255 0      0   0   0            0            0            
ST1	032255 0      0   0   0            0            0            
ST2	032255 0      0   0   0            0            0            
ST9	032255 0      0   0   0            0            0            


*032255 HLRZ 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032255 032255 0   0   554000000000 0            0            
IT1	032255 0      0   0   554000000000 0            0            
AT3	032255 0      0   0   0            0            554000000000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 259
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0449

AT6	032255 0      0   0   0            0            554000000000 
FT0	032255 0      0   0   0            0            554000000000 
FT1A	032255 0      0   0   0            0            0            
FT9	032256 0      0   0   0            0            0            
ET0	032256 0      0   0   0            0            0            
ST1	032256 0      0   0   0            0            0            
ST2	032256 0      0   0   0            0            0            
ST9	032256 0      0   0   0            0            0            


*032256 SKIPE	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032256 032256 0   0   332000000000 0            0            
IT1	032256 0      0   0   332000000000 0            0            
AT3	032256 0      0   0   0            0            332000000000 
AT6	032256 0      0   0   0            0            332000000000 
FT0	032256 0      0   0   0            0            332000000000 
FT1A	032256 0      0   0   0            0            0            
FT9	032257 0      0   0   0            0            0            
ET0	032260 0      0   0   0            0            0            
ST1A	032260 0      0   0   0            0            0            
ST9	032260 0      0   0   0            0            0            


*032260 JUMPA	0,032261
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032260 032260 0   0   324000032261 0            000000032261 
IT1	032260 0      0   0   324000032261 0            000000032261 
AT3	032260 0      0   0   000000032261 0            324000032261 
AT6	032260 032261 0   0   000000032261 0            324000032261 
FT1A	032260 032261 0   0   000000032261 0            000000032261 
FT2	032260 032261 0   0   0            0            000000032261 
FT2RQ	032260 032261 0   0   0            0            000000032261 
FT3	032260 032261 0   0   0            0            000000032261 
FT9	032261 032261 0   0   0            0            000000032261 
ET0	032261 032261 0   0   0            0            000000032261 
ST1A	032261 032261 0   0   0            0            000000032261 
ST9	032261 032261 0   0   0            0            000000032261 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 260
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0450

*032261 SETZ 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032261 032261 0   0   400000000000 0            0            
IT1	032261 0      0   0   400000000000 0            0            
AT3	032261 0      0   0   0            0            400000000000 
AT6	032261 0      0   0   0            0            400000000000 
FT1A	032261 0      0   0   0            0            0            
FT9	032262 0      0   0   0            0            0            
ET0	032262 0      0   0   0            0            0            
ST1	032262 0      0   0   0            0            0            
ST2	032262 0      0   0   0            0            0            
ST9	032262 0      0   0   0            0            0            


*032262 HRLZI	0,777777
INITIAL
C(AC)=000000 000000 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032262 032262 0   0   515000777777 0            000000777777 
IT1	032262 0      0   0   515000777777 0            000000777777 
AT3	032262 0      0   0   000000777777 0            515000777777 
AT6	032262 777777 0   0   000000777777 0            515000777777 
FT1A	032262 777777 0   0   000000777777 0            000000777777 
FT9	032263 777777 0   0   000000777777 0            000000777777 
ET0	032263 777777 0   0   777777000000 0            000000777777 
ST1	032263 777777 0   0   777777000000 0            000000777777 
ST2	032263 777777 0   0   777777000000 0            000000777777 
ST9	032263 777777 0   0   777777000000 0            000000777777 


*032263 CAME	0,034013
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032263 032263 0   0   312000034013 0            777777000000 
IT1	032263 0      0   0   312000034013 0            777777000000 
AT3	032263 0      0   0   000000034013 0            312000034013 
AT6	032263 034013 0   0   000000034013 0            312000034013 
FT0	032263 034013 0   0   777777000000 0            312000034013 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 261
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0451

FT1A	032263 034013 0   0   777777000000 0            777777000000 
FT2	032263 034013 0   0   0            0            777777000000 
FT2RQ	032263 034013 0   0   777777000000 0            777777000000 
FT3	032263 034013 0   0   777777000000 0            777777000000 
FT9	032264 034013 0   0   777777000000 0            777777000000 
ET0	032265 034013 0   0   0            0            777777000000 
ST1A	032265 034013 0   0   0            0            777777000000 
ST9	032265 034013 0   0   0            0            777777000000 


*032265 JUMPA	0,032266
INITIAL
C(AC)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032265 032265 0   0   324000032266 0            000000032266 
IT1	032265 0      0   0   324000032266 0            000000032266 
AT3	032265 0      0   0   000000032266 0            324000032266 
AT6	032265 032266 0   0   000000032266 0            324000032266 
FT1A	032265 032266 0   0   000000032266 0            000000032266 
FT2	032265 032266 0   0   0            0            000000032266 
FT2RQ	032265 032266 0   0   777777000000 0            000000032266 
FT3	032265 032266 0   0   777777000000 0            000000032266 
FT9	032266 032266 0   0   777777000000 0            000000032266 
ET0	032266 032266 0   0   777777000000 0            000000032266 
ST1A	032266 032266 0   0   777777000000 0            000000032266 
ST9	032266 032266 0   0   777777000000 0            000000032266 


*032266 SETZ 	0,000000
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032266 032266 0   0   400000000000 0            0            
IT1	032266 0      0   0   400000000000 0            0            
AT3	032266 0      0   0   0            0            400000000000 
AT6	032266 0      0   0   0            0            400000000000 
FT1A	032266 0      0   0   0            0            0            
FT9	032267 0      0   0   0            0            0            
ET0	032267 0      0   0   0            0            0            
ST1	032267 0      0   0   0            0            0            
ST2	032267 0      0   0   0            0            0            
ST9	032267 0      0   0   0            0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 262
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0452

*032267 HLRZ 	0,034013
INITIAL
C(AC)=000000 000000 
C(E)=777777 000000 
FINAL
C(AC)=000000 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032267 032267 0   0   554000034013 0            777777000000 
IT1	032267 0      0   0   554000034013 0            777777000000 
AT3	032267 0      0   0   000000034013 0            554000034013 
AT6	032267 034013 0   0   000000034013 0            554000034013 
FT0	032267 034013 0   0   777777000000 0            554000034013 
FT1A	032267 034013 0   0   777777000000 0            777777000000 
FT9	032270 034013 0   0   777777000000 0            777777000000 
ET0	032270 034013 0   0   000000777777 0            777777000000 
ST1	032270 034013 0   0   000000777777 0            777777000000 
ST2	032270 034013 0   0   000000777777 0            777777000000 
ST9	032270 034013 0   0   000000777777 0            777777000000 


*032270 CAIE	0,777777
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032270 032270 0   0   302000777777 0            000000777777 
IT1	032270 0      0   0   302000777777 0            000000777777 
AT3	032270 0      0   0   000000777777 0            302000777777 
AT6	032270 777777 0   0   000000777777 0            302000777777 
FT1A	032270 777777 0   0   000000777777 0            000000777777 
FT2	032270 777777 0   0   0            0            000000777777 
FT2RQ	032270 777777 0   0   000000777777 0            000000777777 
FT3	032270 777777 0   0   000000777777 0            000000777777 
FT9	032271 777777 0   0   000000777777 0            000000777777 
ET0	032272 777777 0   0   0            0            000000777777 
ST1A	032272 777777 0   0   0            0            000000777777 
ST9	032272 777777 0   0   0            0            000000777777 


*032272 JUMPA	0,032273
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032272 032272 0   0   324000032273 0            000000032273 
IT1	032272 0      0   0   324000032273 0            000000032273 
AT3	032272 0      0   0   000000032273 0            324000032273 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 263
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0453

AT6	032272 032273 0   0   000000032273 0            324000032273 
FT1A	032272 032273 0   0   000000032273 0            000000032273 
FT2	032272 032273 0   0   0            0            000000032273 
FT2RQ	032272 032273 0   0   000000777777 0            000000032273 
FT3	032272 032273 0   0   000000777777 0            000000032273 
FT9	032273 032273 0   0   000000777777 0            000000032273 
ET0	032273 032273 0   0   000000777777 0            000000032273 
ST1A	032273 032273 0   0   000000777777 0            000000032273 
ST9	032273 032273 0   0   000000777777 0            000000032273 


*032273 SETO 	0,000000
INITIAL
C(AC)=000000 777777 
C(E)=000000 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032273 032273 0   0   474000000000 0            0            
IT1	032273 0      0   0   474000000000 0            0            
AT3	032273 0      0   0   0            0            474000000000 
AT6	032273 0      0   0   0            0            474000000000 
FT1A	032273 0      0   0   0            0            0            
FT9	032274 0      0   0   0            0            0            
ET0	032274 0      0   0   777777777777 0            0            
ST1	032274 0      0   0   777777777777 0            0            
ST2	032274 0      0   0   777777777777 0            0            
ST9	032274 0      0   0   777777777777 0            0            


*032274 HRLZI	0,777777
INITIAL
C(AC)=777777 777777 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032274 032274 0   0   515000777777 0            000000777777 
IT1	032274 0      0   0   515000777777 0            000000777777 
AT3	032274 0      0   0   000000777777 0            515000777777 
AT6	032274 777777 0   0   000000777777 0            515000777777 
FT1A	032274 777777 0   0   000000777777 0            000000777777 
FT9	032275 777777 0   0   000000777777 0            000000777777 
ET0	032275 777777 0   0   777777000000 0            000000777777 
ST1	032275 777777 0   0   777777000000 0            000000777777 
ST2	032275 777777 0   0   777777000000 0            000000777777 
ST9	032275 777777 0   0   777777000000 0            000000777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 264
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0454

*032275 CAME	0,034013
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032275 032275 0   0   312000034013 0            777777000000 
IT1	032275 0      0   0   312000034013 0            777777000000 
AT3	032275 0      0   0   000000034013 0            312000034013 
AT6	032275 034013 0   0   000000034013 0            312000034013 
FT0	032275 034013 0   0   777777000000 0            312000034013 
FT1A	032275 034013 0   0   777777000000 0            777777000000 
FT2	032275 034013 0   0   0            0            777777000000 
FT2RQ	032275 034013 0   0   777777000000 0            777777000000 
FT3	032275 034013 0   0   777777000000 0            777777000000 
FT9	032276 034013 0   0   777777000000 0            777777000000 
ET0	032277 034013 0   0   0            0            777777000000 
ST1A	032277 034013 0   0   0            0            777777000000 
ST9	032277 034013 0   0   0            0            777777000000 


*032277 JUMPA	0,032300
INITIAL
C(AC)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032277 032277 0   0   324000032300 0            000000032300 
IT1	032277 0      0   0   324000032300 0            000000032300 
AT3	032277 0      0   0   000000032300 0            324000032300 
AT6	032277 0      0   0   000000032300 0            324000032300 
FT1A	032277 0      0   0   000000032300 0            000000032300 
FT2	032277 0      0   0   0            0            000000032300 
FT2RQ	032277 0      0   0   777777000000 0            000000032300 
FT3	032277 0      0   0   777777000000 0            000000032300 
FT9	0      0      0   0   777777000000 0            000000032300 
ET0	0      0      0   0   777777000000 0            000000032300 
ST1A	0      0      0   0   777777000000 0            000000032300 
ST9	0      0      0   0   777777000000 0            000000032300 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 265
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0455

*032300 SETO 	0,000000
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	0      0      0   0   474000000000 0            0            
IT1	0      0      0   0   474000000000 0            0            
AT3	0      0      0   0   0            0            474000000000 
AT6	0      0      0   0   0            0            474000000000 
FT1A	0      0      0   0   0            0            0            
FT9	032301 0      0   0   0            0            0            
ET0	032301 0      0   0   777777777777 0            0            
ST1	032301 0      0   0   777777777777 0            0            
ST2	032301 0      0   0   777777777777 0            0            
ST9	032301 0      0   0   777777777777 0            0            


*032301 HLRZ 	0,034013
INITIAL
C(AC)=777777 777777 
C(E)=777777 000000 
FINAL
C(AC)=000000 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032301 032301 0   0   554000034013 0            777777000000 
IT1	032301 0      0   0   554000034013 0            777777000000 
AT3	032301 0      0   0   000000034013 0            554000034013 
AT6	032301 034013 0   0   000000034013 0            554000034013 
FT0	032301 034013 0   0   777777000000 0            554000034013 
FT1A	032301 034013 0   0   777777000000 0            777777000000 
FT9	032302 034013 0   0   777777000000 0            777777000000 
ET0	032302 034013 0   0   000000777777 0            777777000000 
ST1	032302 034013 0   0   000000777777 0            777777000000 
ST2	032302 034013 0   0   000000777777 0            777777000000 
ST9	032302 034013 0   0   000000777777 0            777777000000 


*032302 CAIE	0,777777
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032302 032302 0   0   302000777777 0            000000777777 
IT1	032302 0      0   0   302000777777 0            000000777777 
AT3	032302 0      0   0   000000777777 0            302000777777 
AT6	032302 777777 0   0   000000777777 0            302000777777 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 266
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0456

FT1A	032302 777777 0   0   000000777777 0            000000777777 
FT2	032302 777777 0   0   0            0            000000777777 
FT2RQ	032302 777777 0   0   000000777777 0            000000777777 
FT3	032302 777777 0   0   000000777777 0            000000777777 
FT9	032303 777777 0   0   000000777777 0            000000777777 
ET0	032304 777777 0   0   0            0            000000777777 
ST1A	032304 777777 0   0   0            0            000000777777 
ST9	032304 777777 0   0   0            0            000000777777 


*032304 JUMPA	0,032305
INITIAL
C(AC)=000000 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032304 032304 0   0   324000032305 0            000000032305 
IT1	032304 0      0   0   324000032305 0            000000032305 
AT3	032304 0      0   0   000000032305 0            324000032305 
AT6	032304 032305 0   0   000000032305 0            324000032305 
FT1A	032304 032305 0   0   000000032305 0            000000032305 
FT2	032304 032305 0   0   0            0            000000032305 
FT2RQ	032304 032305 0   0   000000777777 0            000000032305 
FT3	032304 032305 0   0   000000777777 0            000000032305 
FT9	032305 032305 0   0   000000777777 0            000000032305 
ET0	032305 032305 0   0   000000777777 0            000000032305 
ST1A	032305 032305 0   0   000000777777 0            000000032305 
ST9	032305 032305 0   0   000000777777 0            000000032305 


*032305 SETZ 	0,000000
INITIAL
C(AC)=000000 777777 
C(E)=000000 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032305 032305 0   0   400000000000 0            0            
IT1	032305 0      0   0   400000000000 0            0            
AT3	032305 0      0   0   0            0            400000000000 
AT6	032305 0      0   0   0            0            400000000000 
FT1A	032305 0      0   0   0            0            0            
FT9	032306 0      0   0   0            0            0            
ET0	032306 0      0   0   0            0            0            
ST1	032306 0      0   0   0            0            0            
ST2	032306 0      0   0   0            0            0            
ST9	032306 0      0   0   0            0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 267
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0457

*032306 HLLE 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032306 032306 0   0   530000000000 0            0            
IT1	032306 0      0   0   530000000000 0            0            
AT3	032306 0      0   0   0            0            530000000000 
AT6	032306 0      0   0   0            0            530000000000 
FT0	032306 0      0   0   0            0            530000000000 
FT1A	032306 0      0   0   0            0            0            
FT9	032307 0      0   0   0            0            0            
ET0	032307 0      0   0   0            0            0            
ST1	032307 0      0   0   0            0            0            
ST2	032307 0      0   0   0            0            0            
ST9	032307 0      0   0   0            0            0            


*032307 SKIPE	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032307 032307 0   0   332000000000 0            0            
IT1	032307 0      0   0   332000000000 0            0            
AT3	032307 0      0   0   0            0            332000000000 
AT6	032307 0      0   0   0            0            332000000000 
FT0	032307 0      0   0   0            0            332000000000 
FT1A	032307 0      0   0   0            0            0            
FT9	032310 0      0   0   0            0            0            
ET0	032311 0      0   0   0            0            0            
ST1A	032311 0      0   0   0            0            0            
ST9	032311 0      0   0   0            0            0            


*032311 JUMPA	0,032312
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032311 032311 0   0   324000032312 0            000000032312 
IT1	032311 0      0   0   324000032312 0            000000032312 
AT3	032311 0      0   0   000000032312 0            324000032312 
AT6	032311 032312 0   0   000000032312 0            324000032312 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 268
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0458

FT1A	032311 032312 0   0   000000032312 0            000000032312 
FT2	032311 032312 0   0   0            0            000000032312 
FT2RQ	032311 032312 0   0   0            0            000000032312 
FT3	032311 032312 0   0   0            0            000000032312 
FT9	032312 032312 0   0   0            0            000000032312 
ET0	032312 032312 0   0   0            0            000000032312 
ST1A	032312 032312 0   0   0            0            000000032312 
ST9	032312 032312 0   0   0            0            000000032312 


*032312 SETZ 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032312 032312 0   0   400000000000 0            0            
IT1	032312 0      0   0   400000000000 0            0            
AT3	032312 0      0   0   0            0            400000000000 
AT6	032312 0      0   0   0            0            400000000000 
FT1A	032312 0      0   0   0            0            0            
FT9	032313 0      0   0   0            0            0            
ET0	032313 0      0   0   0            0            0            
ST1	032313 0      0   0   0            0            0            
ST2	032313 0      0   0   0            0            0            
ST9	032313 0      0   0   0            0            0            


*032313 HLLE 	0,034012
INITIAL
C(AC)=000000 000000 
C(E)=777777 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032313 032313 0   0   530000034012 0            777777777777 
IT1	032313 0      0   0   530000034012 0            777777777777 
AT3	032313 0      0   0   000000034012 0            530000034012 
AT6	032313 034012 0   0   000000034012 0            530000034012 
FT0	032313 034012 0   0   777777777777 0            530000034012 
FT1A	032313 034012 0   0   777777777777 0            777777777777 
FT9	032314 034012 0   0   777777777777 0            777777777777 
ET0	032314 034012 0   0   777777777777 0            777777777777 
ST1	032314 034012 0   0   777777777777 0            777777777777 
ST2	032314 034012 0   0   777777777777 0            777777777777 
ST9	032314 034012 0   0   777777777777 0            777777777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 269
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0459

*032314 CAME	0,034012
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032314 032314 0   0   312000034012 0            777777777777 
IT1	032314 0      0   0   312000034012 0            777777777777 
AT3	032314 0      0   0   000000034012 0            312000034012 
AT6	032314 034012 0   0   000000034012 0            312000034012 
FT0	032314 034012 0   0   777777777777 0            312000034012 
FT1A	032314 034012 0   0   777777777777 0            777777777777 
FT2	032314 034012 0   0   0            0            777777777777 
FT2RQ	032314 034012 0   0   777777777777 0            777777777777 
FT3	032314 034012 0   0   777777777777 0            777777777777 
FT9	032315 034012 0   0   777777777777 0            777777777777 
ET0	032316 034012 0   0   0            0            777777777777 
ST1A	032316 034012 0   0   0            0            777777777777 
ST9	032316 034012 0   0   0            0            777777777777 


*032316 JUMPA	0,032317
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032316 032316 0   0   324000032317 0            000000032317 
IT1	032316 0      0   0   324000032317 0            000000032317 
AT3	032316 0      0   0   000000032317 0            324000032317 
AT6	032316 032317 0   0   000000032317 0            324000032317 
FT1A	032316 032317 0   0   000000032317 0            000000032317 
FT2	032316 032317 0   0   0            0            000000032317 
FT2RQ	032316 032317 0   0   777777777777 0            000000032317 
FT3	032316 032317 0   0   777777777777 0            000000032317 
FT9	032317 032317 0   0   777777777777 0            000000032317 
ET0	032317 032317 0   0   777777777777 0            000000032317 
ST1A	032317 032317 0   0   777777777777 0            000000032317 
ST9	032317 032317 0   0   777777777777 0            000000032317 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 270
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0460

*032317 SETZ 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032317 032317 0   0   400000000000 0            0            
IT1	032317 0      0   0   400000000000 0            0            
AT3	032317 0      0   0   0            0            400000000000 
AT6	032317 0      0   0   0            0            400000000000 
FT1A	032317 0      0   0   0            0            0            
FT9	032320 0      0   0   0            0            0            
ET0	032320 0      0   0   0            0            0            
ST1	032320 0      0   0   0            0            0            
ST2	032320 0      0   0   0            0            0            
ST9	032320 0      0   0   0            0            0            


*032320 HRRE 	0,034012
INITIAL
C(AC)=000000 000000 
C(E)=777777 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032320 032320 0   0   570000034012 0            777777777777 
IT1	032320 0      0   0   570000034012 0            777777777777 
AT3	032320 0      0   0   000000034012 0            570000034012 
AT6	032320 034012 0   0   000000034012 0            570000034012 
FT0	032320 034012 0   0   777777777777 0            570000034012 
FT1A	032320 034012 0   0   777777777777 0            777777777777 
FT9	032321 034012 0   0   777777777777 0            777777777777 
ET0	032321 034012 0   0   777777777777 0            777777777777 
ST1	032321 034012 0   0   777777777777 0            777777777777 
ST2	032321 034012 0   0   777777777777 0            777777777777 
ST9	032321 034012 0   0   777777777777 0            777777777777 


*032321 CAME	0,034012
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032321 032321 0   0   312000034012 0            777777777777 
IT1	032321 0      0   0   312000034012 0            777777777777 
AT3	032321 0      0   0   000000034012 0            312000034012 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 271
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0461

AT6	032321 034012 0   0   000000034012 0            312000034012 
FT0	032321 034012 0   0   777777777777 0            312000034012 
FT1A	032321 034012 0   0   777777777777 0            777777777777 
FT2	032321 034012 0   0   0            0            777777777777 
FT2RQ	032321 034012 0   0   777777777777 0            777777777777 
FT3	032321 034012 0   0   777777777777 0            777777777777 
FT9	032322 034012 0   0   777777777777 0            777777777777 
ET0	032323 034012 0   0   0            0            777777777777 
ST1A	032323 034012 0   0   0            0            777777777777 
ST9	032323 034012 0   0   0            0            777777777777 


*032323 JUMPA	0,032324
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032323 032323 0   0   324000032324 0            000000032324 
IT1	032323 0      0   0   324000032324 0            000000032324 
AT3	032323 0      0   0   000000032324 0            324000032324 
AT6	032323 032324 0   0   000000032324 0            324000032324 
FT1A	032323 032324 0   0   000000032324 0            000000032324 
FT2	032323 032324 0   0   0            0            000000032324 
FT2RQ	032323 032324 0   0   777777777777 0            000000032324 
FT3	032323 032324 0   0   777777777777 0            000000032324 
FT9	032324 032324 0   0   777777777777 0            000000032324 
ET0	032324 032324 0   0   777777777777 0            000000032324 
ST1A	032324 032324 0   0   777777777777 0            000000032324 
ST9	032324 032324 0   0   777777777777 0            000000032324 


*032324 SETZ 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032324 032324 0   0   400000000000 0            0            
IT1	032324 0      0   0   400000000000 0            0            
AT3	032324 0      0   0   0            0            400000000000 
AT6	032324 0      0   0   0            0            400000000000 
FT1A	032324 0      0   0   0            0            0            
FT9	032325 0      0   0   0            0            0            
ET0	032325 0      0   0   0            0            0            
ST1	032325 0      0   0   0            0            0            
ST2	032325 0      0   0   0            0            0            
ST9	032325 0      0   0   0            0            0            

PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 272
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0462


*032325 HLLE 	0,034013
INITIAL
C(AC)=000000 000000 
C(E)=777777 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032325 032325 0   0   530000034013 0            777777000000 
IT1	032325 0      0   0   530000034013 0            777777000000 
AT3	032325 0      0   0   000000034013 0            530000034013 
AT6	032325 034013 0   0   000000034013 0            530000034013 
FT0	032325 034013 0   0   777777000000 0            530000034013 
FT1A	032325 034013 0   0   777777000000 0            777777000000 
FT9	032326 034013 0   0   777777000000 0            777777000000 
ET0	032326 034013 0   0   777777777777 0            777777000000 
ST1	032326 034013 0   0   777777777777 0            777777000000 
ST2	032326 034013 0   0   777777777777 0            777777000000 
ST9	032326 034013 0   0   777777777777 0            777777000000 


*032326 CAME	0,034012
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032326 032326 0   0   312000034012 0            777777777777 
IT1	032326 0      0   0   312000034012 0            777777777777 
AT3	032326 0      0   0   000000034012 0            312000034012 
AT6	032326 034012 0   0   000000034012 0            312000034012 
FT0	032326 034012 0   0   777777777777 0            312000034012 
FT1A	032326 034012 0   0   777777777777 0            777777777777 
FT2	032326 034012 0   0   0            0            777777777777 
FT2RQ	032326 034012 0   0   777777777777 0            777777777777 
FT3	032326 034012 0   0   777777777777 0            777777777777 
FT9	032327 034012 0   0   777777777777 0            777777777777 
ET0	032330 034012 0   0   0            0            777777777777 
ST1A	032330 034012 0   0   0            0            777777777777 
ST9	032330 034012 0   0   0            0            777777777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 273
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0463

*032330 JUMPA	0,032331
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032330 032330 0   0   324000032331 0            000000032331 
IT1	032330 0      0   0   324000032331 0            000000032331 
AT3	032330 0      0   0   000000032331 0            324000032331 
AT6	032330 032331 0   0   000000032331 0            324000032331 
FT1A	032330 032331 0   0   000000032331 0            000000032331 
FT2	032330 032331 0   0   0            0            000000032331 
FT2RQ	032330 032331 0   0   777777777777 0            000000032331 
FT3	032330 032331 0   0   777777777777 0            000000032331 
FT9	032331 032331 0   0   777777777777 0            000000032331 
ET0	032331 032331 0   0   777777777777 0            000000032331 
ST1A	032331 032331 0   0   777777777777 0            000000032331 
ST9	032331 032331 0   0   777777777777 0            000000032331 


*032331 SETZ 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032331 032331 0   0   400000000000 0            0            
IT1	032331 0      0   0   400000000000 0            0            
AT3	032331 0      0   0   0            0            400000000000 
AT6	032331 0      0   0   0            0            400000000000 
FT1A	032331 0      0   0   0            0            0            
FT9	032332 0      0   0   0            0            0            
ET0	032332 0      0   0   0            0            0            
ST1	032332 0      0   0   0            0            0            
ST2	032332 0      0   0   0            0            0            
ST9	032332 0      0   0   0            0            0            


*032332 HRRE 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032332 032332 0   0   570000000000 0            0            
IT1	032332 0      0   0   570000000000 0            0            
AT3	032332 0      0   0   0            0            570000000000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 274
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0464

AT6	032332 0      0   0   0            0            570000000000 
FT0	032332 0      0   0   0            0            570000000000 
FT1A	032332 0      0   0   0            0            0            
FT9	032333 0      0   0   0            0            0            
ET0	032333 0      0   0   0            0            0            
ST1	032333 0      0   0   0            0            0            
ST2	032333 0      0   0   0            0            0            
ST9	032333 0      0   0   0            0            0            


*032333 SKIPE	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032333 032333 0   0   332000000000 0            0            
IT1	032333 0      0   0   332000000000 0            0            
AT3	032333 0      0   0   0            0            332000000000 
AT6	032333 0      0   0   0            0            332000000000 
FT0	032333 0      0   0   0            0            332000000000 
FT1A	032333 0      0   0   0            0            0            
FT9	032334 0      0   0   0            0            0            
ET0	032335 0      0   0   0            0            0            
ST1A	032335 0      0   0   0            0            0            
ST9	032335 0      0   0   0            0            0            


*032335 JUMPA	0,032336
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032335 032335 0   0   324000032336 0            000000032336 
IT1	032335 0      0   0   324000032336 0            000000032336 
AT3	032335 0      0   0   000000032336 0            324000032336 
AT6	032335 032336 0   0   000000032336 0            324000032336 
FT1A	032335 032336 0   0   000000032336 0            000000032336 
FT2	032335 032336 0   0   0            0            000000032336 
FT2RQ	032335 032336 0   0   0            0            000000032336 
FT3	032335 032336 0   0   0            0            000000032336 
FT9	032336 032336 0   0   0            0            000000032336 
ET0	032336 032336 0   0   0            0            000000032336 
ST1A	032336 032336 0   0   0            0            000000032336 
ST9	032336 032336 0   0   0            0            000000032336 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 275
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0465

*032336 SETZ 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032336 032336 0   0   400000000000 0            0            
IT1	032336 0      0   0   400000000000 0            0            
AT3	032336 0      0   0   0            0            400000000000 
AT6	032336 0      0   0   0            0            400000000000 
FT1A	032336 0      0   0   0            0            0            
FT9	032337 0      0   0   0            0            0            
ET0	032337 0      0   0   0            0            0            
ST1	032337 0      0   0   0            0            0            
ST2	032337 0      0   0   0            0            0            
ST9	032337 0      0   0   0            0            0            


*032337 HRRE 	0,034013
INITIAL
C(AC)=000000 000000 
C(E)=777777 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032337 032337 0   0   570000034013 0            777777000000 
IT1	032337 0      0   0   570000034013 0            777777000000 
AT3	032337 0      0   0   000000034013 0            570000034013 
AT6	032337 034013 0   0   000000034013 0            570000034013 
FT0	032337 034013 0   0   777777000000 0            570000034013 
FT1A	032337 034013 0   0   777777000000 0            777777000000 
FT9	032340 034013 0   0   777777000000 0            777777000000 
ET0	032340 034013 0   0   0            0            777777000000 
ST1	032340 034013 0   0   0            0            777777000000 
ST2	032340 034013 0   0   0            0            777777000000 
ST9	032340 034013 0   0   0            0            777777000000 


*032340 SKIPE	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032340 032340 0   0   332000000000 0            0            
IT1	032340 0      0   0   332000000000 0            0            
AT3	032340 0      0   0   0            0            332000000000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 276
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0466

AT6	032340 0      0   0   0            0            332000000000 
FT0	032340 0      0   0   0            0            332000000000 
FT1A	032340 0      0   0   0            0            0            
FT9	032341 0      0   0   0            0            0            
ET0	032342 0      0   0   0            0            0            
ST1A	032342 0      0   0   0            0            0            
ST9	032342 0      0   0   0            0            0            


*032342 JUMPA	0,032343
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032342 032342 0   0   324000032343 0            000000032343 
IT1	032342 0      0   0   324000032343 0            000000032343 
AT3	032342 0      0   0   000000032343 0            324000032343 
AT6	032342 032343 0   0   000000032343 0            324000032343 
FT1A	032342 032343 0   0   000000032343 0            000000032343 
FT2	032342 032343 0   0   0            0            000000032343 
FT2RQ	032342 032343 0   0   0            0            000000032343 
FT3	032342 032343 0   0   0            0            000000032343 
FT9	032343 032343 0   0   0            0            000000032343 
ET0	032343 032343 0   0   0            0            000000032343 
ST1A	032343 032343 0   0   0            0            000000032343 
ST9	032343 032343 0   0   0            0            000000032343 


*032343 SETZ 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032343 032343 0   0   400000000000 0            0            
IT1	032343 0      0   0   400000000000 0            0            
AT3	032343 0      0   0   0            0            400000000000 
AT6	032343 0      0   0   0            0            400000000000 
FT1A	032343 0      0   0   0            0            0            
FT9	032344 0      0   0   0            0            0            
ET0	032344 0      0   0   0            0            0            
ST1	032344 0      0   0   0            0            0            
ST2	032344 0      0   0   0            0            0            
ST9	032344 0      0   0   0            0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 277
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0467

*032344 HRREI	0,777777
INITIAL
C(AC)=000000 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032344 032344 0   0   571000777777 0            000000777777 
IT1	032344 0      0   0   571000777777 0            000000777777 
AT3	032344 0      0   0   000000777777 0            571000777777 
AT6	032344 777777 0   0   000000777777 0            571000777777 
FT1A	032344 777777 0   0   000000777777 0            000000777777 
FT9	032345 777777 0   0   000000777777 0            000000777777 
ET0	032345 777777 0   0   777777777777 0            000000777777 
ST1	032345 777777 0   0   777777777777 0            000000777777 
ST2	032345 777777 0   0   777777777777 0            000000777777 
ST9	032345 777777 0   0   777777777777 0            000000777777 


*032345 CAME	0,034012
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032345 032345 0   0   312000034012 0            777777777777 
IT1	032345 0      0   0   312000034012 0            777777777777 
AT3	032345 0      0   0   000000034012 0            312000034012 
AT6	032345 034012 0   0   000000034012 0            312000034012 
FT0	032345 034012 0   0   777777777777 0            312000034012 
FT1A	032345 034012 0   0   777777777777 0            777777777777 
FT2	032345 034012 0   0   0            0            777777777777 
FT2RQ	032345 034012 0   0   777777777777 0            777777777777 
FT3	032345 034012 0   0   777777777777 0            777777777777 
FT9	032346 034012 0   0   777777777777 0            777777777777 
ET0	032347 034012 0   0   0            0            777777777777 
ST1A	032347 034012 0   0   0            0            777777777777 
ST9	032347 034012 0   0   0            0            777777777777 


*032347 JUMPA	0,032350
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032347 032347 0   0   324000032350 0            000000032350 
IT1	032347 0      0   0   324000032350 0            000000032350 
AT3	032347 0      0   0   000000032350 0            324000032350 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 278
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0468

AT6	032347 032350 0   0   000000032350 0            324000032350 
FT1A	032347 032350 0   0   000000032350 0            000000032350 
FT2	032347 032350 0   0   0            0            000000032350 
FT2RQ	032347 032350 0   0   777777777777 0            000000032350 
FT3	032347 032350 0   0   777777777777 0            000000032350 
FT9	032350 032350 0   0   777777777777 0            000000032350 
ET0	032350 032350 0   0   777777777777 0            000000032350 
ST1A	032350 032350 0   0   777777777777 0            000000032350 
ST9	032350 032350 0   0   777777777777 0            000000032350 


*032350 SETO 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032350 032350 0   0   474000000000 0            0            
IT1	032350 0      0   0   474000000000 0            0            
AT3	032350 0      0   0   0            0            474000000000 
AT6	032350 0      0   0   0            0            474000000000 
FT1A	032350 0      0   0   0            0            0            
FT9	032351 0      0   0   0            0            0            
ET0	032351 0      0   0   777777777777 0            0            
ST1	032351 0      0   0   777777777777 0            0            
ST2	032351 0      0   0   777777777777 0            0            
ST9	032351 0      0   0   777777777777 0            0            


*032351 HLLEI	0,777777
INITIAL
C(AC)=777777 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032351 032351 0   0   531000777777 0            000000777777 
IT1	032351 0      0   0   531000777777 0            000000777777 
AT3	032351 0      0   0   000000777777 0            531000777777 
AT6	032351 777777 0   0   000000777777 0            531000777777 
FT1A	032351 777777 0   0   000000777777 0            000000777777 
FT9	032352 777777 0   0   000000777777 0            000000777777 
ET0	032352 777777 0   0   0            0            000000777777 
ST1	032352 777777 0   0   0            0            000000777777 
ST2	032352 777777 0   0   0            0            000000777777 
ST9	032352 777777 0   0   0            0            000000777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 279
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0469

*032352 SKIPE	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032352 032352 0   0   332000000000 0            0            
IT1	032352 0      0   0   332000000000 0            0            
AT3	032352 0      0   0   0            0            332000000000 
AT6	032352 0      0   0   0            0            332000000000 
FT0	032352 0      0   0   0            0            332000000000 
FT1A	032352 0      0   0   0            0            0            
FT9	032353 0      0   0   0            0            0            
ET0	032354 0      0   0   0            0            0            
ST1A	032354 0      0   0   0            0            0            
ST9	032354 0      0   0   0            0            0            


*032354 JUMPA	0,032355
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032354 032354 0   0   324000032355 0            000000032355 
IT1	032354 0      0   0   324000032355 0            000000032355 
AT3	032354 0      0   0   000000032355 0            324000032355 
AT6	032354 032355 0   0   000000032355 0            324000032355 
FT1A	032354 032355 0   0   000000032355 0            000000032355 
FT2	032354 032355 0   0   0            0            000000032355 
FT2RQ	032354 032355 0   0   0            0            000000032355 
FT3	032354 032355 0   0   0            0            000000032355 
FT9	032355 032355 0   0   0            0            000000032355 
ET0	032355 032355 0   0   0            0            000000032355 
ST1A	032355 032355 0   0   0            0            000000032355 
ST9	032355 032355 0   0   0            0            000000032355 


*032355 SETO 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032355 032355 0   0   474000000000 0            0            
IT1	032355 0      0   0   474000000000 0            0            
AT3	032355 0      0   0   0            0            474000000000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 280
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0470

AT6	032355 0      0   0   0            0            474000000000 
FT1A	032355 0      0   0   0            0            0            
FT9	032356 0      0   0   0            0            0            
ET0	032356 0      0   0   777777777777 0            0            
ST1	032356 0      0   0   777777777777 0            0            
ST2	032356 0      0   0   777777777777 0            0            
ST9	032356 0      0   0   777777777777 0            0            


*032356 HLLEI	0,400000
INITIAL
C(AC)=777777 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032356 032356 0   0   531000400000 0            000000400000 
IT1	032356 0      0   0   531000400000 0            000000400000 
AT3	032356 0      0   0   000000400000 0            531000400000 
AT6	032356 0      0   0   000000400000 0            531000400000 
FT1A	032356 0      0   0   000000400000 0            000000400000 
FT9	032357 0      0   0   000000400000 0            000000400000 
ET0	032357 0      0   0   0            0            000000400000 
ST1	032357 0      0   0   0            0            000000400000 
ST2	032357 0      0   0   0            0            000000400000 
ST9	032357 0      0   0   0            0            000000400000 


*032357 SKIPE	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032357 032357 0   0   332000000000 0            0            
IT1	032357 0      0   0   332000000000 0            0            
AT3	032357 0      0   0   0            0            332000000000 
AT6	032357 0      0   0   0            0            332000000000 
FT0	032357 0      0   0   0            0            332000000000 
FT1A	032357 0      0   0   0            0            0            
FT9	032360 0      0   0   0            0            0            
ET0	032361 0      0   0   0            0            0            
ST1A	032361 0      0   0   0            0            0            
ST9	032361 0      0   0   0            0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 281
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0471

*032361 JUMPA	0,032362
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032361 032361 0   0   324000032362 0            000000032362 
IT1	032361 0      0   0   324000032362 0            000000032362 
AT3	032361 0      0   0   000000032362 0            324000032362 
AT6	032361 032362 0   0   000000032362 0            324000032362 
FT1A	032361 032362 0   0   000000032362 0            000000032362 
FT2	032361 032362 0   0   0            0            000000032362 
FT2RQ	032361 032362 0   0   0            0            000000032362 
FT3	032361 032362 0   0   0            0            000000032362 
FT9	032362 032362 0   0   0            0            000000032362 
ET0	032362 032362 0   0   0            0            000000032362 
ST1A	032362 032362 0   0   0            0            000000032362 
ST9	032362 032362 0   0   0            0            000000032362 


*032362 SETZ 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032362 032362 0   0   400000000000 0            0            
IT1	032362 0      0   0   400000000000 0            0            
AT3	032362 0      0   0   0            0            400000000000 
AT6	032362 0      0   0   0            0            400000000000 
FT1A	032362 0      0   0   0            0            0            
FT9	032363 0      0   0   0            0            0            
ET0	032363 0      0   0   0            0            0            
ST1	032363 0      0   0   0            0            0            
ST2	032363 0      0   0   0            0            0            
ST9	032363 0      0   0   0            0            0            


*032363 HRLE 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032363 032363 0   0   534000000000 0            0            
IT1	032363 0      0   0   534000000000 0            0            
AT3	032363 0      0   0   0            0            534000000000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 282
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0472

AT6	032363 0      0   0   0            0            534000000000 
FT0	032363 0      0   0   0            0            534000000000 
FT1A	032363 0      0   0   0            0            0            
FT9	032364 0      0   0   0            0            0            
ET0	032364 0      0   0   0            0            0            
ST1	032364 0      0   0   0            0            0            
ST2	032364 0      0   0   0            0            0            
ST9	032364 0      0   0   0            0            0            


*032364 SKIPE	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032364 032364 0   0   332000000000 0            0            
IT1	032364 0      0   0   332000000000 0            0            
AT3	032364 0      0   0   0            0            332000000000 
AT6	032364 0      0   0   0            0            332000000000 
FT0	032364 0      0   0   0            0            332000000000 
FT1A	032364 0      0   0   0            0            0            
FT9	032365 0      0   0   0            0            0            
ET0	032366 0      0   0   0            0            0            
ST1A	032366 0      0   0   0            0            0            
ST9	032366 0      0   0   0            0            0            


*032366 JUMPA	0,032367
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032366 032366 0   0   324000032367 0            000000032367 
IT1	032366 0      0   0   324000032367 0            000000032367 
AT3	032366 0      0   0   000000032367 0            324000032367 
AT6	032366 032367 0   0   000000032367 0            324000032367 
FT1A	032366 032367 0   0   000000032367 0            000000032367 
FT2	032366 032367 0   0   0            0            000000032367 
FT2RQ	032366 032367 0   0   0            0            000000032367 
FT3	032366 032367 0   0   0            0            000000032367 
FT9	032367 032367 0   0   0            0            000000032367 
ET0	032367 032367 0   0   0            0            000000032367 
ST1A	032367 032367 0   0   0            0            000000032367 
ST9	032367 032367 0   0   0            0            000000032367 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 283
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0473

*032367 SETZ 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032367 032367 0   0   400000000000 0            0            
IT1	032367 0      0   0   400000000000 0            0            
AT3	032367 0      0   0   0            0            400000000000 
AT6	032367 0      0   0   0            0            400000000000 
FT1A	032367 0      0   0   0            0            0            
FT9	032370 0      0   0   0            0            0            
ET0	032370 0      0   0   0            0            0            
ST1	032370 0      0   0   0            0            0            
ST2	032370 0      0   0   0            0            0            
ST9	032370 0      0   0   0            0            0            


*032370 HRLEI	0,777777
INITIAL
C(AC)=000000 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032370 032370 0   0   535000777777 0            000000777777 
IT1	032370 0      0   0   535000777777 0            000000777777 
AT3	032370 0      0   0   000000777777 0            535000777777 
AT6	032370 777777 0   0   000000777777 0            535000777777 
FT1A	032370 777777 0   0   000000777777 0            000000777777 
FT9	032371 777777 0   0   000000777777 0            000000777777 
ET0	032371 777777 0   0   777777777777 0            000000777777 
ST1	032371 777777 0   0   777777777777 0            000000777777 
ST2	032371 777777 0   0   777777777777 0            000000777777 
ST9	032371 777777 0   0   777777777777 0            000000777777 


*032371 CAME	0,034012
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032371 032371 0   0   312000034012 0            777777777777 
IT1	032371 0      0   0   312000034012 0            777777777777 
AT3	032371 0      0   0   000000034012 0            312000034012 
AT6	032371 034012 0   0   000000034012 0            312000034012 
FT0	032371 034012 0   0   777777777777 0            312000034012 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 284
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0474

FT1A	032371 034012 0   0   777777777777 0            777777777777 
FT2	032371 034012 0   0   0            0            777777777777 
FT2RQ	032371 034012 0   0   777777777777 0            777777777777 
FT3	032371 034012 0   0   777777777777 0            777777777777 
FT9	032372 034012 0   0   777777777777 0            777777777777 
ET0	032373 034012 0   0   0            0            777777777777 
ST1A	032373 034012 0   0   0            0            777777777777 
ST9	032373 034012 0   0   0            0            777777777777 


*032373 JUMPA	0,032374
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032373 032373 0   0   324000032374 0            000000032374 
IT1	032373 0      0   0   324000032374 0            000000032374 
AT3	032373 0      0   0   000000032374 0            324000032374 
AT6	032373 032374 0   0   000000032374 0            324000032374 
FT1A	032373 032374 0   0   000000032374 0            000000032374 
FT2	032373 032374 0   0   0            0            000000032374 
FT2RQ	032373 032374 0   0   777777777777 0            000000032374 
FT3	032373 032374 0   0   777777777777 0            000000032374 
FT9	032374 032374 0   0   777777777777 0            000000032374 
ET0	032374 032374 0   0   777777777777 0            000000032374 
ST1A	032374 032374 0   0   777777777777 0            000000032374 
ST9	032374 032374 0   0   777777777777 0            000000032374 


*032374 HRLE 	0,034014
INITIAL
C(AC)=777777 777777 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032374 032374 0   0   534000034014 0            0            
IT1	032374 0      0   0   534000034014 0            0            
AT3	032374 0      0   0   000000034014 0            534000034014 
AT6	032374 034014 0   0   000000034014 0            534000034014 
FT0	032374 034014 0   0   0            0            534000034014 
FT1A	032374 034014 0   0   0            0            0            
FT9	032375 034014 0   0   0            0            0            
ET0	032375 034014 0   0   0            0            0            
ST1	032375 034014 0   0   0            0            0            
ST2	032375 034014 0   0   0            0            0            
ST9	032375 034014 0   0   0            0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 285
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0475

*032375 SKIPE	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032375 032375 0   0   332000000000 0            0            
IT1	032375 0      0   0   332000000000 0            0            
AT3	032375 0      0   0   0            0            332000000000 
AT6	032375 0      0   0   0            0            332000000000 
FT0	032375 0      0   0   0            0            332000000000 
FT1A	032375 0      0   0   0            0            0            
FT9	032376 0      0   0   0            0            0            
ET0	032377 0      0   0   0            0            0            
ST1A	032377 0      0   0   0            0            0            
ST9	032377 0      0   0   0            0            0            


*032377 JUMPA	0,032400
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032377 032377 0   0   324000032400 0            000000032400 
IT1	032377 0      0   0   324000032400 0            000000032400 
AT3	032377 0      0   0   000000032400 0            324000032400 
AT6	032377 0      0   0   000000032400 0            324000032400 
FT1A	032377 0      0   0   000000032400 0            000000032400 
FT2	032377 0      0   0   0            0            000000032400 
FT2RQ	032377 0      0   0   0            0            000000032400 
FT3	032377 0      0   0   0            0            000000032400 
FT9	0      0      0   0   0            0            000000032400 
ET0	0      0      0   0   0            0            000000032400 
ST1A	0      0      0   0   0            0            000000032400 
ST9	0      0      0   0   0            0            000000032400 


*032400 HRLE 	0,034012
INITIAL
C(AC)=000000 000000 
C(E)=777777 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	0      0      0   0   534000034012 0            777777777777 
IT1	0      0      0   0   534000034012 0            777777777777 
AT3	0      0      0   0   000000034012 0            534000034012 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 286
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0476

AT6	0      034012 0   0   000000034012 0            534000034012 
FT0	0      034012 0   0   777777777777 0            534000034012 
FT1A	0      034012 0   0   777777777777 0            777777777777 
FT9	032401 034012 0   0   777777777777 0            777777777777 
ET0	032401 034012 0   0   777777777777 0            777777777777 
ST1	032401 034012 0   0   777777777777 0            777777777777 
ST2	032401 034012 0   0   777777777777 0            777777777777 
ST9	032401 034012 0   0   777777777777 0            777777777777 


*032401 CAME	0,034012
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032401 032401 0   0   312000034012 0            777777777777 
IT1	032401 0      0   0   312000034012 0            777777777777 
AT3	032401 0      0   0   000000034012 0            312000034012 
AT6	032401 034012 0   0   000000034012 0            312000034012 
FT0	032401 034012 0   0   777777777777 0            312000034012 
FT1A	032401 034012 0   0   777777777777 0            777777777777 
FT2	032401 034012 0   0   0            0            777777777777 
FT2RQ	032401 034012 0   0   777777777777 0            777777777777 
FT3	032401 034012 0   0   777777777777 0            777777777777 
FT9	032402 034012 0   0   777777777777 0            777777777777 
ET0	032403 034012 0   0   0            0            777777777777 
ST1A	032403 034012 0   0   0            0            777777777777 
ST9	032403 034012 0   0   0            0            777777777777 


*032403 JUMPA	0,032404
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032403 032403 0   0   324000032404 0            000000032404 
IT1	032403 0      0   0   324000032404 0            000000032404 
AT3	032403 0      0   0   000000032404 0            324000032404 
AT6	032403 032404 0   0   000000032404 0            324000032404 
FT1A	032403 032404 0   0   000000032404 0            000000032404 
FT2	032403 032404 0   0   0            0            000000032404 
FT2RQ	032403 032404 0   0   777777777777 0            000000032404 
FT3	032403 032404 0   0   777777777777 0            000000032404 
FT9	032404 032404 0   0   777777777777 0            000000032404 
ET0	032404 032404 0   0   777777777777 0            000000032404 
ST1A	032404 032404 0   0   777777777777 0            000000032404 
ST9	032404 032404 0   0   777777777777 0            000000032404 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 287
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0477



*032404 HRLE 	0,034013
INITIAL
C(AC)=777777 777777 
C(E)=777777 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032404 032404 0   0   534000034013 0            777777000000 
IT1	032404 0      0   0   534000034013 0            777777000000 
AT3	032404 0      0   0   000000034013 0            534000034013 
AT6	032404 034013 0   0   000000034013 0            534000034013 
FT0	032404 034013 0   0   777777000000 0            534000034013 
FT1A	032404 034013 0   0   777777000000 0            777777000000 
FT9	032405 034013 0   0   777777000000 0            777777000000 
ET0	032405 034013 0   0   0            0            777777000000 
ST1	032405 034013 0   0   0            0            777777000000 
ST2	032405 034013 0   0   0            0            777777000000 
ST9	032405 034013 0   0   0            0            777777000000 


*032405 SKIPE	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032405 032405 0   0   332000000000 0            0            
IT1	032405 0      0   0   332000000000 0            0            
AT3	032405 0      0   0   0            0            332000000000 
AT6	032405 0      0   0   0            0            332000000000 
FT0	032405 0      0   0   0            0            332000000000 
FT1A	032405 0      0   0   0            0            0            
FT9	032406 0      0   0   0            0            0            
ET0	032407 0      0   0   0            0            0            
ST1A	032407 0      0   0   0            0            0            
ST9	032407 0      0   0   0            0            0            


*032407 JUMPA	0,032410
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032407 032407 0   0   324000032410 0            000000032410 
IT1	032407 0      0   0   324000032410 0            000000032410 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 288
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0478

AT3	032407 0      0   0   000000032410 0            324000032410 
AT6	032407 032410 0   0   000000032410 0            324000032410 
FT1A	032407 032410 0   0   000000032410 0            000000032410 
FT2	032407 032410 0   0   0            0            000000032410 
FT2RQ	032407 032410 0   0   0            0            000000032410 
FT3	032407 032410 0   0   0            0            000000032410 
FT9	032410 032410 0   0   0            0            000000032410 
ET0	032410 032410 0   0   0            0            000000032410 
ST1A	032410 032410 0   0   0            0            000000032410 
ST9	032410 032410 0   0   0            0            000000032410 


*032410 HRLE 	0,034015
INITIAL
C(AC)=000000 000000 
C(E)=000000 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032410 032410 0   0   534000034015 0            000000777777 
IT1	032410 0      0   0   534000034015 0            000000777777 
AT3	032410 0      0   0   000000034015 0            534000034015 
AT6	032410 034015 0   0   000000034015 0            534000034015 
FT0	032410 034015 0   0   000000777777 0            534000034015 
FT1A	032410 034015 0   0   000000777777 0            000000777777 
FT9	032411 034015 0   0   000000777777 0            000000777777 
ET0	032411 034015 0   0   777777777777 0            000000777777 
ST1	032411 034015 0   0   777777777777 0            000000777777 
ST2	032411 034015 0   0   777777777777 0            000000777777 
ST9	032411 034015 0   0   777777777777 0            000000777777 


*032411 CAME	0,034012
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032411 032411 0   0   312000034012 0            777777777777 
IT1	032411 0      0   0   312000034012 0            777777777777 
AT3	032411 0      0   0   000000034012 0            312000034012 
AT6	032411 034012 0   0   000000034012 0            312000034012 
FT0	032411 034012 0   0   777777777777 0            312000034012 
FT1A	032411 034012 0   0   777777777777 0            777777777777 
FT2	032411 034012 0   0   0            0            777777777777 
FT2RQ	032411 034012 0   0   777777777777 0            777777777777 
FT3	032411 034012 0   0   777777777777 0            777777777777 
FT9	032412 034012 0   0   777777777777 0            777777777777 
ET0	032413 034012 0   0   0            0            777777777777 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 289
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0479

ST1A	032413 034012 0   0   0            0            777777777777 
ST9	032413 034012 0   0   0            0            777777777777 


*032413 JUMPA	0,032414
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032413 032413 0   0   324000032414 0            000000032414 
IT1	032413 0      0   0   324000032414 0            000000032414 
AT3	032413 0      0   0   000000032414 0            324000032414 
AT6	032413 032414 0   0   000000032414 0            324000032414 
FT1A	032413 032414 0   0   000000032414 0            000000032414 
FT2	032413 032414 0   0   0            0            000000032414 
FT2RQ	032413 032414 0   0   777777777777 0            000000032414 
FT3	032413 032414 0   0   777777777777 0            000000032414 
FT9	032414 032414 0   0   777777777777 0            000000032414 
ET0	032414 032414 0   0   777777777777 0            000000032414 
ST1A	032414 032414 0   0   777777777777 0            000000032414 
ST9	032414 032414 0   0   777777777777 0            000000032414 


*032414 SETZ 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032414 032414 0   0   400000000000 0            0            
IT1	032414 0      0   0   400000000000 0            0            
AT3	032414 0      0   0   0            0            400000000000 
AT6	032414 0      0   0   0            0            400000000000 
FT1A	032414 0      0   0   0            0            0            
FT9	032415 0      0   0   0            0            0            
ET0	032415 0      0   0   0            0            0            
ST1	032415 0      0   0   0            0            0            
ST2	032415 0      0   0   0            0            0            
ST9	032415 0      0   0   0            0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 290
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0480

*032415 HLRE 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032415 032415 0   0   574000000000 0            0            
IT1	032415 0      0   0   574000000000 0            0            
AT3	032415 0      0   0   0            0            574000000000 
AT6	032415 0      0   0   0            0            574000000000 
FT0	032415 0      0   0   0            0            574000000000 
FT1A	032415 0      0   0   0            0            0            
FT9	032416 0      0   0   0            0            0            
ET0	032416 0      0   0   0            0            0            
ST1	032416 0      0   0   0            0            0            
ST2	032416 0      0   0   0            0            0            
ST9	032416 0      0   0   0            0            0            


*032416 SKIPE	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032416 032416 0   0   332000000000 0            0            
IT1	032416 0      0   0   332000000000 0            0            
AT3	032416 0      0   0   0            0            332000000000 
AT6	032416 0      0   0   0            0            332000000000 
FT0	032416 0      0   0   0            0            332000000000 
FT1A	032416 0      0   0   0            0            0            
FT9	032417 0      0   0   0            0            0            
ET0	032420 0      0   0   0            0            0            
ST1A	032420 0      0   0   0            0            0            
ST9	032420 0      0   0   0            0            0            


*032420 JUMPA	0,032421
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032420 032420 0   0   324000032421 0            000000032421 
IT1	032420 0      0   0   324000032421 0            000000032421 
AT3	032420 0      0   0   000000032421 0            324000032421 
AT6	032420 032421 0   0   000000032421 0            324000032421 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 291
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0481

FT1A	032420 032421 0   0   000000032421 0            000000032421 
FT2	032420 032421 0   0   0            0            000000032421 
FT2RQ	032420 032421 0   0   0            0            000000032421 
FT3	032420 032421 0   0   0            0            000000032421 
FT9	032421 032421 0   0   0            0            000000032421 
ET0	032421 032421 0   0   0            0            000000032421 
ST1A	032421 032421 0   0   0            0            000000032421 
ST9	032421 032421 0   0   0            0            000000032421 


*032421 SETZ 	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032421 032421 0   0   400000000000 0            0            
IT1	032421 0      0   0   400000000000 0            0            
AT3	032421 0      0   0   0            0            400000000000 
AT6	032421 0      0   0   0            0            400000000000 
FT1A	032421 0      0   0   0            0            0            
FT9	032422 0      0   0   0            0            0            
ET0	032422 0      0   0   0            0            0            
ST1	032422 0      0   0   0            0            0            
ST2	032422 0      0   0   0            0            0            
ST9	032422 0      0   0   0            0            0            


*032422 HLRE 	0,034012
INITIAL
C(AC)=000000 000000 
C(E)=777777 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032422 032422 0   0   574000034012 0            777777777777 
IT1	032422 0      0   0   574000034012 0            777777777777 
AT3	032422 0      0   0   000000034012 0            574000034012 
AT6	032422 034012 0   0   000000034012 0            574000034012 
FT0	032422 034012 0   0   777777777777 0            574000034012 
FT1A	032422 034012 0   0   777777777777 0            777777777777 
FT9	032423 034012 0   0   777777777777 0            777777777777 
ET0	032423 034012 0   0   777777777777 0            777777777777 
ST1	032423 034012 0   0   777777777777 0            777777777777 
ST2	032423 034012 0   0   777777777777 0            777777777777 
ST9	032423 034012 0   0   777777777777 0            777777777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 292
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0482

*032423 CAME	0,034012
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032423 032423 0   0   312000034012 0            777777777777 
IT1	032423 0      0   0   312000034012 0            777777777777 
AT3	032423 0      0   0   000000034012 0            312000034012 
AT6	032423 034012 0   0   000000034012 0            312000034012 
FT0	032423 034012 0   0   777777777777 0            312000034012 
FT1A	032423 034012 0   0   777777777777 0            777777777777 
FT2	032423 034012 0   0   0            0            777777777777 
FT2RQ	032423 034012 0   0   777777777777 0            777777777777 
FT3	032423 034012 0   0   777777777777 0            777777777777 
FT9	032424 034012 0   0   777777777777 0            777777777777 
ET0	032425 034012 0   0   0            0            777777777777 
ST1A	032425 034012 0   0   0            0            777777777777 
ST9	032425 034012 0   0   0            0            777777777777 


*032425 JUMPA	0,032426
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032425 032425 0   0   324000032426 0            000000032426 
IT1	032425 0      0   0   324000032426 0            000000032426 
AT3	032425 0      0   0   000000032426 0            324000032426 
AT6	032425 032426 0   0   000000032426 0            324000032426 
FT1A	032425 032426 0   0   000000032426 0            000000032426 
FT2	032425 032426 0   0   0            0            000000032426 
FT2RQ	032425 032426 0   0   777777777777 0            000000032426 
FT3	032425 032426 0   0   777777777777 0            000000032426 
FT9	032426 032426 0   0   777777777777 0            000000032426 
ET0	032426 032426 0   0   777777777777 0            000000032426 
ST1A	032426 032426 0   0   777777777777 0            000000032426 
ST9	032426 032426 0   0   777777777777 0            000000032426 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 293
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0483

*032426 SETO 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032426 032426 0   0   474000000000 0            0            
IT1	032426 0      0   0   474000000000 0            0            
AT3	032426 0      0   0   0            0            474000000000 
AT6	032426 0      0   0   0            0            474000000000 
FT1A	032426 0      0   0   0            0            0            
FT9	032427 0      0   0   0            0            0            
ET0	032427 0      0   0   777777777777 0            0            
ST1	032427 0      0   0   777777777777 0            0            
ST2	032427 0      0   0   777777777777 0            0            
ST9	032427 0      0   0   777777777777 0            0            


*032427 HLREI	0,777777
INITIAL
C(AC)=777777 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032427 032427 0   0   575000777777 0            000000777777 
IT1	032427 0      0   0   575000777777 0            000000777777 
AT3	032427 0      0   0   000000777777 0            575000777777 
AT6	032427 777777 0   0   000000777777 0            575000777777 
FT1A	032427 777777 0   0   000000777777 0            000000777777 
FT9	032430 777777 0   0   000000777777 0            000000777777 
ET0	032430 777777 0   0   0            0            000000777777 
ST1	032430 777777 0   0   0            0            000000777777 
ST2	032430 777777 0   0   0            0            000000777777 
ST9	032430 777777 0   0   0            0            000000777777 


*032430 SKIPE	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032430 032430 0   0   332000000000 0            0            
IT1	032430 0      0   0   332000000000 0            0            
AT3	032430 0      0   0   0            0            332000000000 
AT6	032430 0      0   0   0            0            332000000000 
FT0	032430 0      0   0   0            0            332000000000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 294
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0484

FT1A	032430 0      0   0   0            0            0            
FT9	032431 0      0   0   0            0            0            
ET0	032432 0      0   0   0            0            0            
ST1A	032432 0      0   0   0            0            0            
ST9	032432 0      0   0   0            0            0            


*032432 JUMPA	0,032433
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032432 032432 0   0   324000032433 0            000000032433 
IT1	032432 0      0   0   324000032433 0            000000032433 
AT3	032432 0      0   0   000000032433 0            324000032433 
AT6	032432 032433 0   0   000000032433 0            324000032433 
FT1A	032432 032433 0   0   000000032433 0            000000032433 
FT2	032432 032433 0   0   0            0            000000032433 
FT2RQ	032432 032433 0   0   0            0            000000032433 
FT3	032432 032433 0   0   0            0            000000032433 
FT9	032433 032433 0   0   0            0            000000032433 
ET0	032433 032433 0   0   0            0            000000032433 
ST1A	032433 032433 0   0   0            0            000000032433 
ST9	032433 032433 0   0   0            0            000000032433 


*032433 HLREI	0,000000
INITIAL
C(AC)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032433 032433 0   0   575000000000 0            0            
IT1	032433 0      0   0   575000000000 0            0            
AT3	032433 0      0   0   0            0            575000000000 
AT6	032433 0      0   0   0            0            575000000000 
FT1A	032433 0      0   0   0            0            0            
FT9	032434 0      0   0   0            0            0            
ET0	032434 0      0   0   0            0            0            
ST1	032434 0      0   0   0            0            0            
ST2	032434 0      0   0   0            0            0            
ST9	032434 0      0   0   0            0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 295
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0485

*032434 SKIPE	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032434 032434 0   0   332000000000 0            0            
IT1	032434 0      0   0   332000000000 0            0            
AT3	032434 0      0   0   0            0            332000000000 
AT6	032434 0      0   0   0            0            332000000000 
FT0	032434 0      0   0   0            0            332000000000 
FT1A	032434 0      0   0   0            0            0            
FT9	032435 0      0   0   0            0            0            
ET0	032436 0      0   0   0            0            0            
ST1A	032436 0      0   0   0            0            0            
ST9	032436 0      0   0   0            0            0            


*032436 JUMPA	0,032437
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032436 032436 0   0   324000032437 0            000000032437 
IT1	032436 0      0   0   324000032437 0            000000032437 
AT3	032436 0      0   0   000000032437 0            324000032437 
AT6	032436 032437 0   0   000000032437 0            324000032437 
FT1A	032436 032437 0   0   000000032437 0            000000032437 
FT2	032436 032437 0   0   0            0            000000032437 
FT2RQ	032436 032437 0   0   0            0            000000032437 
FT3	032436 032437 0   0   0            0            000000032437 
FT9	032437 032437 0   0   0            0            000000032437 
ET0	032437 032437 0   0   0            0            000000032437 
ST1A	032437 032437 0   0   0            0            000000032437 
ST9	032437 032437 0   0   0            0            000000032437 


*032437 HLRE 	0,034013
INITIAL
C(AC)=000000 000000 
C(E)=777777 000000 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032437 032437 0   0   574000034013 0            777777000000 
IT1	032437 0      0   0   574000034013 0            777777000000 
AT3	032437 0      0   0   000000034013 0            574000034013 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 296
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0486

AT6	032437 034013 0   0   000000034013 0            574000034013 
FT0	032437 034013 0   0   777777000000 0            574000034013 
FT1A	032437 034013 0   0   777777000000 0            777777000000 
FT9	032440 034013 0   0   777777000000 0            777777000000 
ET0	032440 034013 0   0   777777777777 0            777777000000 
ST1	032440 034013 0   0   777777777777 0            777777000000 
ST2	032440 034013 0   0   777777777777 0            777777000000 
ST9	032440 034013 0   0   777777777777 0            777777000000 


*032440 CAME	0,034012
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032440 032440 0   0   312000034012 0            777777777777 
IT1	032440 0      0   0   312000034012 0            777777777777 
AT3	032440 0      0   0   000000034012 0            312000034012 
AT6	032440 034012 0   0   000000034012 0            312000034012 
FT0	032440 034012 0   0   777777777777 0            312000034012 
FT1A	032440 034012 0   0   777777777777 0            777777777777 
FT2	032440 034012 0   0   0            0            777777777777 
FT2RQ	032440 034012 0   0   777777777777 0            777777777777 
FT3	032440 034012 0   0   777777777777 0            777777777777 
FT9	032441 034012 0   0   777777777777 0            777777777777 
ET0	032442 034012 0   0   0            0            777777777777 
ST1A	032442 034012 0   0   0            0            777777777777 
ST9	032442 034012 0   0   0            0            777777777777 


*032442 JUMPA	0,032443
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032442 032442 0   0   324000032443 0            000000032443 
IT1	032442 0      0   0   324000032443 0            000000032443 
AT3	032442 0      0   0   000000032443 0            324000032443 
AT6	032442 032443 0   0   000000032443 0            324000032443 
FT1A	032442 032443 0   0   000000032443 0            000000032443 
FT2	032442 032443 0   0   0            0            000000032443 
FT2RQ	032442 032443 0   0   777777777777 0            000000032443 
FT3	032442 032443 0   0   777777777777 0            000000032443 
FT9	032443 032443 0   0   777777777777 0            000000032443 
ET0	032443 032443 0   0   777777777777 0            000000032443 
ST1A	032443 032443 0   0   777777777777 0            000000032443 
ST9	032443 032443 0   0   777777777777 0            000000032443 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 297
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0487



*032443 HLRE 	0,034015
INITIAL
C(AC)=777777 777777 
C(E)=000000 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032443 032443 0   0   574000034015 0            000000777777 
IT1	032443 0      0   0   574000034015 0            000000777777 
AT3	032443 0      0   0   000000034015 0            574000034015 
AT6	032443 034015 0   0   000000034015 0            574000034015 
FT0	032443 034015 0   0   000000777777 0            574000034015 
FT1A	032443 034015 0   0   000000777777 0            000000777777 
FT9	032444 034015 0   0   000000777777 0            000000777777 
ET0	032444 034015 0   0   0            0            000000777777 
ST1	032444 034015 0   0   0            0            000000777777 
ST2	032444 034015 0   0   0            0            000000777777 
ST9	032444 034015 0   0   0            0            000000777777 


*032444 SKIPE	0,000000
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032444 032444 0   0   332000000000 0            0            
IT1	032444 0      0   0   332000000000 0            0            
AT3	032444 0      0   0   0            0            332000000000 
AT6	032444 0      0   0   0            0            332000000000 
FT0	032444 0      0   0   0            0            332000000000 
FT1A	032444 0      0   0   0            0            0            
FT9	032445 0      0   0   0            0            0            
ET0	032446 0      0   0   0            0            0            
ST1A	032446 0      0   0   0            0            0            
ST9	032446 0      0   0   0            0            0            


*032446 JUMPA	0,032447
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032446 032446 0   0   324000032447 0            000000032447 
IT1	032446 0      0   0   324000032447 0            000000032447 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 298
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0488

AT3	032446 0      0   0   000000032447 0            324000032447 
AT6	032446 032447 0   0   000000032447 0            324000032447 
FT1A	032446 032447 0   0   000000032447 0            000000032447 
FT2	032446 032447 0   0   0            0            000000032447 
FT2RQ	032446 032447 0   0   0            0            000000032447 
FT3	032446 032447 0   0   0            0            000000032447 
FT9	032447 032447 0   0   0            0            000000032447 
ET0	032447 032447 0   0   0            0            000000032447 
ST1A	032447 032447 0   0   0            0            000000032447 
ST9	032447 032447 0   0   0            0            000000032447 


*032447 HLRE 	0,034012
INITIAL
C(AC)=000000 000000 
C(E)=777777 777777 
FINAL
C(AC)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032447 032447 0   0   574000034012 0            777777777777 
IT1	032447 0      0   0   574000034012 0            777777777777 
AT3	032447 0      0   0   000000034012 0            574000034012 
AT6	032447 034012 0   0   000000034012 0            574000034012 
FT0	032447 034012 0   0   777777777777 0            574000034012 
FT1A	032447 034012 0   0   777777777777 0            777777777777 
FT9	032450 034012 0   0   777777777777 0            777777777777 
ET0	032450 034012 0   0   777777777777 0            777777777777 
ST1	032450 034012 0   0   777777777777 0            777777777777 
ST2	032450 034012 0   0   777777777777 0            777777777777 
ST9	032450 034012 0   0   777777777777 0            777777777777 


*032450 CAME	0,034012
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032450 032450 0   0   312000034012 0            777777777777 
IT1	032450 0      0   0   312000034012 0            777777777777 
AT3	032450 0      0   0   000000034012 0            312000034012 
AT6	032450 034012 0   0   000000034012 0            312000034012 
FT0	032450 034012 0   0   777777777777 0            312000034012 
FT1A	032450 034012 0   0   777777777777 0            777777777777 
FT2	032450 034012 0   0   0            0            777777777777 
FT2RQ	032450 034012 0   0   777777777777 0            777777777777 
FT3	032450 034012 0   0   777777777777 0            777777777777 
FT9	032451 034012 0   0   777777777777 0            777777777777 
ET0	032452 034012 0   0   0            0            777777777777 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 299
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0489

ST1A	032452 034012 0   0   0            0            777777777777 
ST9	032452 034012 0   0   0            0            777777777777 


*032452 JUMPA	0,032453
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032452 032452 0   0   324000032453 0            000000032453 
IT1	032452 0      0   0   324000032453 0            000000032453 
AT3	032452 0      0   0   000000032453 0            324000032453 
AT6	032452 032453 0   0   000000032453 0            324000032453 
FT1A	032452 032453 0   0   000000032453 0            000000032453 
FT2	032452 032453 0   0   0            0            000000032453 
FT2RQ	032452 032453 0   0   777777777777 0            000000032453 
FT3	032452 032453 0   0   777777777777 0            000000032453 
FT9	032453 032453 0   0   777777777777 0            000000032453 
ET0	032453 032453 0   0   777777777777 0            000000032453 
ST1A	032453 032453 0   0   777777777777 0            000000032453 
ST9	032453 032453 0   0   777777777777 0            000000032453 


*032453 SETZ 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032453 032453 0   0   400000000000 0            0            
IT1	032453 0      0   0   400000000000 0            0            
AT3	032453 0      0   0   0            0            400000000000 
AT6	032453 0      0   0   0            0            400000000000 
FT1A	032453 0      0   0   0            0            0            
FT9	032454 0      0   0   0            0            0            
ET0	032454 0      0   0   0            0            0            
ST1	032454 0      0   0   0            0            0            
ST2	032454 0      0   0   0            0            0            
ST9	032454 0      0   0   0            0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 300
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0490

*032454 MOVE 	1,034013
INITIAL
C(AC)=000000 777777 
C(E)=777777 000000 
FINAL
C(AC)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032454 032454 0   0   200040034013 0            777777000000 
IT1	032454 0      0   0   200040034013 0            777777000000 
AT3	032454 0      0   0   000000034013 0            200040034013 
AT6	032454 034013 0   0   000000034013 0            200040034013 
FT0	032454 034013 0   0   777777000000 0            200040034013 
FT1A	032454 034013 0   0   777777000000 0            777777000000 
FT9	032455 034013 0   0   777777000000 0            777777000000 
ET0	032455 034013 0   0   777777000000 0            777777000000 
ST1	032455 034013 0   0   777777000000 0            777777000000 
ST2	032455 034013 0   0   777777000000 0            777777000000 
ST9	032455 034013 0   0   777777000000 0            777777000000 


*032455 HLREM	1,000000
INITIAL
C(AC)=777777 000000 
C(E)=000000 000000 
FINAL

C(E)=777777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032455 032455 0   0   576040000000 0            0            
IT1	032455 0      0   0   576040000000 0            0            
AT3	032455 0      0   0   0            0            576040000000 
AT6	032455 0      0   0   0            0            576040000000 
FT0	032455 0      0   0   0            0            576040000000 
FT1A	032455 0      0   0   0            0            0            
FT2	032455 0      0   0   0            0            0            
FT2RQ	032455 0      0   0   777777000000 0            0            
FT3	032455 0      0   0   777777000000 0            0            
FT9	032456 0      0   0   777777000000 0            0            
ET0	032456 0      0   0   777777777777 0            0            
ST5	032456 0      0   0   777777777777 0            0            
ST6A	032456 0      0   0   777777777777 0            0            
ST9	032456 0      0   0   777777777777 0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 301
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0491

*032456 CAME	0,034012
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032456 032456 0   0   312000034012 0            777777777777 
IT1	032456 0      0   0   312000034012 0            777777777777 
AT3	032456 0      0   0   000000034012 0            312000034012 
AT6	032456 034012 0   0   000000034012 0            312000034012 
FT0	032456 034012 0   0   777777777777 0            312000034012 
FT1A	032456 034012 0   0   777777777777 0            777777777777 
FT2	032456 034012 0   0   0            0            777777777777 
FT2RQ	032456 034012 0   0   777777777777 0            777777777777 
FT3	032456 034012 0   0   777777777777 0            777777777777 
FT9	032457 034012 0   0   777777777777 0            777777777777 
ET0	032460 034012 0   0   0            0            777777777777 
ST1A	032460 034012 0   0   0            0            777777777777 
ST9	032460 034012 0   0   0            0            777777777777 


*032460 JUMPA	0,032461
INITIAL
C(AC)=777777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032460 032460 0   0   324000032461 0            000000032461 
IT1	032460 0      0   0   324000032461 0            000000032461 
AT3	032460 0      0   0   000000032461 0            324000032461 
AT6	032460 032461 0   0   000000032461 0            324000032461 
FT1A	032460 032461 0   0   000000032461 0            000000032461 
FT2	032460 032461 0   0   0            0            000000032461 
FT2RQ	032460 032461 0   0   777777777777 0            000000032461 
FT3	032460 032461 0   0   777777777777 0            000000032461 
FT9	032461 032461 0   0   777777777777 0            000000032461 
ET0	032461 032461 0   0   777777777777 0            000000032461 
ST1A	032461 032461 0   0   777777777777 0            000000032461 
ST9	032461 032461 0   0   777777777777 0            000000032461 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 302
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0492

*032461 SETZ 	0,000000
INITIAL
C(AC)=777777 777777 
C(E)=777777 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032461 032461 0   0   400000000000 0            0            
IT1	032461 0      0   0   400000000000 0            0            
AT3	032461 0      0   0   0            0            400000000000 
AT6	032461 0      0   0   0            0            400000000000 
FT1A	032461 0      0   0   0            0            0            
FT9	032462 0      0   0   0            0            0            
ET0	032462 0      0   0   0            0            0            
ST1	032462 0      0   0   0            0            0            
ST2	032462 0      0   0   0            0            0            
ST9	032462 0      0   0   0            0            0            


*032462 MOVEI	1,777777
INITIAL
C(AC)=777777 000000 
FINAL
C(AC)=000000 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032462 032462 0   0   201040777777 0            000000777777 
IT1	032462 0      0   0   201040777777 0            000000777777 
AT3	032462 0      0   0   000000777777 0            201040777777 
AT6	032462 777777 0   0   000000777777 0            201040777777 
FT1A	032462 777777 0   0   000000777777 0            000000777777 
FT9	032463 777777 0   0   000000777777 0            000000777777 
ET0	032463 777777 0   0   000000777777 0            000000777777 
ST1	032463 777777 0   0   000000777777 0            000000777777 
ST2	032463 777777 0   0   000000777777 0            000000777777 
ST9	032463 777777 0   0   000000777777 0            000000777777 


*032463 HRLM	1,000000
INITIAL
C(AC)=000000 777777 
C(E)=000000 000000 
FINAL

C(E)=777777 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032463 032463 0   0   506040000000 0            0            
IT1	032463 0      0   0   506040000000 0            0            
AT3	032463 0      0   0   0            0            506040000000 
AT6	032463 0      0   0   0            0            506040000000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 303
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0493

FT0	032463 0      0   0   0            0            506040000000 
FT1A	032463 0      0   0   0            0            0            
FT2	032463 0      0   0   0            0            0            
FT2RQ	032463 0      0   0   000000777777 0            0            
FT3	032463 0      0   0   000000777777 0            0            
FT9	032464 0      0   0   000000777777 0            0            
ET0	032464 0      0   0   777777000000 0            0            
ST5	032464 0      0   0   777777000000 0            0            
ST6A	032464 0      0   0   777777000000 0            0            
ST9	032464 0      0   0   777777000000 0            0            


*032464 CAME	0,034013
INITIAL
C(AC)=777777 000000 
C(E)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032464 032464 0   0   312000034013 0            777777000000 
IT1	032464 0      0   0   312000034013 0            777777000000 
AT3	032464 0      0   0   000000034013 0            312000034013 
AT6	032464 034013 0   0   000000034013 0            312000034013 
FT0	032464 034013 0   0   777777000000 0            312000034013 
FT1A	032464 034013 0   0   777777000000 0            777777000000 
FT2	032464 034013 0   0   0            0            777777000000 
FT2RQ	032464 034013 0   0   777777000000 0            777777000000 
FT3	032464 034013 0   0   777777000000 0            777777000000 
FT9	032465 034013 0   0   777777000000 0            777777000000 
ET0	032466 034013 0   0   0            0            777777000000 
ST1A	032466 034013 0   0   0            0            777777000000 
ST9	032466 034013 0   0   0            0            777777000000 


*032466 JUMPA	0,032467
INITIAL
C(AC)=777777 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032466 032466 0   0   324000032467 0            000000032467 
IT1	032466 0      0   0   324000032467 0            000000032467 
AT3	032466 0      0   0   000000032467 0            324000032467 
AT6	032466 032467 0   0   000000032467 0            324000032467 
FT1A	032466 032467 0   0   000000032467 0            000000032467 
FT2	032466 032467 0   0   0            0            000000032467 
FT2RQ	032466 032467 0   0   777777000000 0            000000032467 
FT3	032466 032467 0   0   777777000000 0            000000032467 
FT9	032467 032467 0   0   777777000000 0            000000032467 
ET0	032467 032467 0   0   777777000000 0            000000032467 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 304
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0494

ST1A	032467 032467 0   0   777777000000 0            000000032467 
ST9	032467 032467 0   0   777777000000 0            000000032467 


*032467 HRRZI	0,000001
INITIAL
C(AC)=777777 000000 
FINAL
C(AC)=000000 000001 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032467 032467 0   0   551000000001 0            000000000001 
IT1	032467 0      0   0   551000000001 0            000000000001 
AT3	032467 0      0   0   000000000001 0            551000000001 
AT6	032467 000001 0   0   000000000001 0            551000000001 
FT1A	032467 000001 0   0   000000000001 0            000000000001 
FT9	032470 000001 0   0   000000000001 0            000000000001 
ET0	032470 000001 0   0   000000000001 0            000000000001 
ST1	032470 000001 0   0   000000000001 0            000000000001 
ST2	032470 000001 0   0   000000000001 0            000000000001 
ST9	032470 000001 0   0   000000000001 0            000000000001 


*032470 ADD 	0,034014
INITIAL
C(AC)=000000 000001 
C(E)=000000 000000 
FINAL
C(AC)=000000 000001 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032470 032470 0   0   270000034014 0            0            
IT1	032470 0      0   0   270000034014 0            0            
AT3	032470 0      0   0   000000034014 0            270000034014 
AT6	032470 034014 0   0   000000034014 0            270000034014 
FT0	032470 034014 0   0   0            0            270000034014 
FT1A	032470 034014 0   0   0            0            0            
FT2	032470 034014 0   0   0            0            0            
FT2RQ	032470 034014 0   0   000000000001 0            0            
FT3	032470 034014 0   0   000000000001 0            0            
FT9	032471 034014 0   0   000000000001 0            0            
ET0	032471 034014 0   0   000000000001 0            0            
ST1	032471 034014 0   0   000000000001 0            0            
ST2	032471 034014 0   0   000000000001 0            0            
ST9	032471 034014 0   0   000000000001 0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 305
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0495

*032471 CAME	0,034017
INITIAL
C(AC)=000000 000001 
C(E)=000000 000001 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032471 032471 0   0   312000034017 0            000000000001 
IT1	032471 0      0   0   312000034017 0            000000000001 
AT3	032471 0      0   0   000000034017 0            312000034017 
AT6	032471 034017 0   0   000000034017 0            312000034017 
FT0	032471 034017 0   0   000000000001 0            312000034017 
FT1A	032471 034017 0   0   000000000001 0            000000000001 
FT2	032471 034017 0   0   0            0            000000000001 
FT2RQ	032471 034017 0   0   000000000001 0            000000000001 
FT3	032471 034017 0   0   000000000001 0            000000000001 
FT9	032472 034017 0   0   000000000001 0            000000000001 
ET0	032473 034017 0   0   0            0            000000000001 
ST1A	032473 034017 0   0   0            0            000000000001 
ST9	032473 034017 0   0   0            0            000000000001 


*032473 JUMPA	0,032474
INITIAL
C(AC)=000000 000001 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032473 032473 0   0   324000032474 0            000000032474 
IT1	032473 0      0   0   324000032474 0            000000032474 
AT3	032473 0      0   0   000000032474 0            324000032474 
AT6	032473 032474 0   0   000000032474 0            324000032474 
FT1A	032473 032474 0   0   000000032474 0            000000032474 
FT2	032473 032474 0   0   0            0            000000032474 
FT2RQ	032473 032474 0   0   000000000001 0            000000032474 
FT3	032473 032474 0   0   000000000001 0            000000032474 
FT9	032474 032474 0   0   000000000001 0            000000032474 
ET0	032474 032474 0   0   000000000001 0            000000032474 
ST1A	032474 032474 0   0   000000000001 0            000000032474 
ST9	032474 032474 0   0   000000000001 0            000000032474 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 306
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0496

*032474 HRRZI	0,000002
INITIAL
C(AC)=000000 000001 
FINAL
C(AC)=000000 000002 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032474 032474 0   0   551000000002 0            000000000002 
IT1	032474 0      0   0   551000000002 0            000000000002 
AT3	032474 0      0   0   000000000002 0            551000000002 
AT6	032474 000002 0   0   000000000002 0            551000000002 
FT1A	032474 000002 0   0   000000000002 0            000000000002 
FT9	032475 000002 0   0   000000000002 0            000000000002 
ET0	032475 000002 0   0   000000000002 0            000000000002 
ST1	032475 000002 0   0   000000000002 0            000000000002 
ST2	032475 000002 0   0   000000000002 0            000000000002 
ST9	032475 000002 0   0   000000000002 0            000000000002 


*032475 ADD 	0,034014
INITIAL
C(AC)=000000 000002 
C(E)=000000 000000 
FINAL
C(AC)=000000 000002 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032475 032475 0   0   270000034014 0            0            
IT1	032475 0      0   0   270000034014 0            0            
AT3	032475 0      0   0   000000034014 0            270000034014 
AT6	032475 034014 0   0   000000034014 0            270000034014 
FT0	032475 034014 0   0   0            0            270000034014 
FT1A	032475 034014 0   0   0            0            0            
FT2	032475 034014 0   0   0            0            0            
FT2RQ	032475 034014 0   0   000000000002 0            0            
FT3	032475 034014 0   0   000000000002 0            0            
FT9	032476 034014 0   0   000000000002 0            0            
ET0	032476 034014 0   0   000000000002 0            0            
ST1	032476 034014 0   0   000000000002 0            0            
ST2	032476 034014 0   0   000000000002 0            0            
ST9	032476 034014 0   0   000000000002 0            0            


*032476 CAME	0,034020
INITIAL
C(AC)=000000 000002 
C(E)=000000 000002 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032476 032476 0   0   312000034020 0            000000000002 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 307
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0497

IT1	032476 0      0   0   312000034020 0            000000000002 
AT3	032476 0      0   0   000000034020 0            312000034020 
AT6	032476 034020 0   0   000000034020 0            312000034020 
FT0	032476 034020 0   0   000000000002 0            312000034020 
FT1A	032476 034020 0   0   000000000002 0            000000000002 
FT2	032476 034020 0   0   0            0            000000000002 
FT2RQ	032476 034020 0   0   000000000002 0            000000000002 
FT3	032476 034020 0   0   000000000002 0            000000000002 
FT9	032477 034020 0   0   000000000002 0            000000000002 
ET0	0      034020 0   0   0            0            000000000002 
ST1A	0      034020 0   0   0            0            000000000002 
ST9	0      034020 0   0   0            0            000000000002 


*032500 JUMPA	0,032501
INITIAL
C(AC)=000000 000002 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	0      0      0   0   324000032501 0            000000032501 
IT1	0      0      0   0   324000032501 0            000000032501 
AT3	0      0      0   0   000000032501 0            324000032501 
AT6	0      032501 0   0   000000032501 0            324000032501 
FT1A	0      032501 0   0   000000032501 0            000000032501 
FT2	0      032501 0   0   0            0            000000032501 
FT2RQ	0      032501 0   0   000000000002 0            000000032501 
FT3	0      032501 0   0   000000000002 0            000000032501 
FT9	032501 032501 0   0   000000000002 0            000000032501 
ET0	032501 032501 0   0   000000000002 0            000000032501 
ST1A	032501 032501 0   0   000000000002 0            000000032501 
ST9	032501 032501 0   0   000000000002 0            000000032501 


*032501 HRRZI	0,000004
INITIAL
C(AC)=000000 000002 
FINAL
C(AC)=000000 000004 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032501 032501 0   0   551000000004 0            000000000004 
IT1	032501 0      0   0   551000000004 0            000000000004 
AT3	032501 0      0   0   000000000004 0            551000000004 
AT6	032501 000004 0   0   000000000004 0            551000000004 
FT1A	032501 000004 0   0   000000000004 0            000000000004 
FT9	032502 000004 0   0   000000000004 0            000000000004 
ET0	032502 000004 0   0   000000000004 0            000000000004 
ST1	032502 000004 0   0   000000000004 0            000000000004 
ST2	032502 000004 0   0   000000000004 0            000000000004 
ST9	032502 000004 0   0   000000000004 0            000000000004 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 308
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0498



*032502 ADD 	0,034014
INITIAL
C(AC)=000000 000004 
C(E)=000000 000000 
FINAL
C(AC)=000000 000004 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032502 032502 0   0   270000034014 0            0            
IT1	032502 0      0   0   270000034014 0            0            
AT3	032502 0      0   0   000000034014 0            270000034014 
AT6	032502 034014 0   0   000000034014 0            270000034014 
FT0	032502 034014 0   0   0            0            270000034014 
FT1A	032502 034014 0   0   0            0            0            
FT2	032502 034014 0   0   0            0            0            
FT2RQ	032502 034014 0   0   000000000004 0            0            
FT3	032502 034014 0   0   000000000004 0            0            
FT9	032503 034014 0   0   000000000004 0            0            
ET0	032503 034014 0   0   000000000004 0            0            
ST1	032503 034014 0   0   000000000004 0            0            
ST2	032503 034014 0   0   000000000004 0            0            
ST9	032503 034014 0   0   000000000004 0            0            


*032503 CAME	0,034021
INITIAL
C(AC)=000000 000004 
C(E)=000000 000004 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032503 032503 0   0   312000034021 0            000000000004 
IT1	032503 0      0   0   312000034021 0            000000000004 
AT3	032503 0      0   0   000000034021 0            312000034021 
AT6	032503 034021 0   0   000000034021 0            312000034021 
FT0	032503 034021 0   0   000000000004 0            312000034021 
FT1A	032503 034021 0   0   000000000004 0            000000000004 
FT2	032503 034021 0   0   0            0            000000000004 
FT2RQ	032503 034021 0   0   000000000004 0            000000000004 
FT3	032503 034021 0   0   000000000004 0            000000000004 
FT9	032504 034021 0   0   000000000004 0            000000000004 
ET0	032505 034021 0   0   0            0            000000000004 
ST1A	032505 034021 0   0   0            0            000000000004 
ST9	032505 034021 0   0   0            0            000000000004 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 309
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0499

*032505 JUMPA	0,032506
INITIAL
C(AC)=000000 000004 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032505 032505 0   0   324000032506 0            000000032506 
IT1	032505 0      0   0   324000032506 0            000000032506 
AT3	032505 0      0   0   000000032506 0            324000032506 
AT6	032505 032506 0   0   000000032506 0            324000032506 
FT1A	032505 032506 0   0   000000032506 0            000000032506 
FT2	032505 032506 0   0   0            0            000000032506 
FT2RQ	032505 032506 0   0   000000000004 0            000000032506 
FT3	032505 032506 0   0   000000000004 0            000000032506 
FT9	032506 032506 0   0   000000000004 0            000000032506 
ET0	032506 032506 0   0   000000000004 0            000000032506 
ST1A	032506 032506 0   0   000000000004 0            000000032506 
ST9	032506 032506 0   0   000000000004 0            000000032506 


*032506 HRRZI	0,000010
INITIAL
C(AC)=000000 000004 
FINAL
C(AC)=000000 000010 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032506 032506 0   0   551000000010 0            000000000010 
IT1	032506 0      0   0   551000000010 0            000000000010 
AT3	032506 0      0   0   000000000010 0            551000000010 
AT6	032506 000010 0   0   000000000010 0            551000000010 
FT1A	032506 000010 0   0   000000000010 0            000000000010 
FT9	032507 000010 0   0   000000000010 0            000000000010 
ET0	032507 000010 0   0   000000000010 0            000000000010 
ST1	032507 000010 0   0   000000000010 0            000000000010 
ST2	032507 000010 0   0   000000000010 0            000000000010 
ST9	032507 000010 0   0   000000000010 0            000000000010 


*032507 ADD 	0,034014
INITIAL
C(AC)=000000 000010 
C(E)=000000 000000 
FINAL
C(AC)=000000 000010 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032507 032507 0   0   270000034014 0            0            
IT1	032507 0      0   0   270000034014 0            0            
AT3	032507 0      0   0   000000034014 0            270000034014 
AT6	032507 034014 0   0   000000034014 0            270000034014 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 310
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0500

FT0	032507 034014 0   0   0            0            270000034014 
FT1A	032507 034014 0   0   0            0            0            
FT2	032507 034014 0   0   0            0            0            
FT2RQ	032507 034014 0   0   000000000010 0            0            
FT3	032507 034014 0   0   000000000010 0            0            
FT9	032510 034014 0   0   000000000010 0            0            
ET0	032510 034014 0   0   000000000010 0            0            
ST1	032510 034014 0   0   000000000010 0            0            
ST2	032510 034014 0   0   000000000010 0            0            
ST9	032510 034014 0   0   000000000010 0            0            


*032510 CAME	0,034022
INITIAL
C(AC)=000000 000010 
C(E)=000000 000010 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032510 032510 0   0   312000034022 0            000000000010 
IT1	032510 0      0   0   312000034022 0            000000000010 
AT3	032510 0      0   0   000000034022 0            312000034022 
AT6	032510 034022 0   0   000000034022 0            312000034022 
FT0	032510 034022 0   0   000000000010 0            312000034022 
FT1A	032510 034022 0   0   000000000010 0            000000000010 
FT2	032510 034022 0   0   0            0            000000000010 
FT2RQ	032510 034022 0   0   000000000010 0            000000000010 
FT3	032510 034022 0   0   000000000010 0            000000000010 
FT9	032511 034022 0   0   000000000010 0            000000000010 
ET0	032512 034022 0   0   0            0            000000000010 
ST1A	032512 034022 0   0   0            0            000000000010 
ST9	032512 034022 0   0   0            0            000000000010 


*032512 JUMPA	0,032513
INITIAL
C(AC)=000000 000010 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032512 032512 0   0   324000032513 0            000000032513 
IT1	032512 0      0   0   324000032513 0            000000032513 
AT3	032512 0      0   0   000000032513 0            324000032513 
AT6	032512 032513 0   0   000000032513 0            324000032513 
FT1A	032512 032513 0   0   000000032513 0            000000032513 
FT2	032512 032513 0   0   0            0            000000032513 
FT2RQ	032512 032513 0   0   000000000010 0            000000032513 
FT3	032512 032513 0   0   000000000010 0            000000032513 
FT9	032513 032513 0   0   000000000010 0            000000032513 
ET0	032513 032513 0   0   000000000010 0            000000032513 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 311
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0501

ST1A	032513 032513 0   0   000000000010 0            000000032513 
ST9	032513 032513 0   0   000000000010 0            000000032513 


*032513 HRRZI	0,000020
INITIAL
C(AC)=000000 000010 
FINAL
C(AC)=000000 000020 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032513 032513 0   0   551000000020 0            000000000020 
IT1	032513 0      0   0   551000000020 0            000000000020 
AT3	032513 0      0   0   000000000020 0            551000000020 
AT6	032513 000020 0   0   000000000020 0            551000000020 
FT1A	032513 000020 0   0   000000000020 0            000000000020 
FT9	032514 000020 0   0   000000000020 0            000000000020 
ET0	032514 000020 0   0   000000000020 0            000000000020 
ST1	032514 000020 0   0   000000000020 0            000000000020 
ST2	032514 000020 0   0   000000000020 0            000000000020 
ST9	032514 000020 0   0   000000000020 0            000000000020 


*032514 ADD 	0,034014
INITIAL
C(AC)=000000 000020 
C(E)=000000 000000 
FINAL
C(AC)=000000 000020 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032514 032514 0   0   270000034014 0            0            
IT1	032514 0      0   0   270000034014 0            0            
AT3	032514 0      0   0   000000034014 0            270000034014 
AT6	032514 034014 0   0   000000034014 0            270000034014 
FT0	032514 034014 0   0   0            0            270000034014 
FT1A	032514 034014 0   0   0            0            0            
FT2	032514 034014 0   0   0            0            0            
FT2RQ	032514 034014 0   0   000000000020 0            0            
FT3	032514 034014 0   0   000000000020 0            0            
FT9	032515 034014 0   0   000000000020 0            0            
ET0	032515 034014 0   0   000000000020 0            0            
ST1	032515 034014 0   0   000000000020 0            0            
ST2	032515 034014 0   0   000000000020 0            0            
ST9	032515 034014 0   0   000000000020 0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 312
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0502

*032515 CAME	0,034023
INITIAL
C(AC)=000000 000020 
C(E)=000000 000020 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032515 032515 0   0   312000034023 0            000000000020 
IT1	032515 0      0   0   312000034023 0            000000000020 
AT3	032515 0      0   0   000000034023 0            312000034023 
AT6	032515 034023 0   0   000000034023 0            312000034023 
FT0	032515 034023 0   0   000000000020 0            312000034023 
FT1A	032515 034023 0   0   000000000020 0            000000000020 
FT2	032515 034023 0   0   0            0            000000000020 
FT2RQ	032515 034023 0   0   000000000020 0            000000000020 
FT3	032515 034023 0   0   000000000020 0            000000000020 
FT9	032516 034023 0   0   000000000020 0            000000000020 
ET0	032517 034023 0   0   0            0            000000000020 
ST1A	032517 034023 0   0   0            0            000000000020 
ST9	032517 034023 0   0   0            0            000000000020 


*032517 JUMPA	0,032520
INITIAL
C(AC)=000000 000020 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032517 032517 0   0   324000032520 0            000000032520 
IT1	032517 0      0   0   324000032520 0            000000032520 
AT3	032517 0      0   0   000000032520 0            324000032520 
AT6	032517 032520 0   0   000000032520 0            324000032520 
FT1A	032517 032520 0   0   000000032520 0            000000032520 
FT2	032517 032520 0   0   0            0            000000032520 
FT2RQ	032517 032520 0   0   000000000020 0            000000032520 
FT3	032517 032520 0   0   000000000020 0            000000032520 
FT9	032520 032520 0   0   000000000020 0            000000032520 
ET0	032520 032520 0   0   000000000020 0            000000032520 
ST1A	032520 032520 0   0   000000000020 0            000000032520 
ST9	032520 032520 0   0   000000000020 0            000000032520 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 313
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0503

*032520 HRRZI	0,000040
INITIAL
C(AC)=000000 000020 
FINAL
C(AC)=000000 000040 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032520 032520 0   0   551000000040 0            000000000040 
IT1	032520 0      0   0   551000000040 0            000000000040 
AT3	032520 0      0   0   000000000040 0            551000000040 
AT6	032520 000040 0   0   000000000040 0            551000000040 
FT1A	032520 000040 0   0   000000000040 0            000000000040 
FT9	032521 000040 0   0   000000000040 0            000000000040 
ET0	032521 000040 0   0   000000000040 0            000000000040 
ST1	032521 000040 0   0   000000000040 0            000000000040 
ST2	032521 000040 0   0   000000000040 0            000000000040 
ST9	032521 000040 0   0   000000000040 0            000000000040 


*032521 ADD 	0,034014
INITIAL
C(AC)=000000 000040 
C(E)=000000 000000 
FINAL
C(AC)=000000 000040 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032521 032521 0   0   270000034014 0            0            
IT1	032521 0      0   0   270000034014 0            0            
AT3	032521 0      0   0   000000034014 0            270000034014 
AT6	032521 034014 0   0   000000034014 0            270000034014 
FT0	032521 034014 0   0   0            0            270000034014 
FT1A	032521 034014 0   0   0            0            0            
FT2	032521 034014 0   0   0            0            0            
FT2RQ	032521 034014 0   0   000000000040 0            0            
FT3	032521 034014 0   0   000000000040 0            0            
FT9	032522 034014 0   0   000000000040 0            0            
ET0	032522 034014 0   0   000000000040 0            0            
ST1	032522 034014 0   0   000000000040 0            0            
ST2	032522 034014 0   0   000000000040 0            0            
ST9	032522 034014 0   0   000000000040 0            0            


*032522 CAME	0,034024
INITIAL
C(AC)=000000 000040 
C(E)=000000 000040 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032522 032522 0   0   312000034024 0            000000000040 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 314
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0504

IT1	032522 0      0   0   312000034024 0            000000000040 
AT3	032522 0      0   0   000000034024 0            312000034024 
AT6	032522 034024 0   0   000000034024 0            312000034024 
FT0	032522 034024 0   0   000000000040 0            312000034024 
FT1A	032522 034024 0   0   000000000040 0            000000000040 
FT2	032522 034024 0   0   0            0            000000000040 
FT2RQ	032522 034024 0   0   000000000040 0            000000000040 
FT3	032522 034024 0   0   000000000040 0            000000000040 
FT9	032523 034024 0   0   000000000040 0            000000000040 
ET0	032524 034024 0   0   0            0            000000000040 
ST1A	032524 034024 0   0   0            0            000000000040 
ST9	032524 034024 0   0   0            0            000000000040 


*032524 JUMPA	0,032525
INITIAL
C(AC)=000000 000040 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032524 032524 0   0   324000032525 0            000000032525 
IT1	032524 0      0   0   324000032525 0            000000032525 
AT3	032524 0      0   0   000000032525 0            324000032525 
AT6	032524 032525 0   0   000000032525 0            324000032525 
FT1A	032524 032525 0   0   000000032525 0            000000032525 
FT2	032524 032525 0   0   0            0            000000032525 
FT2RQ	032524 032525 0   0   000000000040 0            000000032525 
FT3	032524 032525 0   0   000000000040 0            000000032525 
FT9	032525 032525 0   0   000000000040 0            000000032525 
ET0	032525 032525 0   0   000000000040 0            000000032525 
ST1A	032525 032525 0   0   000000000040 0            000000032525 
ST9	032525 032525 0   0   000000000040 0            000000032525 


*032525 HRRZI	0,000100
INITIAL
C(AC)=000000 000040 
FINAL
C(AC)=000000 000100 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032525 032525 0   0   551000000100 0            000000000100 
IT1	032525 0      0   0   551000000100 0            000000000100 
AT3	032525 0      0   0   000000000100 0            551000000100 
AT6	032525 0      0   0   000000000100 0            551000000100 
FT1A	032525 0      0   0   000000000100 0            000000000100 
FT9	032526 0      0   0   000000000100 0            000000000100 
ET0	032526 0      0   0   000000000100 0            000000000100 
ST1	032526 0      0   0   000000000100 0            000000000100 
ST2	032526 0      0   0   000000000100 0            000000000100 
ST9	032526 0      0   0   000000000100 0            000000000100 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 315
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0505



*032526 ADD 	0,034014
INITIAL
C(AC)=000000 000100 
C(E)=000000 000000 
FINAL
C(AC)=000000 000100 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032526 032526 0   0   270000034014 0            0            
IT1	032526 0      0   0   270000034014 0            0            
AT3	032526 0      0   0   000000034014 0            270000034014 
AT6	032526 034014 0   0   000000034014 0            270000034014 
FT0	032526 034014 0   0   0            0            270000034014 
FT1A	032526 034014 0   0   0            0            0            
FT2	032526 034014 0   0   0            0            0            
FT2RQ	032526 034014 0   0   000000000100 0            0            
FT3	032526 034014 0   0   000000000100 0            0            
FT9	032527 034014 0   0   000000000100 0            0            
ET0	032527 034014 0   0   000000000100 0            0            
ST1	032527 034014 0   0   000000000100 0            0            
ST2	032527 034014 0   0   000000000100 0            0            
ST9	032527 034014 0   0   000000000100 0            0            


*032527 CAME	0,034025
INITIAL
C(AC)=000000 000100 
C(E)=000000 000100 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032527 032527 0   0   312000034025 0            000000000100 
IT1	032527 0      0   0   312000034025 0            000000000100 
AT3	032527 0      0   0   000000034025 0            312000034025 
AT6	032527 034025 0   0   000000034025 0            312000034025 
FT0	032527 034025 0   0   000000000100 0            312000034025 
FT1A	032527 034025 0   0   000000000100 0            000000000100 
FT2	032527 034025 0   0   0            0            000000000100 
FT2RQ	032527 034025 0   0   000000000100 0            000000000100 
FT3	032527 034025 0   0   000000000100 0            000000000100 
FT9	032530 034025 0   0   000000000100 0            000000000100 
ET0	032531 034025 0   0   0            0            000000000100 
ST1A	032531 034025 0   0   0            0            000000000100 
ST9	032531 034025 0   0   0            0            000000000100 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 316
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0506

*032531 JUMPA	0,032532
INITIAL
C(AC)=000000 000100 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032531 032531 0   0   324000032532 0            000000032532 
IT1	032531 0      0   0   324000032532 0            000000032532 
AT3	032531 0      0   0   000000032532 0            324000032532 
AT6	032531 032532 0   0   000000032532 0            324000032532 
FT1A	032531 032532 0   0   000000032532 0            000000032532 
FT2	032531 032532 0   0   0            0            000000032532 
FT2RQ	032531 032532 0   0   000000000100 0            000000032532 
FT3	032531 032532 0   0   000000000100 0            000000032532 
FT9	032532 032532 0   0   000000000100 0            000000032532 
ET0	032532 032532 0   0   000000000100 0            000000032532 
ST1A	032532 032532 0   0   000000000100 0            000000032532 
ST9	032532 032532 0   0   000000000100 0            000000032532 


*032532 HRRZI	0,000200
INITIAL
C(AC)=000000 000100 
FINAL
C(AC)=000000 000200 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032532 032532 0   0   551000000200 0            000000000200 
IT1	032532 0      0   0   551000000200 0            000000000200 
AT3	032532 0      0   0   000000000200 0            551000000200 
AT6	032532 0      0   0   000000000200 0            551000000200 
FT1A	032532 0      0   0   000000000200 0            000000000200 
FT9	032533 0      0   0   000000000200 0            000000000200 
ET0	032533 0      0   0   000000000200 0            000000000200 
ST1	032533 0      0   0   000000000200 0            000000000200 
ST2	032533 0      0   0   000000000200 0            000000000200 
ST9	032533 0      0   0   000000000200 0            000000000200 


*032533 ADD 	0,034014
INITIAL
C(AC)=000000 000200 
C(E)=000000 000000 
FINAL
C(AC)=000000 000200 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032533 032533 0   0   270000034014 0            0            
IT1	032533 0      0   0   270000034014 0            0            
AT3	032533 0      0   0   000000034014 0            270000034014 
AT6	032533 034014 0   0   000000034014 0            270000034014 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 317
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0507

FT0	032533 034014 0   0   0            0            270000034014 
FT1A	032533 034014 0   0   0            0            0            
FT2	032533 034014 0   0   0            0            0            
FT2RQ	032533 034014 0   0   000000000200 0            0            
FT3	032533 034014 0   0   000000000200 0            0            
FT9	032534 034014 0   0   000000000200 0            0            
ET0	032534 034014 0   0   000000000200 0            0            
ST1	032534 034014 0   0   000000000200 0            0            
ST2	032534 034014 0   0   000000000200 0            0            
ST9	032534 034014 0   0   000000000200 0            0            


*032534 CAME	0,034026
INITIAL
C(AC)=000000 000200 
C(E)=000000 000200 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032534 032534 0   0   312000034026 0            000000000200 
IT1	032534 0      0   0   312000034026 0            000000000200 
AT3	032534 0      0   0   000000034026 0            312000034026 
AT6	032534 034026 0   0   000000034026 0            312000034026 
FT0	032534 034026 0   0   000000000200 0            312000034026 
FT1A	032534 034026 0   0   000000000200 0            000000000200 
FT2	032534 034026 0   0   0            0            000000000200 
FT2RQ	032534 034026 0   0   000000000200 0            000000000200 
FT3	032534 034026 0   0   000000000200 0            000000000200 
FT9	032535 034026 0   0   000000000200 0            000000000200 
ET0	032536 034026 0   0   0            0            000000000200 
ST1A	032536 034026 0   0   0            0            000000000200 
ST9	032536 034026 0   0   0            0            000000000200 


*032536 JUMPA	0,032537
INITIAL
C(AC)=000000 000200 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032536 032536 0   0   324000032537 0            000000032537 
IT1	032536 0      0   0   324000032537 0            000000032537 
AT3	032536 0      0   0   000000032537 0            324000032537 
AT6	032536 032537 0   0   000000032537 0            324000032537 
FT1A	032536 032537 0   0   000000032537 0            000000032537 
FT2	032536 032537 0   0   0            0            000000032537 
FT2RQ	032536 032537 0   0   000000000200 0            000000032537 
FT3	032536 032537 0   0   000000000200 0            000000032537 
FT9	032537 032537 0   0   000000000200 0            000000032537 
ET0	032537 032537 0   0   000000000200 0            000000032537 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 318
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0508

ST1A	032537 032537 0   0   000000000200 0            000000032537 
ST9	032537 032537 0   0   000000000200 0            000000032537 


*032537 HRRZI	0,000400
INITIAL
C(AC)=000000 000200 
FINAL
C(AC)=000000 000400 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032537 032537 0   0   551000000400 0            000000000400 
IT1	032537 0      0   0   551000000400 0            000000000400 
AT3	032537 0      0   0   000000000400 0            551000000400 
AT6	032537 0      0   0   000000000400 0            551000000400 
FT1A	032537 0      0   0   000000000400 0            000000000400 
FT9	032540 0      0   0   000000000400 0            000000000400 
ET0	032540 0      0   0   000000000400 0            000000000400 
ST1	032540 0      0   0   000000000400 0            000000000400 
ST2	032540 0      0   0   000000000400 0            000000000400 
ST9	032540 0      0   0   000000000400 0            000000000400 


*032540 ADD 	0,034014
INITIAL
C(AC)=000000 000400 
C(E)=000000 000000 
FINAL
C(AC)=000000 000400 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032540 032540 0   0   270000034014 0            0            
IT1	032540 0      0   0   270000034014 0            0            
AT3	032540 0      0   0   000000034014 0            270000034014 
AT6	032540 034014 0   0   000000034014 0            270000034014 
FT0	032540 034014 0   0   0            0            270000034014 
FT1A	032540 034014 0   0   0            0            0            
FT2	032540 034014 0   0   0            0            0            
FT2RQ	032540 034014 0   0   000000000400 0            0            
FT3	032540 034014 0   0   000000000400 0            0            
FT9	032541 034014 0   0   000000000400 0            0            
ET0	032541 034014 0   0   000000000400 0            0            
ST1	032541 034014 0   0   000000000400 0            0            
ST2	032541 034014 0   0   000000000400 0            0            
ST9	032541 034014 0   0   000000000400 0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 319
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0509

*032541 CAME	0,034027
INITIAL
C(AC)=000000 000400 
C(E)=000000 000400 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032541 032541 0   0   312000034027 0            000000000400 
IT1	032541 0      0   0   312000034027 0            000000000400 
AT3	032541 0      0   0   000000034027 0            312000034027 
AT6	032541 034027 0   0   000000034027 0            312000034027 
FT0	032541 034027 0   0   000000000400 0            312000034027 
FT1A	032541 034027 0   0   000000000400 0            000000000400 
FT2	032541 034027 0   0   0            0            000000000400 
FT2RQ	032541 034027 0   0   000000000400 0            000000000400 
FT3	032541 034027 0   0   000000000400 0            000000000400 
FT9	032542 034027 0   0   000000000400 0            000000000400 
ET0	032543 034027 0   0   0            0            000000000400 
ST1A	032543 034027 0   0   0            0            000000000400 
ST9	032543 034027 0   0   0            0            000000000400 


*032543 JUMPA	0,032544
INITIAL
C(AC)=000000 000400 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032543 032543 0   0   324000032544 0            000000032544 
IT1	032543 0      0   0   324000032544 0            000000032544 
AT3	032543 0      0   0   000000032544 0            324000032544 
AT6	032543 032544 0   0   000000032544 0            324000032544 
FT1A	032543 032544 0   0   000000032544 0            000000032544 
FT2	032543 032544 0   0   0            0            000000032544 
FT2RQ	032543 032544 0   0   000000000400 0            000000032544 
FT3	032543 032544 0   0   000000000400 0            000000032544 
FT9	032544 032544 0   0   000000000400 0            000000032544 
ET0	032544 032544 0   0   000000000400 0            000000032544 
ST1A	032544 032544 0   0   000000000400 0            000000032544 
ST9	032544 032544 0   0   000000000400 0            000000032544 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 320
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0510

*032544 HRRZI	0,001000
INITIAL
C(AC)=000000 000400 
FINAL
C(AC)=000000 001000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032544 032544 0   0   551000001000 0            000000001000 
IT1	032544 0      0   0   551000001000 0            000000001000 
AT3	032544 0      0   0   000000001000 0            551000001000 
AT6	032544 0      0   0   000000001000 0            551000001000 
FT1A	032544 0      0   0   000000001000 0            000000001000 
FT9	032545 0      0   0   000000001000 0            000000001000 
ET0	032545 0      0   0   000000001000 0            000000001000 
ST1	032545 0      0   0   000000001000 0            000000001000 
ST2	032545 0      0   0   000000001000 0            000000001000 
ST9	032545 0      0   0   000000001000 0            000000001000 


*032545 ADD 	0,034014
INITIAL
C(AC)=000000 001000 
C(E)=000000 000000 
FINAL
C(AC)=000000 001000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032545 032545 0   0   270000034014 0            0            
IT1	032545 0      0   0   270000034014 0            0            
AT3	032545 0      0   0   000000034014 0            270000034014 
AT6	032545 034014 0   0   000000034014 0            270000034014 
FT0	032545 034014 0   0   0            0            270000034014 
FT1A	032545 034014 0   0   0            0            0            
FT2	032545 034014 0   0   0            0            0            
FT2RQ	032545 034014 0   0   000000001000 0            0            
FT3	032545 034014 0   0   000000001000 0            0            
FT9	032546 034014 0   0   000000001000 0            0            
ET0	032546 034014 0   0   000000001000 0            0            
ST1	032546 034014 0   0   000000001000 0            0            
ST2	032546 034014 0   0   000000001000 0            0            
ST9	032546 034014 0   0   000000001000 0            0            


*032546 CAME	0,034030
INITIAL
C(AC)=000000 001000 
C(E)=000000 001000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032546 032546 0   0   312000034030 0            000000001000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 321
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0511

IT1	032546 0      0   0   312000034030 0            000000001000 
AT3	032546 0      0   0   000000034030 0            312000034030 
AT6	032546 034030 0   0   000000034030 0            312000034030 
FT0	032546 034030 0   0   000000001000 0            312000034030 
FT1A	032546 034030 0   0   000000001000 0            000000001000 
FT2	032546 034030 0   0   0            0            000000001000 
FT2RQ	032546 034030 0   0   000000001000 0            000000001000 
FT3	032546 034030 0   0   000000001000 0            000000001000 
FT9	032547 034030 0   0   000000001000 0            000000001000 
ET0	032550 034030 0   0   0            0            000000001000 
ST1A	032550 034030 0   0   0            0            000000001000 
ST9	032550 034030 0   0   0            0            000000001000 


*032550 JUMPA	0,032551
INITIAL
C(AC)=000000 001000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032550 032550 0   0   324000032551 0            000000032551 
IT1	032550 0      0   0   324000032551 0            000000032551 
AT3	032550 0      0   0   000000032551 0            324000032551 
AT6	032550 032551 0   0   000000032551 0            324000032551 
FT1A	032550 032551 0   0   000000032551 0            000000032551 
FT2	032550 032551 0   0   0            0            000000032551 
FT2RQ	032550 032551 0   0   000000001000 0            000000032551 
FT3	032550 032551 0   0   000000001000 0            000000032551 
FT9	032551 032551 0   0   000000001000 0            000000032551 
ET0	032551 032551 0   0   000000001000 0            000000032551 
ST1A	032551 032551 0   0   000000001000 0            000000032551 
ST9	032551 032551 0   0   000000001000 0            000000032551 


*032551 HRRZI	0,002000
INITIAL
C(AC)=000000 001000 
FINAL
C(AC)=000000 002000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032551 032551 0   0   551000002000 0            000000002000 
IT1	032551 0      0   0   551000002000 0            000000002000 
AT3	032551 0      0   0   000000002000 0            551000002000 
AT6	032551 0      0   0   000000002000 0            551000002000 
FT1A	032551 0      0   0   000000002000 0            000000002000 
FT9	032552 0      0   0   000000002000 0            000000002000 
ET0	032552 0      0   0   000000002000 0            000000002000 
ST1	032552 0      0   0   000000002000 0            000000002000 
ST2	032552 0      0   0   000000002000 0            000000002000 
ST9	032552 0      0   0   000000002000 0            000000002000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 322
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0512



*032552 ADD 	0,034014
INITIAL
C(AC)=000000 002000 
C(E)=000000 000000 
FINAL
C(AC)=000000 002000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032552 032552 0   0   270000034014 0            0            
IT1	032552 0      0   0   270000034014 0            0            
AT3	032552 0      0   0   000000034014 0            270000034014 
AT6	032552 034014 0   0   000000034014 0            270000034014 
FT0	032552 034014 0   0   0            0            270000034014 
FT1A	032552 034014 0   0   0            0            0            
FT2	032552 034014 0   0   0            0            0            
FT2RQ	032552 034014 0   0   000000002000 0            0            
FT3	032552 034014 0   0   000000002000 0            0            
FT9	032553 034014 0   0   000000002000 0            0            
ET0	032553 034014 0   0   000000002000 0            0            
ST1	032553 034014 0   0   000000002000 0            0            
ST2	032553 034014 0   0   000000002000 0            0            
ST9	032553 034014 0   0   000000002000 0            0            


*032553 CAME	0,034031
INITIAL
C(AC)=000000 002000 
C(E)=000000 002000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032553 032553 0   0   312000034031 0            000000002000 
IT1	032553 0      0   0   312000034031 0            000000002000 
AT3	032553 0      0   0   000000034031 0            312000034031 
AT6	032553 034031 0   0   000000034031 0            312000034031 
FT0	032553 034031 0   0   000000002000 0            312000034031 
FT1A	032553 034031 0   0   000000002000 0            000000002000 
FT2	032553 034031 0   0   0            0            000000002000 
FT2RQ	032553 034031 0   0   000000002000 0            000000002000 
FT3	032553 034031 0   0   000000002000 0            000000002000 
FT9	032554 034031 0   0   000000002000 0            000000002000 
ET0	032555 034031 0   0   0            0            000000002000 
ST1A	032555 034031 0   0   0            0            000000002000 
ST9	032555 034031 0   0   0            0            000000002000 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 323
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0513

*032555 JUMPA	0,032556
INITIAL
C(AC)=000000 002000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032555 032555 0   0   324000032556 0            000000032556 
IT1	032555 0      0   0   324000032556 0            000000032556 
AT3	032555 0      0   0   000000032556 0            324000032556 
AT6	032555 032556 0   0   000000032556 0            324000032556 
FT1A	032555 032556 0   0   000000032556 0            000000032556 
FT2	032555 032556 0   0   0            0            000000032556 
FT2RQ	032555 032556 0   0   000000002000 0            000000032556 
FT3	032555 032556 0   0   000000002000 0            000000032556 
FT9	032556 032556 0   0   000000002000 0            000000032556 
ET0	032556 032556 0   0   000000002000 0            000000032556 
ST1A	032556 032556 0   0   000000002000 0            000000032556 
ST9	032556 032556 0   0   000000002000 0            000000032556 


*032556 HRRZI	0,004000
INITIAL
C(AC)=000000 002000 
FINAL
C(AC)=000000 004000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032556 032556 0   0   551000004000 0            000000004000 
IT1	032556 0      0   0   551000004000 0            000000004000 
AT3	032556 0      0   0   000000004000 0            551000004000 
AT6	032556 0      0   0   000000004000 0            551000004000 
FT1A	032556 0      0   0   000000004000 0            000000004000 
FT9	032557 0      0   0   000000004000 0            000000004000 
ET0	032557 0      0   0   000000004000 0            000000004000 
ST1	032557 0      0   0   000000004000 0            000000004000 
ST2	032557 0      0   0   000000004000 0            000000004000 
ST9	032557 0      0   0   000000004000 0            000000004000 


*032557 ADD 	0,034014
INITIAL
C(AC)=000000 004000 
C(E)=000000 000000 
FINAL
C(AC)=000000 004000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032557 032557 0   0   270000034014 0            0            
IT1	032557 0      0   0   270000034014 0            0            
AT3	032557 0      0   0   000000034014 0            270000034014 
AT6	032557 034014 0   0   000000034014 0            270000034014 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 324
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0514

FT0	032557 034014 0   0   0            0            270000034014 
FT1A	032557 034014 0   0   0            0            0            
FT2	032557 034014 0   0   0            0            0            
FT2RQ	032557 034014 0   0   000000004000 0            0            
FT3	032557 034014 0   0   000000004000 0            0            
FT9	032560 034014 0   0   000000004000 0            0            
ET0	032560 034014 0   0   000000004000 0            0            
ST1	032560 034014 0   0   000000004000 0            0            
ST2	032560 034014 0   0   000000004000 0            0            
ST9	032560 034014 0   0   000000004000 0            0            


*032560 CAME	0,034032
INITIAL
C(AC)=000000 004000 
C(E)=000000 004000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032560 032560 0   0   312000034032 0            000000004000 
IT1	032560 0      0   0   312000034032 0            000000004000 
AT3	032560 0      0   0   000000034032 0            312000034032 
AT6	032560 034032 0   0   000000034032 0            312000034032 
FT0	032560 034032 0   0   000000004000 0            312000034032 
FT1A	032560 034032 0   0   000000004000 0            000000004000 
FT2	032560 034032 0   0   0            0            000000004000 
FT2RQ	032560 034032 0   0   000000004000 0            000000004000 
FT3	032560 034032 0   0   000000004000 0            000000004000 
FT9	032561 034032 0   0   000000004000 0            000000004000 
ET0	032562 034032 0   0   0            0            000000004000 
ST1A	032562 034032 0   0   0            0            000000004000 
ST9	032562 034032 0   0   0            0            000000004000 


*032562 JUMPA	0,032563
INITIAL
C(AC)=000000 004000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032562 032562 0   0   324000032563 0            000000032563 
IT1	032562 0      0   0   324000032563 0            000000032563 
AT3	032562 0      0   0   000000032563 0            324000032563 
AT6	032562 032563 0   0   000000032563 0            324000032563 
FT1A	032562 032563 0   0   000000032563 0            000000032563 
FT2	032562 032563 0   0   0            0            000000032563 
FT2RQ	032562 032563 0   0   000000004000 0            000000032563 
FT3	032562 032563 0   0   000000004000 0            000000032563 
FT9	032563 032563 0   0   000000004000 0            000000032563 
ET0	032563 032563 0   0   000000004000 0            000000032563 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 325
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0515

ST1A	032563 032563 0   0   000000004000 0            000000032563 
ST9	032563 032563 0   0   000000004000 0            000000032563 


*032563 HRRZI	0,010000
INITIAL
C(AC)=000000 004000 
FINAL
C(AC)=000000 010000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032563 032563 0   0   551000010000 0            000000010000 
IT1	032563 0      0   0   551000010000 0            000000010000 
AT3	032563 0      0   0   000000010000 0            551000010000 
AT6	032563 0      0   0   000000010000 0            551000010000 
FT1A	032563 0      0   0   000000010000 0            000000010000 
FT9	032564 0      0   0   000000010000 0            000000010000 
ET0	032564 0      0   0   000000010000 0            000000010000 
ST1	032564 0      0   0   000000010000 0            000000010000 
ST2	032564 0      0   0   000000010000 0            000000010000 
ST9	032564 0      0   0   000000010000 0            000000010000 


*032564 ADD 	0,034014
INITIAL
C(AC)=000000 010000 
C(E)=000000 000000 
FINAL
C(AC)=000000 010000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032564 032564 0   0   270000034014 0            0            
IT1	032564 0      0   0   270000034014 0            0            
AT3	032564 0      0   0   000000034014 0            270000034014 
AT6	032564 034014 0   0   000000034014 0            270000034014 
FT0	032564 034014 0   0   0            0            270000034014 
FT1A	032564 034014 0   0   0            0            0            
FT2	032564 034014 0   0   0            0            0            
FT2RQ	032564 034014 0   0   000000010000 0            0            
FT3	032564 034014 0   0   000000010000 0            0            
FT9	032565 034014 0   0   000000010000 0            0            
ET0	032565 034014 0   0   000000010000 0            0            
ST1	032565 034014 0   0   000000010000 0            0            
ST2	032565 034014 0   0   000000010000 0            0            
ST9	032565 034014 0   0   000000010000 0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 326
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0516

*032565 CAME	0,034033
INITIAL
C(AC)=000000 010000 
C(E)=000000 010000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032565 032565 0   0   312000034033 0            000000010000 
IT1	032565 0      0   0   312000034033 0            000000010000 
AT3	032565 0      0   0   000000034033 0            312000034033 
AT6	032565 034033 0   0   000000034033 0            312000034033 
FT0	032565 034033 0   0   000000010000 0            312000034033 
FT1A	032565 034033 0   0   000000010000 0            000000010000 
FT2	032565 034033 0   0   0            0            000000010000 
FT2RQ	032565 034033 0   0   000000010000 0            000000010000 
FT3	032565 034033 0   0   000000010000 0            000000010000 
FT9	032566 034033 0   0   000000010000 0            000000010000 
ET0	032567 034033 0   0   0            0            000000010000 
ST1A	032567 034033 0   0   0            0            000000010000 
ST9	032567 034033 0   0   0            0            000000010000 


*032567 JUMPA	0,032570
INITIAL
C(AC)=000000 010000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032567 032567 0   0   324000032570 0            000000032570 
IT1	032567 0      0   0   324000032570 0            000000032570 
AT3	032567 0      0   0   000000032570 0            324000032570 
AT6	032567 032570 0   0   000000032570 0            324000032570 
FT1A	032567 032570 0   0   000000032570 0            000000032570 
FT2	032567 032570 0   0   0            0            000000032570 
FT2RQ	032567 032570 0   0   000000010000 0            000000032570 
FT3	032567 032570 0   0   000000010000 0            000000032570 
FT9	032570 032570 0   0   000000010000 0            000000032570 
ET0	032570 032570 0   0   000000010000 0            000000032570 
ST1A	032570 032570 0   0   000000010000 0            000000032570 
ST9	032570 032570 0   0   000000010000 0            000000032570 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 327
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0517

*032570 HRRZI	0,020000
INITIAL
C(AC)=000000 010000 
FINAL
C(AC)=000000 020000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032570 032570 0   0   551000020000 0            000000020000 
IT1	032570 0      0   0   551000020000 0            000000020000 
AT3	032570 0      0   0   000000020000 0            551000020000 
AT6	032570 0      0   0   000000020000 0            551000020000 
FT1A	032570 0      0   0   000000020000 0            000000020000 
FT9	032571 0      0   0   000000020000 0            000000020000 
ET0	032571 0      0   0   000000020000 0            000000020000 
ST1	032571 0      0   0   000000020000 0            000000020000 
ST2	032571 0      0   0   000000020000 0            000000020000 
ST9	032571 0      0   0   000000020000 0            000000020000 


*032571 ADD 	0,034014
INITIAL
C(AC)=000000 020000 
C(E)=000000 000000 
FINAL
C(AC)=000000 020000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032571 032571 0   0   270000034014 0            0            
IT1	032571 0      0   0   270000034014 0            0            
AT3	032571 0      0   0   000000034014 0            270000034014 
AT6	032571 034014 0   0   000000034014 0            270000034014 
FT0	032571 034014 0   0   0            0            270000034014 
FT1A	032571 034014 0   0   0            0            0            
FT2	032571 034014 0   0   0            0            0            
FT2RQ	032571 034014 0   0   000000020000 0            0            
FT3	032571 034014 0   0   000000020000 0            0            
FT9	032572 034014 0   0   000000020000 0            0            
ET0	032572 034014 0   0   000000020000 0            0            
ST1	032572 034014 0   0   000000020000 0            0            
ST2	032572 034014 0   0   000000020000 0            0            
ST9	032572 034014 0   0   000000020000 0            0            


*032572 CAME	0,034034
INITIAL
C(AC)=000000 020000 
C(E)=000000 020000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032572 032572 0   0   312000034034 0            000000020000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 328
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0518

IT1	032572 0      0   0   312000034034 0            000000020000 
AT3	032572 0      0   0   000000034034 0            312000034034 
AT6	032572 034034 0   0   000000034034 0            312000034034 
FT0	032572 034034 0   0   000000020000 0            312000034034 
FT1A	032572 034034 0   0   000000020000 0            000000020000 
FT2	032572 034034 0   0   0            0            000000020000 
FT2RQ	032572 034034 0   0   000000020000 0            000000020000 
FT3	032572 034034 0   0   000000020000 0            000000020000 
FT9	032573 034034 0   0   000000020000 0            000000020000 
ET0	032574 034034 0   0   0            0            000000020000 
ST1A	032574 034034 0   0   0            0            000000020000 
ST9	032574 034034 0   0   0            0            000000020000 


*032574 JUMPA	0,032575
INITIAL
C(AC)=000000 020000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032574 032574 0   0   324000032575 0            000000032575 
IT1	032574 0      0   0   324000032575 0            000000032575 
AT3	032574 0      0   0   000000032575 0            324000032575 
AT6	032574 032575 0   0   000000032575 0            324000032575 
FT1A	032574 032575 0   0   000000032575 0            000000032575 
FT2	032574 032575 0   0   0            0            000000032575 
FT2RQ	032574 032575 0   0   000000020000 0            000000032575 
FT3	032574 032575 0   0   000000020000 0            000000032575 
FT9	032575 032575 0   0   000000020000 0            000000032575 
ET0	032575 032575 0   0   000000020000 0            000000032575 
ST1A	032575 032575 0   0   000000020000 0            000000032575 
ST9	032575 032575 0   0   000000020000 0            000000032575 


*032575 HRRZI	0,040000
INITIAL
C(AC)=000000 020000 
FINAL
C(AC)=000000 040000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032575 032575 0   0   551000040000 0            000000040000 
IT1	032575 0      0   0   551000040000 0            000000040000 
AT3	032575 0      0   0   000000040000 0            551000040000 
AT6	032575 0      0   0   000000040000 0            551000040000 
FT1A	032575 0      0   0   000000040000 0            000000040000 
FT9	032576 0      0   0   000000040000 0            000000040000 
ET0	032576 0      0   0   000000040000 0            000000040000 
ST1	032576 0      0   0   000000040000 0            000000040000 
ST2	032576 0      0   0   000000040000 0            000000040000 
ST9	032576 0      0   0   000000040000 0            000000040000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 329
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0519



*032576 ADD 	0,034014
INITIAL
C(AC)=000000 040000 
C(E)=000000 000000 
FINAL
C(AC)=000000 040000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032576 032576 0   0   270000034014 0            0            
IT1	032576 0      0   0   270000034014 0            0            
AT3	032576 0      0   0   000000034014 0            270000034014 
AT6	032576 034014 0   0   000000034014 0            270000034014 
FT0	032576 034014 0   0   0            0            270000034014 
FT1A	032576 034014 0   0   0            0            0            
FT2	032576 034014 0   0   0            0            0            
FT2RQ	032576 034014 0   0   000000040000 0            0            
FT3	032576 034014 0   0   000000040000 0            0            
FT9	032577 034014 0   0   000000040000 0            0            
ET0	032577 034014 0   0   000000040000 0            0            
ST1	032577 034014 0   0   000000040000 0            0            
ST2	032577 034014 0   0   000000040000 0            0            
ST9	032577 034014 0   0   000000040000 0            0            


*032577 CAME	0,034035
INITIAL
C(AC)=000000 040000 
C(E)=000000 040000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032577 032577 0   0   312000034035 0            000000040000 
IT1	032577 0      0   0   312000034035 0            000000040000 
AT3	032577 0      0   0   000000034035 0            312000034035 
AT6	032577 034035 0   0   000000034035 0            312000034035 
FT0	032577 034035 0   0   000000040000 0            312000034035 
FT1A	032577 034035 0   0   000000040000 0            000000040000 
FT2	032577 034035 0   0   0            0            000000040000 
FT2RQ	032577 034035 0   0   000000040000 0            000000040000 
FT3	032577 034035 0   0   000000040000 0            000000040000 
FT9	0      034035 0   0   000000040000 0            000000040000 
ET0	032601 034035 0   0   0            0            000000040000 
ST1A	032601 034035 0   0   0            0            000000040000 
ST9	032601 034035 0   0   0            0            000000040000 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 330
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0520

*032601 JUMPA	0,032602
INITIAL
C(AC)=000000 040000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032601 032601 0   0   324000032602 0            000000032602 
IT1	032601 0      0   0   324000032602 0            000000032602 
AT3	032601 0      0   0   000000032602 0            324000032602 
AT6	032601 032602 0   0   000000032602 0            324000032602 
FT1A	032601 032602 0   0   000000032602 0            000000032602 
FT2	032601 032602 0   0   0            0            000000032602 
FT2RQ	032601 032602 0   0   000000040000 0            000000032602 
FT3	032601 032602 0   0   000000040000 0            000000032602 
FT9	032602 032602 0   0   000000040000 0            000000032602 
ET0	032602 032602 0   0   000000040000 0            000000032602 
ST1A	032602 032602 0   0   000000040000 0            000000032602 
ST9	032602 032602 0   0   000000040000 0            000000032602 


*032602 HRRZI	0,100000
INITIAL
C(AC)=000000 040000 
FINAL
C(AC)=000000 100000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032602 032602 0   0   551000100000 0            000000100000 
IT1	032602 0      0   0   551000100000 0            000000100000 
AT3	032602 0      0   0   000000100000 0            551000100000 
AT6	032602 0      0   0   000000100000 0            551000100000 
FT1A	032602 0      0   0   000000100000 0            000000100000 
FT9	032603 0      0   0   000000100000 0            000000100000 
ET0	032603 0      0   0   000000100000 0            000000100000 
ST1	032603 0      0   0   000000100000 0            000000100000 
ST2	032603 0      0   0   000000100000 0            000000100000 
ST9	032603 0      0   0   000000100000 0            000000100000 


*032603 ADD 	0,034014
INITIAL
C(AC)=000000 100000 
C(E)=000000 000000 
FINAL
C(AC)=000000 100000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032603 032603 0   0   270000034014 0            0            
IT1	032603 0      0   0   270000034014 0            0            
AT3	032603 0      0   0   000000034014 0            270000034014 
AT6	032603 034014 0   0   000000034014 0            270000034014 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 331
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0521

FT0	032603 034014 0   0   0            0            270000034014 
FT1A	032603 034014 0   0   0            0            0            
FT2	032603 034014 0   0   0            0            0            
FT2RQ	032603 034014 0   0   000000100000 0            0            
FT3	032603 034014 0   0   000000100000 0            0            
FT9	032604 034014 0   0   000000100000 0            0            
ET0	032604 034014 0   0   000000100000 0            0            
ST1	032604 034014 0   0   000000100000 0            0            
ST2	032604 034014 0   0   000000100000 0            0            
ST9	032604 034014 0   0   000000100000 0            0            


*032604 CAME	0,034036
INITIAL
C(AC)=000000 100000 
C(E)=000000 100000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032604 032604 0   0   312000034036 0            000000100000 
IT1	032604 0      0   0   312000034036 0            000000100000 
AT3	032604 0      0   0   000000034036 0            312000034036 
AT6	032604 034036 0   0   000000034036 0            312000034036 
FT0	032604 034036 0   0   000000100000 0            312000034036 
FT1A	032604 034036 0   0   000000100000 0            000000100000 
FT2	032604 034036 0   0   0            0            000000100000 
FT2RQ	032604 034036 0   0   000000100000 0            000000100000 
FT3	032604 034036 0   0   000000100000 0            000000100000 
FT9	032605 034036 0   0   000000100000 0            000000100000 
ET0	032606 034036 0   0   0            0            000000100000 
ST1A	032606 034036 0   0   0            0            000000100000 
ST9	032606 034036 0   0   0            0            000000100000 


*032606 JUMPA	0,032607
INITIAL
C(AC)=000000 100000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032606 032606 0   0   324000032607 0            000000032607 
IT1	032606 0      0   0   324000032607 0            000000032607 
AT3	032606 0      0   0   000000032607 0            324000032607 
AT6	032606 032607 0   0   000000032607 0            324000032607 
FT1A	032606 032607 0   0   000000032607 0            000000032607 
FT2	032606 032607 0   0   0            0            000000032607 
FT2RQ	032606 032607 0   0   000000100000 0            000000032607 
FT3	032606 032607 0   0   000000100000 0            000000032607 
FT9	032607 032607 0   0   000000100000 0            000000032607 
ET0	032607 032607 0   0   000000100000 0            000000032607 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 332
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0522

ST1A	032607 032607 0   0   000000100000 0            000000032607 
ST9	032607 032607 0   0   000000100000 0            000000032607 


*032607 HRRZI	0,200000
INITIAL
C(AC)=000000 100000 
FINAL
C(AC)=000000 200000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032607 032607 0   0   551000200000 0            000000200000 
IT1	032607 0      0   0   551000200000 0            000000200000 
AT3	032607 0      0   0   000000200000 0            551000200000 
AT6	032607 0      0   0   000000200000 0            551000200000 
FT1A	032607 0      0   0   000000200000 0            000000200000 
FT9	032610 0      0   0   000000200000 0            000000200000 
ET0	032610 0      0   0   000000200000 0            000000200000 
ST1	032610 0      0   0   000000200000 0            000000200000 
ST2	032610 0      0   0   000000200000 0            000000200000 
ST9	032610 0      0   0   000000200000 0            000000200000 


*032610 ADD 	0,034014
INITIAL
C(AC)=000000 200000 
C(E)=000000 000000 
FINAL
C(AC)=000000 200000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032610 032610 0   0   270000034014 0            0            
IT1	032610 0      0   0   270000034014 0            0            
AT3	032610 0      0   0   000000034014 0            270000034014 
AT6	032610 034014 0   0   000000034014 0            270000034014 
FT0	032610 034014 0   0   0            0            270000034014 
FT1A	032610 034014 0   0   0            0            0            
FT2	032610 034014 0   0   0            0            0            
FT2RQ	032610 034014 0   0   000000200000 0            0            
FT3	032610 034014 0   0   000000200000 0            0            
FT9	032611 034014 0   0   000000200000 0            0            
ET0	032611 034014 0   0   000000200000 0            0            
ST1	032611 034014 0   0   000000200000 0            0            
ST2	032611 034014 0   0   000000200000 0            0            
ST9	032611 034014 0   0   000000200000 0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 333
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0523

*032611 CAME	0,034037
INITIAL
C(AC)=000000 200000 
C(E)=000000 200000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032611 032611 0   0   312000034037 0            000000200000 
IT1	032611 0      0   0   312000034037 0            000000200000 
AT3	032611 0      0   0   000000034037 0            312000034037 
AT6	032611 034037 0   0   000000034037 0            312000034037 
FT0	032611 034037 0   0   000000200000 0            312000034037 
FT1A	032611 034037 0   0   000000200000 0            000000200000 
FT2	032611 034037 0   0   0            0            000000200000 
FT2RQ	032611 034037 0   0   000000200000 0            000000200000 
FT3	032611 034037 0   0   000000200000 0            000000200000 
FT9	032612 034037 0   0   000000200000 0            000000200000 
ET0	032613 034037 0   0   0            0            000000200000 
ST1A	032613 034037 0   0   0            0            000000200000 
ST9	032613 034037 0   0   0            0            000000200000 


*032613 JUMPA	0,032614
INITIAL
C(AC)=000000 200000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032613 032613 0   0   324000032614 0            000000032614 
IT1	032613 0      0   0   324000032614 0            000000032614 
AT3	032613 0      0   0   000000032614 0            324000032614 
AT6	032613 032614 0   0   000000032614 0            324000032614 
FT1A	032613 032614 0   0   000000032614 0            000000032614 
FT2	032613 032614 0   0   0            0            000000032614 
FT2RQ	032613 032614 0   0   000000200000 0            000000032614 
FT3	032613 032614 0   0   000000200000 0            000000032614 
FT9	032614 032614 0   0   000000200000 0            000000032614 
ET0	032614 032614 0   0   000000200000 0            000000032614 
ST1A	032614 032614 0   0   000000200000 0            000000032614 
ST9	032614 032614 0   0   000000200000 0            000000032614 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 334
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0524

*032614 HRRZI	0,400000
INITIAL
C(AC)=000000 200000 
FINAL
C(AC)=000000 400000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032614 032614 0   0   551000400000 0            000000400000 
IT1	032614 0      0   0   551000400000 0            000000400000 
AT3	032614 0      0   0   000000400000 0            551000400000 
AT6	032614 0      0   0   000000400000 0            551000400000 
FT1A	032614 0      0   0   000000400000 0            000000400000 
FT9	032615 0      0   0   000000400000 0            000000400000 
ET0	032615 0      0   0   000000400000 0            000000400000 
ST1	032615 0      0   0   000000400000 0            000000400000 
ST2	032615 0      0   0   000000400000 0            000000400000 
ST9	032615 0      0   0   000000400000 0            000000400000 


*032615 ADD 	0,034014
INITIAL
C(AC)=000000 400000 
C(E)=000000 000000 
FINAL
C(AC)=000000 400000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032615 032615 0   0   270000034014 0            0            
IT1	032615 0      0   0   270000034014 0            0            
AT3	032615 0      0   0   000000034014 0            270000034014 
AT6	032615 034014 0   0   000000034014 0            270000034014 
FT0	032615 034014 0   0   0            0            270000034014 
FT1A	032615 034014 0   0   0            0            0            
FT2	032615 034014 0   0   0            0            0            
FT2RQ	032615 034014 0   0   000000400000 0            0            
FT3	032615 034014 0   0   000000400000 0            0            
FT9	032616 034014 0   0   000000400000 0            0            
ET0	032616 034014 0   0   000000400000 0            0            
ST1	032616 034014 0   0   000000400000 0            0            
ST2	032616 034014 0   0   000000400000 0            0            
ST9	032616 034014 0   0   000000400000 0            0            


*032616 CAME	0,034040
INITIAL
C(AC)=000000 400000 
C(E)=000000 400000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032616 032616 0   0   312000034040 0            000000400000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 335
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0525

IT1	032616 0      0   0   312000034040 0            000000400000 
AT3	032616 0      0   0   000000034040 0            312000034040 
AT6	032616 034040 0   0   000000034040 0            312000034040 
FT0	032616 034040 0   0   000000400000 0            312000034040 
FT1A	032616 034040 0   0   000000400000 0            000000400000 
FT2	032616 034040 0   0   0            0            000000400000 
FT2RQ	032616 034040 0   0   000000400000 0            000000400000 
FT3	032616 034040 0   0   000000400000 0            000000400000 
FT9	032617 034040 0   0   000000400000 0            000000400000 
ET0	032620 034040 0   0   0            0            000000400000 
ST1A	032620 034040 0   0   0            0            000000400000 
ST9	032620 034040 0   0   0            0            000000400000 


*032620 JUMPA	0,032621
INITIAL
C(AC)=000000 400000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032620 032620 0   0   324000032621 0            000000032621 
IT1	032620 0      0   0   324000032621 0            000000032621 
AT3	032620 0      0   0   000000032621 0            324000032621 
AT6	032620 032621 0   0   000000032621 0            324000032621 
FT1A	032620 032621 0   0   000000032621 0            000000032621 
FT2	032620 032621 0   0   0            0            000000032621 
FT2RQ	032620 032621 0   0   000000400000 0            000000032621 
FT3	032620 032621 0   0   000000400000 0            000000032621 
FT9	032621 032621 0   0   000000400000 0            000000032621 
ET0	032621 032621 0   0   000000400000 0            000000032621 
ST1A	032621 032621 0   0   000000400000 0            000000032621 
ST9	032621 032621 0   0   000000400000 0            000000032621 


*032621 HRLZI	0,000001
INITIAL
C(AC)=000000 400000 
FINAL
C(AC)=000001 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032621 032621 0   0   515000000001 0            000000000001 
IT1	032621 0      0   0   515000000001 0            000000000001 
AT3	032621 0      0   0   000000000001 0            515000000001 
AT6	032621 000001 0   0   000000000001 0            515000000001 
FT1A	032621 000001 0   0   000000000001 0            000000000001 
FT9	032622 000001 0   0   000000000001 0            000000000001 
ET0	032622 000001 0   0   000001000000 0            000000000001 
ST1	032622 000001 0   0   000001000000 0            000000000001 
ST2	032622 000001 0   0   000001000000 0            000000000001 
ST9	032622 000001 0   0   000001000000 0            000000000001 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 336
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0526



*032622 ADD 	0,034014
INITIAL
C(AC)=000001 000000 
C(E)=000000 000000 
FINAL
C(AC)=000001 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032622 032622 0   0   270000034014 0            0            
IT1	032622 0      0   0   270000034014 0            0            
AT3	032622 0      0   0   000000034014 0            270000034014 
AT6	032622 034014 0   0   000000034014 0            270000034014 
FT0	032622 034014 0   0   0            0            270000034014 
FT1A	032622 034014 0   0   0            0            0            
FT2	032622 034014 0   0   0            0            0            
FT2RQ	032622 034014 0   0   000001000000 0            0            
FT3	032622 034014 0   0   000001000000 0            0            
FT9	032623 034014 0   0   000001000000 0            0            
ET0	032623 034014 0   0   000001000000 0            0            
ST1	032623 034014 0   0   000001000000 0            0            
ST2	032623 034014 0   0   000001000000 0            0            
ST9	032623 034014 0   0   000001000000 0            0            


*032623 CAME	0,034041
INITIAL
C(AC)=000001 000000 
C(E)=000001 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032623 032623 0   0   312000034041 0            000001000000 
IT1	032623 0      0   0   312000034041 0            000001000000 
AT3	032623 0      0   0   000000034041 0            312000034041 
AT6	032623 034041 0   0   000000034041 0            312000034041 
FT0	032623 034041 0   0   000001000000 0            312000034041 
FT1A	032623 034041 0   0   000001000000 0            000001000000 
FT2	032623 034041 0   0   0            0            000001000000 
FT2RQ	032623 034041 0   0   000001000000 0            000001000000 
FT3	032623 034041 0   0   000001000000 0            000001000000 
FT9	032624 034041 0   0   000001000000 0            000001000000 
ET0	032625 034041 0   0   0            0            000001000000 
ST1A	032625 034041 0   0   0            0            000001000000 
ST9	032625 034041 0   0   0            0            000001000000 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 337
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0527

*032625 JUMPA	0,032626
INITIAL
C(AC)=000001 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032625 032625 0   0   324000032626 0            000000032626 
IT1	032625 0      0   0   324000032626 0            000000032626 
AT3	032625 0      0   0   000000032626 0            324000032626 
AT6	032625 032626 0   0   000000032626 0            324000032626 
FT1A	032625 032626 0   0   000000032626 0            000000032626 
FT2	032625 032626 0   0   0            0            000000032626 
FT2RQ	032625 032626 0   0   000001000000 0            000000032626 
FT3	032625 032626 0   0   000001000000 0            000000032626 
FT9	032626 032626 0   0   000001000000 0            000000032626 
ET0	032626 032626 0   0   000001000000 0            000000032626 
ST1A	032626 032626 0   0   000001000000 0            000000032626 
ST9	032626 032626 0   0   000001000000 0            000000032626 


*032626 HRLZI	0,000002
INITIAL
C(AC)=000001 000000 
FINAL
C(AC)=000002 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032626 032626 0   0   515000000002 0            000000000002 
IT1	032626 0      0   0   515000000002 0            000000000002 
AT3	032626 0      0   0   000000000002 0            515000000002 
AT6	032626 000002 0   0   000000000002 0            515000000002 
FT1A	032626 000002 0   0   000000000002 0            000000000002 
FT9	032627 000002 0   0   000000000002 0            000000000002 
ET0	032627 000002 0   0   000002000000 0            000000000002 
ST1	032627 000002 0   0   000002000000 0            000000000002 
ST2	032627 000002 0   0   000002000000 0            000000000002 
ST9	032627 000002 0   0   000002000000 0            000000000002 


*032627 ADD 	0,034014
INITIAL
C(AC)=000002 000000 
C(E)=000000 000000 
FINAL
C(AC)=000002 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032627 032627 0   0   270000034014 0            0            
IT1	032627 0      0   0   270000034014 0            0            
AT3	032627 0      0   0   000000034014 0            270000034014 
AT6	032627 034014 0   0   000000034014 0            270000034014 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 338
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0528

FT0	032627 034014 0   0   0            0            270000034014 
FT1A	032627 034014 0   0   0            0            0            
FT2	032627 034014 0   0   0            0            0            
FT2RQ	032627 034014 0   0   000002000000 0            0            
FT3	032627 034014 0   0   000002000000 0            0            
FT9	032630 034014 0   0   000002000000 0            0            
ET0	032630 034014 0   0   000002000000 0            0            
ST1	032630 034014 0   0   000002000000 0            0            
ST2	032630 034014 0   0   000002000000 0            0            
ST9	032630 034014 0   0   000002000000 0            0            


*032630 CAME	0,034042
INITIAL
C(AC)=000002 000000 
C(E)=000002 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032630 032630 0   0   312000034042 0            000002000000 
IT1	032630 0      0   0   312000034042 0            000002000000 
AT3	032630 0      0   0   000000034042 0            312000034042 
AT6	032630 034042 0   0   000000034042 0            312000034042 
FT0	032630 034042 0   0   000002000000 0            312000034042 
FT1A	032630 034042 0   0   000002000000 0            000002000000 
FT2	032630 034042 0   0   0            0            000002000000 
FT2RQ	032630 034042 0   0   000002000000 0            000002000000 
FT3	032630 034042 0   0   000002000000 0            000002000000 
FT9	032631 034042 0   0   000002000000 0            000002000000 
ET0	032632 034042 0   0   0            0            000002000000 
ST1A	032632 034042 0   0   0            0            000002000000 
ST9	032632 034042 0   0   0            0            000002000000 


*032632 JUMPA	0,032633
INITIAL
C(AC)=000002 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032632 032632 0   0   324000032633 0            000000032633 
IT1	032632 0      0   0   324000032633 0            000000032633 
AT3	032632 0      0   0   000000032633 0            324000032633 
AT6	032632 032633 0   0   000000032633 0            324000032633 
FT1A	032632 032633 0   0   000000032633 0            000000032633 
FT2	032632 032633 0   0   0            0            000000032633 
FT2RQ	032632 032633 0   0   000002000000 0            000000032633 
FT3	032632 032633 0   0   000002000000 0            000000032633 
FT9	032633 032633 0   0   000002000000 0            000000032633 
ET0	032633 032633 0   0   000002000000 0            000000032633 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 339
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0529

ST1A	032633 032633 0   0   000002000000 0            000000032633 
ST9	032633 032633 0   0   000002000000 0            000000032633 


*032633 HRLZI	0,000004
INITIAL
C(AC)=000002 000000 
FINAL
C(AC)=000004 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032633 032633 0   0   515000000004 0            000000000004 
IT1	032633 0      0   0   515000000004 0            000000000004 
AT3	032633 0      0   0   000000000004 0            515000000004 
AT6	032633 000004 0   0   000000000004 0            515000000004 
FT1A	032633 000004 0   0   000000000004 0            000000000004 
FT9	032634 000004 0   0   000000000004 0            000000000004 
ET0	032634 000004 0   0   000004000000 0            000000000004 
ST1	032634 000004 0   0   000004000000 0            000000000004 
ST2	032634 000004 0   0   000004000000 0            000000000004 
ST9	032634 000004 0   0   000004000000 0            000000000004 


*032634 ADD 	0,034014
INITIAL
C(AC)=000004 000000 
C(E)=000000 000000 
FINAL
C(AC)=000004 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032634 032634 0   0   270000034014 0            0            
IT1	032634 0      0   0   270000034014 0            0            
AT3	032634 0      0   0   000000034014 0            270000034014 
AT6	032634 034014 0   0   000000034014 0            270000034014 
FT0	032634 034014 0   0   0            0            270000034014 
FT1A	032634 034014 0   0   0            0            0            
FT2	032634 034014 0   0   0            0            0            
FT2RQ	032634 034014 0   0   000004000000 0            0            
FT3	032634 034014 0   0   000004000000 0            0            
FT9	032635 034014 0   0   000004000000 0            0            
ET0	032635 034014 0   0   000004000000 0            0            
ST1	032635 034014 0   0   000004000000 0            0            
ST2	032635 034014 0   0   000004000000 0            0            
ST9	032635 034014 0   0   000004000000 0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 340
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0530

*032635 CAME	0,034043
INITIAL
C(AC)=000004 000000 
C(E)=000004 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032635 032635 0   0   312000034043 0            000004000000 
IT1	032635 0      0   0   312000034043 0            000004000000 
AT3	032635 0      0   0   000000034043 0            312000034043 
AT6	032635 034043 0   0   000000034043 0            312000034043 
FT0	032635 034043 0   0   000004000000 0            312000034043 
FT1A	032635 034043 0   0   000004000000 0            000004000000 
FT2	032635 034043 0   0   0            0            000004000000 
FT2RQ	032635 034043 0   0   000004000000 0            000004000000 
FT3	032635 034043 0   0   000004000000 0            000004000000 
FT9	032636 034043 0   0   000004000000 0            000004000000 
ET0	032637 034043 0   0   0            0            000004000000 
ST1A	032637 034043 0   0   0            0            000004000000 
ST9	032637 034043 0   0   0            0            000004000000 


*032637 JUMPA	0,032640
INITIAL
C(AC)=000004 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032637 032637 0   0   324000032640 0            000000032640 
IT1	032637 0      0   0   324000032640 0            000000032640 
AT3	032637 0      0   0   000000032640 0            324000032640 
AT6	032637 032640 0   0   000000032640 0            324000032640 
FT1A	032637 032640 0   0   000000032640 0            000000032640 
FT2	032637 032640 0   0   0            0            000000032640 
FT2RQ	032637 032640 0   0   000004000000 0            000000032640 
FT3	032637 032640 0   0   000004000000 0            000000032640 
FT9	032640 032640 0   0   000004000000 0            000000032640 
ET0	032640 032640 0   0   000004000000 0            000000032640 
ST1A	032640 032640 0   0   000004000000 0            000000032640 
ST9	032640 032640 0   0   000004000000 0            000000032640 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 341
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0531

*032640 HRLZI	0,000010
INITIAL
C(AC)=000004 000000 
FINAL
C(AC)=000010 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032640 032640 0   0   515000000010 0            000000000010 
IT1	032640 0      0   0   515000000010 0            000000000010 
AT3	032640 0      0   0   000000000010 0            515000000010 
AT6	032640 000010 0   0   000000000010 0            515000000010 
FT1A	032640 000010 0   0   000000000010 0            000000000010 
FT9	032641 000010 0   0   000000000010 0            000000000010 
ET0	032641 000010 0   0   000010000000 0            000000000010 
ST1	032641 000010 0   0   000010000000 0            000000000010 
ST2	032641 000010 0   0   000010000000 0            000000000010 
ST9	032641 000010 0   0   000010000000 0            000000000010 


*032641 ADD 	0,034014
INITIAL
C(AC)=000010 000000 
C(E)=000000 000000 
FINAL
C(AC)=000010 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032641 032641 0   0   270000034014 0            0            
IT1	032641 0      0   0   270000034014 0            0            
AT3	032641 0      0   0   000000034014 0            270000034014 
AT6	032641 034014 0   0   000000034014 0            270000034014 
FT0	032641 034014 0   0   0            0            270000034014 
FT1A	032641 034014 0   0   0            0            0            
FT2	032641 034014 0   0   0            0            0            
FT2RQ	032641 034014 0   0   000010000000 0            0            
FT3	032641 034014 0   0   000010000000 0            0            
FT9	032642 034014 0   0   000010000000 0            0            
ET0	032642 034014 0   0   000010000000 0            0            
ST1	032642 034014 0   0   000010000000 0            0            
ST2	032642 034014 0   0   000010000000 0            0            
ST9	032642 034014 0   0   000010000000 0            0            


*032642 CAME	0,034044
INITIAL
C(AC)=000010 000000 
C(E)=000010 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032642 032642 0   0   312000034044 0            000010000000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 342
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0532

IT1	032642 0      0   0   312000034044 0            000010000000 
AT3	032642 0      0   0   000000034044 0            312000034044 
AT6	032642 034044 0   0   000000034044 0            312000034044 
FT0	032642 034044 0   0   000010000000 0            312000034044 
FT1A	032642 034044 0   0   000010000000 0            000010000000 
FT2	032642 034044 0   0   0            0            000010000000 
FT2RQ	032642 034044 0   0   000010000000 0            000010000000 
FT3	032642 034044 0   0   000010000000 0            000010000000 
FT9	032643 034044 0   0   000010000000 0            000010000000 
ET0	032644 034044 0   0   0            0            000010000000 
ST1A	032644 034044 0   0   0            0            000010000000 
ST9	032644 034044 0   0   0            0            000010000000 


*032644 JUMPA	0,032645
INITIAL
C(AC)=000010 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032644 032644 0   0   324000032645 0            000000032645 
IT1	032644 0      0   0   324000032645 0            000000032645 
AT3	032644 0      0   0   000000032645 0            324000032645 
AT6	032644 032645 0   0   000000032645 0            324000032645 
FT1A	032644 032645 0   0   000000032645 0            000000032645 
FT2	032644 032645 0   0   0            0            000000032645 
FT2RQ	032644 032645 0   0   000010000000 0            000000032645 
FT3	032644 032645 0   0   000010000000 0            000000032645 
FT9	032645 032645 0   0   000010000000 0            000000032645 
ET0	032645 032645 0   0   000010000000 0            000000032645 
ST1A	032645 032645 0   0   000010000000 0            000000032645 
ST9	032645 032645 0   0   000010000000 0            000000032645 


*032645 HRLZI	0,000020
INITIAL
C(AC)=000010 000000 
FINAL
C(AC)=000020 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032645 032645 0   0   515000000020 0            000000000020 
IT1	032645 0      0   0   515000000020 0            000000000020 
AT3	032645 0      0   0   000000000020 0            515000000020 
AT6	032645 000020 0   0   000000000020 0            515000000020 
FT1A	032645 000020 0   0   000000000020 0            000000000020 
FT9	032646 000020 0   0   000000000020 0            000000000020 
ET0	032646 000020 0   0   000020000000 0            000000000020 
ST1	032646 000020 0   0   000020000000 0            000000000020 
ST2	032646 000020 0   0   000020000000 0            000000000020 
ST9	032646 000020 0   0   000020000000 0            000000000020 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 343
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0533



*032646 ADD 	0,034014
INITIAL
C(AC)=000020 000000 
C(E)=000000 000000 
FINAL
C(AC)=000020 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032646 032646 0   0   270000034014 0            0            
IT1	032646 0      0   0   270000034014 0            0            
AT3	032646 0      0   0   000000034014 0            270000034014 
AT6	032646 034014 0   0   000000034014 0            270000034014 
FT0	032646 034014 0   0   0            0            270000034014 
FT1A	032646 034014 0   0   0            0            0            
FT2	032646 034014 0   0   0            0            0            
FT2RQ	032646 034014 0   0   000020000000 0            0            
FT3	032646 034014 0   0   000020000000 0            0            
FT9	032647 034014 0   0   000020000000 0            0            
ET0	032647 034014 0   0   000020000000 0            0            
ST1	032647 034014 0   0   000020000000 0            0            
ST2	032647 034014 0   0   000020000000 0            0            
ST9	032647 034014 0   0   000020000000 0            0            


*032647 CAME	0,034045
INITIAL
C(AC)=000020 000000 
C(E)=000020 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032647 032647 0   0   312000034045 0            000020000000 
IT1	032647 0      0   0   312000034045 0            000020000000 
AT3	032647 0      0   0   000000034045 0            312000034045 
AT6	032647 034045 0   0   000000034045 0            312000034045 
FT0	032647 034045 0   0   000020000000 0            312000034045 
FT1A	032647 034045 0   0   000020000000 0            000020000000 
FT2	032647 034045 0   0   0            0            000020000000 
FT2RQ	032647 034045 0   0   000020000000 0            000020000000 
FT3	032647 034045 0   0   000020000000 0            000020000000 
FT9	032650 034045 0   0   000020000000 0            000020000000 
ET0	032651 034045 0   0   0            0            000020000000 
ST1A	032651 034045 0   0   0            0            000020000000 
ST9	032651 034045 0   0   0            0            000020000000 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 344
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0534

*032651 JUMPA	0,032652
INITIAL
C(AC)=000020 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032651 032651 0   0   324000032652 0            000000032652 
IT1	032651 0      0   0   324000032652 0            000000032652 
AT3	032651 0      0   0   000000032652 0            324000032652 
AT6	032651 032652 0   0   000000032652 0            324000032652 
FT1A	032651 032652 0   0   000000032652 0            000000032652 
FT2	032651 032652 0   0   0            0            000000032652 
FT2RQ	032651 032652 0   0   000020000000 0            000000032652 
FT3	032651 032652 0   0   000020000000 0            000000032652 
FT9	032652 032652 0   0   000020000000 0            000000032652 
ET0	032652 032652 0   0   000020000000 0            000000032652 
ST1A	032652 032652 0   0   000020000000 0            000000032652 
ST9	032652 032652 0   0   000020000000 0            000000032652 


*032652 HRLZI	0,000040
INITIAL
C(AC)=000020 000000 
FINAL
C(AC)=000040 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032652 032652 0   0   515000000040 0            000000000040 
IT1	032652 0      0   0   515000000040 0            000000000040 
AT3	032652 0      0   0   000000000040 0            515000000040 
AT6	032652 000040 0   0   000000000040 0            515000000040 
FT1A	032652 000040 0   0   000000000040 0            000000000040 
FT9	032653 000040 0   0   000000000040 0            000000000040 
ET0	032653 000040 0   0   000040000000 0            000000000040 
ST1	032653 000040 0   0   000040000000 0            000000000040 
ST2	032653 000040 0   0   000040000000 0            000000000040 
ST9	032653 000040 0   0   000040000000 0            000000000040 


*032653 ADD 	0,034014
INITIAL
C(AC)=000040 000000 
C(E)=000000 000000 
FINAL
C(AC)=000040 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032653 032653 0   0   270000034014 0            0            
IT1	032653 0      0   0   270000034014 0            0            
AT3	032653 0      0   0   000000034014 0            270000034014 
AT6	032653 034014 0   0   000000034014 0            270000034014 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 345
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0535

FT0	032653 034014 0   0   0            0            270000034014 
FT1A	032653 034014 0   0   0            0            0            
FT2	032653 034014 0   0   0            0            0            
FT2RQ	032653 034014 0   0   000040000000 0            0            
FT3	032653 034014 0   0   000040000000 0            0            
FT9	032654 034014 0   0   000040000000 0            0            
ET0	032654 034014 0   0   000040000000 0            0            
ST1	032654 034014 0   0   000040000000 0            0            
ST2	032654 034014 0   0   000040000000 0            0            
ST9	032654 034014 0   0   000040000000 0            0            


*032654 CAME	0,034046
INITIAL
C(AC)=000040 000000 
C(E)=000040 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032654 032654 0   0   312000034046 0            000040000000 
IT1	032654 0      0   0   312000034046 0            000040000000 
AT3	032654 0      0   0   000000034046 0            312000034046 
AT6	032654 034046 0   0   000000034046 0            312000034046 
FT0	032654 034046 0   0   000040000000 0            312000034046 
FT1A	032654 034046 0   0   000040000000 0            000040000000 
FT2	032654 034046 0   0   0            0            000040000000 
FT2RQ	032654 034046 0   0   000040000000 0            000040000000 
FT3	032654 034046 0   0   000040000000 0            000040000000 
FT9	032655 034046 0   0   000040000000 0            000040000000 
ET0	032656 034046 0   0   0            0            000040000000 
ST1A	032656 034046 0   0   0            0            000040000000 
ST9	032656 034046 0   0   0            0            000040000000 


*032656 JUMPA	0,032657
INITIAL
C(AC)=000040 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032656 032656 0   0   324000032657 0            000000032657 
IT1	032656 0      0   0   324000032657 0            000000032657 
AT3	032656 0      0   0   000000032657 0            324000032657 
AT6	032656 032657 0   0   000000032657 0            324000032657 
FT1A	032656 032657 0   0   000000032657 0            000000032657 
FT2	032656 032657 0   0   0            0            000000032657 
FT2RQ	032656 032657 0   0   000040000000 0            000000032657 
FT3	032656 032657 0   0   000040000000 0            000000032657 
FT9	032657 032657 0   0   000040000000 0            000000032657 
ET0	032657 032657 0   0   000040000000 0            000000032657 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 346
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0536

ST1A	032657 032657 0   0   000040000000 0            000000032657 
ST9	032657 032657 0   0   000040000000 0            000000032657 


*032657 HRLZI	0,000100
INITIAL
C(AC)=000040 000000 
FINAL
C(AC)=000100 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032657 032657 0   0   515000000100 0            000000000100 
IT1	032657 0      0   0   515000000100 0            000000000100 
AT3	032657 0      0   0   000000000100 0            515000000100 
AT6	032657 0      0   0   000000000100 0            515000000100 
FT1A	032657 0      0   0   000000000100 0            000000000100 
FT9	032660 0      0   0   000000000100 0            000000000100 
ET0	032660 0      0   0   000100000000 0            000000000100 
ST1	032660 0      0   0   000100000000 0            000000000100 
ST2	032660 0      0   0   000100000000 0            000000000100 
ST9	032660 0      0   0   000100000000 0            000000000100 


*032660 ADD 	0,034014
INITIAL
C(AC)=000100 000000 
C(E)=000000 000000 
FINAL
C(AC)=000100 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032660 032660 0   0   270000034014 0            0            
IT1	032660 0      0   0   270000034014 0            0            
AT3	032660 0      0   0   000000034014 0            270000034014 
AT6	032660 034014 0   0   000000034014 0            270000034014 
FT0	032660 034014 0   0   0            0            270000034014 
FT1A	032660 034014 0   0   0            0            0            
FT2	032660 034014 0   0   0            0            0            
FT2RQ	032660 034014 0   0   000100000000 0            0            
FT3	032660 034014 0   0   000100000000 0            0            
FT9	032661 034014 0   0   000100000000 0            0            
ET0	032661 034014 0   0   000100000000 0            0            
ST1	032661 034014 0   0   000100000000 0            0            
ST2	032661 034014 0   0   000100000000 0            0            
ST9	032661 034014 0   0   000100000000 0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 347
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0537

*032661 CAME	0,034047
INITIAL
C(AC)=000100 000000 
C(E)=000100 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032661 032661 0   0   312000034047 0            000100000000 
IT1	032661 0      0   0   312000034047 0            000100000000 
AT3	032661 0      0   0   000000034047 0            312000034047 
AT6	032661 034047 0   0   000000034047 0            312000034047 
FT0	032661 034047 0   0   000100000000 0            312000034047 
FT1A	032661 034047 0   0   000100000000 0            000100000000 
FT2	032661 034047 0   0   0            0            000100000000 
FT2RQ	032661 034047 0   0   000100000000 0            000100000000 
FT3	032661 034047 0   0   000100000000 0            000100000000 
FT9	032662 034047 0   0   000100000000 0            000100000000 
ET0	032663 034047 0   0   0            0            000100000000 
ST1A	032663 034047 0   0   0            0            000100000000 
ST9	032663 034047 0   0   0            0            000100000000 


*032663 JUMPA	0,032664
INITIAL
C(AC)=000100 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032663 032663 0   0   324000032664 0            000000032664 
IT1	032663 0      0   0   324000032664 0            000000032664 
AT3	032663 0      0   0   000000032664 0            324000032664 
AT6	032663 032664 0   0   000000032664 0            324000032664 
FT1A	032663 032664 0   0   000000032664 0            000000032664 
FT2	032663 032664 0   0   0            0            000000032664 
FT2RQ	032663 032664 0   0   000100000000 0            000000032664 
FT3	032663 032664 0   0   000100000000 0            000000032664 
FT9	032664 032664 0   0   000100000000 0            000000032664 
ET0	032664 032664 0   0   000100000000 0            000000032664 
ST1A	032664 032664 0   0   000100000000 0            000000032664 
ST9	032664 032664 0   0   000100000000 0            000000032664 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 348
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0538

*032664 HRLZI	0,000200
INITIAL
C(AC)=000100 000000 
FINAL
C(AC)=000200 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032664 032664 0   0   515000000200 0            000000000200 
IT1	032664 0      0   0   515000000200 0            000000000200 
AT3	032664 0      0   0   000000000200 0            515000000200 
AT6	032664 0      0   0   000000000200 0            515000000200 
FT1A	032664 0      0   0   000000000200 0            000000000200 
FT9	032665 0      0   0   000000000200 0            000000000200 
ET0	032665 0      0   0   000200000000 0            000000000200 
ST1	032665 0      0   0   000200000000 0            000000000200 
ST2	032665 0      0   0   000200000000 0            000000000200 
ST9	032665 0      0   0   000200000000 0            000000000200 


*032665 ADD 	0,034014
INITIAL
C(AC)=000200 000000 
C(E)=000000 000000 
FINAL
C(AC)=000200 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032665 032665 0   0   270000034014 0            0            
IT1	032665 0      0   0   270000034014 0            0            
AT3	032665 0      0   0   000000034014 0            270000034014 
AT6	032665 034014 0   0   000000034014 0            270000034014 
FT0	032665 034014 0   0   0            0            270000034014 
FT1A	032665 034014 0   0   0            0            0            
FT2	032665 034014 0   0   0            0            0            
FT2RQ	032665 034014 0   0   000200000000 0            0            
FT3	032665 034014 0   0   000200000000 0            0            
FT9	032666 034014 0   0   000200000000 0            0            
ET0	032666 034014 0   0   000200000000 0            0            
ST1	032666 034014 0   0   000200000000 0            0            
ST2	032666 034014 0   0   000200000000 0            0            
ST9	032666 034014 0   0   000200000000 0            0            


*032666 CAME	0,034050
INITIAL
C(AC)=000200 000000 
C(E)=000200 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032666 032666 0   0   312000034050 0            000200000000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 349
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0539

IT1	032666 0      0   0   312000034050 0            000200000000 
AT3	032666 0      0   0   000000034050 0            312000034050 
AT6	032666 034050 0   0   000000034050 0            312000034050 
FT0	032666 034050 0   0   000200000000 0            312000034050 
FT1A	032666 034050 0   0   000200000000 0            000200000000 
FT2	032666 034050 0   0   0            0            000200000000 
FT2RQ	032666 034050 0   0   000200000000 0            000200000000 
FT3	032666 034050 0   0   000200000000 0            000200000000 
FT9	032667 034050 0   0   000200000000 0            000200000000 
ET0	032670 034050 0   0   0            0            000200000000 
ST1A	032670 034050 0   0   0            0            000200000000 
ST9	032670 034050 0   0   0            0            000200000000 


*032670 JUMPA	0,032671
INITIAL
C(AC)=000200 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032670 032670 0   0   324000032671 0            000000032671 
IT1	032670 0      0   0   324000032671 0            000000032671 
AT3	032670 0      0   0   000000032671 0            324000032671 
AT6	032670 032671 0   0   000000032671 0            324000032671 
FT1A	032670 032671 0   0   000000032671 0            000000032671 
FT2	032670 032671 0   0   0            0            000000032671 
FT2RQ	032670 032671 0   0   000200000000 0            000000032671 
FT3	032670 032671 0   0   000200000000 0            000000032671 
FT9	032671 032671 0   0   000200000000 0            000000032671 
ET0	032671 032671 0   0   000200000000 0            000000032671 
ST1A	032671 032671 0   0   000200000000 0            000000032671 
ST9	032671 032671 0   0   000200000000 0            000000032671 


*032671 HRLZI	0,000400
INITIAL
C(AC)=000200 000000 
FINAL
C(AC)=000400 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032671 032671 0   0   515000000400 0            000000000400 
IT1	032671 0      0   0   515000000400 0            000000000400 
AT3	032671 0      0   0   000000000400 0            515000000400 
AT6	032671 0      0   0   000000000400 0            515000000400 
FT1A	032671 0      0   0   000000000400 0            000000000400 
FT9	032672 0      0   0   000000000400 0            000000000400 
ET0	032672 0      0   0   000400000000 0            000000000400 
ST1	032672 0      0   0   000400000000 0            000000000400 
ST2	032672 0      0   0   000400000000 0            000000000400 
ST9	032672 0      0   0   000400000000 0            000000000400 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 350
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0540



*032672 ADD 	0,034014
INITIAL
C(AC)=000400 000000 
C(E)=000000 000000 
FINAL
C(AC)=000400 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032672 032672 0   0   270000034014 0            0            
IT1	032672 0      0   0   270000034014 0            0            
AT3	032672 0      0   0   000000034014 0            270000034014 
AT6	032672 034014 0   0   000000034014 0            270000034014 
FT0	032672 034014 0   0   0            0            270000034014 
FT1A	032672 034014 0   0   0            0            0            
FT2	032672 034014 0   0   0            0            0            
FT2RQ	032672 034014 0   0   000400000000 0            0            
FT3	032672 034014 0   0   000400000000 0            0            
FT9	032673 034014 0   0   000400000000 0            0            
ET0	032673 034014 0   0   000400000000 0            0            
ST1	032673 034014 0   0   000400000000 0            0            
ST2	032673 034014 0   0   000400000000 0            0            
ST9	032673 034014 0   0   000400000000 0            0            


*032673 CAME	0,034051
INITIAL
C(AC)=000400 000000 
C(E)=000400 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032673 032673 0   0   312000034051 0            000400000000 
IT1	032673 0      0   0   312000034051 0            000400000000 
AT3	032673 0      0   0   000000034051 0            312000034051 
AT6	032673 034051 0   0   000000034051 0            312000034051 
FT0	032673 034051 0   0   000400000000 0            312000034051 
FT1A	032673 034051 0   0   000400000000 0            000400000000 
FT2	032673 034051 0   0   0            0            000400000000 
FT2RQ	032673 034051 0   0   000400000000 0            000400000000 
FT3	032673 034051 0   0   000400000000 0            000400000000 
FT9	032674 034051 0   0   000400000000 0            000400000000 
ET0	032675 034051 0   0   0            0            000400000000 
ST1A	032675 034051 0   0   0            0            000400000000 
ST9	032675 034051 0   0   0            0            000400000000 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 351
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0541

*032675 JUMPA	0,032676
INITIAL
C(AC)=000400 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032675 032675 0   0   324000032676 0            000000032676 
IT1	032675 0      0   0   324000032676 0            000000032676 
AT3	032675 0      0   0   000000032676 0            324000032676 
AT6	032675 032676 0   0   000000032676 0            324000032676 
FT1A	032675 032676 0   0   000000032676 0            000000032676 
FT2	032675 032676 0   0   0            0            000000032676 
FT2RQ	032675 032676 0   0   000400000000 0            000000032676 
FT3	032675 032676 0   0   000400000000 0            000000032676 
FT9	032676 032676 0   0   000400000000 0            000000032676 
ET0	032676 032676 0   0   000400000000 0            000000032676 
ST1A	032676 032676 0   0   000400000000 0            000000032676 
ST9	032676 032676 0   0   000400000000 0            000000032676 


*032676 HRLZI	0,001000
INITIAL
C(AC)=000400 000000 
FINAL
C(AC)=001000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032676 032676 0   0   515000001000 0            000000001000 
IT1	032676 0      0   0   515000001000 0            000000001000 
AT3	032676 0      0   0   000000001000 0            515000001000 
AT6	032676 0      0   0   000000001000 0            515000001000 
FT1A	032676 0      0   0   000000001000 0            000000001000 
FT9	032677 0      0   0   000000001000 0            000000001000 
ET0	032677 0      0   0   001000000000 0            000000001000 
ST1	032677 0      0   0   001000000000 0            000000001000 
ST2	032677 0      0   0   001000000000 0            000000001000 
ST9	032677 0      0   0   001000000000 0            000000001000 


*032677 ADD 	0,034014
INITIAL
C(AC)=001000 000000 
C(E)=000000 000000 
FINAL
C(AC)=001000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032677 032677 0   0   270000034014 0            0            
IT1	032677 0      0   0   270000034014 0            0            
AT3	032677 0      0   0   000000034014 0            270000034014 
AT6	032677 034014 0   0   000000034014 0            270000034014 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 352
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0542

FT0	032677 034014 0   0   0            0            270000034014 
FT1A	032677 034014 0   0   0            0            0            
FT2	032677 034014 0   0   0            0            0            
FT2RQ	032677 034014 0   0   001000000000 0            0            
FT3	032677 034014 0   0   001000000000 0            0            
FT9	0      034014 0   0   001000000000 0            0            
ET0	0      034014 0   0   001000000000 0            0            
ST1	0      034014 0   0   001000000000 0            0            
ST2	0      034014 0   0   001000000000 0            0            
ST9	0      034014 0   0   001000000000 0            0            


*032700 CAME	0,034052
INITIAL
C(AC)=001000 000000 
C(E)=001000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	0      0      0   0   312000034052 0            001000000000 
IT1	0      0      0   0   312000034052 0            001000000000 
AT3	0      0      0   0   000000034052 0            312000034052 
AT6	0      034052 0   0   000000034052 0            312000034052 
FT0	0      034052 0   0   001000000000 0            312000034052 
FT1A	0      034052 0   0   001000000000 0            001000000000 
FT2	0      034052 0   0   0            0            001000000000 
FT2RQ	0      034052 0   0   001000000000 0            001000000000 
FT3	0      034052 0   0   001000000000 0            001000000000 
FT9	032701 034052 0   0   001000000000 0            001000000000 
ET0	032702 034052 0   0   0            0            001000000000 
ST1A	032702 034052 0   0   0            0            001000000000 
ST9	032702 034052 0   0   0            0            001000000000 


*032702 JUMPA	0,032703
INITIAL
C(AC)=001000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032702 032702 0   0   324000032703 0            000000032703 
IT1	032702 0      0   0   324000032703 0            000000032703 
AT3	032702 0      0   0   000000032703 0            324000032703 
AT6	032702 032703 0   0   000000032703 0            324000032703 
FT1A	032702 032703 0   0   000000032703 0            000000032703 
FT2	032702 032703 0   0   0            0            000000032703 
FT2RQ	032702 032703 0   0   001000000000 0            000000032703 
FT3	032702 032703 0   0   001000000000 0            000000032703 
FT9	032703 032703 0   0   001000000000 0            000000032703 
ET0	032703 032703 0   0   001000000000 0            000000032703 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 353
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0543

ST1A	032703 032703 0   0   001000000000 0            000000032703 
ST9	032703 032703 0   0   001000000000 0            000000032703 


*032703 HRLZI	0,002000
INITIAL
C(AC)=001000 000000 
FINAL
C(AC)=002000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032703 032703 0   0   515000002000 0            000000002000 
IT1	032703 0      0   0   515000002000 0            000000002000 
AT3	032703 0      0   0   000000002000 0            515000002000 
AT6	032703 0      0   0   000000002000 0            515000002000 
FT1A	032703 0      0   0   000000002000 0            000000002000 
FT9	032704 0      0   0   000000002000 0            000000002000 
ET0	032704 0      0   0   002000000000 0            000000002000 
ST1	032704 0      0   0   002000000000 0            000000002000 
ST2	032704 0      0   0   002000000000 0            000000002000 
ST9	032704 0      0   0   002000000000 0            000000002000 


*032704 ADD 	0,034014
INITIAL
C(AC)=002000 000000 
C(E)=000000 000000 
FINAL
C(AC)=002000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032704 032704 0   0   270000034014 0            0            
IT1	032704 0      0   0   270000034014 0            0            
AT3	032704 0      0   0   000000034014 0            270000034014 
AT6	032704 034014 0   0   000000034014 0            270000034014 
FT0	032704 034014 0   0   0            0            270000034014 
FT1A	032704 034014 0   0   0            0            0            
FT2	032704 034014 0   0   0            0            0            
FT2RQ	032704 034014 0   0   002000000000 0            0            
FT3	032704 034014 0   0   002000000000 0            0            
FT9	032705 034014 0   0   002000000000 0            0            
ET0	032705 034014 0   0   002000000000 0            0            
ST1	032705 034014 0   0   002000000000 0            0            
ST2	032705 034014 0   0   002000000000 0            0            
ST9	032705 034014 0   0   002000000000 0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 354
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0544

*032705 CAME	0,034053
INITIAL
C(AC)=002000 000000 
C(E)=002000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032705 032705 0   0   312000034053 0            002000000000 
IT1	032705 0      0   0   312000034053 0            002000000000 
AT3	032705 0      0   0   000000034053 0            312000034053 
AT6	032705 034053 0   0   000000034053 0            312000034053 
FT0	032705 034053 0   0   002000000000 0            312000034053 
FT1A	032705 034053 0   0   002000000000 0            002000000000 
FT2	032705 034053 0   0   0            0            002000000000 
FT2RQ	032705 034053 0   0   002000000000 0            002000000000 
FT3	032705 034053 0   0   002000000000 0            002000000000 
FT9	032706 034053 0   0   002000000000 0            002000000000 
ET0	032707 034053 0   0   0            0            002000000000 
ST1A	032707 034053 0   0   0            0            002000000000 
ST9	032707 034053 0   0   0            0            002000000000 


*032707 JUMPA	0,032710
INITIAL
C(AC)=002000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032707 032707 0   0   324000032710 0            000000032710 
IT1	032707 0      0   0   324000032710 0            000000032710 
AT3	032707 0      0   0   000000032710 0            324000032710 
AT6	032707 032710 0   0   000000032710 0            324000032710 
FT1A	032707 032710 0   0   000000032710 0            000000032710 
FT2	032707 032710 0   0   0            0            000000032710 
FT2RQ	032707 032710 0   0   002000000000 0            000000032710 
FT3	032707 032710 0   0   002000000000 0            000000032710 
FT9	032710 032710 0   0   002000000000 0            000000032710 
ET0	032710 032710 0   0   002000000000 0            000000032710 
ST1A	032710 032710 0   0   002000000000 0            000000032710 
ST9	032710 032710 0   0   002000000000 0            000000032710 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 355
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0545

*032710 HRLZI	0,004000
INITIAL
C(AC)=002000 000000 
FINAL
C(AC)=004000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032710 032710 0   0   515000004000 0            000000004000 
IT1	032710 0      0   0   515000004000 0            000000004000 
AT3	032710 0      0   0   000000004000 0            515000004000 
AT6	032710 0      0   0   000000004000 0            515000004000 
FT1A	032710 0      0   0   000000004000 0            000000004000 
FT9	032711 0      0   0   000000004000 0            000000004000 
ET0	032711 0      0   0   004000000000 0            000000004000 
ST1	032711 0      0   0   004000000000 0            000000004000 
ST2	032711 0      0   0   004000000000 0            000000004000 
ST9	032711 0      0   0   004000000000 0            000000004000 


*032711 ADD 	0,034014
INITIAL
C(AC)=004000 000000 
C(E)=000000 000000 
FINAL
C(AC)=004000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032711 032711 0   0   270000034014 0            0            
IT1	032711 0      0   0   270000034014 0            0            
AT3	032711 0      0   0   000000034014 0            270000034014 
AT6	032711 034014 0   0   000000034014 0            270000034014 
FT0	032711 034014 0   0   0            0            270000034014 
FT1A	032711 034014 0   0   0            0            0            
FT2	032711 034014 0   0   0            0            0            
FT2RQ	032711 034014 0   0   004000000000 0            0            
FT3	032711 034014 0   0   004000000000 0            0            
FT9	032712 034014 0   0   004000000000 0            0            
ET0	032712 034014 0   0   004000000000 0            0            
ST1	032712 034014 0   0   004000000000 0            0            
ST2	032712 034014 0   0   004000000000 0            0            
ST9	032712 034014 0   0   004000000000 0            0            


*032712 CAME	0,034054
INITIAL
C(AC)=004000 000000 
C(E)=004000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032712 032712 0   0   312000034054 0            004000000000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 356
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0546

IT1	032712 0      0   0   312000034054 0            004000000000 
AT3	032712 0      0   0   000000034054 0            312000034054 
AT6	032712 034054 0   0   000000034054 0            312000034054 
FT0	032712 034054 0   0   004000000000 0            312000034054 
FT1A	032712 034054 0   0   004000000000 0            004000000000 
FT2	032712 034054 0   0   0            0            004000000000 
FT2RQ	032712 034054 0   0   004000000000 0            004000000000 
FT3	032712 034054 0   0   004000000000 0            004000000000 
FT9	032713 034054 0   0   004000000000 0            004000000000 
ET0	032714 034054 0   0   0            0            004000000000 
ST1A	032714 034054 0   0   0            0            004000000000 
ST9	032714 034054 0   0   0            0            004000000000 


*032714 JUMPA	0,032715
INITIAL
C(AC)=004000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032714 032714 0   0   324000032715 0            000000032715 
IT1	032714 0      0   0   324000032715 0            000000032715 
AT3	032714 0      0   0   000000032715 0            324000032715 
AT6	032714 032715 0   0   000000032715 0            324000032715 
FT1A	032714 032715 0   0   000000032715 0            000000032715 
FT2	032714 032715 0   0   0            0            000000032715 
FT2RQ	032714 032715 0   0   004000000000 0            000000032715 
FT3	032714 032715 0   0   004000000000 0            000000032715 
FT9	032715 032715 0   0   004000000000 0            000000032715 
ET0	032715 032715 0   0   004000000000 0            000000032715 
ST1A	032715 032715 0   0   004000000000 0            000000032715 
ST9	032715 032715 0   0   004000000000 0            000000032715 


*032715 HRLZI	0,010000
INITIAL
C(AC)=004000 000000 
FINAL
C(AC)=010000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032715 032715 0   0   515000010000 0            000000010000 
IT1	032715 0      0   0   515000010000 0            000000010000 
AT3	032715 0      0   0   000000010000 0            515000010000 
AT6	032715 0      0   0   000000010000 0            515000010000 
FT1A	032715 0      0   0   000000010000 0            000000010000 
FT9	032716 0      0   0   000000010000 0            000000010000 
ET0	032716 0      0   0   010000000000 0            000000010000 
ST1	032716 0      0   0   010000000000 0            000000010000 
ST2	032716 0      0   0   010000000000 0            000000010000 
ST9	032716 0      0   0   010000000000 0            000000010000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 357
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0547



*032716 ADD 	0,034014
INITIAL
C(AC)=010000 000000 
C(E)=000000 000000 
FINAL
C(AC)=010000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032716 032716 0   0   270000034014 0            0            
IT1	032716 0      0   0   270000034014 0            0            
AT3	032716 0      0   0   000000034014 0            270000034014 
AT6	032716 034014 0   0   000000034014 0            270000034014 
FT0	032716 034014 0   0   0            0            270000034014 
FT1A	032716 034014 0   0   0            0            0            
FT2	032716 034014 0   0   0            0            0            
FT2RQ	032716 034014 0   0   010000000000 0            0            
FT3	032716 034014 0   0   010000000000 0            0            
FT9	032717 034014 0   0   010000000000 0            0            
ET0	032717 034014 0   0   010000000000 0            0            
ST1	032717 034014 0   0   010000000000 0            0            
ST2	032717 034014 0   0   010000000000 0            0            
ST9	032717 034014 0   0   010000000000 0            0            


*032717 CAME	0,034055
INITIAL
C(AC)=010000 000000 
C(E)=010000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032717 032717 0   0   312000034055 0            010000000000 
IT1	032717 0      0   0   312000034055 0            010000000000 
AT3	032717 0      0   0   000000034055 0            312000034055 
AT6	032717 034055 0   0   000000034055 0            312000034055 
FT0	032717 034055 0   0   010000000000 0            312000034055 
FT1A	032717 034055 0   0   010000000000 0            010000000000 
FT2	032717 034055 0   0   0            0            010000000000 
FT2RQ	032717 034055 0   0   010000000000 0            010000000000 
FT3	032717 034055 0   0   010000000000 0            010000000000 
FT9	032720 034055 0   0   010000000000 0            010000000000 
ET0	032721 034055 0   0   0            0            010000000000 
ST1A	032721 034055 0   0   0            0            010000000000 
ST9	032721 034055 0   0   0            0            010000000000 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 358
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0548

*032721 JUMPA	0,032722
INITIAL
C(AC)=010000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032721 032721 0   0   324000032722 0            000000032722 
IT1	032721 0      0   0   324000032722 0            000000032722 
AT3	032721 0      0   0   000000032722 0            324000032722 
AT6	032721 032722 0   0   000000032722 0            324000032722 
FT1A	032721 032722 0   0   000000032722 0            000000032722 
FT2	032721 032722 0   0   0            0            000000032722 
FT2RQ	032721 032722 0   0   010000000000 0            000000032722 
FT3	032721 032722 0   0   010000000000 0            000000032722 
FT9	032722 032722 0   0   010000000000 0            000000032722 
ET0	032722 032722 0   0   010000000000 0            000000032722 
ST1A	032722 032722 0   0   010000000000 0            000000032722 
ST9	032722 032722 0   0   010000000000 0            000000032722 


*032722 HRLZI	0,020000
INITIAL
C(AC)=010000 000000 
FINAL
C(AC)=020000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032722 032722 0   0   515000020000 0            000000020000 
IT1	032722 0      0   0   515000020000 0            000000020000 
AT3	032722 0      0   0   000000020000 0            515000020000 
AT6	032722 0      0   0   000000020000 0            515000020000 
FT1A	032722 0      0   0   000000020000 0            000000020000 
FT9	032723 0      0   0   000000020000 0            000000020000 
ET0	032723 0      0   0   020000000000 0            000000020000 
ST1	032723 0      0   0   020000000000 0            000000020000 
ST2	032723 0      0   0   020000000000 0            000000020000 
ST9	032723 0      0   0   020000000000 0            000000020000 


*032723 ADD 	0,034014
INITIAL
C(AC)=020000 000000 
C(E)=000000 000000 
FINAL
C(AC)=020000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032723 032723 0   0   270000034014 0            0            
IT1	032723 0      0   0   270000034014 0            0            
AT3	032723 0      0   0   000000034014 0            270000034014 
AT6	032723 034014 0   0   000000034014 0            270000034014 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 359
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0549

FT0	032723 034014 0   0   0            0            270000034014 
FT1A	032723 034014 0   0   0            0            0            
FT2	032723 034014 0   0   0            0            0            
FT2RQ	032723 034014 0   0   020000000000 0            0            
FT3	032723 034014 0   0   020000000000 0            0            
FT9	032724 034014 0   0   020000000000 0            0            
ET0	032724 034014 0   0   020000000000 0            0            
ST1	032724 034014 0   0   020000000000 0            0            
ST2	032724 034014 0   0   020000000000 0            0            
ST9	032724 034014 0   0   020000000000 0            0            


*032724 CAME	0,034056
INITIAL
C(AC)=020000 000000 
C(E)=020000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032724 032724 0   0   312000034056 0            020000000000 
IT1	032724 0      0   0   312000034056 0            020000000000 
AT3	032724 0      0   0   000000034056 0            312000034056 
AT6	032724 034056 0   0   000000034056 0            312000034056 
FT0	032724 034056 0   0   020000000000 0            312000034056 
FT1A	032724 034056 0   0   020000000000 0            020000000000 
FT2	032724 034056 0   0   0            0            020000000000 
FT2RQ	032724 034056 0   0   020000000000 0            020000000000 
FT3	032724 034056 0   0   020000000000 0            020000000000 
FT9	032725 034056 0   0   020000000000 0            020000000000 
ET0	032726 034056 0   0   0            0            020000000000 
ST1A	032726 034056 0   0   0            0            020000000000 
ST9	032726 034056 0   0   0            0            020000000000 


*032726 JUMPA	0,032727
INITIAL
C(AC)=020000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032726 032726 0   0   324000032727 0            000000032727 
IT1	032726 0      0   0   324000032727 0            000000032727 
AT3	032726 0      0   0   000000032727 0            324000032727 
AT6	032726 032727 0   0   000000032727 0            324000032727 
FT1A	032726 032727 0   0   000000032727 0            000000032727 
FT2	032726 032727 0   0   0            0            000000032727 
FT2RQ	032726 032727 0   0   020000000000 0            000000032727 
FT3	032726 032727 0   0   020000000000 0            000000032727 
FT9	032727 032727 0   0   020000000000 0            000000032727 
ET0	032727 032727 0   0   020000000000 0            000000032727 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 360
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0550

ST1A	032727 032727 0   0   020000000000 0            000000032727 
ST9	032727 032727 0   0   020000000000 0            000000032727 


*032727 HRLZI	0,040000
INITIAL
C(AC)=020000 000000 
FINAL
C(AC)=040000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032727 032727 0   0   515000040000 0            000000040000 
IT1	032727 0      0   0   515000040000 0            000000040000 
AT3	032727 0      0   0   000000040000 0            515000040000 
AT6	032727 0      0   0   000000040000 0            515000040000 
FT1A	032727 0      0   0   000000040000 0            000000040000 
FT9	032730 0      0   0   000000040000 0            000000040000 
ET0	032730 0      0   0   040000000000 0            000000040000 
ST1	032730 0      0   0   040000000000 0            000000040000 
ST2	032730 0      0   0   040000000000 0            000000040000 
ST9	032730 0      0   0   040000000000 0            000000040000 


*032730 ADD 	0,034014
INITIAL
C(AC)=040000 000000 
C(E)=000000 000000 
FINAL
C(AC)=040000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032730 032730 0   0   270000034014 0            0            
IT1	032730 0      0   0   270000034014 0            0            
AT3	032730 0      0   0   000000034014 0            270000034014 
AT6	032730 034014 0   0   000000034014 0            270000034014 
FT0	032730 034014 0   0   0            0            270000034014 
FT1A	032730 034014 0   0   0            0            0            
FT2	032730 034014 0   0   0            0            0            
FT2RQ	032730 034014 0   0   040000000000 0            0            
FT3	032730 034014 0   0   040000000000 0            0            
FT9	032731 034014 0   0   040000000000 0            0            
ET0	032731 034014 0   0   040000000000 0            0            
ST1	032731 034014 0   0   040000000000 0            0            
ST2	032731 034014 0   0   040000000000 0            0            
ST9	032731 034014 0   0   040000000000 0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 361
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0551

*032731 CAME	0,034057
INITIAL
C(AC)=040000 000000 
C(E)=040000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032731 032731 0   0   312000034057 0            040000000000 
IT1	032731 0      0   0   312000034057 0            040000000000 
AT3	032731 0      0   0   000000034057 0            312000034057 
AT6	032731 034057 0   0   000000034057 0            312000034057 
FT0	032731 034057 0   0   040000000000 0            312000034057 
FT1A	032731 034057 0   0   040000000000 0            040000000000 
FT2	032731 034057 0   0   0            0            040000000000 
FT2RQ	032731 034057 0   0   040000000000 0            040000000000 
FT3	032731 034057 0   0   040000000000 0            040000000000 
FT9	032732 034057 0   0   040000000000 0            040000000000 
ET0	032733 034057 0   0   0            0            040000000000 
ST1A	032733 034057 0   0   0            0            040000000000 
ST9	032733 034057 0   0   0            0            040000000000 


*032733 JUMPA	0,032734
INITIAL
C(AC)=040000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032733 032733 0   0   324000032734 0            000000032734 
IT1	032733 0      0   0   324000032734 0            000000032734 
AT3	032733 0      0   0   000000032734 0            324000032734 
AT6	032733 032734 0   0   000000032734 0            324000032734 
FT1A	032733 032734 0   0   000000032734 0            000000032734 
FT2	032733 032734 0   0   0            0            000000032734 
FT2RQ	032733 032734 0   0   040000000000 0            000000032734 
FT3	032733 032734 0   0   040000000000 0            000000032734 
FT9	032734 032734 0   0   040000000000 0            000000032734 
ET0	032734 032734 0   0   040000000000 0            000000032734 
ST1A	032734 032734 0   0   040000000000 0            000000032734 
ST9	032734 032734 0   0   040000000000 0            000000032734 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 362
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0552

*032734 HRLZI	0,100000
INITIAL
C(AC)=040000 000000 
FINAL
C(AC)=100000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032734 032734 0   0   515000100000 0            000000100000 
IT1	032734 0      0   0   515000100000 0            000000100000 
AT3	032734 0      0   0   000000100000 0            515000100000 
AT6	032734 0      0   0   000000100000 0            515000100000 
FT1A	032734 0      0   0   000000100000 0            000000100000 
FT9	032735 0      0   0   000000100000 0            000000100000 
ET0	032735 0      0   0   100000000000 0            000000100000 
ST1	032735 0      0   0   100000000000 0            000000100000 
ST2	032735 0      0   0   100000000000 0            000000100000 
ST9	032735 0      0   0   100000000000 0            000000100000 


*032735 ADD 	0,034014
INITIAL
C(AC)=100000 000000 
C(E)=000000 000000 
FINAL
C(AC)=100000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032735 032735 0   0   270000034014 0            0            
IT1	032735 0      0   0   270000034014 0            0            
AT3	032735 0      0   0   000000034014 0            270000034014 
AT6	032735 034014 0   0   000000034014 0            270000034014 
FT0	032735 034014 0   0   0            0            270000034014 
FT1A	032735 034014 0   0   0            0            0            
FT2	032735 034014 0   0   0            0            0            
FT2RQ	032735 034014 0   0   100000000000 0            0            
FT3	032735 034014 0   0   100000000000 0            0            
FT9	032736 034014 0   0   100000000000 0            0            
ET0	032736 034014 0   0   100000000000 0            0            
ST1	032736 034014 0   0   100000000000 0            0            
ST2	032736 034014 0   0   100000000000 0            0            
ST9	032736 034014 0   0   100000000000 0            0            


*032736 CAME	0,034060
INITIAL
C(AC)=100000 000000 
C(E)=100000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032736 032736 0   0   312000034060 0            100000000000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 363
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0553

IT1	032736 0      0   0   312000034060 0            100000000000 
AT3	032736 0      0   0   000000034060 0            312000034060 
AT6	032736 034060 0   0   000000034060 0            312000034060 
FT0	032736 034060 0   0   100000000000 0            312000034060 
FT1A	032736 034060 0   0   100000000000 0            100000000000 
FT2	032736 034060 0   0   0            0            100000000000 
FT2RQ	032736 034060 0   0   100000000000 0            100000000000 
FT3	032736 034060 0   0   100000000000 0            100000000000 
FT9	032737 034060 0   0   100000000000 0            100000000000 
ET0	032740 034060 0   0   0            0            100000000000 
ST1A	032740 034060 0   0   0            0            100000000000 
ST9	032740 034060 0   0   0            0            100000000000 


*032740 JUMPA	0,032741
INITIAL
C(AC)=100000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032740 032740 0   0   324000032741 0            000000032741 
IT1	032740 0      0   0   324000032741 0            000000032741 
AT3	032740 0      0   0   000000032741 0            324000032741 
AT6	032740 032741 0   0   000000032741 0            324000032741 
FT1A	032740 032741 0   0   000000032741 0            000000032741 
FT2	032740 032741 0   0   0            0            000000032741 
FT2RQ	032740 032741 0   0   100000000000 0            000000032741 
FT3	032740 032741 0   0   100000000000 0            000000032741 
FT9	032741 032741 0   0   100000000000 0            000000032741 
ET0	032741 032741 0   0   100000000000 0            000000032741 
ST1A	032741 032741 0   0   100000000000 0            000000032741 
ST9	032741 032741 0   0   100000000000 0            000000032741 


*032741 HRLZI	0,200000
INITIAL
C(AC)=100000 000000 
FINAL
C(AC)=200000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032741 032741 0   0   515000200000 0            000000200000 
IT1	032741 0      0   0   515000200000 0            000000200000 
AT3	032741 0      0   0   000000200000 0            515000200000 
AT6	032741 0      0   0   000000200000 0            515000200000 
FT1A	032741 0      0   0   000000200000 0            000000200000 
FT9	032742 0      0   0   000000200000 0            000000200000 
ET0	032742 0      0   0   200000000000 0            000000200000 
ST1	032742 0      0   0   200000000000 0            000000200000 
ST2	032742 0      0   0   200000000000 0            000000200000 
ST9	032742 0      0   0   200000000000 0            000000200000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 364
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0554



*032742 ADD 	0,034014
INITIAL
C(AC)=200000 000000 
C(E)=000000 000000 
FINAL
C(AC)=200000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032742 032742 0   0   270000034014 0            0            
IT1	032742 0      0   0   270000034014 0            0            
AT3	032742 0      0   0   000000034014 0            270000034014 
AT6	032742 034014 0   0   000000034014 0            270000034014 
FT0	032742 034014 0   0   0            0            270000034014 
FT1A	032742 034014 0   0   0            0            0            
FT2	032742 034014 0   0   0            0            0            
FT2RQ	032742 034014 0   0   200000000000 0            0            
FT3	032742 034014 0   0   200000000000 0            0            
FT9	032743 034014 0   0   200000000000 0            0            
ET0	032743 034014 0   0   200000000000 0            0            
ST1	032743 034014 0   0   200000000000 0            0            
ST2	032743 034014 0   0   200000000000 0            0            
ST9	032743 034014 0   0   200000000000 0            0            


*032743 CAME	0,034061
INITIAL
C(AC)=200000 000000 
C(E)=200000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032743 032743 0   0   312000034061 0            200000000000 
IT1	032743 0      0   0   312000034061 0            200000000000 
AT3	032743 0      0   0   000000034061 0            312000034061 
AT6	032743 034061 0   0   000000034061 0            312000034061 
FT0	032743 034061 0   0   200000000000 0            312000034061 
FT1A	032743 034061 0   0   200000000000 0            200000000000 
FT2	032743 034061 0   0   0            0            200000000000 
FT2RQ	032743 034061 0   0   200000000000 0            200000000000 
FT3	032743 034061 0   0   200000000000 0            200000000000 
FT9	032744 034061 0   0   200000000000 0            200000000000 
ET0	032745 034061 0   0   0            0            200000000000 
ST1A	032745 034061 0   0   0            0            200000000000 
ST9	032745 034061 0   0   0            0            200000000000 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 365
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0555

*032745 JUMPA	0,032746
INITIAL
C(AC)=200000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032745 032745 0   0   324000032746 0            000000032746 
IT1	032745 0      0   0   324000032746 0            000000032746 
AT3	032745 0      0   0   000000032746 0            324000032746 
AT6	032745 032746 0   0   000000032746 0            324000032746 
FT1A	032745 032746 0   0   000000032746 0            000000032746 
FT2	032745 032746 0   0   0            0            000000032746 
FT2RQ	032745 032746 0   0   200000000000 0            000000032746 
FT3	032745 032746 0   0   200000000000 0            000000032746 
FT9	032746 032746 0   0   200000000000 0            000000032746 
ET0	032746 032746 0   0   200000000000 0            000000032746 
ST1A	032746 032746 0   0   200000000000 0            000000032746 
ST9	032746 032746 0   0   200000000000 0            000000032746 


*032746 HRLZI	0,400000
INITIAL
C(AC)=200000 000000 
FINAL
C(AC)=400000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032746 032746 0   0   515000400000 0            000000400000 
IT1	032746 0      0   0   515000400000 0            000000400000 
AT3	032746 0      0   0   000000400000 0            515000400000 
AT6	032746 0      0   0   000000400000 0            515000400000 
FT1A	032746 0      0   0   000000400000 0            000000400000 
FT9	032747 0      0   0   000000400000 0            000000400000 
ET0	032747 0      0   0   400000000000 0            000000400000 
ST1	032747 0      0   0   400000000000 0            000000400000 
ST2	032747 0      0   0   400000000000 0            000000400000 
ST9	032747 0      0   0   400000000000 0            000000400000 


*032747 ADD 	0,034014
INITIAL
C(AC)=400000 000000 
C(E)=000000 000000 
FINAL
C(AC)=400000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032747 032747 0   0   270000034014 0            0            
IT1	032747 0      0   0   270000034014 0            0            
AT3	032747 0      0   0   000000034014 0            270000034014 
AT6	032747 034014 0   0   000000034014 0            270000034014 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 366
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0556

FT0	032747 034014 0   0   0            0            270000034014 
FT1A	032747 034014 0   0   0            0            0            
FT2	032747 034014 0   0   0            0            0            
FT2RQ	032747 034014 0   0   400000000000 0            0            
FT3	032747 034014 0   0   400000000000 0            0            
FT9	032750 034014 0   0   400000000000 0            0            
ET0	032750 034014 0   0   400000000000 0            0            
ST1	032750 034014 0   0   400000000000 0            0            
ST2	032750 034014 0   0   400000000000 0            0            
ST9	032750 034014 0   0   400000000000 0            0            


*032750 CAME	0,034062
INITIAL
C(AC)=400000 000000 
C(E)=400000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032750 032750 0   0   312000034062 0            400000000000 
IT1	032750 0      0   0   312000034062 0            400000000000 
AT3	032750 0      0   0   000000034062 0            312000034062 
AT6	032750 034062 0   0   000000034062 0            312000034062 
FT0	032750 034062 0   0   400000000000 0            312000034062 
FT1A	032750 034062 0   0   400000000000 0            400000000000 
FT2	032750 034062 0   0   0            0            400000000000 
FT2RQ	032750 034062 0   0   400000000000 0            400000000000 
FT3	032750 034062 0   0   400000000000 0            400000000000 
FT9	032751 034062 0   0   400000000000 0            400000000000 
ET0	032752 034062 0   0   0            0            400000000000 
ST1A	032752 034062 0   0   0            0            400000000000 
ST9	032752 034062 0   0   0            0            400000000000 


*032752 JUMPA	0,032753
INITIAL
C(AC)=400000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032752 032752 0   0   324000032753 0            000000032753 
IT1	032752 0      0   0   324000032753 0            000000032753 
AT3	032752 0      0   0   000000032753 0            324000032753 
AT6	032752 032753 0   0   000000032753 0            324000032753 
FT1A	032752 032753 0   0   000000032753 0            000000032753 
FT2	032752 032753 0   0   0            0            000000032753 
FT2RQ	032752 032753 0   0   400000000000 0            000000032753 
FT3	032752 032753 0   0   400000000000 0            000000032753 
FT9	032753 032753 0   0   400000000000 0            000000032753 
ET0	032753 032753 0   0   400000000000 0            000000032753 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 367
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0557

ST1A	032753 032753 0   0   400000000000 0            000000032753 
ST9	032753 032753 0   0   400000000000 0            000000032753 


*032753 SETZ 	0,000000
INITIAL
C(AC)=400000 000000 
C(E)=400000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032753 032753 0   0   400000000000 0            0            
IT1	032753 0      0   0   400000000000 0            0            
AT3	032753 0      0   0   0            0            400000000000 
AT6	032753 0      0   0   0            0            400000000000 
FT1A	032753 0      0   0   0            0            0            
FT9	032754 0      0   0   0            0            0            
ET0	032754 0      0   0   0            0            0            
ST1	032754 0      0   0   0            0            0            
ST2	032754 0      0   0   0            0            0            
ST9	032754 0      0   0   0            0            0            


*032754 ADD 	0,034063
INITIAL
C(AC)=000000 000000 
C(E)=777777 777776 
FINAL
C(AC)=777777 777776 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032754 032754 0   0   270000034063 0            777777777776 
IT1	032754 0      0   0   270000034063 0            777777777776 
AT3	032754 0      0   0   000000034063 0            270000034063 
AT6	032754 034063 0   0   000000034063 0            270000034063 
FT0	032754 034063 0   0   777777777776 0            270000034063 
FT1A	032754 034063 0   0   777777777776 0            777777777776 
FT2	032754 034063 0   0   0            0            777777777776 
FT2RQ	032754 034063 0   0   0            0            777777777776 
FT3	032754 034063 0   0   0            0            777777777776 
FT9	032755 034063 0   0   0            0            777777777776 
ET0	032755 034063 0   0   777777777776 0            777777777776 
ST1	032755 034063 0   0   777777777776 0            777777777776 
ST2	032755 034063 0   0   777777777776 0            777777777776 
ST9	032755 034063 0   0   777777777776 0            777777777776 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 368
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0558

*032755 CAME	0,034063
INITIAL
C(AC)=777777 777776 
C(E)=777777 777776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032755 032755 0   0   312000034063 0            777777777776 
IT1	032755 0      0   0   312000034063 0            777777777776 
AT3	032755 0      0   0   000000034063 0            312000034063 
AT6	032755 034063 0   0   000000034063 0            312000034063 
FT0	032755 034063 0   0   777777777776 0            312000034063 
FT1A	032755 034063 0   0   777777777776 0            777777777776 
FT2	032755 034063 0   0   0            0            777777777776 
FT2RQ	032755 034063 0   0   777777777776 0            777777777776 
FT3	032755 034063 0   0   777777777776 0            777777777776 
FT9	032756 034063 0   0   777777777776 0            777777777776 
ET0	032757 034063 0   0   0            0            777777777776 
ST1A	032757 034063 0   0   0            0            777777777776 
ST9	032757 034063 0   0   0            0            777777777776 


*032757 JUMPA	0,032760
INITIAL
C(AC)=777777 777776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032757 032757 0   0   324000032760 0            000000032760 
IT1	032757 0      0   0   324000032760 0            000000032760 
AT3	032757 0      0   0   000000032760 0            324000032760 
AT6	032757 032760 0   0   000000032760 0            324000032760 
FT1A	032757 032760 0   0   000000032760 0            000000032760 
FT2	032757 032760 0   0   0            0            000000032760 
FT2RQ	032757 032760 0   0   777777777776 0            000000032760 
FT3	032757 032760 0   0   777777777776 0            000000032760 
FT9	032760 032760 0   0   777777777776 0            000000032760 
ET0	032760 032760 0   0   777777777776 0            000000032760 
ST1A	032760 032760 0   0   777777777776 0            000000032760 
ST9	032760 032760 0   0   777777777776 0            000000032760 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 369
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0559

*032760 SETZ 	0,000000
INITIAL
C(AC)=777777 777776 
C(E)=777777 777776 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032760 032760 0   0   400000000000 0            0            
IT1	032760 0      0   0   400000000000 0            0            
AT3	032760 0      0   0   0            0            400000000000 
AT6	032760 0      0   0   0            0            400000000000 
FT1A	032760 0      0   0   0            0            0            
FT9	032761 0      0   0   0            0            0            
ET0	032761 0      0   0   0            0            0            
ST1	032761 0      0   0   0            0            0            
ST2	032761 0      0   0   0            0            0            
ST9	032761 0      0   0   0            0            0            


*032761 ADD 	0,034064
INITIAL
C(AC)=000000 000000 
C(E)=777777 777775 
FINAL
C(AC)=777777 777775 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032761 032761 0   0   270000034064 0            777777777775 
IT1	032761 0      0   0   270000034064 0            777777777775 
AT3	032761 0      0   0   000000034064 0            270000034064 
AT6	032761 034064 0   0   000000034064 0            270000034064 
FT0	032761 034064 0   0   777777777775 0            270000034064 
FT1A	032761 034064 0   0   777777777775 0            777777777775 
FT2	032761 034064 0   0   0            0            777777777775 
FT2RQ	032761 034064 0   0   0            0            777777777775 
FT3	032761 034064 0   0   0            0            777777777775 
FT9	032762 034064 0   0   0            0            777777777775 
ET0	032762 034064 0   0   777777777775 0            777777777775 
ST1	032762 034064 0   0   777777777775 0            777777777775 
ST2	032762 034064 0   0   777777777775 0            777777777775 
ST9	032762 034064 0   0   777777777775 0            777777777775 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 370
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0560

*032762 CAME	0,034064
INITIAL
C(AC)=777777 777775 
C(E)=777777 777775 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032762 032762 0   0   312000034064 0            777777777775 
IT1	032762 0      0   0   312000034064 0            777777777775 
AT3	032762 0      0   0   000000034064 0            312000034064 
AT6	032762 034064 0   0   000000034064 0            312000034064 
FT0	032762 034064 0   0   777777777775 0            312000034064 
FT1A	032762 034064 0   0   777777777775 0            777777777775 
FT2	032762 034064 0   0   0            0            777777777775 
FT2RQ	032762 034064 0   0   777777777775 0            777777777775 
FT3	032762 034064 0   0   777777777775 0            777777777775 
FT9	032763 034064 0   0   777777777775 0            777777777775 
ET0	032764 034064 0   0   0            0            777777777775 
ST1A	032764 034064 0   0   0            0            777777777775 
ST9	032764 034064 0   0   0            0            777777777775 


*032764 JUMPA	0,032765
INITIAL
C(AC)=777777 777775 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032764 032764 0   0   324000032765 0            000000032765 
IT1	032764 0      0   0   324000032765 0            000000032765 
AT3	032764 0      0   0   000000032765 0            324000032765 
AT6	032764 032765 0   0   000000032765 0            324000032765 
FT1A	032764 032765 0   0   000000032765 0            000000032765 
FT2	032764 032765 0   0   0            0            000000032765 
FT2RQ	032764 032765 0   0   777777777775 0            000000032765 
FT3	032764 032765 0   0   777777777775 0            000000032765 
FT9	032765 032765 0   0   777777777775 0            000000032765 
ET0	032765 032765 0   0   777777777775 0            000000032765 
ST1A	032765 032765 0   0   777777777775 0            000000032765 
ST9	032765 032765 0   0   777777777775 0            000000032765 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 371
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0561

*032765 SETZ 	0,000000
INITIAL
C(AC)=777777 777775 
C(E)=777777 777775 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032765 032765 0   0   400000000000 0            0            
IT1	032765 0      0   0   400000000000 0            0            
AT3	032765 0      0   0   0            0            400000000000 
AT6	032765 0      0   0   0            0            400000000000 
FT1A	032765 0      0   0   0            0            0            
FT9	032766 0      0   0   0            0            0            
ET0	032766 0      0   0   0            0            0            
ST1	032766 0      0   0   0            0            0            
ST2	032766 0      0   0   0            0            0            
ST9	032766 0      0   0   0            0            0            


*032766 ADD 	0,034065
INITIAL
C(AC)=000000 000000 
C(E)=777777 777773 
FINAL
C(AC)=777777 777773 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032766 032766 0   0   270000034065 0            777777777773 
IT1	032766 0      0   0   270000034065 0            777777777773 
AT3	032766 0      0   0   000000034065 0            270000034065 
AT6	032766 034065 0   0   000000034065 0            270000034065 
FT0	032766 034065 0   0   777777777773 0            270000034065 
FT1A	032766 034065 0   0   777777777773 0            777777777773 
FT2	032766 034065 0   0   0            0            777777777773 
FT2RQ	032766 034065 0   0   0            0            777777777773 
FT3	032766 034065 0   0   0            0            777777777773 
FT9	032767 034065 0   0   0            0            777777777773 
ET0	032767 034065 0   0   777777777773 0            777777777773 
ST1	032767 034065 0   0   777777777773 0            777777777773 
ST2	032767 034065 0   0   777777777773 0            777777777773 
ST9	032767 034065 0   0   777777777773 0            777777777773 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 372
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0562

*032767 CAME	0,034065
INITIAL
C(AC)=777777 777773 
C(E)=777777 777773 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032767 032767 0   0   312000034065 0            777777777773 
IT1	032767 0      0   0   312000034065 0            777777777773 
AT3	032767 0      0   0   000000034065 0            312000034065 
AT6	032767 034065 0   0   000000034065 0            312000034065 
FT0	032767 034065 0   0   777777777773 0            312000034065 
FT1A	032767 034065 0   0   777777777773 0            777777777773 
FT2	032767 034065 0   0   0            0            777777777773 
FT2RQ	032767 034065 0   0   777777777773 0            777777777773 
FT3	032767 034065 0   0   777777777773 0            777777777773 
FT9	032770 034065 0   0   777777777773 0            777777777773 
ET0	032771 034065 0   0   0            0            777777777773 
ST1A	032771 034065 0   0   0            0            777777777773 
ST9	032771 034065 0   0   0            0            777777777773 


*032771 JUMPA	0,032772
INITIAL
C(AC)=777777 777773 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032771 032771 0   0   324000032772 0            000000032772 
IT1	032771 0      0   0   324000032772 0            000000032772 
AT3	032771 0      0   0   000000032772 0            324000032772 
AT6	032771 032772 0   0   000000032772 0            324000032772 
FT1A	032771 032772 0   0   000000032772 0            000000032772 
FT2	032771 032772 0   0   0            0            000000032772 
FT2RQ	032771 032772 0   0   777777777773 0            000000032772 
FT3	032771 032772 0   0   777777777773 0            000000032772 
FT9	032772 032772 0   0   777777777773 0            000000032772 
ET0	032772 032772 0   0   777777777773 0            000000032772 
ST1A	032772 032772 0   0   777777777773 0            000000032772 
ST9	032772 032772 0   0   777777777773 0            000000032772 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 373
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0563

*032772 SETZ 	0,000000
INITIAL
C(AC)=777777 777773 
C(E)=777777 777773 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032772 032772 0   0   400000000000 0            0            
IT1	032772 0      0   0   400000000000 0            0            
AT3	032772 0      0   0   0            0            400000000000 
AT6	032772 0      0   0   0            0            400000000000 
FT1A	032772 0      0   0   0            0            0            
FT9	032773 0      0   0   0            0            0            
ET0	032773 0      0   0   0            0            0            
ST1	032773 0      0   0   0            0            0            
ST2	032773 0      0   0   0            0            0            
ST9	032773 0      0   0   0            0            0            


*032773 ADD 	0,034066
INITIAL
C(AC)=000000 000000 
C(E)=777777 777767 
FINAL
C(AC)=777777 777767 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032773 032773 0   0   270000034066 0            777777777767 
IT1	032773 0      0   0   270000034066 0            777777777767 
AT3	032773 0      0   0   000000034066 0            270000034066 
AT6	032773 034066 0   0   000000034066 0            270000034066 
FT0	032773 034066 0   0   777777777767 0            270000034066 
FT1A	032773 034066 0   0   777777777767 0            777777777767 
FT2	032773 034066 0   0   0            0            777777777767 
FT2RQ	032773 034066 0   0   0            0            777777777767 
FT3	032773 034066 0   0   0            0            777777777767 
FT9	032774 034066 0   0   0            0            777777777767 
ET0	032774 034066 0   0   777777777767 0            777777777767 
ST1	032774 034066 0   0   777777777767 0            777777777767 
ST2	032774 034066 0   0   777777777767 0            777777777767 
ST9	032774 034066 0   0   777777777767 0            777777777767 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 374
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0564

*032774 CAME	0,034066
INITIAL
C(AC)=777777 777767 
C(E)=777777 777767 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032774 032774 0   0   312000034066 0            777777777767 
IT1	032774 0      0   0   312000034066 0            777777777767 
AT3	032774 0      0   0   000000034066 0            312000034066 
AT6	032774 034066 0   0   000000034066 0            312000034066 
FT0	032774 034066 0   0   777777777767 0            312000034066 
FT1A	032774 034066 0   0   777777777767 0            777777777767 
FT2	032774 034066 0   0   0            0            777777777767 
FT2RQ	032774 034066 0   0   777777777767 0            777777777767 
FT3	032774 034066 0   0   777777777767 0            777777777767 
FT9	032775 034066 0   0   777777777767 0            777777777767 
ET0	032776 034066 0   0   0            0            777777777767 
ST1A	032776 034066 0   0   0            0            777777777767 
ST9	032776 034066 0   0   0            0            777777777767 


*032776 JUMPA	0,032777
INITIAL
C(AC)=777777 777767 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032776 032776 0   0   324000032777 0            000000032777 
IT1	032776 0      0   0   324000032777 0            000000032777 
AT3	032776 0      0   0   000000032777 0            324000032777 
AT6	032776 032777 0   0   000000032777 0            324000032777 
FT1A	032776 032777 0   0   000000032777 0            000000032777 
FT2	032776 032777 0   0   0            0            000000032777 
FT2RQ	032776 032777 0   0   777777777767 0            000000032777 
FT3	032776 032777 0   0   777777777767 0            000000032777 
FT9	032777 032777 0   0   777777777767 0            000000032777 
ET0	032777 032777 0   0   777777777767 0            000000032777 
ST1A	032777 032777 0   0   777777777767 0            000000032777 
ST9	032777 032777 0   0   777777777767 0            000000032777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 375
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0565

*032777 SETZ 	0,000000
INITIAL
C(AC)=777777 777767 
C(E)=777777 777767 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	032777 032777 0   0   400000000000 0            0            
IT1	032777 0      0   0   400000000000 0            0            
AT3	032777 0      0   0   0            0            400000000000 
AT6	032777 0      0   0   0            0            400000000000 
FT1A	032777 0      0   0   0            0            0            
FT9	0      0      0   0   0            0            0            
ET0	0      0      0   0   0            0            0            
ST1	0      0      0   0   0            0            0            
ST2	0      0      0   0   0            0            0            
ST9	0      0      0   0   0            0            0            


*033000 ADD 	0,034067
INITIAL
C(AC)=000000 000000 
C(E)=777777 777757 
FINAL
C(AC)=777777 777757 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	0      0      0   0   270000034067 0            777777777757 
IT1	0      0      0   0   270000034067 0            777777777757 
AT3	0      0      0   0   000000034067 0            270000034067 
AT6	0      034067 0   0   000000034067 0            270000034067 
FT0	0      034067 0   0   777777777757 0            270000034067 
FT1A	0      034067 0   0   777777777757 0            777777777757 
FT2	0      034067 0   0   0            0            777777777757 
FT2RQ	0      034067 0   0   0            0            777777777757 
FT3	0      034067 0   0   0            0            777777777757 
FT9	033001 034067 0   0   0            0            777777777757 
ET0	033001 034067 0   0   777777777757 0            777777777757 
ST1	033001 034067 0   0   777777777757 0            777777777757 
ST2	033001 034067 0   0   777777777757 0            777777777757 
ST9	033001 034067 0   0   777777777757 0            777777777757 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 376
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0566

*033001 CAME	0,034067
INITIAL
C(AC)=777777 777757 
C(E)=777777 777757 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033001 033001 0   0   312000034067 0            777777777757 
IT1	033001 0      0   0   312000034067 0            777777777757 
AT3	033001 0      0   0   000000034067 0            312000034067 
AT6	033001 034067 0   0   000000034067 0            312000034067 
FT0	033001 034067 0   0   777777777757 0            312000034067 
FT1A	033001 034067 0   0   777777777757 0            777777777757 
FT2	033001 034067 0   0   0            0            777777777757 
FT2RQ	033001 034067 0   0   777777777757 0            777777777757 
FT3	033001 034067 0   0   777777777757 0            777777777757 
FT9	033002 034067 0   0   777777777757 0            777777777757 
ET0	033003 034067 0   0   0            0            777777777757 
ST1A	033003 034067 0   0   0            0            777777777757 
ST9	033003 034067 0   0   0            0            777777777757 


*033003 JUMPA	0,033004
INITIAL
C(AC)=777777 777757 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033003 033003 0   0   324000033004 0            000000033004 
IT1	033003 0      0   0   324000033004 0            000000033004 
AT3	033003 0      0   0   000000033004 0            324000033004 
AT6	033003 033004 0   0   000000033004 0            324000033004 
FT1A	033003 033004 0   0   000000033004 0            000000033004 
FT2	033003 033004 0   0   0            0            000000033004 
FT2RQ	033003 033004 0   0   777777777757 0            000000033004 
FT3	033003 033004 0   0   777777777757 0            000000033004 
FT9	033004 033004 0   0   777777777757 0            000000033004 
ET0	033004 033004 0   0   777777777757 0            000000033004 
ST1A	033004 033004 0   0   777777777757 0            000000033004 
ST9	033004 033004 0   0   777777777757 0            000000033004 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 377
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0567

*033004 SETZ 	0,000000
INITIAL
C(AC)=777777 777757 
C(E)=777777 777757 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033004 033004 0   0   400000000000 0            0            
IT1	033004 0      0   0   400000000000 0            0            
AT3	033004 0      0   0   0            0            400000000000 
AT6	033004 0      0   0   0            0            400000000000 
FT1A	033004 0      0   0   0            0            0            
FT9	033005 0      0   0   0            0            0            
ET0	033005 0      0   0   0            0            0            
ST1	033005 0      0   0   0            0            0            
ST2	033005 0      0   0   0            0            0            
ST9	033005 0      0   0   0            0            0            


*033005 ADD 	0,034070
INITIAL
C(AC)=000000 000000 
C(E)=777777 777737 
FINAL
C(AC)=777777 777737 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033005 033005 0   0   270000034070 0            777777777737 
IT1	033005 0      0   0   270000034070 0            777777777737 
AT3	033005 0      0   0   000000034070 0            270000034070 
AT6	033005 034070 0   0   000000034070 0            270000034070 
FT0	033005 034070 0   0   777777777737 0            270000034070 
FT1A	033005 034070 0   0   777777777737 0            777777777737 
FT2	033005 034070 0   0   0            0            777777777737 
FT2RQ	033005 034070 0   0   0            0            777777777737 
FT3	033005 034070 0   0   0            0            777777777737 
FT9	033006 034070 0   0   0            0            777777777737 
ET0	033006 034070 0   0   777777777737 0            777777777737 
ST1	033006 034070 0   0   777777777737 0            777777777737 
ST2	033006 034070 0   0   777777777737 0            777777777737 
ST9	033006 034070 0   0   777777777737 0            777777777737 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 378
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0568

*033006 CAME	0,034070
INITIAL
C(AC)=777777 777737 
C(E)=777777 777737 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033006 033006 0   0   312000034070 0            777777777737 
IT1	033006 0      0   0   312000034070 0            777777777737 
AT3	033006 0      0   0   000000034070 0            312000034070 
AT6	033006 034070 0   0   000000034070 0            312000034070 
FT0	033006 034070 0   0   777777777737 0            312000034070 
FT1A	033006 034070 0   0   777777777737 0            777777777737 
FT2	033006 034070 0   0   0            0            777777777737 
FT2RQ	033006 034070 0   0   777777777737 0            777777777737 
FT3	033006 034070 0   0   777777777737 0            777777777737 
FT9	033007 034070 0   0   777777777737 0            777777777737 
ET0	033010 034070 0   0   0            0            777777777737 
ST1A	033010 034070 0   0   0            0            777777777737 
ST9	033010 034070 0   0   0            0            777777777737 


*033010 JUMPA	0,033011
INITIAL
C(AC)=777777 777737 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033010 033010 0   0   324000033011 0            000000033011 
IT1	033010 0      0   0   324000033011 0            000000033011 
AT3	033010 0      0   0   000000033011 0            324000033011 
AT6	033010 033011 0   0   000000033011 0            324000033011 
FT1A	033010 033011 0   0   000000033011 0            000000033011 
FT2	033010 033011 0   0   0            0            000000033011 
FT2RQ	033010 033011 0   0   777777777737 0            000000033011 
FT3	033010 033011 0   0   777777777737 0            000000033011 
FT9	033011 033011 0   0   777777777737 0            000000033011 
ET0	033011 033011 0   0   777777777737 0            000000033011 
ST1A	033011 033011 0   0   777777777737 0            000000033011 
ST9	033011 033011 0   0   777777777737 0            000000033011 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 379
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0569

*033011 SETZ 	0,000000
INITIAL
C(AC)=777777 777737 
C(E)=777777 777737 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033011 033011 0   0   400000000000 0            0            
IT1	033011 0      0   0   400000000000 0            0            
AT3	033011 0      0   0   0            0            400000000000 
AT6	033011 0      0   0   0            0            400000000000 
FT1A	033011 0      0   0   0            0            0            
FT9	033012 0      0   0   0            0            0            
ET0	033012 0      0   0   0            0            0            
ST1	033012 0      0   0   0            0            0            
ST2	033012 0      0   0   0            0            0            
ST9	033012 0      0   0   0            0            0            


*033012 ADD 	0,034071
INITIAL
C(AC)=000000 000000 
C(E)=777777 777677 
FINAL
C(AC)=777777 777677 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033012 033012 0   0   270000034071 0            777777777677 
IT1	033012 0      0   0   270000034071 0            777777777677 
AT3	033012 0      0   0   000000034071 0            270000034071 
AT6	033012 034071 0   0   000000034071 0            270000034071 
FT0	033012 034071 0   0   777777777677 0            270000034071 
FT1A	033012 034071 0   0   777777777677 0            777777777677 
FT2	033012 034071 0   0   0            0            777777777677 
FT2RQ	033012 034071 0   0   0            0            777777777677 
FT3	033012 034071 0   0   0            0            777777777677 
FT9	033013 034071 0   0   0            0            777777777677 
ET0	033013 034071 0   0   777777777677 0            777777777677 
ST1	033013 034071 0   0   777777777677 0            777777777677 
ST2	033013 034071 0   0   777777777677 0            777777777677 
ST9	033013 034071 0   0   777777777677 0            777777777677 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 380
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0570

*033013 CAME	0,034071
INITIAL
C(AC)=777777 777677 
C(E)=777777 777677 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033013 033013 0   0   312000034071 0            777777777677 
IT1	033013 0      0   0   312000034071 0            777777777677 
AT3	033013 0      0   0   000000034071 0            312000034071 
AT6	033013 034071 0   0   000000034071 0            312000034071 
FT0	033013 034071 0   0   777777777677 0            312000034071 
FT1A	033013 034071 0   0   777777777677 0            777777777677 
FT2	033013 034071 0   0   0            0            777777777677 
FT2RQ	033013 034071 0   0   777777777677 0            777777777677 
FT3	033013 034071 0   0   777777777677 0            777777777677 
FT9	033014 034071 0   0   777777777677 0            777777777677 
ET0	033015 034071 0   0   0            0            777777777677 
ST1A	033015 034071 0   0   0            0            777777777677 
ST9	033015 034071 0   0   0            0            777777777677 


*033015 JUMPA	0,033016
INITIAL
C(AC)=777777 777677 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033015 033015 0   0   324000033016 0            000000033016 
IT1	033015 0      0   0   324000033016 0            000000033016 
AT3	033015 0      0   0   000000033016 0            324000033016 
AT6	033015 033016 0   0   000000033016 0            324000033016 
FT1A	033015 033016 0   0   000000033016 0            000000033016 
FT2	033015 033016 0   0   0            0            000000033016 
FT2RQ	033015 033016 0   0   777777777677 0            000000033016 
FT3	033015 033016 0   0   777777777677 0            000000033016 
FT9	033016 033016 0   0   777777777677 0            000000033016 
ET0	033016 033016 0   0   777777777677 0            000000033016 
ST1A	033016 033016 0   0   777777777677 0            000000033016 
ST9	033016 033016 0   0   777777777677 0            000000033016 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 381
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0571

*033016 SETZ 	0,000000
INITIAL
C(AC)=777777 777677 
C(E)=777777 777677 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033016 033016 0   0   400000000000 0            0            
IT1	033016 0      0   0   400000000000 0            0            
AT3	033016 0      0   0   0            0            400000000000 
AT6	033016 0      0   0   0            0            400000000000 
FT1A	033016 0      0   0   0            0            0            
FT9	033017 0      0   0   0            0            0            
ET0	033017 0      0   0   0            0            0            
ST1	033017 0      0   0   0            0            0            
ST2	033017 0      0   0   0            0            0            
ST9	033017 0      0   0   0            0            0            


*033017 ADD 	0,034072
INITIAL
C(AC)=000000 000000 
C(E)=777777 777577 
FINAL
C(AC)=777777 777577 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033017 033017 0   0   270000034072 0            777777777577 
IT1	033017 0      0   0   270000034072 0            777777777577 
AT3	033017 0      0   0   000000034072 0            270000034072 
AT6	033017 034072 0   0   000000034072 0            270000034072 
FT0	033017 034072 0   0   777777777577 0            270000034072 
FT1A	033017 034072 0   0   777777777577 0            777777777577 
FT2	033017 034072 0   0   0            0            777777777577 
FT2RQ	033017 034072 0   0   0            0            777777777577 
FT3	033017 034072 0   0   0            0            777777777577 
FT9	033020 034072 0   0   0            0            777777777577 
ET0	033020 034072 0   0   777777777577 0            777777777577 
ST1	033020 034072 0   0   777777777577 0            777777777577 
ST2	033020 034072 0   0   777777777577 0            777777777577 
ST9	033020 034072 0   0   777777777577 0            777777777577 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 382
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0572

*033020 CAME	0,034072
INITIAL
C(AC)=777777 777577 
C(E)=777777 777577 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033020 033020 0   0   312000034072 0            777777777577 
IT1	033020 0      0   0   312000034072 0            777777777577 
AT3	033020 0      0   0   000000034072 0            312000034072 
AT6	033020 034072 0   0   000000034072 0            312000034072 
FT0	033020 034072 0   0   777777777577 0            312000034072 
FT1A	033020 034072 0   0   777777777577 0            777777777577 
FT2	033020 034072 0   0   0            0            777777777577 
FT2RQ	033020 034072 0   0   777777777577 0            777777777577 
FT3	033020 034072 0   0   777777777577 0            777777777577 
FT9	033021 034072 0   0   777777777577 0            777777777577 
ET0	033022 034072 0   0   0            0            777777777577 
ST1A	033022 034072 0   0   0            0            777777777577 
ST9	033022 034072 0   0   0            0            777777777577 


*033022 JUMPA	0,033023
INITIAL
C(AC)=777777 777577 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033022 033022 0   0   324000033023 0            000000033023 
IT1	033022 0      0   0   324000033023 0            000000033023 
AT3	033022 0      0   0   000000033023 0            324000033023 
AT6	033022 033023 0   0   000000033023 0            324000033023 
FT1A	033022 033023 0   0   000000033023 0            000000033023 
FT2	033022 033023 0   0   0            0            000000033023 
FT2RQ	033022 033023 0   0   777777777577 0            000000033023 
FT3	033022 033023 0   0   777777777577 0            000000033023 
FT9	033023 033023 0   0   777777777577 0            000000033023 
ET0	033023 033023 0   0   777777777577 0            000000033023 
ST1A	033023 033023 0   0   777777777577 0            000000033023 
ST9	033023 033023 0   0   777777777577 0            000000033023 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 383
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0573

*033023 SETZ 	0,000000
INITIAL
C(AC)=777777 777577 
C(E)=777777 777577 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033023 033023 0   0   400000000000 0            0            
IT1	033023 0      0   0   400000000000 0            0            
AT3	033023 0      0   0   0            0            400000000000 
AT6	033023 0      0   0   0            0            400000000000 
FT1A	033023 0      0   0   0            0            0            
FT9	033024 0      0   0   0            0            0            
ET0	033024 0      0   0   0            0            0            
ST1	033024 0      0   0   0            0            0            
ST2	033024 0      0   0   0            0            0            
ST9	033024 0      0   0   0            0            0            


*033024 ADD 	0,034073
INITIAL
C(AC)=000000 000000 
C(E)=777777 777377 
FINAL
C(AC)=777777 777377 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033024 033024 0   0   270000034073 0            777777777377 
IT1	033024 0      0   0   270000034073 0            777777777377 
AT3	033024 0      0   0   000000034073 0            270000034073 
AT6	033024 034073 0   0   000000034073 0            270000034073 
FT0	033024 034073 0   0   777777777377 0            270000034073 
FT1A	033024 034073 0   0   777777777377 0            777777777377 
FT2	033024 034073 0   0   0            0            777777777377 
FT2RQ	033024 034073 0   0   0            0            777777777377 
FT3	033024 034073 0   0   0            0            777777777377 
FT9	033025 034073 0   0   0            0            777777777377 
ET0	033025 034073 0   0   777777777377 0            777777777377 
ST1	033025 034073 0   0   777777777377 0            777777777377 
ST2	033025 034073 0   0   777777777377 0            777777777377 
ST9	033025 034073 0   0   777777777377 0            777777777377 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 384
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0574

*033025 CAME	0,034073
INITIAL
C(AC)=777777 777377 
C(E)=777777 777377 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033025 033025 0   0   312000034073 0            777777777377 
IT1	033025 0      0   0   312000034073 0            777777777377 
AT3	033025 0      0   0   000000034073 0            312000034073 
AT6	033025 034073 0   0   000000034073 0            312000034073 
FT0	033025 034073 0   0   777777777377 0            312000034073 
FT1A	033025 034073 0   0   777777777377 0            777777777377 
FT2	033025 034073 0   0   0            0            777777777377 
FT2RQ	033025 034073 0   0   777777777377 0            777777777377 
FT3	033025 034073 0   0   777777777377 0            777777777377 
FT9	033026 034073 0   0   777777777377 0            777777777377 
ET0	033027 034073 0   0   0            0            777777777377 
ST1A	033027 034073 0   0   0            0            777777777377 
ST9	033027 034073 0   0   0            0            777777777377 


*033027 JUMPA	0,033030
INITIAL
C(AC)=777777 777377 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033027 033027 0   0   324000033030 0            000000033030 
IT1	033027 0      0   0   324000033030 0            000000033030 
AT3	033027 0      0   0   000000033030 0            324000033030 
AT6	033027 033030 0   0   000000033030 0            324000033030 
FT1A	033027 033030 0   0   000000033030 0            000000033030 
FT2	033027 033030 0   0   0            0            000000033030 
FT2RQ	033027 033030 0   0   777777777377 0            000000033030 
FT3	033027 033030 0   0   777777777377 0            000000033030 
FT9	033030 033030 0   0   777777777377 0            000000033030 
ET0	033030 033030 0   0   777777777377 0            000000033030 
ST1A	033030 033030 0   0   777777777377 0            000000033030 
ST9	033030 033030 0   0   777777777377 0            000000033030 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 385
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0575

*033030 SETZ 	0,000000
INITIAL
C(AC)=777777 777377 
C(E)=777777 777377 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033030 033030 0   0   400000000000 0            0            
IT1	033030 0      0   0   400000000000 0            0            
AT3	033030 0      0   0   0            0            400000000000 
AT6	033030 0      0   0   0            0            400000000000 
FT1A	033030 0      0   0   0            0            0            
FT9	033031 0      0   0   0            0            0            
ET0	033031 0      0   0   0            0            0            
ST1	033031 0      0   0   0            0            0            
ST2	033031 0      0   0   0            0            0            
ST9	033031 0      0   0   0            0            0            


*033031 ADD 	0,034074
INITIAL
C(AC)=000000 000000 
C(E)=777777 776777 
FINAL
C(AC)=777777 776777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033031 033031 0   0   270000034074 0            777777776777 
IT1	033031 0      0   0   270000034074 0            777777776777 
AT3	033031 0      0   0   000000034074 0            270000034074 
AT6	033031 034074 0   0   000000034074 0            270000034074 
FT0	033031 034074 0   0   777777776777 0            270000034074 
FT1A	033031 034074 0   0   777777776777 0            777777776777 
FT2	033031 034074 0   0   0            0            777777776777 
FT2RQ	033031 034074 0   0   0            0            777777776777 
FT3	033031 034074 0   0   0            0            777777776777 
FT9	033032 034074 0   0   0            0            777777776777 
ET0	033032 034074 0   0   777777776777 0            777777776777 
ST1	033032 034074 0   0   777777776777 0            777777776777 
ST2	033032 034074 0   0   777777776777 0            777777776777 
ST9	033032 034074 0   0   777777776777 0            777777776777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 386
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0576

*033032 CAME	0,034074
INITIAL
C(AC)=777777 776777 
C(E)=777777 776777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033032 033032 0   0   312000034074 0            777777776777 
IT1	033032 0      0   0   312000034074 0            777777776777 
AT3	033032 0      0   0   000000034074 0            312000034074 
AT6	033032 034074 0   0   000000034074 0            312000034074 
FT0	033032 034074 0   0   777777776777 0            312000034074 
FT1A	033032 034074 0   0   777777776777 0            777777776777 
FT2	033032 034074 0   0   0            0            777777776777 
FT2RQ	033032 034074 0   0   777777776777 0            777777776777 
FT3	033032 034074 0   0   777777776777 0            777777776777 
FT9	033033 034074 0   0   777777776777 0            777777776777 
ET0	033034 034074 0   0   0            0            777777776777 
ST1A	033034 034074 0   0   0            0            777777776777 
ST9	033034 034074 0   0   0            0            777777776777 


*033034 JUMPA	0,033035
INITIAL
C(AC)=777777 776777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033034 033034 0   0   324000033035 0            000000033035 
IT1	033034 0      0   0   324000033035 0            000000033035 
AT3	033034 0      0   0   000000033035 0            324000033035 
AT6	033034 033035 0   0   000000033035 0            324000033035 
FT1A	033034 033035 0   0   000000033035 0            000000033035 
FT2	033034 033035 0   0   0            0            000000033035 
FT2RQ	033034 033035 0   0   777777776777 0            000000033035 
FT3	033034 033035 0   0   777777776777 0            000000033035 
FT9	033035 033035 0   0   777777776777 0            000000033035 
ET0	033035 033035 0   0   777777776777 0            000000033035 
ST1A	033035 033035 0   0   777777776777 0            000000033035 
ST9	033035 033035 0   0   777777776777 0            000000033035 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 387
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0577

*033035 SETZ 	0,000000
INITIAL
C(AC)=777777 776777 
C(E)=777777 776777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033035 033035 0   0   400000000000 0            0            
IT1	033035 0      0   0   400000000000 0            0            
AT3	033035 0      0   0   0            0            400000000000 
AT6	033035 0      0   0   0            0            400000000000 
FT1A	033035 0      0   0   0            0            0            
FT9	033036 0      0   0   0            0            0            
ET0	033036 0      0   0   0            0            0            
ST1	033036 0      0   0   0            0            0            
ST2	033036 0      0   0   0            0            0            
ST9	033036 0      0   0   0            0            0            


*033036 ADD 	0,034075
INITIAL
C(AC)=000000 000000 
C(E)=777777 775777 
FINAL
C(AC)=777777 775777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033036 033036 0   0   270000034075 0            777777775777 
IT1	033036 0      0   0   270000034075 0            777777775777 
AT3	033036 0      0   0   000000034075 0            270000034075 
AT6	033036 034075 0   0   000000034075 0            270000034075 
FT0	033036 034075 0   0   777777775777 0            270000034075 
FT1A	033036 034075 0   0   777777775777 0            777777775777 
FT2	033036 034075 0   0   0            0            777777775777 
FT2RQ	033036 034075 0   0   0            0            777777775777 
FT3	033036 034075 0   0   0            0            777777775777 
FT9	033037 034075 0   0   0            0            777777775777 
ET0	033037 034075 0   0   777777775777 0            777777775777 
ST1	033037 034075 0   0   777777775777 0            777777775777 
ST2	033037 034075 0   0   777777775777 0            777777775777 
ST9	033037 034075 0   0   777777775777 0            777777775777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 388
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0578

*033037 CAME	0,034075
INITIAL
C(AC)=777777 775777 
C(E)=777777 775777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033037 033037 0   0   312000034075 0            777777775777 
IT1	033037 0      0   0   312000034075 0            777777775777 
AT3	033037 0      0   0   000000034075 0            312000034075 
AT6	033037 034075 0   0   000000034075 0            312000034075 
FT0	033037 034075 0   0   777777775777 0            312000034075 
FT1A	033037 034075 0   0   777777775777 0            777777775777 
FT2	033037 034075 0   0   0            0            777777775777 
FT2RQ	033037 034075 0   0   777777775777 0            777777775777 
FT3	033037 034075 0   0   777777775777 0            777777775777 
FT9	033040 034075 0   0   777777775777 0            777777775777 
ET0	033041 034075 0   0   0            0            777777775777 
ST1A	033041 034075 0   0   0            0            777777775777 
ST9	033041 034075 0   0   0            0            777777775777 


*033041 JUMPA	0,033042
INITIAL
C(AC)=777777 775777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033041 033041 0   0   324000033042 0            000000033042 
IT1	033041 0      0   0   324000033042 0            000000033042 
AT3	033041 0      0   0   000000033042 0            324000033042 
AT6	033041 033042 0   0   000000033042 0            324000033042 
FT1A	033041 033042 0   0   000000033042 0            000000033042 
FT2	033041 033042 0   0   0            0            000000033042 
FT2RQ	033041 033042 0   0   777777775777 0            000000033042 
FT3	033041 033042 0   0   777777775777 0            000000033042 
FT9	033042 033042 0   0   777777775777 0            000000033042 
ET0	033042 033042 0   0   777777775777 0            000000033042 
ST1A	033042 033042 0   0   777777775777 0            000000033042 
ST9	033042 033042 0   0   777777775777 0            000000033042 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 389
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0579

*033042 SETZ 	0,000000
INITIAL
C(AC)=777777 775777 
C(E)=777777 775777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033042 033042 0   0   400000000000 0            0            
IT1	033042 0      0   0   400000000000 0            0            
AT3	033042 0      0   0   0            0            400000000000 
AT6	033042 0      0   0   0            0            400000000000 
FT1A	033042 0      0   0   0            0            0            
FT9	033043 0      0   0   0            0            0            
ET0	033043 0      0   0   0            0            0            
ST1	033043 0      0   0   0            0            0            
ST2	033043 0      0   0   0            0            0            
ST9	033043 0      0   0   0            0            0            


*033043 ADD 	0,034076
INITIAL
C(AC)=000000 000000 
C(E)=777777 773777 
FINAL
C(AC)=777777 773777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033043 033043 0   0   270000034076 0            777777773777 
IT1	033043 0      0   0   270000034076 0            777777773777 
AT3	033043 0      0   0   000000034076 0            270000034076 
AT6	033043 034076 0   0   000000034076 0            270000034076 
FT0	033043 034076 0   0   777777773777 0            270000034076 
FT1A	033043 034076 0   0   777777773777 0            777777773777 
FT2	033043 034076 0   0   0            0            777777773777 
FT2RQ	033043 034076 0   0   0            0            777777773777 
FT3	033043 034076 0   0   0            0            777777773777 
FT9	033044 034076 0   0   0            0            777777773777 
ET0	033044 034076 0   0   777777773777 0            777777773777 
ST1	033044 034076 0   0   777777773777 0            777777773777 
ST2	033044 034076 0   0   777777773777 0            777777773777 
ST9	033044 034076 0   0   777777773777 0            777777773777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 390
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0580

*033044 CAME	0,034076
INITIAL
C(AC)=777777 773777 
C(E)=777777 773777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033044 033044 0   0   312000034076 0            777777773777 
IT1	033044 0      0   0   312000034076 0            777777773777 
AT3	033044 0      0   0   000000034076 0            312000034076 
AT6	033044 034076 0   0   000000034076 0            312000034076 
FT0	033044 034076 0   0   777777773777 0            312000034076 
FT1A	033044 034076 0   0   777777773777 0            777777773777 
FT2	033044 034076 0   0   0            0            777777773777 
FT2RQ	033044 034076 0   0   777777773777 0            777777773777 
FT3	033044 034076 0   0   777777773777 0            777777773777 
FT9	033045 034076 0   0   777777773777 0            777777773777 
ET0	033046 034076 0   0   0            0            777777773777 
ST1A	033046 034076 0   0   0            0            777777773777 
ST9	033046 034076 0   0   0            0            777777773777 


*033046 JUMPA	0,033047
INITIAL
C(AC)=777777 773777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033046 033046 0   0   324000033047 0            000000033047 
IT1	033046 0      0   0   324000033047 0            000000033047 
AT3	033046 0      0   0   000000033047 0            324000033047 
AT6	033046 033047 0   0   000000033047 0            324000033047 
FT1A	033046 033047 0   0   000000033047 0            000000033047 
FT2	033046 033047 0   0   0            0            000000033047 
FT2RQ	033046 033047 0   0   777777773777 0            000000033047 
FT3	033046 033047 0   0   777777773777 0            000000033047 
FT9	033047 033047 0   0   777777773777 0            000000033047 
ET0	033047 033047 0   0   777777773777 0            000000033047 
ST1A	033047 033047 0   0   777777773777 0            000000033047 
ST9	033047 033047 0   0   777777773777 0            000000033047 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 391
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0581

*033047 SETZ 	0,000000
INITIAL
C(AC)=777777 773777 
C(E)=777777 773777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033047 033047 0   0   400000000000 0            0            
IT1	033047 0      0   0   400000000000 0            0            
AT3	033047 0      0   0   0            0            400000000000 
AT6	033047 0      0   0   0            0            400000000000 
FT1A	033047 0      0   0   0            0            0            
FT9	033050 0      0   0   0            0            0            
ET0	033050 0      0   0   0            0            0            
ST1	033050 0      0   0   0            0            0            
ST2	033050 0      0   0   0            0            0            
ST9	033050 0      0   0   0            0            0            


*033050 ADD 	0,034077
INITIAL
C(AC)=000000 000000 
C(E)=777777 767777 
FINAL
C(AC)=777777 767777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033050 033050 0   0   270000034077 0            777777767777 
IT1	033050 0      0   0   270000034077 0            777777767777 
AT3	033050 0      0   0   000000034077 0            270000034077 
AT6	033050 034077 0   0   000000034077 0            270000034077 
FT0	033050 034077 0   0   777777767777 0            270000034077 
FT1A	033050 034077 0   0   777777767777 0            777777767777 
FT2	033050 034077 0   0   0            0            777777767777 
FT2RQ	033050 034077 0   0   0            0            777777767777 
FT3	033050 034077 0   0   0            0            777777767777 
FT9	033051 034077 0   0   0            0            777777767777 
ET0	033051 034077 0   0   777777767777 0            777777767777 
ST1	033051 034077 0   0   777777767777 0            777777767777 
ST2	033051 034077 0   0   777777767777 0            777777767777 
ST9	033051 034077 0   0   777777767777 0            777777767777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 392
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0582

*033051 CAME	0,034077
INITIAL
C(AC)=777777 767777 
C(E)=777777 767777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033051 033051 0   0   312000034077 0            777777767777 
IT1	033051 0      0   0   312000034077 0            777777767777 
AT3	033051 0      0   0   000000034077 0            312000034077 
AT6	033051 034077 0   0   000000034077 0            312000034077 
FT0	033051 034077 0   0   777777767777 0            312000034077 
FT1A	033051 034077 0   0   777777767777 0            777777767777 
FT2	033051 034077 0   0   0            0            777777767777 
FT2RQ	033051 034077 0   0   777777767777 0            777777767777 
FT3	033051 034077 0   0   777777767777 0            777777767777 
FT9	033052 034077 0   0   777777767777 0            777777767777 
ET0	033053 034077 0   0   0            0            777777767777 
ST1A	033053 034077 0   0   0            0            777777767777 
ST9	033053 034077 0   0   0            0            777777767777 


*033053 JUMPA	0,033054
INITIAL
C(AC)=777777 767777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033053 033053 0   0   324000033054 0            000000033054 
IT1	033053 0      0   0   324000033054 0            000000033054 
AT3	033053 0      0   0   000000033054 0            324000033054 
AT6	033053 033054 0   0   000000033054 0            324000033054 
FT1A	033053 033054 0   0   000000033054 0            000000033054 
FT2	033053 033054 0   0   0            0            000000033054 
FT2RQ	033053 033054 0   0   777777767777 0            000000033054 
FT3	033053 033054 0   0   777777767777 0            000000033054 
FT9	033054 033054 0   0   777777767777 0            000000033054 
ET0	033054 033054 0   0   777777767777 0            000000033054 
ST1A	033054 033054 0   0   777777767777 0            000000033054 
ST9	033054 033054 0   0   777777767777 0            000000033054 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 393
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0583

*033054 SETZ 	0,000000
INITIAL
C(AC)=777777 767777 
C(E)=777777 767777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033054 033054 0   0   400000000000 0            0            
IT1	033054 0      0   0   400000000000 0            0            
AT3	033054 0      0   0   0            0            400000000000 
AT6	033054 0      0   0   0            0            400000000000 
FT1A	033054 0      0   0   0            0            0            
FT9	033055 0      0   0   0            0            0            
ET0	033055 0      0   0   0            0            0            
ST1	033055 0      0   0   0            0            0            
ST2	033055 0      0   0   0            0            0            
ST9	033055 0      0   0   0            0            0            


*033055 ADD 	0,034100
INITIAL
C(AC)=000000 000000 
C(E)=777777 757777 
FINAL
C(AC)=777777 757777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033055 033055 0   0   270000034100 0            777777757777 
IT1	033055 0      0   0   270000034100 0            777777757777 
AT3	033055 0      0   0   000000034100 0            270000034100 
AT6	033055 0      0   0   000000034100 0            270000034100 
FT0	033055 0      0   0   777777757777 0            270000034100 
FT1A	033055 0      0   0   777777757777 0            777777757777 
FT2	033055 0      0   0   0            0            777777757777 
FT2RQ	033055 0      0   0   0            0            777777757777 
FT3	033055 0      0   0   0            0            777777757777 
FT9	033056 0      0   0   0            0            777777757777 
ET0	033056 0      0   0   777777757777 0            777777757777 
ST1	033056 0      0   0   777777757777 0            777777757777 
ST2	033056 0      0   0   777777757777 0            777777757777 
ST9	033056 0      0   0   777777757777 0            777777757777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 394
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0584

*033056 CAME	0,034100
INITIAL
C(AC)=777777 757777 
C(E)=777777 757777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033056 033056 0   0   312000034100 0            777777757777 
IT1	033056 0      0   0   312000034100 0            777777757777 
AT3	033056 0      0   0   000000034100 0            312000034100 
AT6	033056 0      0   0   000000034100 0            312000034100 
FT0	033056 0      0   0   777777757777 0            312000034100 
FT1A	033056 0      0   0   777777757777 0            777777757777 
FT2	033056 0      0   0   0            0            777777757777 
FT2RQ	033056 0      0   0   777777757777 0            777777757777 
FT3	033056 0      0   0   777777757777 0            777777757777 
FT9	033057 0      0   0   777777757777 0            777777757777 
ET0	033060 0      0   0   0            0            777777757777 
ST1A	033060 0      0   0   0            0            777777757777 
ST9	033060 0      0   0   0            0            777777757777 


*033060 JUMPA	0,033061
INITIAL
C(AC)=777777 757777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033060 033060 0   0   324000033061 0            000000033061 
IT1	033060 0      0   0   324000033061 0            000000033061 
AT3	033060 0      0   0   000000033061 0            324000033061 
AT6	033060 033061 0   0   000000033061 0            324000033061 
FT1A	033060 033061 0   0   000000033061 0            000000033061 
FT2	033060 033061 0   0   0            0            000000033061 
FT2RQ	033060 033061 0   0   777777757777 0            000000033061 
FT3	033060 033061 0   0   777777757777 0            000000033061 
FT9	033061 033061 0   0   777777757777 0            000000033061 
ET0	033061 033061 0   0   777777757777 0            000000033061 
ST1A	033061 033061 0   0   777777757777 0            000000033061 
ST9	033061 033061 0   0   777777757777 0            000000033061 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 395
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0585

*033061 SETZ 	0,000000
INITIAL
C(AC)=777777 757777 
C(E)=777777 757777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033061 033061 0   0   400000000000 0            0            
IT1	033061 0      0   0   400000000000 0            0            
AT3	033061 0      0   0   0            0            400000000000 
AT6	033061 0      0   0   0            0            400000000000 
FT1A	033061 0      0   0   0            0            0            
FT9	033062 0      0   0   0            0            0            
ET0	033062 0      0   0   0            0            0            
ST1	033062 0      0   0   0            0            0            
ST2	033062 0      0   0   0            0            0            
ST9	033062 0      0   0   0            0            0            


*033062 ADD 	0,034101
INITIAL
C(AC)=000000 000000 
C(E)=777777 737777 
FINAL
C(AC)=777777 737777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033062 033062 0   0   270000034101 0            777777737777 
IT1	033062 0      0   0   270000034101 0            777777737777 
AT3	033062 0      0   0   000000034101 0            270000034101 
AT6	033062 034101 0   0   000000034101 0            270000034101 
FT0	033062 034101 0   0   777777737777 0            270000034101 
FT1A	033062 034101 0   0   777777737777 0            777777737777 
FT2	033062 034101 0   0   0            0            777777737777 
FT2RQ	033062 034101 0   0   0            0            777777737777 
FT3	033062 034101 0   0   0            0            777777737777 
FT9	033063 034101 0   0   0            0            777777737777 
ET0	033063 034101 0   0   777777737777 0            777777737777 
ST1	033063 034101 0   0   777777737777 0            777777737777 
ST2	033063 034101 0   0   777777737777 0            777777737777 
ST9	033063 034101 0   0   777777737777 0            777777737777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 396
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0586

*033063 CAME	0,034101
INITIAL
C(AC)=777777 737777 
C(E)=777777 737777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033063 033063 0   0   312000034101 0            777777737777 
IT1	033063 0      0   0   312000034101 0            777777737777 
AT3	033063 0      0   0   000000034101 0            312000034101 
AT6	033063 034101 0   0   000000034101 0            312000034101 
FT0	033063 034101 0   0   777777737777 0            312000034101 
FT1A	033063 034101 0   0   777777737777 0            777777737777 
FT2	033063 034101 0   0   0            0            777777737777 
FT2RQ	033063 034101 0   0   777777737777 0            777777737777 
FT3	033063 034101 0   0   777777737777 0            777777737777 
FT9	033064 034101 0   0   777777737777 0            777777737777 
ET0	033065 034101 0   0   0            0            777777737777 
ST1A	033065 034101 0   0   0            0            777777737777 
ST9	033065 034101 0   0   0            0            777777737777 


*033065 JUMPA	0,033066
INITIAL
C(AC)=777777 737777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033065 033065 0   0   324000033066 0            000000033066 
IT1	033065 0      0   0   324000033066 0            000000033066 
AT3	033065 0      0   0   000000033066 0            324000033066 
AT6	033065 033066 0   0   000000033066 0            324000033066 
FT1A	033065 033066 0   0   000000033066 0            000000033066 
FT2	033065 033066 0   0   0            0            000000033066 
FT2RQ	033065 033066 0   0   777777737777 0            000000033066 
FT3	033065 033066 0   0   777777737777 0            000000033066 
FT9	033066 033066 0   0   777777737777 0            000000033066 
ET0	033066 033066 0   0   777777737777 0            000000033066 
ST1A	033066 033066 0   0   777777737777 0            000000033066 
ST9	033066 033066 0   0   777777737777 0            000000033066 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 397
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0587

*033066 SETZ 	0,000000
INITIAL
C(AC)=777777 737777 
C(E)=777777 737777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033066 033066 0   0   400000000000 0            0            
IT1	033066 0      0   0   400000000000 0            0            
AT3	033066 0      0   0   0            0            400000000000 
AT6	033066 0      0   0   0            0            400000000000 
FT1A	033066 0      0   0   0            0            0            
FT9	033067 0      0   0   0            0            0            
ET0	033067 0      0   0   0            0            0            
ST1	033067 0      0   0   0            0            0            
ST2	033067 0      0   0   0            0            0            
ST9	033067 0      0   0   0            0            0            


*033067 ADD 	0,034102
INITIAL
C(AC)=000000 000000 
C(E)=777777 677777 
FINAL
C(AC)=777777 677777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033067 033067 0   0   270000034102 0            777777677777 
IT1	033067 0      0   0   270000034102 0            777777677777 
AT3	033067 0      0   0   000000034102 0            270000034102 
AT6	033067 034102 0   0   000000034102 0            270000034102 
FT0	033067 034102 0   0   777777677777 0            270000034102 
FT1A	033067 034102 0   0   777777677777 0            777777677777 
FT2	033067 034102 0   0   0            0            777777677777 
FT2RQ	033067 034102 0   0   0            0            777777677777 
FT3	033067 034102 0   0   0            0            777777677777 
FT9	033070 034102 0   0   0            0            777777677777 
ET0	033070 034102 0   0   777777677777 0            777777677777 
ST1	033070 034102 0   0   777777677777 0            777777677777 
ST2	033070 034102 0   0   777777677777 0            777777677777 
ST9	033070 034102 0   0   777777677777 0            777777677777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 398
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0588

*033070 CAME	0,034102
INITIAL
C(AC)=777777 677777 
C(E)=777777 677777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033070 033070 0   0   312000034102 0            777777677777 
IT1	033070 0      0   0   312000034102 0            777777677777 
AT3	033070 0      0   0   000000034102 0            312000034102 
AT6	033070 034102 0   0   000000034102 0            312000034102 
FT0	033070 034102 0   0   777777677777 0            312000034102 
FT1A	033070 034102 0   0   777777677777 0            777777677777 
FT2	033070 034102 0   0   0            0            777777677777 
FT2RQ	033070 034102 0   0   777777677777 0            777777677777 
FT3	033070 034102 0   0   777777677777 0            777777677777 
FT9	033071 034102 0   0   777777677777 0            777777677777 
ET0	033072 034102 0   0   0            0            777777677777 
ST1A	033072 034102 0   0   0            0            777777677777 
ST9	033072 034102 0   0   0            0            777777677777 


*033072 JUMPA	0,033073
INITIAL
C(AC)=777777 677777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033072 033072 0   0   324000033073 0            000000033073 
IT1	033072 0      0   0   324000033073 0            000000033073 
AT3	033072 0      0   0   000000033073 0            324000033073 
AT6	033072 033073 0   0   000000033073 0            324000033073 
FT1A	033072 033073 0   0   000000033073 0            000000033073 
FT2	033072 033073 0   0   0            0            000000033073 
FT2RQ	033072 033073 0   0   777777677777 0            000000033073 
FT3	033072 033073 0   0   777777677777 0            000000033073 
FT9	033073 033073 0   0   777777677777 0            000000033073 
ET0	033073 033073 0   0   777777677777 0            000000033073 
ST1A	033073 033073 0   0   777777677777 0            000000033073 
ST9	033073 033073 0   0   777777677777 0            000000033073 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 399
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0589

*033073 SETZ 	0,000000
INITIAL
C(AC)=777777 677777 
C(E)=777777 677777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033073 033073 0   0   400000000000 0            0            
IT1	033073 0      0   0   400000000000 0            0            
AT3	033073 0      0   0   0            0            400000000000 
AT6	033073 0      0   0   0            0            400000000000 
FT1A	033073 0      0   0   0            0            0            
FT9	033074 0      0   0   0            0            0            
ET0	033074 0      0   0   0            0            0            
ST1	033074 0      0   0   0            0            0            
ST2	033074 0      0   0   0            0            0            
ST9	033074 0      0   0   0            0            0            


*033074 ADD 	0,034103
INITIAL
C(AC)=000000 000000 
C(E)=777777 577777 
FINAL
C(AC)=777777 577777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033074 033074 0   0   270000034103 0            777777577777 
IT1	033074 0      0   0   270000034103 0            777777577777 
AT3	033074 0      0   0   000000034103 0            270000034103 
AT6	033074 034103 0   0   000000034103 0            270000034103 
FT0	033074 034103 0   0   777777577777 0            270000034103 
FT1A	033074 034103 0   0   777777577777 0            777777577777 
FT2	033074 034103 0   0   0            0            777777577777 
FT2RQ	033074 034103 0   0   0            0            777777577777 
FT3	033074 034103 0   0   0            0            777777577777 
FT9	033075 034103 0   0   0            0            777777577777 
ET0	033075 034103 0   0   777777577777 0            777777577777 
ST1	033075 034103 0   0   777777577777 0            777777577777 
ST2	033075 034103 0   0   777777577777 0            777777577777 
ST9	033075 034103 0   0   777777577777 0            777777577777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 400
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0590

*033075 CAME	0,034103
INITIAL
C(AC)=777777 577777 
C(E)=777777 577777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033075 033075 0   0   312000034103 0            777777577777 
IT1	033075 0      0   0   312000034103 0            777777577777 
AT3	033075 0      0   0   000000034103 0            312000034103 
AT6	033075 034103 0   0   000000034103 0            312000034103 
FT0	033075 034103 0   0   777777577777 0            312000034103 
FT1A	033075 034103 0   0   777777577777 0            777777577777 
FT2	033075 034103 0   0   0            0            777777577777 
FT2RQ	033075 034103 0   0   777777577777 0            777777577777 
FT3	033075 034103 0   0   777777577777 0            777777577777 
FT9	033076 034103 0   0   777777577777 0            777777577777 
ET0	033077 034103 0   0   0            0            777777577777 
ST1A	033077 034103 0   0   0            0            777777577777 
ST9	033077 034103 0   0   0            0            777777577777 


*033077 JUMPA	0,033100
INITIAL
C(AC)=777777 577777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033077 033077 0   0   324000033100 0            000000033100 
IT1	033077 0      0   0   324000033100 0            000000033100 
AT3	033077 0      0   0   000000033100 0            324000033100 
AT6	033077 0      0   0   000000033100 0            324000033100 
FT1A	033077 0      0   0   000000033100 0            000000033100 
FT2	033077 0      0   0   0            0            000000033100 
FT2RQ	033077 0      0   0   777777577777 0            000000033100 
FT3	033077 0      0   0   777777577777 0            000000033100 
FT9	0      0      0   0   777777577777 0            000000033100 
ET0	0      0      0   0   777777577777 0            000000033100 
ST1A	0      0      0   0   777777577777 0            000000033100 
ST9	0      0      0   0   777777577777 0            000000033100 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 401
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0591

*033100 SETZ 	0,000000
INITIAL
C(AC)=777777 577777 
C(E)=777777 577777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	0      0      0   0   400000000000 0            0            
IT1	0      0      0   0   400000000000 0            0            
AT3	0      0      0   0   0            0            400000000000 
AT6	0      0      0   0   0            0            400000000000 
FT1A	0      0      0   0   0            0            0            
FT9	033101 0      0   0   0            0            0            
ET0	033101 0      0   0   0            0            0            
ST1	033101 0      0   0   0            0            0            
ST2	033101 0      0   0   0            0            0            
ST9	033101 0      0   0   0            0            0            


*033101 ADD 	0,034104
INITIAL
C(AC)=000000 000000 
C(E)=777777 377777 
FINAL
C(AC)=777777 377777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033101 033101 0   0   270000034104 0            777777377777 
IT1	033101 0      0   0   270000034104 0            777777377777 
AT3	033101 0      0   0   000000034104 0            270000034104 
AT6	033101 034104 0   0   000000034104 0            270000034104 
FT0	033101 034104 0   0   777777377777 0            270000034104 
FT1A	033101 034104 0   0   777777377777 0            777777377777 
FT2	033101 034104 0   0   0            0            777777377777 
FT2RQ	033101 034104 0   0   0            0            777777377777 
FT3	033101 034104 0   0   0            0            777777377777 
FT9	033102 034104 0   0   0            0            777777377777 
ET0	033102 034104 0   0   777777377777 0            777777377777 
ST1	033102 034104 0   0   777777377777 0            777777377777 
ST2	033102 034104 0   0   777777377777 0            777777377777 
ST9	033102 034104 0   0   777777377777 0            777777377777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 402
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0592

*033102 CAME	0,034104
INITIAL
C(AC)=777777 377777 
C(E)=777777 377777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033102 033102 0   0   312000034104 0            777777377777 
IT1	033102 0      0   0   312000034104 0            777777377777 
AT3	033102 0      0   0   000000034104 0            312000034104 
AT6	033102 034104 0   0   000000034104 0            312000034104 
FT0	033102 034104 0   0   777777377777 0            312000034104 
FT1A	033102 034104 0   0   777777377777 0            777777377777 
FT2	033102 034104 0   0   0            0            777777377777 
FT2RQ	033102 034104 0   0   777777377777 0            777777377777 
FT3	033102 034104 0   0   777777377777 0            777777377777 
FT9	033103 034104 0   0   777777377777 0            777777377777 
ET0	033104 034104 0   0   0            0            777777377777 
ST1A	033104 034104 0   0   0            0            777777377777 
ST9	033104 034104 0   0   0            0            777777377777 


*033104 JUMPA	0,033105
INITIAL
C(AC)=777777 377777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033104 033104 0   0   324000033105 0            000000033105 
IT1	033104 0      0   0   324000033105 0            000000033105 
AT3	033104 0      0   0   000000033105 0            324000033105 
AT6	033104 033105 0   0   000000033105 0            324000033105 
FT1A	033104 033105 0   0   000000033105 0            000000033105 
FT2	033104 033105 0   0   0            0            000000033105 
FT2RQ	033104 033105 0   0   777777377777 0            000000033105 
FT3	033104 033105 0   0   777777377777 0            000000033105 
FT9	033105 033105 0   0   777777377777 0            000000033105 
ET0	033105 033105 0   0   777777377777 0            000000033105 
ST1A	033105 033105 0   0   777777377777 0            000000033105 
ST9	033105 033105 0   0   777777377777 0            000000033105 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 403
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0593

*033105 SETZ 	0,000000
INITIAL
C(AC)=777777 377777 
C(E)=777777 377777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033105 033105 0   0   400000000000 0            0            
IT1	033105 0      0   0   400000000000 0            0            
AT3	033105 0      0   0   0            0            400000000000 
AT6	033105 0      0   0   0            0            400000000000 
FT1A	033105 0      0   0   0            0            0            
FT9	033106 0      0   0   0            0            0            
ET0	033106 0      0   0   0            0            0            
ST1	033106 0      0   0   0            0            0            
ST2	033106 0      0   0   0            0            0            
ST9	033106 0      0   0   0            0            0            


*033106 ADD 	0,034105
INITIAL
C(AC)=000000 000000 
C(E)=777776 777777 
FINAL
C(AC)=777776 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033106 033106 0   0   270000034105 0            777776777777 
IT1	033106 0      0   0   270000034105 0            777776777777 
AT3	033106 0      0   0   000000034105 0            270000034105 
AT6	033106 034105 0   0   000000034105 0            270000034105 
FT0	033106 034105 0   0   777776777777 0            270000034105 
FT1A	033106 034105 0   0   777776777777 0            777776777777 
FT2	033106 034105 0   0   0            0            777776777777 
FT2RQ	033106 034105 0   0   0            0            777776777777 
FT3	033106 034105 0   0   0            0            777776777777 
FT9	033107 034105 0   0   0            0            777776777777 
ET0	033107 034105 0   0   777776777777 0            777776777777 
ST1	033107 034105 0   0   777776777777 0            777776777777 
ST2	033107 034105 0   0   777776777777 0            777776777777 
ST9	033107 034105 0   0   777776777777 0            777776777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 404
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0594

*033107 CAME	0,034105
INITIAL
C(AC)=777776 777777 
C(E)=777776 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033107 033107 0   0   312000034105 0            777776777777 
IT1	033107 0      0   0   312000034105 0            777776777777 
AT3	033107 0      0   0   000000034105 0            312000034105 
AT6	033107 034105 0   0   000000034105 0            312000034105 
FT0	033107 034105 0   0   777776777777 0            312000034105 
FT1A	033107 034105 0   0   777776777777 0            777776777777 
FT2	033107 034105 0   0   0            0            777776777777 
FT2RQ	033107 034105 0   0   777776777777 0            777776777777 
FT3	033107 034105 0   0   777776777777 0            777776777777 
FT9	033110 034105 0   0   777776777777 0            777776777777 
ET0	033111 034105 0   0   0            0            777776777777 
ST1A	033111 034105 0   0   0            0            777776777777 
ST9	033111 034105 0   0   0            0            777776777777 


*033111 JUMPA	0,033112
INITIAL
C(AC)=777776 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033111 033111 0   0   324000033112 0            000000033112 
IT1	033111 0      0   0   324000033112 0            000000033112 
AT3	033111 0      0   0   000000033112 0            324000033112 
AT6	033111 033112 0   0   000000033112 0            324000033112 
FT1A	033111 033112 0   0   000000033112 0            000000033112 
FT2	033111 033112 0   0   0            0            000000033112 
FT2RQ	033111 033112 0   0   777776777777 0            000000033112 
FT3	033111 033112 0   0   777776777777 0            000000033112 
FT9	033112 033112 0   0   777776777777 0            000000033112 
ET0	033112 033112 0   0   777776777777 0            000000033112 
ST1A	033112 033112 0   0   777776777777 0            000000033112 
ST9	033112 033112 0   0   777776777777 0            000000033112 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 405
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0595

*033112 SETZ 	0,000000
INITIAL
C(AC)=777776 777777 
C(E)=777776 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033112 033112 0   0   400000000000 0            0            
IT1	033112 0      0   0   400000000000 0            0            
AT3	033112 0      0   0   0            0            400000000000 
AT6	033112 0      0   0   0            0            400000000000 
FT1A	033112 0      0   0   0            0            0            
FT9	033113 0      0   0   0            0            0            
ET0	033113 0      0   0   0            0            0            
ST1	033113 0      0   0   0            0            0            
ST2	033113 0      0   0   0            0            0            
ST9	033113 0      0   0   0            0            0            


*033113 ADD 	0,034106
INITIAL
C(AC)=000000 000000 
C(E)=777775 777777 
FINAL
C(AC)=777775 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033113 033113 0   0   270000034106 0            777775777777 
IT1	033113 0      0   0   270000034106 0            777775777777 
AT3	033113 0      0   0   000000034106 0            270000034106 
AT6	033113 034106 0   0   000000034106 0            270000034106 
FT0	033113 034106 0   0   777775777777 0            270000034106 
FT1A	033113 034106 0   0   777775777777 0            777775777777 
FT2	033113 034106 0   0   0            0            777775777777 
FT2RQ	033113 034106 0   0   0            0            777775777777 
FT3	033113 034106 0   0   0            0            777775777777 
FT9	033114 034106 0   0   0            0            777775777777 
ET0	033114 034106 0   0   777775777777 0            777775777777 
ST1	033114 034106 0   0   777775777777 0            777775777777 
ST2	033114 034106 0   0   777775777777 0            777775777777 
ST9	033114 034106 0   0   777775777777 0            777775777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 406
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0596

*033114 CAME	0,034106
INITIAL
C(AC)=777775 777777 
C(E)=777775 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033114 033114 0   0   312000034106 0            777775777777 
IT1	033114 0      0   0   312000034106 0            777775777777 
AT3	033114 0      0   0   000000034106 0            312000034106 
AT6	033114 034106 0   0   000000034106 0            312000034106 
FT0	033114 034106 0   0   777775777777 0            312000034106 
FT1A	033114 034106 0   0   777775777777 0            777775777777 
FT2	033114 034106 0   0   0            0            777775777777 
FT2RQ	033114 034106 0   0   777775777777 0            777775777777 
FT3	033114 034106 0   0   777775777777 0            777775777777 
FT9	033115 034106 0   0   777775777777 0            777775777777 
ET0	033116 034106 0   0   0            0            777775777777 
ST1A	033116 034106 0   0   0            0            777775777777 
ST9	033116 034106 0   0   0            0            777775777777 


*033116 JUMPA	0,033117
INITIAL
C(AC)=777775 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033116 033116 0   0   324000033117 0            000000033117 
IT1	033116 0      0   0   324000033117 0            000000033117 
AT3	033116 0      0   0   000000033117 0            324000033117 
AT6	033116 033117 0   0   000000033117 0            324000033117 
FT1A	033116 033117 0   0   000000033117 0            000000033117 
FT2	033116 033117 0   0   0            0            000000033117 
FT2RQ	033116 033117 0   0   777775777777 0            000000033117 
FT3	033116 033117 0   0   777775777777 0            000000033117 
FT9	033117 033117 0   0   777775777777 0            000000033117 
ET0	033117 033117 0   0   777775777777 0            000000033117 
ST1A	033117 033117 0   0   777775777777 0            000000033117 
ST9	033117 033117 0   0   777775777777 0            000000033117 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 407
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0597

*033117 SETZ 	0,000000
INITIAL
C(AC)=777775 777777 
C(E)=777775 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033117 033117 0   0   400000000000 0            0            
IT1	033117 0      0   0   400000000000 0            0            
AT3	033117 0      0   0   0            0            400000000000 
AT6	033117 0      0   0   0            0            400000000000 
FT1A	033117 0      0   0   0            0            0            
FT9	033120 0      0   0   0            0            0            
ET0	033120 0      0   0   0            0            0            
ST1	033120 0      0   0   0            0            0            
ST2	033120 0      0   0   0            0            0            
ST9	033120 0      0   0   0            0            0            


*033120 ADD 	0,034107
INITIAL
C(AC)=000000 000000 
C(E)=777773 777777 
FINAL
C(AC)=777773 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033120 033120 0   0   270000034107 0            777773777777 
IT1	033120 0      0   0   270000034107 0            777773777777 
AT3	033120 0      0   0   000000034107 0            270000034107 
AT6	033120 034107 0   0   000000034107 0            270000034107 
FT0	033120 034107 0   0   777773777777 0            270000034107 
FT1A	033120 034107 0   0   777773777777 0            777773777777 
FT2	033120 034107 0   0   0            0            777773777777 
FT2RQ	033120 034107 0   0   0            0            777773777777 
FT3	033120 034107 0   0   0            0            777773777777 
FT9	033121 034107 0   0   0            0            777773777777 
ET0	033121 034107 0   0   777773777777 0            777773777777 
ST1	033121 034107 0   0   777773777777 0            777773777777 
ST2	033121 034107 0   0   777773777777 0            777773777777 
ST9	033121 034107 0   0   777773777777 0            777773777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 408
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0598

*033121 CAME	0,034107
INITIAL
C(AC)=777773 777777 
C(E)=777773 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033121 033121 0   0   312000034107 0            777773777777 
IT1	033121 0      0   0   312000034107 0            777773777777 
AT3	033121 0      0   0   000000034107 0            312000034107 
AT6	033121 034107 0   0   000000034107 0            312000034107 
FT0	033121 034107 0   0   777773777777 0            312000034107 
FT1A	033121 034107 0   0   777773777777 0            777773777777 
FT2	033121 034107 0   0   0            0            777773777777 
FT2RQ	033121 034107 0   0   777773777777 0            777773777777 
FT3	033121 034107 0   0   777773777777 0            777773777777 
FT9	033122 034107 0   0   777773777777 0            777773777777 
ET0	033123 034107 0   0   0            0            777773777777 
ST1A	033123 034107 0   0   0            0            777773777777 
ST9	033123 034107 0   0   0            0            777773777777 


*033123 JUMPA	0,033124
INITIAL
C(AC)=777773 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033123 033123 0   0   324000033124 0            000000033124 
IT1	033123 0      0   0   324000033124 0            000000033124 
AT3	033123 0      0   0   000000033124 0            324000033124 
AT6	033123 033124 0   0   000000033124 0            324000033124 
FT1A	033123 033124 0   0   000000033124 0            000000033124 
FT2	033123 033124 0   0   0            0            000000033124 
FT2RQ	033123 033124 0   0   777773777777 0            000000033124 
FT3	033123 033124 0   0   777773777777 0            000000033124 
FT9	033124 033124 0   0   777773777777 0            000000033124 
ET0	033124 033124 0   0   777773777777 0            000000033124 
ST1A	033124 033124 0   0   777773777777 0            000000033124 
ST9	033124 033124 0   0   777773777777 0            000000033124 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 409
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0599

*033124 SETZ 	0,000000
INITIAL
C(AC)=777773 777777 
C(E)=777773 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033124 033124 0   0   400000000000 0            0            
IT1	033124 0      0   0   400000000000 0            0            
AT3	033124 0      0   0   0            0            400000000000 
AT6	033124 0      0   0   0            0            400000000000 
FT1A	033124 0      0   0   0            0            0            
FT9	033125 0      0   0   0            0            0            
ET0	033125 0      0   0   0            0            0            
ST1	033125 0      0   0   0            0            0            
ST2	033125 0      0   0   0            0            0            
ST9	033125 0      0   0   0            0            0            


*033125 ADD 	0,034110
INITIAL
C(AC)=000000 000000 
C(E)=777767 777777 
FINAL
C(AC)=777767 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033125 033125 0   0   270000034110 0            777767777777 
IT1	033125 0      0   0   270000034110 0            777767777777 
AT3	033125 0      0   0   000000034110 0            270000034110 
AT6	033125 034110 0   0   000000034110 0            270000034110 
FT0	033125 034110 0   0   777767777777 0            270000034110 
FT1A	033125 034110 0   0   777767777777 0            777767777777 
FT2	033125 034110 0   0   0            0            777767777777 
FT2RQ	033125 034110 0   0   0            0            777767777777 
FT3	033125 034110 0   0   0            0            777767777777 
FT9	033126 034110 0   0   0            0            777767777777 
ET0	033126 034110 0   0   777767777777 0            777767777777 
ST1	033126 034110 0   0   777767777777 0            777767777777 
ST2	033126 034110 0   0   777767777777 0            777767777777 
ST9	033126 034110 0   0   777767777777 0            777767777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 410
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0600

*033126 CAME	0,034110
INITIAL
C(AC)=777767 777777 
C(E)=777767 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033126 033126 0   0   312000034110 0            777767777777 
IT1	033126 0      0   0   312000034110 0            777767777777 
AT3	033126 0      0   0   000000034110 0            312000034110 
AT6	033126 034110 0   0   000000034110 0            312000034110 
FT0	033126 034110 0   0   777767777777 0            312000034110 
FT1A	033126 034110 0   0   777767777777 0            777767777777 
FT2	033126 034110 0   0   0            0            777767777777 
FT2RQ	033126 034110 0   0   777767777777 0            777767777777 
FT3	033126 034110 0   0   777767777777 0            777767777777 
FT9	033127 034110 0   0   777767777777 0            777767777777 
ET0	033130 034110 0   0   0            0            777767777777 
ST1A	033130 034110 0   0   0            0            777767777777 
ST9	033130 034110 0   0   0            0            777767777777 


*033130 JUMPA	0,033131
INITIAL
C(AC)=777767 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033130 033130 0   0   324000033131 0            000000033131 
IT1	033130 0      0   0   324000033131 0            000000033131 
AT3	033130 0      0   0   000000033131 0            324000033131 
AT6	033130 033131 0   0   000000033131 0            324000033131 
FT1A	033130 033131 0   0   000000033131 0            000000033131 
FT2	033130 033131 0   0   0            0            000000033131 
FT2RQ	033130 033131 0   0   777767777777 0            000000033131 
FT3	033130 033131 0   0   777767777777 0            000000033131 
FT9	033131 033131 0   0   777767777777 0            000000033131 
ET0	033131 033131 0   0   777767777777 0            000000033131 
ST1A	033131 033131 0   0   777767777777 0            000000033131 
ST9	033131 033131 0   0   777767777777 0            000000033131 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 411
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0601

*033131 SETZ 	0,000000
INITIAL
C(AC)=777767 777777 
C(E)=777767 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033131 033131 0   0   400000000000 0            0            
IT1	033131 0      0   0   400000000000 0            0            
AT3	033131 0      0   0   0            0            400000000000 
AT6	033131 0      0   0   0            0            400000000000 
FT1A	033131 0      0   0   0            0            0            
FT9	033132 0      0   0   0            0            0            
ET0	033132 0      0   0   0            0            0            
ST1	033132 0      0   0   0            0            0            
ST2	033132 0      0   0   0            0            0            
ST9	033132 0      0   0   0            0            0            


*033132 ADD 	0,034111
INITIAL
C(AC)=000000 000000 
C(E)=777757 777777 
FINAL
C(AC)=777757 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033132 033132 0   0   270000034111 0            777757777777 
IT1	033132 0      0   0   270000034111 0            777757777777 
AT3	033132 0      0   0   000000034111 0            270000034111 
AT6	033132 034111 0   0   000000034111 0            270000034111 
FT0	033132 034111 0   0   777757777777 0            270000034111 
FT1A	033132 034111 0   0   777757777777 0            777757777777 
FT2	033132 034111 0   0   0            0            777757777777 
FT2RQ	033132 034111 0   0   0            0            777757777777 
FT3	033132 034111 0   0   0            0            777757777777 
FT9	033133 034111 0   0   0            0            777757777777 
ET0	033133 034111 0   0   777757777777 0            777757777777 
ST1	033133 034111 0   0   777757777777 0            777757777777 
ST2	033133 034111 0   0   777757777777 0            777757777777 
ST9	033133 034111 0   0   777757777777 0            777757777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 412
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0602

*033133 CAME	0,034111
INITIAL
C(AC)=777757 777777 
C(E)=777757 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033133 033133 0   0   312000034111 0            777757777777 
IT1	033133 0      0   0   312000034111 0            777757777777 
AT3	033133 0      0   0   000000034111 0            312000034111 
AT6	033133 034111 0   0   000000034111 0            312000034111 
FT0	033133 034111 0   0   777757777777 0            312000034111 
FT1A	033133 034111 0   0   777757777777 0            777757777777 
FT2	033133 034111 0   0   0            0            777757777777 
FT2RQ	033133 034111 0   0   777757777777 0            777757777777 
FT3	033133 034111 0   0   777757777777 0            777757777777 
FT9	033134 034111 0   0   777757777777 0            777757777777 
ET0	033135 034111 0   0   0            0            777757777777 
ST1A	033135 034111 0   0   0            0            777757777777 
ST9	033135 034111 0   0   0            0            777757777777 


*033135 JUMPA	0,033136
INITIAL
C(AC)=777757 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033135 033135 0   0   324000033136 0            000000033136 
IT1	033135 0      0   0   324000033136 0            000000033136 
AT3	033135 0      0   0   000000033136 0            324000033136 
AT6	033135 033136 0   0   000000033136 0            324000033136 
FT1A	033135 033136 0   0   000000033136 0            000000033136 
FT2	033135 033136 0   0   0            0            000000033136 
FT2RQ	033135 033136 0   0   777757777777 0            000000033136 
FT3	033135 033136 0   0   777757777777 0            000000033136 
FT9	033136 033136 0   0   777757777777 0            000000033136 
ET0	033136 033136 0   0   777757777777 0            000000033136 
ST1A	033136 033136 0   0   777757777777 0            000000033136 
ST9	033136 033136 0   0   777757777777 0            000000033136 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 413
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0603

*033136 SETZ 	0,000000
INITIAL
C(AC)=777757 777777 
C(E)=777757 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033136 033136 0   0   400000000000 0            0            
IT1	033136 0      0   0   400000000000 0            0            
AT3	033136 0      0   0   0            0            400000000000 
AT6	033136 0      0   0   0            0            400000000000 
FT1A	033136 0      0   0   0            0            0            
FT9	033137 0      0   0   0            0            0            
ET0	033137 0      0   0   0            0            0            
ST1	033137 0      0   0   0            0            0            
ST2	033137 0      0   0   0            0            0            
ST9	033137 0      0   0   0            0            0            


*033137 ADD 	0,034112
INITIAL
C(AC)=000000 000000 
C(E)=777737 777777 
FINAL
C(AC)=777737 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033137 033137 0   0   270000034112 0            777737777777 
IT1	033137 0      0   0   270000034112 0            777737777777 
AT3	033137 0      0   0   000000034112 0            270000034112 
AT6	033137 034112 0   0   000000034112 0            270000034112 
FT0	033137 034112 0   0   777737777777 0            270000034112 
FT1A	033137 034112 0   0   777737777777 0            777737777777 
FT2	033137 034112 0   0   0            0            777737777777 
FT2RQ	033137 034112 0   0   0            0            777737777777 
FT3	033137 034112 0   0   0            0            777737777777 
FT9	033140 034112 0   0   0            0            777737777777 
ET0	033140 034112 0   0   777737777777 0            777737777777 
ST1	033140 034112 0   0   777737777777 0            777737777777 
ST2	033140 034112 0   0   777737777777 0            777737777777 
ST9	033140 034112 0   0   777737777777 0            777737777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 414
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0604

*033140 CAME	0,034112
INITIAL
C(AC)=777737 777777 
C(E)=777737 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033140 033140 0   0   312000034112 0            777737777777 
IT1	033140 0      0   0   312000034112 0            777737777777 
AT3	033140 0      0   0   000000034112 0            312000034112 
AT6	033140 034112 0   0   000000034112 0            312000034112 
FT0	033140 034112 0   0   777737777777 0            312000034112 
FT1A	033140 034112 0   0   777737777777 0            777737777777 
FT2	033140 034112 0   0   0            0            777737777777 
FT2RQ	033140 034112 0   0   777737777777 0            777737777777 
FT3	033140 034112 0   0   777737777777 0            777737777777 
FT9	033141 034112 0   0   777737777777 0            777737777777 
ET0	033142 034112 0   0   0            0            777737777777 
ST1A	033142 034112 0   0   0            0            777737777777 
ST9	033142 034112 0   0   0            0            777737777777 


*033142 JUMPA	0,033143
INITIAL
C(AC)=777737 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033142 033142 0   0   324000033143 0            000000033143 
IT1	033142 0      0   0   324000033143 0            000000033143 
AT3	033142 0      0   0   000000033143 0            324000033143 
AT6	033142 033143 0   0   000000033143 0            324000033143 
FT1A	033142 033143 0   0   000000033143 0            000000033143 
FT2	033142 033143 0   0   0            0            000000033143 
FT2RQ	033142 033143 0   0   777737777777 0            000000033143 
FT3	033142 033143 0   0   777737777777 0            000000033143 
FT9	033143 033143 0   0   777737777777 0            000000033143 
ET0	033143 033143 0   0   777737777777 0            000000033143 
ST1A	033143 033143 0   0   777737777777 0            000000033143 
ST9	033143 033143 0   0   777737777777 0            000000033143 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 415
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0605

*033143 SETZ 	0,000000
INITIAL
C(AC)=777737 777777 
C(E)=777737 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033143 033143 0   0   400000000000 0            0            
IT1	033143 0      0   0   400000000000 0            0            
AT3	033143 0      0   0   0            0            400000000000 
AT6	033143 0      0   0   0            0            400000000000 
FT1A	033143 0      0   0   0            0            0            
FT9	033144 0      0   0   0            0            0            
ET0	033144 0      0   0   0            0            0            
ST1	033144 0      0   0   0            0            0            
ST2	033144 0      0   0   0            0            0            
ST9	033144 0      0   0   0            0            0            


*033144 ADD 	0,034113
INITIAL
C(AC)=000000 000000 
C(E)=777677 777777 
FINAL
C(AC)=777677 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033144 033144 0   0   270000034113 0            777677777777 
IT1	033144 0      0   0   270000034113 0            777677777777 
AT3	033144 0      0   0   000000034113 0            270000034113 
AT6	033144 034113 0   0   000000034113 0            270000034113 
FT0	033144 034113 0   0   777677777777 0            270000034113 
FT1A	033144 034113 0   0   777677777777 0            777677777777 
FT2	033144 034113 0   0   0            0            777677777777 
FT2RQ	033144 034113 0   0   0            0            777677777777 
FT3	033144 034113 0   0   0            0            777677777777 
FT9	033145 034113 0   0   0            0            777677777777 
ET0	033145 034113 0   0   777677777777 0            777677777777 
ST1	033145 034113 0   0   777677777777 0            777677777777 
ST2	033145 034113 0   0   777677777777 0            777677777777 
ST9	033145 034113 0   0   777677777777 0            777677777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 416
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0606

*033145 CAME	0,034113
INITIAL
C(AC)=777677 777777 
C(E)=777677 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033145 033145 0   0   312000034113 0            777677777777 
IT1	033145 0      0   0   312000034113 0            777677777777 
AT3	033145 0      0   0   000000034113 0            312000034113 
AT6	033145 034113 0   0   000000034113 0            312000034113 
FT0	033145 034113 0   0   777677777777 0            312000034113 
FT1A	033145 034113 0   0   777677777777 0            777677777777 
FT2	033145 034113 0   0   0            0            777677777777 
FT2RQ	033145 034113 0   0   777677777777 0            777677777777 
FT3	033145 034113 0   0   777677777777 0            777677777777 
FT9	033146 034113 0   0   777677777777 0            777677777777 
ET0	033147 034113 0   0   0            0            777677777777 
ST1A	033147 034113 0   0   0            0            777677777777 
ST9	033147 034113 0   0   0            0            777677777777 


*033147 JUMPA	0,033150
INITIAL
C(AC)=777677 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033147 033147 0   0   324000033150 0            000000033150 
IT1	033147 0      0   0   324000033150 0            000000033150 
AT3	033147 0      0   0   000000033150 0            324000033150 
AT6	033147 033150 0   0   000000033150 0            324000033150 
FT1A	033147 033150 0   0   000000033150 0            000000033150 
FT2	033147 033150 0   0   0            0            000000033150 
FT2RQ	033147 033150 0   0   777677777777 0            000000033150 
FT3	033147 033150 0   0   777677777777 0            000000033150 
FT9	033150 033150 0   0   777677777777 0            000000033150 
ET0	033150 033150 0   0   777677777777 0            000000033150 
ST1A	033150 033150 0   0   777677777777 0            000000033150 
ST9	033150 033150 0   0   777677777777 0            000000033150 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 417
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0607

*033150 SETZ 	0,000000
INITIAL
C(AC)=777677 777777 
C(E)=777677 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033150 033150 0   0   400000000000 0            0            
IT1	033150 0      0   0   400000000000 0            0            
AT3	033150 0      0   0   0            0            400000000000 
AT6	033150 0      0   0   0            0            400000000000 
FT1A	033150 0      0   0   0            0            0            
FT9	033151 0      0   0   0            0            0            
ET0	033151 0      0   0   0            0            0            
ST1	033151 0      0   0   0            0            0            
ST2	033151 0      0   0   0            0            0            
ST9	033151 0      0   0   0            0            0            


*033151 ADD 	0,034114
INITIAL
C(AC)=000000 000000 
C(E)=777577 777777 
FINAL
C(AC)=777577 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033151 033151 0   0   270000034114 0            777577777777 
IT1	033151 0      0   0   270000034114 0            777577777777 
AT3	033151 0      0   0   000000034114 0            270000034114 
AT6	033151 034114 0   0   000000034114 0            270000034114 
FT0	033151 034114 0   0   777577777777 0            270000034114 
FT1A	033151 034114 0   0   777577777777 0            777577777777 
FT2	033151 034114 0   0   0            0            777577777777 
FT2RQ	033151 034114 0   0   0            0            777577777777 
FT3	033151 034114 0   0   0            0            777577777777 
FT9	033152 034114 0   0   0            0            777577777777 
ET0	033152 034114 0   0   777577777777 0            777577777777 
ST1	033152 034114 0   0   777577777777 0            777577777777 
ST2	033152 034114 0   0   777577777777 0            777577777777 
ST9	033152 034114 0   0   777577777777 0            777577777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 418
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0608

*033152 CAME	0,034114
INITIAL
C(AC)=777577 777777 
C(E)=777577 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033152 033152 0   0   312000034114 0            777577777777 
IT1	033152 0      0   0   312000034114 0            777577777777 
AT3	033152 0      0   0   000000034114 0            312000034114 
AT6	033152 034114 0   0   000000034114 0            312000034114 
FT0	033152 034114 0   0   777577777777 0            312000034114 
FT1A	033152 034114 0   0   777577777777 0            777577777777 
FT2	033152 034114 0   0   0            0            777577777777 
FT2RQ	033152 034114 0   0   777577777777 0            777577777777 
FT3	033152 034114 0   0   777577777777 0            777577777777 
FT9	033153 034114 0   0   777577777777 0            777577777777 
ET0	033154 034114 0   0   0            0            777577777777 
ST1A	033154 034114 0   0   0            0            777577777777 
ST9	033154 034114 0   0   0            0            777577777777 


*033154 JUMPA	0,033155
INITIAL
C(AC)=777577 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033154 033154 0   0   324000033155 0            000000033155 
IT1	033154 0      0   0   324000033155 0            000000033155 
AT3	033154 0      0   0   000000033155 0            324000033155 
AT6	033154 033155 0   0   000000033155 0            324000033155 
FT1A	033154 033155 0   0   000000033155 0            000000033155 
FT2	033154 033155 0   0   0            0            000000033155 
FT2RQ	033154 033155 0   0   777577777777 0            000000033155 
FT3	033154 033155 0   0   777577777777 0            000000033155 
FT9	033155 033155 0   0   777577777777 0            000000033155 
ET0	033155 033155 0   0   777577777777 0            000000033155 
ST1A	033155 033155 0   0   777577777777 0            000000033155 
ST9	033155 033155 0   0   777577777777 0            000000033155 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 419
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0609

*033155 SETZ 	0,000000
INITIAL
C(AC)=777577 777777 
C(E)=777577 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033155 033155 0   0   400000000000 0            0            
IT1	033155 0      0   0   400000000000 0            0            
AT3	033155 0      0   0   0            0            400000000000 
AT6	033155 0      0   0   0            0            400000000000 
FT1A	033155 0      0   0   0            0            0            
FT9	033156 0      0   0   0            0            0            
ET0	033156 0      0   0   0            0            0            
ST1	033156 0      0   0   0            0            0            
ST2	033156 0      0   0   0            0            0            
ST9	033156 0      0   0   0            0            0            


*033156 ADD 	0,034115
INITIAL
C(AC)=000000 000000 
C(E)=777377 777777 
FINAL
C(AC)=777377 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033156 033156 0   0   270000034115 0            777377777777 
IT1	033156 0      0   0   270000034115 0            777377777777 
AT3	033156 0      0   0   000000034115 0            270000034115 
AT6	033156 034115 0   0   000000034115 0            270000034115 
FT0	033156 034115 0   0   777377777777 0            270000034115 
FT1A	033156 034115 0   0   777377777777 0            777377777777 
FT2	033156 034115 0   0   0            0            777377777777 
FT2RQ	033156 034115 0   0   0            0            777377777777 
FT3	033156 034115 0   0   0            0            777377777777 
FT9	033157 034115 0   0   0            0            777377777777 
ET0	033157 034115 0   0   777377777777 0            777377777777 
ST1	033157 034115 0   0   777377777777 0            777377777777 
ST2	033157 034115 0   0   777377777777 0            777377777777 
ST9	033157 034115 0   0   777377777777 0            777377777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 420
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0610

*033157 CAME	0,034115
INITIAL
C(AC)=777377 777777 
C(E)=777377 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033157 033157 0   0   312000034115 0            777377777777 
IT1	033157 0      0   0   312000034115 0            777377777777 
AT3	033157 0      0   0   000000034115 0            312000034115 
AT6	033157 034115 0   0   000000034115 0            312000034115 
FT0	033157 034115 0   0   777377777777 0            312000034115 
FT1A	033157 034115 0   0   777377777777 0            777377777777 
FT2	033157 034115 0   0   0            0            777377777777 
FT2RQ	033157 034115 0   0   777377777777 0            777377777777 
FT3	033157 034115 0   0   777377777777 0            777377777777 
FT9	033160 034115 0   0   777377777777 0            777377777777 
ET0	033161 034115 0   0   0            0            777377777777 
ST1A	033161 034115 0   0   0            0            777377777777 
ST9	033161 034115 0   0   0            0            777377777777 


*033161 JUMPA	0,033162
INITIAL
C(AC)=777377 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033161 033161 0   0   324000033162 0            000000033162 
IT1	033161 0      0   0   324000033162 0            000000033162 
AT3	033161 0      0   0   000000033162 0            324000033162 
AT6	033161 033162 0   0   000000033162 0            324000033162 
FT1A	033161 033162 0   0   000000033162 0            000000033162 
FT2	033161 033162 0   0   0            0            000000033162 
FT2RQ	033161 033162 0   0   777377777777 0            000000033162 
FT3	033161 033162 0   0   777377777777 0            000000033162 
FT9	033162 033162 0   0   777377777777 0            000000033162 
ET0	033162 033162 0   0   777377777777 0            000000033162 
ST1A	033162 033162 0   0   777377777777 0            000000033162 
ST9	033162 033162 0   0   777377777777 0            000000033162 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 421
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0611

*033162 SETZ 	0,000000
INITIAL
C(AC)=777377 777777 
C(E)=777377 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033162 033162 0   0   400000000000 0            0            
IT1	033162 0      0   0   400000000000 0            0            
AT3	033162 0      0   0   0            0            400000000000 
AT6	033162 0      0   0   0            0            400000000000 
FT1A	033162 0      0   0   0            0            0            
FT9	033163 0      0   0   0            0            0            
ET0	033163 0      0   0   0            0            0            
ST1	033163 0      0   0   0            0            0            
ST2	033163 0      0   0   0            0            0            
ST9	033163 0      0   0   0            0            0            


*033163 ADD 	0,034116
INITIAL
C(AC)=000000 000000 
C(E)=776777 777777 
FINAL
C(AC)=776777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033163 033163 0   0   270000034116 0            776777777777 
IT1	033163 0      0   0   270000034116 0            776777777777 
AT3	033163 0      0   0   000000034116 0            270000034116 
AT6	033163 034116 0   0   000000034116 0            270000034116 
FT0	033163 034116 0   0   776777777777 0            270000034116 
FT1A	033163 034116 0   0   776777777777 0            776777777777 
FT2	033163 034116 0   0   0            0            776777777777 
FT2RQ	033163 034116 0   0   0            0            776777777777 
FT3	033163 034116 0   0   0            0            776777777777 
FT9	033164 034116 0   0   0            0            776777777777 
ET0	033164 034116 0   0   776777777777 0            776777777777 
ST1	033164 034116 0   0   776777777777 0            776777777777 
ST2	033164 034116 0   0   776777777777 0            776777777777 
ST9	033164 034116 0   0   776777777777 0            776777777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 422
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0612

*033164 CAME	0,034116
INITIAL
C(AC)=776777 777777 
C(E)=776777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033164 033164 0   0   312000034116 0            776777777777 
IT1	033164 0      0   0   312000034116 0            776777777777 
AT3	033164 0      0   0   000000034116 0            312000034116 
AT6	033164 034116 0   0   000000034116 0            312000034116 
FT0	033164 034116 0   0   776777777777 0            312000034116 
FT1A	033164 034116 0   0   776777777777 0            776777777777 
FT2	033164 034116 0   0   0            0            776777777777 
FT2RQ	033164 034116 0   0   776777777777 0            776777777777 
FT3	033164 034116 0   0   776777777777 0            776777777777 
FT9	033165 034116 0   0   776777777777 0            776777777777 
ET0	033166 034116 0   0   0            0            776777777777 
ST1A	033166 034116 0   0   0            0            776777777777 
ST9	033166 034116 0   0   0            0            776777777777 


*033166 JUMPA	0,033167
INITIAL
C(AC)=776777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033166 033166 0   0   324000033167 0            000000033167 
IT1	033166 0      0   0   324000033167 0            000000033167 
AT3	033166 0      0   0   000000033167 0            324000033167 
AT6	033166 033167 0   0   000000033167 0            324000033167 
FT1A	033166 033167 0   0   000000033167 0            000000033167 
FT2	033166 033167 0   0   0            0            000000033167 
FT2RQ	033166 033167 0   0   776777777777 0            000000033167 
FT3	033166 033167 0   0   776777777777 0            000000033167 
FT9	033167 033167 0   0   776777777777 0            000000033167 
ET0	033167 033167 0   0   776777777777 0            000000033167 
ST1A	033167 033167 0   0   776777777777 0            000000033167 
ST9	033167 033167 0   0   776777777777 0            000000033167 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 423
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0613

*033167 SETZ 	0,000000
INITIAL
C(AC)=776777 777777 
C(E)=776777 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033167 033167 0   0   400000000000 0            0            
IT1	033167 0      0   0   400000000000 0            0            
AT3	033167 0      0   0   0            0            400000000000 
AT6	033167 0      0   0   0            0            400000000000 
FT1A	033167 0      0   0   0            0            0            
FT9	033170 0      0   0   0            0            0            
ET0	033170 0      0   0   0            0            0            
ST1	033170 0      0   0   0            0            0            
ST2	033170 0      0   0   0            0            0            
ST9	033170 0      0   0   0            0            0            


*033170 ADD 	0,034117
INITIAL
C(AC)=000000 000000 
C(E)=775777 777777 
FINAL
C(AC)=775777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033170 033170 0   0   270000034117 0            775777777777 
IT1	033170 0      0   0   270000034117 0            775777777777 
AT3	033170 0      0   0   000000034117 0            270000034117 
AT6	033170 034117 0   0   000000034117 0            270000034117 
FT0	033170 034117 0   0   775777777777 0            270000034117 
FT1A	033170 034117 0   0   775777777777 0            775777777777 
FT2	033170 034117 0   0   0            0            775777777777 
FT2RQ	033170 034117 0   0   0            0            775777777777 
FT3	033170 034117 0   0   0            0            775777777777 
FT9	033171 034117 0   0   0            0            775777777777 
ET0	033171 034117 0   0   775777777777 0            775777777777 
ST1	033171 034117 0   0   775777777777 0            775777777777 
ST2	033171 034117 0   0   775777777777 0            775777777777 
ST9	033171 034117 0   0   775777777777 0            775777777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 424
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0614

*033171 CAME	0,034117
INITIAL
C(AC)=775777 777777 
C(E)=775777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033171 033171 0   0   312000034117 0            775777777777 
IT1	033171 0      0   0   312000034117 0            775777777777 
AT3	033171 0      0   0   000000034117 0            312000034117 
AT6	033171 034117 0   0   000000034117 0            312000034117 
FT0	033171 034117 0   0   775777777777 0            312000034117 
FT1A	033171 034117 0   0   775777777777 0            775777777777 
FT2	033171 034117 0   0   0            0            775777777777 
FT2RQ	033171 034117 0   0   775777777777 0            775777777777 
FT3	033171 034117 0   0   775777777777 0            775777777777 
FT9	033172 034117 0   0   775777777777 0            775777777777 
ET0	033173 034117 0   0   0            0            775777777777 
ST1A	033173 034117 0   0   0            0            775777777777 
ST9	033173 034117 0   0   0            0            775777777777 


*033173 JUMPA	0,033174
INITIAL
C(AC)=775777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033173 033173 0   0   324000033174 0            000000033174 
IT1	033173 0      0   0   324000033174 0            000000033174 
AT3	033173 0      0   0   000000033174 0            324000033174 
AT6	033173 033174 0   0   000000033174 0            324000033174 
FT1A	033173 033174 0   0   000000033174 0            000000033174 
FT2	033173 033174 0   0   0            0            000000033174 
FT2RQ	033173 033174 0   0   775777777777 0            000000033174 
FT3	033173 033174 0   0   775777777777 0            000000033174 
FT9	033174 033174 0   0   775777777777 0            000000033174 
ET0	033174 033174 0   0   775777777777 0            000000033174 
ST1A	033174 033174 0   0   775777777777 0            000000033174 
ST9	033174 033174 0   0   775777777777 0            000000033174 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 425
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0615

*033174 SETZ 	0,000000
INITIAL
C(AC)=775777 777777 
C(E)=775777 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033174 033174 0   0   400000000000 0            0            
IT1	033174 0      0   0   400000000000 0            0            
AT3	033174 0      0   0   0            0            400000000000 
AT6	033174 0      0   0   0            0            400000000000 
FT1A	033174 0      0   0   0            0            0            
FT9	033175 0      0   0   0            0            0            
ET0	033175 0      0   0   0            0            0            
ST1	033175 0      0   0   0            0            0            
ST2	033175 0      0   0   0            0            0            
ST9	033175 0      0   0   0            0            0            


*033175 ADD 	0,034120
INITIAL
C(AC)=000000 000000 
C(E)=773777 777777 
FINAL
C(AC)=773777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033175 033175 0   0   270000034120 0            773777777777 
IT1	033175 0      0   0   270000034120 0            773777777777 
AT3	033175 0      0   0   000000034120 0            270000034120 
AT6	033175 034120 0   0   000000034120 0            270000034120 
FT0	033175 034120 0   0   773777777777 0            270000034120 
FT1A	033175 034120 0   0   773777777777 0            773777777777 
FT2	033175 034120 0   0   0            0            773777777777 
FT2RQ	033175 034120 0   0   0            0            773777777777 
FT3	033175 034120 0   0   0            0            773777777777 
FT9	033176 034120 0   0   0            0            773777777777 
ET0	033176 034120 0   0   773777777777 0            773777777777 
ST1	033176 034120 0   0   773777777777 0            773777777777 
ST2	033176 034120 0   0   773777777777 0            773777777777 
ST9	033176 034120 0   0   773777777777 0            773777777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 426
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0616

*033176 CAME	0,034120
INITIAL
C(AC)=773777 777777 
C(E)=773777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033176 033176 0   0   312000034120 0            773777777777 
IT1	033176 0      0   0   312000034120 0            773777777777 
AT3	033176 0      0   0   000000034120 0            312000034120 
AT6	033176 034120 0   0   000000034120 0            312000034120 
FT0	033176 034120 0   0   773777777777 0            312000034120 
FT1A	033176 034120 0   0   773777777777 0            773777777777 
FT2	033176 034120 0   0   0            0            773777777777 
FT2RQ	033176 034120 0   0   773777777777 0            773777777777 
FT3	033176 034120 0   0   773777777777 0            773777777777 
FT9	033177 034120 0   0   773777777777 0            773777777777 
ET0	0      034120 0   0   0            0            773777777777 
ST1A	0      034120 0   0   0            0            773777777777 
ST9	0      034120 0   0   0            0            773777777777 


*033200 JUMPA	0,033201
INITIAL
C(AC)=773777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	0      0      0   0   324000033201 0            000000033201 
IT1	0      0      0   0   324000033201 0            000000033201 
AT3	0      0      0   0   000000033201 0            324000033201 
AT6	0      033201 0   0   000000033201 0            324000033201 
FT1A	0      033201 0   0   000000033201 0            000000033201 
FT2	0      033201 0   0   0            0            000000033201 
FT2RQ	0      033201 0   0   773777777777 0            000000033201 
FT3	0      033201 0   0   773777777777 0            000000033201 
FT9	033201 033201 0   0   773777777777 0            000000033201 
ET0	033201 033201 0   0   773777777777 0            000000033201 
ST1A	033201 033201 0   0   773777777777 0            000000033201 
ST9	033201 033201 0   0   773777777777 0            000000033201 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 427
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0617

*033201 SETZ 	0,000000
INITIAL
C(AC)=773777 777777 
C(E)=773777 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033201 033201 0   0   400000000000 0            0            
IT1	033201 0      0   0   400000000000 0            0            
AT3	033201 0      0   0   0            0            400000000000 
AT6	033201 0      0   0   0            0            400000000000 
FT1A	033201 0      0   0   0            0            0            
FT9	033202 0      0   0   0            0            0            
ET0	033202 0      0   0   0            0            0            
ST1	033202 0      0   0   0            0            0            
ST2	033202 0      0   0   0            0            0            
ST9	033202 0      0   0   0            0            0            


*033202 ADD 	0,034121
INITIAL
C(AC)=000000 000000 
C(E)=767777 777777 
FINAL
C(AC)=767777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033202 033202 0   0   270000034121 0            767777777777 
IT1	033202 0      0   0   270000034121 0            767777777777 
AT3	033202 0      0   0   000000034121 0            270000034121 
AT6	033202 034121 0   0   000000034121 0            270000034121 
FT0	033202 034121 0   0   767777777777 0            270000034121 
FT1A	033202 034121 0   0   767777777777 0            767777777777 
FT2	033202 034121 0   0   0            0            767777777777 
FT2RQ	033202 034121 0   0   0            0            767777777777 
FT3	033202 034121 0   0   0            0            767777777777 
FT9	033203 034121 0   0   0            0            767777777777 
ET0	033203 034121 0   0   767777777777 0            767777777777 
ST1	033203 034121 0   0   767777777777 0            767777777777 
ST2	033203 034121 0   0   767777777777 0            767777777777 
ST9	033203 034121 0   0   767777777777 0            767777777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 428
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0618

*033203 CAME	0,034121
INITIAL
C(AC)=767777 777777 
C(E)=767777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033203 033203 0   0   312000034121 0            767777777777 
IT1	033203 0      0   0   312000034121 0            767777777777 
AT3	033203 0      0   0   000000034121 0            312000034121 
AT6	033203 034121 0   0   000000034121 0            312000034121 
FT0	033203 034121 0   0   767777777777 0            312000034121 
FT1A	033203 034121 0   0   767777777777 0            767777777777 
FT2	033203 034121 0   0   0            0            767777777777 
FT2RQ	033203 034121 0   0   767777777777 0            767777777777 
FT3	033203 034121 0   0   767777777777 0            767777777777 
FT9	033204 034121 0   0   767777777777 0            767777777777 
ET0	033205 034121 0   0   0            0            767777777777 
ST1A	033205 034121 0   0   0            0            767777777777 
ST9	033205 034121 0   0   0            0            767777777777 


*033205 JUMPA	0,033206
INITIAL
C(AC)=767777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033205 033205 0   0   324000033206 0            000000033206 
IT1	033205 0      0   0   324000033206 0            000000033206 
AT3	033205 0      0   0   000000033206 0            324000033206 
AT6	033205 033206 0   0   000000033206 0            324000033206 
FT1A	033205 033206 0   0   000000033206 0            000000033206 
FT2	033205 033206 0   0   0            0            000000033206 
FT2RQ	033205 033206 0   0   767777777777 0            000000033206 
FT3	033205 033206 0   0   767777777777 0            000000033206 
FT9	033206 033206 0   0   767777777777 0            000000033206 
ET0	033206 033206 0   0   767777777777 0            000000033206 
ST1A	033206 033206 0   0   767777777777 0            000000033206 
ST9	033206 033206 0   0   767777777777 0            000000033206 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 429
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0619

*033206 SETZ 	0,000000
INITIAL
C(AC)=767777 777777 
C(E)=767777 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033206 033206 0   0   400000000000 0            0            
IT1	033206 0      0   0   400000000000 0            0            
AT3	033206 0      0   0   0            0            400000000000 
AT6	033206 0      0   0   0            0            400000000000 
FT1A	033206 0      0   0   0            0            0            
FT9	033207 0      0   0   0            0            0            
ET0	033207 0      0   0   0            0            0            
ST1	033207 0      0   0   0            0            0            
ST2	033207 0      0   0   0            0            0            
ST9	033207 0      0   0   0            0            0            


*033207 ADD 	0,034122
INITIAL
C(AC)=000000 000000 
C(E)=757777 777777 
FINAL
C(AC)=757777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033207 033207 0   0   270000034122 0            757777777777 
IT1	033207 0      0   0   270000034122 0            757777777777 
AT3	033207 0      0   0   000000034122 0            270000034122 
AT6	033207 034122 0   0   000000034122 0            270000034122 
FT0	033207 034122 0   0   757777777777 0            270000034122 
FT1A	033207 034122 0   0   757777777777 0            757777777777 
FT2	033207 034122 0   0   0            0            757777777777 
FT2RQ	033207 034122 0   0   0            0            757777777777 
FT3	033207 034122 0   0   0            0            757777777777 
FT9	033210 034122 0   0   0            0            757777777777 
ET0	033210 034122 0   0   757777777777 0            757777777777 
ST1	033210 034122 0   0   757777777777 0            757777777777 
ST2	033210 034122 0   0   757777777777 0            757777777777 
ST9	033210 034122 0   0   757777777777 0            757777777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 430
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0620

*033210 CAME	0,034122
INITIAL
C(AC)=757777 777777 
C(E)=757777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033210 033210 0   0   312000034122 0            757777777777 
IT1	033210 0      0   0   312000034122 0            757777777777 
AT3	033210 0      0   0   000000034122 0            312000034122 
AT6	033210 034122 0   0   000000034122 0            312000034122 
FT0	033210 034122 0   0   757777777777 0            312000034122 
FT1A	033210 034122 0   0   757777777777 0            757777777777 
FT2	033210 034122 0   0   0            0            757777777777 
FT2RQ	033210 034122 0   0   757777777777 0            757777777777 
FT3	033210 034122 0   0   757777777777 0            757777777777 
FT9	033211 034122 0   0   757777777777 0            757777777777 
ET0	033212 034122 0   0   0            0            757777777777 
ST1A	033212 034122 0   0   0            0            757777777777 
ST9	033212 034122 0   0   0            0            757777777777 


*033212 JUMPA	0,033213
INITIAL
C(AC)=757777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033212 033212 0   0   324000033213 0            000000033213 
IT1	033212 0      0   0   324000033213 0            000000033213 
AT3	033212 0      0   0   000000033213 0            324000033213 
AT6	033212 033213 0   0   000000033213 0            324000033213 
FT1A	033212 033213 0   0   000000033213 0            000000033213 
FT2	033212 033213 0   0   0            0            000000033213 
FT2RQ	033212 033213 0   0   757777777777 0            000000033213 
FT3	033212 033213 0   0   757777777777 0            000000033213 
FT9	033213 033213 0   0   757777777777 0            000000033213 
ET0	033213 033213 0   0   757777777777 0            000000033213 
ST1A	033213 033213 0   0   757777777777 0            000000033213 
ST9	033213 033213 0   0   757777777777 0            000000033213 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 431
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0621

*033213 SETZ 	0,000000
INITIAL
C(AC)=757777 777777 
C(E)=757777 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033213 033213 0   0   400000000000 0            0            
IT1	033213 0      0   0   400000000000 0            0            
AT3	033213 0      0   0   0            0            400000000000 
AT6	033213 0      0   0   0            0            400000000000 
FT1A	033213 0      0   0   0            0            0            
FT9	033214 0      0   0   0            0            0            
ET0	033214 0      0   0   0            0            0            
ST1	033214 0      0   0   0            0            0            
ST2	033214 0      0   0   0            0            0            
ST9	033214 0      0   0   0            0            0            


*033214 ADD 	0,034123
INITIAL
C(AC)=000000 000000 
C(E)=737777 777777 
FINAL
C(AC)=737777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033214 033214 0   0   270000034123 0            737777777777 
IT1	033214 0      0   0   270000034123 0            737777777777 
AT3	033214 0      0   0   000000034123 0            270000034123 
AT6	033214 034123 0   0   000000034123 0            270000034123 
FT0	033214 034123 0   0   737777777777 0            270000034123 
FT1A	033214 034123 0   0   737777777777 0            737777777777 
FT2	033214 034123 0   0   0            0            737777777777 
FT2RQ	033214 034123 0   0   0            0            737777777777 
FT3	033214 034123 0   0   0            0            737777777777 
FT9	033215 034123 0   0   0            0            737777777777 
ET0	033215 034123 0   0   737777777777 0            737777777777 
ST1	033215 034123 0   0   737777777777 0            737777777777 
ST2	033215 034123 0   0   737777777777 0            737777777777 
ST9	033215 034123 0   0   737777777777 0            737777777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 432
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0622

*033215 CAME	0,034123
INITIAL
C(AC)=737777 777777 
C(E)=737777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033215 033215 0   0   312000034123 0            737777777777 
IT1	033215 0      0   0   312000034123 0            737777777777 
AT3	033215 0      0   0   000000034123 0            312000034123 
AT6	033215 034123 0   0   000000034123 0            312000034123 
FT0	033215 034123 0   0   737777777777 0            312000034123 
FT1A	033215 034123 0   0   737777777777 0            737777777777 
FT2	033215 034123 0   0   0            0            737777777777 
FT2RQ	033215 034123 0   0   737777777777 0            737777777777 
FT3	033215 034123 0   0   737777777777 0            737777777777 
FT9	033216 034123 0   0   737777777777 0            737777777777 
ET0	033217 034123 0   0   0            0            737777777777 
ST1A	033217 034123 0   0   0            0            737777777777 
ST9	033217 034123 0   0   0            0            737777777777 


*033217 JUMPA	0,033220
INITIAL
C(AC)=737777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033217 033217 0   0   324000033220 0            000000033220 
IT1	033217 0      0   0   324000033220 0            000000033220 
AT3	033217 0      0   0   000000033220 0            324000033220 
AT6	033217 033220 0   0   000000033220 0            324000033220 
FT1A	033217 033220 0   0   000000033220 0            000000033220 
FT2	033217 033220 0   0   0            0            000000033220 
FT2RQ	033217 033220 0   0   737777777777 0            000000033220 
FT3	033217 033220 0   0   737777777777 0            000000033220 
FT9	033220 033220 0   0   737777777777 0            000000033220 
ET0	033220 033220 0   0   737777777777 0            000000033220 
ST1A	033220 033220 0   0   737777777777 0            000000033220 
ST9	033220 033220 0   0   737777777777 0            000000033220 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 433
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0623

*033220 SETZ 	0,000000
INITIAL
C(AC)=737777 777777 
C(E)=737777 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033220 033220 0   0   400000000000 0            0            
IT1	033220 0      0   0   400000000000 0            0            
AT3	033220 0      0   0   0            0            400000000000 
AT6	033220 0      0   0   0            0            400000000000 
FT1A	033220 0      0   0   0            0            0            
FT9	033221 0      0   0   0            0            0            
ET0	033221 0      0   0   0            0            0            
ST1	033221 0      0   0   0            0            0            
ST2	033221 0      0   0   0            0            0            
ST9	033221 0      0   0   0            0            0            


*033221 ADD 	0,034124
INITIAL
C(AC)=000000 000000 
C(E)=677777 777777 
FINAL
C(AC)=677777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033221 033221 0   0   270000034124 0            677777777777 
IT1	033221 0      0   0   270000034124 0            677777777777 
AT3	033221 0      0   0   000000034124 0            270000034124 
AT6	033221 034124 0   0   000000034124 0            270000034124 
FT0	033221 034124 0   0   677777777777 0            270000034124 
FT1A	033221 034124 0   0   677777777777 0            677777777777 
FT2	033221 034124 0   0   0            0            677777777777 
FT2RQ	033221 034124 0   0   0            0            677777777777 
FT3	033221 034124 0   0   0            0            677777777777 
FT9	033222 034124 0   0   0            0            677777777777 
ET0	033222 034124 0   0   677777777777 0            677777777777 
ST1	033222 034124 0   0   677777777777 0            677777777777 
ST2	033222 034124 0   0   677777777777 0            677777777777 
ST9	033222 034124 0   0   677777777777 0            677777777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 434
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0624

*033222 CAME	0,034124
INITIAL
C(AC)=677777 777777 
C(E)=677777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033222 033222 0   0   312000034124 0            677777777777 
IT1	033222 0      0   0   312000034124 0            677777777777 
AT3	033222 0      0   0   000000034124 0            312000034124 
AT6	033222 034124 0   0   000000034124 0            312000034124 
FT0	033222 034124 0   0   677777777777 0            312000034124 
FT1A	033222 034124 0   0   677777777777 0            677777777777 
FT2	033222 034124 0   0   0            0            677777777777 
FT2RQ	033222 034124 0   0   677777777777 0            677777777777 
FT3	033222 034124 0   0   677777777777 0            677777777777 
FT9	033223 034124 0   0   677777777777 0            677777777777 
ET0	033224 034124 0   0   0            0            677777777777 
ST1A	033224 034124 0   0   0            0            677777777777 
ST9	033224 034124 0   0   0            0            677777777777 


*033224 JUMPA	0,033225
INITIAL
C(AC)=677777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033224 033224 0   0   324000033225 0            000000033225 
IT1	033224 0      0   0   324000033225 0            000000033225 
AT3	033224 0      0   0   000000033225 0            324000033225 
AT6	033224 033225 0   0   000000033225 0            324000033225 
FT1A	033224 033225 0   0   000000033225 0            000000033225 
FT2	033224 033225 0   0   0            0            000000033225 
FT2RQ	033224 033225 0   0   677777777777 0            000000033225 
FT3	033224 033225 0   0   677777777777 0            000000033225 
FT9	033225 033225 0   0   677777777777 0            000000033225 
ET0	033225 033225 0   0   677777777777 0            000000033225 
ST1A	033225 033225 0   0   677777777777 0            000000033225 
ST9	033225 033225 0   0   677777777777 0            000000033225 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 435
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0625

*033225 SETZ 	0,000000
INITIAL
C(AC)=677777 777777 
C(E)=677777 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033225 033225 0   0   400000000000 0            0            
IT1	033225 0      0   0   400000000000 0            0            
AT3	033225 0      0   0   0            0            400000000000 
AT6	033225 0      0   0   0            0            400000000000 
FT1A	033225 0      0   0   0            0            0            
FT9	033226 0      0   0   0            0            0            
ET0	033226 0      0   0   0            0            0            
ST1	033226 0      0   0   0            0            0            
ST2	033226 0      0   0   0            0            0            
ST9	033226 0      0   0   0            0            0            


*033226 ADD 	0,034125
INITIAL
C(AC)=000000 000000 
C(E)=577777 777777 
FINAL
C(AC)=577777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033226 033226 0   0   270000034125 0            577777777777 
IT1	033226 0      0   0   270000034125 0            577777777777 
AT3	033226 0      0   0   000000034125 0            270000034125 
AT6	033226 034125 0   0   000000034125 0            270000034125 
FT0	033226 034125 0   0   577777777777 0            270000034125 
FT1A	033226 034125 0   0   577777777777 0            577777777777 
FT2	033226 034125 0   0   0            0            577777777777 
FT2RQ	033226 034125 0   0   0            0            577777777777 
FT3	033226 034125 0   0   0            0            577777777777 
FT9	033227 034125 0   0   0            0            577777777777 
ET0	033227 034125 0   0   577777777777 0            577777777777 
ST1	033227 034125 0   0   577777777777 0            577777777777 
ST2	033227 034125 0   0   577777777777 0            577777777777 
ST9	033227 034125 0   0   577777777777 0            577777777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 436
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0626

*033227 CAME	0,034125
INITIAL
C(AC)=577777 777777 
C(E)=577777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033227 033227 0   0   312000034125 0            577777777777 
IT1	033227 0      0   0   312000034125 0            577777777777 
AT3	033227 0      0   0   000000034125 0            312000034125 
AT6	033227 034125 0   0   000000034125 0            312000034125 
FT0	033227 034125 0   0   577777777777 0            312000034125 
FT1A	033227 034125 0   0   577777777777 0            577777777777 
FT2	033227 034125 0   0   0            0            577777777777 
FT2RQ	033227 034125 0   0   577777777777 0            577777777777 
FT3	033227 034125 0   0   577777777777 0            577777777777 
FT9	033230 034125 0   0   577777777777 0            577777777777 
ET0	033231 034125 0   0   0            0            577777777777 
ST1A	033231 034125 0   0   0            0            577777777777 
ST9	033231 034125 0   0   0            0            577777777777 


*033231 JUMPA	0,033232
INITIAL
C(AC)=577777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033231 033231 0   0   324000033232 0            000000033232 
IT1	033231 0      0   0   324000033232 0            000000033232 
AT3	033231 0      0   0   000000033232 0            324000033232 
AT6	033231 033232 0   0   000000033232 0            324000033232 
FT1A	033231 033232 0   0   000000033232 0            000000033232 
FT2	033231 033232 0   0   0            0            000000033232 
FT2RQ	033231 033232 0   0   577777777777 0            000000033232 
FT3	033231 033232 0   0   577777777777 0            000000033232 
FT9	033232 033232 0   0   577777777777 0            000000033232 
ET0	033232 033232 0   0   577777777777 0            000000033232 
ST1A	033232 033232 0   0   577777777777 0            000000033232 
ST9	033232 033232 0   0   577777777777 0            000000033232 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 437
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0627

*033232 SETZ 	0,000000
INITIAL
C(AC)=577777 777777 
C(E)=577777 777777 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033232 033232 0   0   400000000000 0            0            
IT1	033232 0      0   0   400000000000 0            0            
AT3	033232 0      0   0   0            0            400000000000 
AT6	033232 0      0   0   0            0            400000000000 
FT1A	033232 0      0   0   0            0            0            
FT9	033233 0      0   0   0            0            0            
ET0	033233 0      0   0   0            0            0            
ST1	033233 0      0   0   0            0            0            
ST2	033233 0      0   0   0            0            0            
ST9	033233 0      0   0   0            0            0            


*033233 ADD 	0,034126
INITIAL
C(AC)=000000 000000 
C(E)=377777 777777 
FINAL
C(AC)=377777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033233 033233 0   0   270000034126 0            377777777777 
IT1	033233 0      0   0   270000034126 0            377777777777 
AT3	033233 0      0   0   000000034126 0            270000034126 
AT6	033233 034126 0   0   000000034126 0            270000034126 
FT0	033233 034126 0   0   377777777777 0            270000034126 
FT1A	033233 034126 0   0   377777777777 0            377777777777 
FT2	033233 034126 0   0   0            0            377777777777 
FT2RQ	033233 034126 0   0   0            0            377777777777 
FT3	033233 034126 0   0   0            0            377777777777 
FT9	033234 034126 0   0   0            0            377777777777 
ET0	033234 034126 0   0   377777777777 0            377777777777 
ST1	033234 034126 0   0   377777777777 0            377777777777 
ST2	033234 034126 0   0   377777777777 0            377777777777 
ST9	033234 034126 0   0   377777777777 0            377777777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 438
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0628

*033234 CAME	0,034126
INITIAL
C(AC)=377777 777777 
C(E)=377777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033234 033234 0   0   312000034126 0            377777777777 
IT1	033234 0      0   0   312000034126 0            377777777777 
AT3	033234 0      0   0   000000034126 0            312000034126 
AT6	033234 034126 0   0   000000034126 0            312000034126 
FT0	033234 034126 0   0   377777777777 0            312000034126 
FT1A	033234 034126 0   0   377777777777 0            377777777777 
FT2	033234 034126 0   0   0            0            377777777777 
FT2RQ	033234 034126 0   0   377777777777 0            377777777777 
FT3	033234 034126 0   0   377777777777 0            377777777777 
FT9	033235 034126 0   0   377777777777 0            377777777777 
ET0	033236 034126 0   0   0            0            377777777777 
ST1A	033236 034126 0   0   0            0            377777777777 
ST9	033236 034126 0   0   0            0            377777777777 


*033236 JUMPA	0,033237
INITIAL
C(AC)=377777 777777 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033236 033236 0   0   324000033237 0            000000033237 
IT1	033236 0      0   0   324000033237 0            000000033237 
AT3	033236 0      0   0   000000033237 0            324000033237 
AT6	033236 033237 0   0   000000033237 0            324000033237 
FT1A	033236 033237 0   0   000000033237 0            000000033237 
FT2	033236 033237 0   0   0            0            000000033237 
FT2RQ	033236 033237 0   0   377777777777 0            000000033237 
FT3	033236 033237 0   0   377777777777 0            000000033237 
FT9	033237 033237 0   0   377777777777 0            000000033237 
ET0	033237 033237 0   0   377777777777 0            000000033237 
ST1A	033237 033237 0   0   377777777777 0            000000033237 
ST9	033237 033237 0   0   377777777777 0            000000033237 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 439
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0629

*033237 HRRZI	0,000001
INITIAL
C(AC)=377777 777777 
FINAL
C(AC)=000000 000001 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033237 033237 0   0   551000000001 0            000000000001 
IT1	033237 0      0   0   551000000001 0            000000000001 
AT3	033237 0      0   0   000000000001 0            551000000001 
AT6	033237 000001 0   0   000000000001 0            551000000001 
FT1A	033237 000001 0   0   000000000001 0            000000000001 
FT9	033240 000001 0   0   000000000001 0            000000000001 
ET0	033240 000001 0   0   000000000001 0            000000000001 
ST1	033240 000001 0   0   000000000001 0            000000000001 
ST2	033240 000001 0   0   000000000001 0            000000000001 
ST9	033240 000001 0   0   000000000001 0            000000000001 


*033240 ADD 	0,034017
INITIAL
C(AC)=000000 000001 
C(E)=000000 000001 
FINAL
C(AC)=000000 000002 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033240 033240 0   0   270000034017 0            000000000001 
IT1	033240 0      0   0   270000034017 0            000000000001 
AT3	033240 0      0   0   000000034017 0            270000034017 
AT6	033240 034017 0   0   000000034017 0            270000034017 
FT0	033240 034017 0   0   000000000001 0            270000034017 
FT1A	033240 034017 0   0   000000000001 0            000000000001 
FT2	033240 034017 0   0   0            0            000000000001 
FT2RQ	033240 034017 0   0   000000000001 0            000000000001 
FT3	033240 034017 0   0   000000000001 0            000000000001 
FT9	033241 034017 0   0   000000000001 0            000000000001 
ET0	033241 034017 0   0   000000000002 0            000000000001 
ST1	033241 034017 0   0   000000000002 0            000000000001 
ST2	033241 034017 0   0   000000000002 0            000000000001 
ST9	033241 034017 0   0   000000000002 0            000000000001 


*033241 CAME	0,034020
INITIAL
C(AC)=000000 000002 
C(E)=000000 000002 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033241 033241 0   0   312000034020 0            000000000002 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 440
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0630

IT1	033241 0      0   0   312000034020 0            000000000002 
AT3	033241 0      0   0   000000034020 0            312000034020 
AT6	033241 034020 0   0   000000034020 0            312000034020 
FT0	033241 034020 0   0   000000000002 0            312000034020 
FT1A	033241 034020 0   0   000000000002 0            000000000002 
FT2	033241 034020 0   0   0            0            000000000002 
FT2RQ	033241 034020 0   0   000000000002 0            000000000002 
FT3	033241 034020 0   0   000000000002 0            000000000002 
FT9	033242 034020 0   0   000000000002 0            000000000002 
ET0	033243 034020 0   0   0            0            000000000002 
ST1A	033243 034020 0   0   0            0            000000000002 
ST9	033243 034020 0   0   0            0            000000000002 


*033243 JUMPA	0,033244
INITIAL
C(AC)=000000 000002 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033243 033243 0   0   324000033244 0            000000033244 
IT1	033243 0      0   0   324000033244 0            000000033244 
AT3	033243 0      0   0   000000033244 0            324000033244 
AT6	033243 033244 0   0   000000033244 0            324000033244 
FT1A	033243 033244 0   0   000000033244 0            000000033244 
FT2	033243 033244 0   0   0            0            000000033244 
FT2RQ	033243 033244 0   0   000000000002 0            000000033244 
FT3	033243 033244 0   0   000000000002 0            000000033244 
FT9	033244 033244 0   0   000000000002 0            000000033244 
ET0	033244 033244 0   0   000000000002 0            000000033244 
ST1A	033244 033244 0   0   000000000002 0            000000033244 
ST9	033244 033244 0   0   000000000002 0            000000033244 


*033244 HRRZI	0,000002
INITIAL
C(AC)=000000 000002 
FINAL
C(AC)=000000 000002 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033244 033244 0   0   551000000002 0            000000000002 
IT1	033244 0      0   0   551000000002 0            000000000002 
AT3	033244 0      0   0   000000000002 0            551000000002 
AT6	033244 000002 0   0   000000000002 0            551000000002 
FT1A	033244 000002 0   0   000000000002 0            000000000002 
FT9	033245 000002 0   0   000000000002 0            000000000002 
ET0	033245 000002 0   0   000000000002 0            000000000002 
ST1	033245 000002 0   0   000000000002 0            000000000002 
ST2	033245 000002 0   0   000000000002 0            000000000002 
ST9	033245 000002 0   0   000000000002 0            000000000002 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 441
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0631



*033245 ADD 	0,034020
INITIAL
C(AC)=000000 000002 
C(E)=000000 000002 
FINAL
C(AC)=000000 000004 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033245 033245 0   0   270000034020 0            000000000002 
IT1	033245 0      0   0   270000034020 0            000000000002 
AT3	033245 0      0   0   000000034020 0            270000034020 
AT6	033245 034020 0   0   000000034020 0            270000034020 
FT0	033245 034020 0   0   000000000002 0            270000034020 
FT1A	033245 034020 0   0   000000000002 0            000000000002 
FT2	033245 034020 0   0   0            0            000000000002 
FT2RQ	033245 034020 0   0   000000000002 0            000000000002 
FT3	033245 034020 0   0   000000000002 0            000000000002 
FT9	033246 034020 0   0   000000000002 0            000000000002 
ET0	033246 034020 0   0   000000000004 0            000000000002 
ST1	033246 034020 0   0   000000000004 0            000000000002 
ST2	033246 034020 0   0   000000000004 0            000000000002 
ST9	033246 034020 0   0   000000000004 0            000000000002 


*033246 CAME	0,034021
INITIAL
C(AC)=000000 000004 
C(E)=000000 000004 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033246 033246 0   0   312000034021 0            000000000004 
IT1	033246 0      0   0   312000034021 0            000000000004 
AT3	033246 0      0   0   000000034021 0            312000034021 
AT6	033246 034021 0   0   000000034021 0            312000034021 
FT0	033246 034021 0   0   000000000004 0            312000034021 
FT1A	033246 034021 0   0   000000000004 0            000000000004 
FT2	033246 034021 0   0   0            0            000000000004 
FT2RQ	033246 034021 0   0   000000000004 0            000000000004 
FT3	033246 034021 0   0   000000000004 0            000000000004 
FT9	033247 034021 0   0   000000000004 0            000000000004 
ET0	033250 034021 0   0   0            0            000000000004 
ST1A	033250 034021 0   0   0            0            000000000004 
ST9	033250 034021 0   0   0            0            000000000004 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 442
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0632

*033250 JUMPA	0,033251
INITIAL
C(AC)=000000 000004 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033250 033250 0   0   324000033251 0            000000033251 
IT1	033250 0      0   0   324000033251 0            000000033251 
AT3	033250 0      0   0   000000033251 0            324000033251 
AT6	033250 033251 0   0   000000033251 0            324000033251 
FT1A	033250 033251 0   0   000000033251 0            000000033251 
FT2	033250 033251 0   0   0            0            000000033251 
FT2RQ	033250 033251 0   0   000000000004 0            000000033251 
FT3	033250 033251 0   0   000000000004 0            000000033251 
FT9	033251 033251 0   0   000000000004 0            000000033251 
ET0	033251 033251 0   0   000000000004 0            000000033251 
ST1A	033251 033251 0   0   000000000004 0            000000033251 
ST9	033251 033251 0   0   000000000004 0            000000033251 


*033251 HRRZI	0,000004
INITIAL
C(AC)=000000 000004 
FINAL
C(AC)=000000 000004 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033251 033251 0   0   551000000004 0            000000000004 
IT1	033251 0      0   0   551000000004 0            000000000004 
AT3	033251 0      0   0   000000000004 0            551000000004 
AT6	033251 000004 0   0   000000000004 0            551000000004 
FT1A	033251 000004 0   0   000000000004 0            000000000004 
FT9	033252 000004 0   0   000000000004 0            000000000004 
ET0	033252 000004 0   0   000000000004 0            000000000004 
ST1	033252 000004 0   0   000000000004 0            000000000004 
ST2	033252 000004 0   0   000000000004 0            000000000004 
ST9	033252 000004 0   0   000000000004 0            000000000004 


*033252 ADD 	0,034021
INITIAL
C(AC)=000000 000004 
C(E)=000000 000004 
FINAL
C(AC)=000000 000010 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033252 033252 0   0   270000034021 0            000000000004 
IT1	033252 0      0   0   270000034021 0            000000000004 
AT3	033252 0      0   0   000000034021 0            270000034021 
AT6	033252 034021 0   0   000000034021 0            270000034021 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 443
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0633

FT0	033252 034021 0   0   000000000004 0            270000034021 
FT1A	033252 034021 0   0   000000000004 0            000000000004 
FT2	033252 034021 0   0   0            0            000000000004 
FT2RQ	033252 034021 0   0   000000000004 0            000000000004 
FT3	033252 034021 0   0   000000000004 0            000000000004 
FT9	033253 034021 0   0   000000000004 0            000000000004 
ET0	033253 034021 0   0   000000000010 0            000000000004 
ST1	033253 034021 0   0   000000000010 0            000000000004 
ST2	033253 034021 0   0   000000000010 0            000000000004 
ST9	033253 034021 0   0   000000000010 0            000000000004 


*033253 CAME	0,034022
INITIAL
C(AC)=000000 000010 
C(E)=000000 000010 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033253 033253 0   0   312000034022 0            000000000010 
IT1	033253 0      0   0   312000034022 0            000000000010 
AT3	033253 0      0   0   000000034022 0            312000034022 
AT6	033253 034022 0   0   000000034022 0            312000034022 
FT0	033253 034022 0   0   000000000010 0            312000034022 
FT1A	033253 034022 0   0   000000000010 0            000000000010 
FT2	033253 034022 0   0   0            0            000000000010 
FT2RQ	033253 034022 0   0   000000000010 0            000000000010 
FT3	033253 034022 0   0   000000000010 0            000000000010 
FT9	033254 034022 0   0   000000000010 0            000000000010 
ET0	033255 034022 0   0   0            0            000000000010 
ST1A	033255 034022 0   0   0            0            000000000010 
ST9	033255 034022 0   0   0            0            000000000010 


*033255 JUMPA	0,033256
INITIAL
C(AC)=000000 000010 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033255 033255 0   0   324000033256 0            000000033256 
IT1	033255 0      0   0   324000033256 0            000000033256 
AT3	033255 0      0   0   000000033256 0            324000033256 
AT6	033255 033256 0   0   000000033256 0            324000033256 
FT1A	033255 033256 0   0   000000033256 0            000000033256 
FT2	033255 033256 0   0   0            0            000000033256 
FT2RQ	033255 033256 0   0   000000000010 0            000000033256 
FT3	033255 033256 0   0   000000000010 0            000000033256 
FT9	033256 033256 0   0   000000000010 0            000000033256 
ET0	033256 033256 0   0   000000000010 0            000000033256 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 444
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0634

ST1A	033256 033256 0   0   000000000010 0            000000033256 
ST9	033256 033256 0   0   000000000010 0            000000033256 


*033256 HRRZI	0,000010
INITIAL
C(AC)=000000 000010 
FINAL
C(AC)=000000 000010 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033256 033256 0   0   551000000010 0            000000000010 
IT1	033256 0      0   0   551000000010 0            000000000010 
AT3	033256 0      0   0   000000000010 0            551000000010 
AT6	033256 000010 0   0   000000000010 0            551000000010 
FT1A	033256 000010 0   0   000000000010 0            000000000010 
FT9	033257 000010 0   0   000000000010 0            000000000010 
ET0	033257 000010 0   0   000000000010 0            000000000010 
ST1	033257 000010 0   0   000000000010 0            000000000010 
ST2	033257 000010 0   0   000000000010 0            000000000010 
ST9	033257 000010 0   0   000000000010 0            000000000010 


*033257 ADD 	0,034022
INITIAL
C(AC)=000000 000010 
C(E)=000000 000010 
FINAL
C(AC)=000000 000020 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033257 033257 0   0   270000034022 0            000000000010 
IT1	033257 0      0   0   270000034022 0            000000000010 
AT3	033257 0      0   0   000000034022 0            270000034022 
AT6	033257 034022 0   0   000000034022 0            270000034022 
FT0	033257 034022 0   0   000000000010 0            270000034022 
FT1A	033257 034022 0   0   000000000010 0            000000000010 
FT2	033257 034022 0   0   0            0            000000000010 
FT2RQ	033257 034022 0   0   000000000010 0            000000000010 
FT3	033257 034022 0   0   000000000010 0            000000000010 
FT9	033260 034022 0   0   000000000010 0            000000000010 
ET0	033260 034022 0   0   000000000020 0            000000000010 
ST1	033260 034022 0   0   000000000020 0            000000000010 
ST2	033260 034022 0   0   000000000020 0            000000000010 
ST9	033260 034022 0   0   000000000020 0            000000000010 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 445
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0635

*033260 CAME	0,034023
INITIAL
C(AC)=000000 000020 
C(E)=000000 000020 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033260 033260 0   0   312000034023 0            000000000020 
IT1	033260 0      0   0   312000034023 0            000000000020 
AT3	033260 0      0   0   000000034023 0            312000034023 
AT6	033260 034023 0   0   000000034023 0            312000034023 
FT0	033260 034023 0   0   000000000020 0            312000034023 
FT1A	033260 034023 0   0   000000000020 0            000000000020 
FT2	033260 034023 0   0   0            0            000000000020 
FT2RQ	033260 034023 0   0   000000000020 0            000000000020 
FT3	033260 034023 0   0   000000000020 0            000000000020 
FT9	033261 034023 0   0   000000000020 0            000000000020 
ET0	033262 034023 0   0   0            0            000000000020 
ST1A	033262 034023 0   0   0            0            000000000020 
ST9	033262 034023 0   0   0            0            000000000020 


*033262 JUMPA	0,033263
INITIAL
C(AC)=000000 000020 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033262 033262 0   0   324000033263 0            000000033263 
IT1	033262 0      0   0   324000033263 0            000000033263 
AT3	033262 0      0   0   000000033263 0            324000033263 
AT6	033262 033263 0   0   000000033263 0            324000033263 
FT1A	033262 033263 0   0   000000033263 0            000000033263 
FT2	033262 033263 0   0   0            0            000000033263 
FT2RQ	033262 033263 0   0   000000000020 0            000000033263 
FT3	033262 033263 0   0   000000000020 0            000000033263 
FT9	033263 033263 0   0   000000000020 0            000000033263 
ET0	033263 033263 0   0   000000000020 0            000000033263 
ST1A	033263 033263 0   0   000000000020 0            000000033263 
ST9	033263 033263 0   0   000000000020 0            000000033263 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 446
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0636

*033263 HRRZI	0,000020
INITIAL
C(AC)=000000 000020 
FINAL
C(AC)=000000 000020 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033263 033263 0   0   551000000020 0            000000000020 
IT1	033263 0      0   0   551000000020 0            000000000020 
AT3	033263 0      0   0   000000000020 0            551000000020 
AT6	033263 000020 0   0   000000000020 0            551000000020 
FT1A	033263 000020 0   0   000000000020 0            000000000020 
FT9	033264 000020 0   0   000000000020 0            000000000020 
ET0	033264 000020 0   0   000000000020 0            000000000020 
ST1	033264 000020 0   0   000000000020 0            000000000020 
ST2	033264 000020 0   0   000000000020 0            000000000020 
ST9	033264 000020 0   0   000000000020 0            000000000020 


*033264 ADD 	0,034023
INITIAL
C(AC)=000000 000020 
C(E)=000000 000020 
FINAL
C(AC)=000000 000040 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033264 033264 0   0   270000034023 0            000000000020 
IT1	033264 0      0   0   270000034023 0            000000000020 
AT3	033264 0      0   0   000000034023 0            270000034023 
AT6	033264 034023 0   0   000000034023 0            270000034023 
FT0	033264 034023 0   0   000000000020 0            270000034023 
FT1A	033264 034023 0   0   000000000020 0            000000000020 
FT2	033264 034023 0   0   0            0            000000000020 
FT2RQ	033264 034023 0   0   000000000020 0            000000000020 
FT3	033264 034023 0   0   000000000020 0            000000000020 
FT9	033265 034023 0   0   000000000020 0            000000000020 
ET0	033265 034023 0   0   000000000040 0            000000000020 
ST1	033265 034023 0   0   000000000040 0            000000000020 
ST2	033265 034023 0   0   000000000040 0            000000000020 
ST9	033265 034023 0   0   000000000040 0            000000000020 


*033265 CAME	0,034024
INITIAL
C(AC)=000000 000040 
C(E)=000000 000040 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033265 033265 0   0   312000034024 0            000000000040 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 447
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0637

IT1	033265 0      0   0   312000034024 0            000000000040 
AT3	033265 0      0   0   000000034024 0            312000034024 
AT6	033265 034024 0   0   000000034024 0            312000034024 
FT0	033265 034024 0   0   000000000040 0            312000034024 
FT1A	033265 034024 0   0   000000000040 0            000000000040 
FT2	033265 034024 0   0   0            0            000000000040 
FT2RQ	033265 034024 0   0   000000000040 0            000000000040 
FT3	033265 034024 0   0   000000000040 0            000000000040 
FT9	033266 034024 0   0   000000000040 0            000000000040 
ET0	033267 034024 0   0   0            0            000000000040 
ST1A	033267 034024 0   0   0            0            000000000040 
ST9	033267 034024 0   0   0            0            000000000040 


*033267 JUMPA	0,033270
INITIAL
C(AC)=000000 000040 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033267 033267 0   0   324000033270 0            000000033270 
IT1	033267 0      0   0   324000033270 0            000000033270 
AT3	033267 0      0   0   000000033270 0            324000033270 
AT6	033267 033270 0   0   000000033270 0            324000033270 
FT1A	033267 033270 0   0   000000033270 0            000000033270 
FT2	033267 033270 0   0   0            0            000000033270 
FT2RQ	033267 033270 0   0   000000000040 0            000000033270 
FT3	033267 033270 0   0   000000000040 0            000000033270 
FT9	033270 033270 0   0   000000000040 0            000000033270 
ET0	033270 033270 0   0   000000000040 0            000000033270 
ST1A	033270 033270 0   0   000000000040 0            000000033270 
ST9	033270 033270 0   0   000000000040 0            000000033270 


*033270 HRRZI	0,000040
INITIAL
C(AC)=000000 000040 
FINAL
C(AC)=000000 000040 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033270 033270 0   0   551000000040 0            000000000040 
IT1	033270 0      0   0   551000000040 0            000000000040 
AT3	033270 0      0   0   000000000040 0            551000000040 
AT6	033270 000040 0   0   000000000040 0            551000000040 
FT1A	033270 000040 0   0   000000000040 0            000000000040 
FT9	033271 000040 0   0   000000000040 0            000000000040 
ET0	033271 000040 0   0   000000000040 0            000000000040 
ST1	033271 000040 0   0   000000000040 0            000000000040 
ST2	033271 000040 0   0   000000000040 0            000000000040 
ST9	033271 000040 0   0   000000000040 0            000000000040 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 448
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0638



*033271 ADD 	0,034024
INITIAL
C(AC)=000000 000040 
C(E)=000000 000040 
FINAL
C(AC)=000000 000100 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033271 033271 0   0   270000034024 0            000000000040 
IT1	033271 0      0   0   270000034024 0            000000000040 
AT3	033271 0      0   0   000000034024 0            270000034024 
AT6	033271 034024 0   0   000000034024 0            270000034024 
FT0	033271 034024 0   0   000000000040 0            270000034024 
FT1A	033271 034024 0   0   000000000040 0            000000000040 
FT2	033271 034024 0   0   0            0            000000000040 
FT2RQ	033271 034024 0   0   000000000040 0            000000000040 
FT3	033271 034024 0   0   000000000040 0            000000000040 
FT9	033272 034024 0   0   000000000040 0            000000000040 
ET0	033272 034024 0   0   000000000100 0            000000000040 
ST1	033272 034024 0   0   000000000100 0            000000000040 
ST2	033272 034024 0   0   000000000100 0            000000000040 
ST9	033272 034024 0   0   000000000100 0            000000000040 


*033272 CAME	0,034025
INITIAL
C(AC)=000000 000100 
C(E)=000000 000100 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033272 033272 0   0   312000034025 0            000000000100 
IT1	033272 0      0   0   312000034025 0            000000000100 
AT3	033272 0      0   0   000000034025 0            312000034025 
AT6	033272 034025 0   0   000000034025 0            312000034025 
FT0	033272 034025 0   0   000000000100 0            312000034025 
FT1A	033272 034025 0   0   000000000100 0            000000000100 
FT2	033272 034025 0   0   0            0            000000000100 
FT2RQ	033272 034025 0   0   000000000100 0            000000000100 
FT3	033272 034025 0   0   000000000100 0            000000000100 
FT9	033273 034025 0   0   000000000100 0            000000000100 
ET0	033274 034025 0   0   0            0            000000000100 
ST1A	033274 034025 0   0   0            0            000000000100 
ST9	033274 034025 0   0   0            0            000000000100 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 449
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0639

*033274 JUMPA	0,033275
INITIAL
C(AC)=000000 000100 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033274 033274 0   0   324000033275 0            000000033275 
IT1	033274 0      0   0   324000033275 0            000000033275 
AT3	033274 0      0   0   000000033275 0            324000033275 
AT6	033274 033275 0   0   000000033275 0            324000033275 
FT1A	033274 033275 0   0   000000033275 0            000000033275 
FT2	033274 033275 0   0   0            0            000000033275 
FT2RQ	033274 033275 0   0   000000000100 0            000000033275 
FT3	033274 033275 0   0   000000000100 0            000000033275 
FT9	033275 033275 0   0   000000000100 0            000000033275 
ET0	033275 033275 0   0   000000000100 0            000000033275 
ST1A	033275 033275 0   0   000000000100 0            000000033275 
ST9	033275 033275 0   0   000000000100 0            000000033275 


*033275 HRRZI	0,000100
INITIAL
C(AC)=000000 000100 
FINAL
C(AC)=000000 000100 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033275 033275 0   0   551000000100 0            000000000100 
IT1	033275 0      0   0   551000000100 0            000000000100 
AT3	033275 0      0   0   000000000100 0            551000000100 
AT6	033275 0      0   0   000000000100 0            551000000100 
FT1A	033275 0      0   0   000000000100 0            000000000100 
FT9	033276 0      0   0   000000000100 0            000000000100 
ET0	033276 0      0   0   000000000100 0            000000000100 
ST1	033276 0      0   0   000000000100 0            000000000100 
ST2	033276 0      0   0   000000000100 0            000000000100 
ST9	033276 0      0   0   000000000100 0            000000000100 


*033276 ADD 	0,034025
INITIAL
C(AC)=000000 000100 
C(E)=000000 000100 
FINAL
C(AC)=000000 000200 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033276 033276 0   0   270000034025 0            000000000100 
IT1	033276 0      0   0   270000034025 0            000000000100 
AT3	033276 0      0   0   000000034025 0            270000034025 
AT6	033276 034025 0   0   000000034025 0            270000034025 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 450
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0640

FT0	033276 034025 0   0   000000000100 0            270000034025 
FT1A	033276 034025 0   0   000000000100 0            000000000100 
FT2	033276 034025 0   0   0            0            000000000100 
FT2RQ	033276 034025 0   0   000000000100 0            000000000100 
FT3	033276 034025 0   0   000000000100 0            000000000100 
FT9	033277 034025 0   0   000000000100 0            000000000100 
ET0	033277 034025 0   0   000000000200 0            000000000100 
ST1	033277 034025 0   0   000000000200 0            000000000100 
ST2	033277 034025 0   0   000000000200 0            000000000100 
ST9	033277 034025 0   0   000000000200 0            000000000100 


*033277 CAME	0,034026
INITIAL
C(AC)=000000 000200 
C(E)=000000 000200 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033277 033277 0   0   312000034026 0            000000000200 
IT1	033277 0      0   0   312000034026 0            000000000200 
AT3	033277 0      0   0   000000034026 0            312000034026 
AT6	033277 034026 0   0   000000034026 0            312000034026 
FT0	033277 034026 0   0   000000000200 0            312000034026 
FT1A	033277 034026 0   0   000000000200 0            000000000200 
FT2	033277 034026 0   0   0            0            000000000200 
FT2RQ	033277 034026 0   0   000000000200 0            000000000200 
FT3	033277 034026 0   0   000000000200 0            000000000200 
FT9	0      034026 0   0   000000000200 0            000000000200 
ET0	033301 034026 0   0   0            0            000000000200 
ST1A	033301 034026 0   0   0            0            000000000200 
ST9	033301 034026 0   0   0            0            000000000200 


*033301 JUMPA	0,033302
INITIAL
C(AC)=000000 000200 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033301 033301 0   0   324000033302 0            000000033302 
IT1	033301 0      0   0   324000033302 0            000000033302 
AT3	033301 0      0   0   000000033302 0            324000033302 
AT6	033301 033302 0   0   000000033302 0            324000033302 
FT1A	033301 033302 0   0   000000033302 0            000000033302 
FT2	033301 033302 0   0   0            0            000000033302 
FT2RQ	033301 033302 0   0   000000000200 0            000000033302 
FT3	033301 033302 0   0   000000000200 0            000000033302 
FT9	033302 033302 0   0   000000000200 0            000000033302 
ET0	033302 033302 0   0   000000000200 0            000000033302 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 451
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0641

ST1A	033302 033302 0   0   000000000200 0            000000033302 
ST9	033302 033302 0   0   000000000200 0            000000033302 


*033302 HRRZI	0,000200
INITIAL
C(AC)=000000 000200 
FINAL
C(AC)=000000 000200 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033302 033302 0   0   551000000200 0            000000000200 
IT1	033302 0      0   0   551000000200 0            000000000200 
AT3	033302 0      0   0   000000000200 0            551000000200 
AT6	033302 0      0   0   000000000200 0            551000000200 
FT1A	033302 0      0   0   000000000200 0            000000000200 
FT9	033303 0      0   0   000000000200 0            000000000200 
ET0	033303 0      0   0   000000000200 0            000000000200 
ST1	033303 0      0   0   000000000200 0            000000000200 
ST2	033303 0      0   0   000000000200 0            000000000200 
ST9	033303 0      0   0   000000000200 0            000000000200 


*033303 ADD 	0,034026
INITIAL
C(AC)=000000 000200 
C(E)=000000 000200 
FINAL
C(AC)=000000 000400 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033303 033303 0   0   270000034026 0            000000000200 
IT1	033303 0      0   0   270000034026 0            000000000200 
AT3	033303 0      0   0   000000034026 0            270000034026 
AT6	033303 034026 0   0   000000034026 0            270000034026 
FT0	033303 034026 0   0   000000000200 0            270000034026 
FT1A	033303 034026 0   0   000000000200 0            000000000200 
FT2	033303 034026 0   0   0            0            000000000200 
FT2RQ	033303 034026 0   0   000000000200 0            000000000200 
FT3	033303 034026 0   0   000000000200 0            000000000200 
FT9	033304 034026 0   0   000000000200 0            000000000200 
ET0	033304 034026 0   0   000000000400 0            000000000200 
ST1	033304 034026 0   0   000000000400 0            000000000200 
ST2	033304 034026 0   0   000000000400 0            000000000200 
ST9	033304 034026 0   0   000000000400 0            000000000200 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 452
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0642

*033304 CAME	0,034027
INITIAL
C(AC)=000000 000400 
C(E)=000000 000400 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033304 033304 0   0   312000034027 0            000000000400 
IT1	033304 0      0   0   312000034027 0            000000000400 
AT3	033304 0      0   0   000000034027 0            312000034027 
AT6	033304 034027 0   0   000000034027 0            312000034027 
FT0	033304 034027 0   0   000000000400 0            312000034027 
FT1A	033304 034027 0   0   000000000400 0            000000000400 
FT2	033304 034027 0   0   0            0            000000000400 
FT2RQ	033304 034027 0   0   000000000400 0            000000000400 
FT3	033304 034027 0   0   000000000400 0            000000000400 
FT9	033305 034027 0   0   000000000400 0            000000000400 
ET0	033306 034027 0   0   0            0            000000000400 
ST1A	033306 034027 0   0   0            0            000000000400 
ST9	033306 034027 0   0   0            0            000000000400 


*033306 JUMPA	0,033307
INITIAL
C(AC)=000000 000400 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033306 033306 0   0   324000033307 0            000000033307 
IT1	033306 0      0   0   324000033307 0            000000033307 
AT3	033306 0      0   0   000000033307 0            324000033307 
AT6	033306 033307 0   0   000000033307 0            324000033307 
FT1A	033306 033307 0   0   000000033307 0            000000033307 
FT2	033306 033307 0   0   0            0            000000033307 
FT2RQ	033306 033307 0   0   000000000400 0            000000033307 
FT3	033306 033307 0   0   000000000400 0            000000033307 
FT9	033307 033307 0   0   000000000400 0            000000033307 
ET0	033307 033307 0   0   000000000400 0            000000033307 
ST1A	033307 033307 0   0   000000000400 0            000000033307 
ST9	033307 033307 0   0   000000000400 0            000000033307 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 453
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0643

*033307 HRRZI	0,000400
INITIAL
C(AC)=000000 000400 
FINAL
C(AC)=000000 000400 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033307 033307 0   0   551000000400 0            000000000400 
IT1	033307 0      0   0   551000000400 0            000000000400 
AT3	033307 0      0   0   000000000400 0            551000000400 
AT6	033307 0      0   0   000000000400 0            551000000400 
FT1A	033307 0      0   0   000000000400 0            000000000400 
FT9	033310 0      0   0   000000000400 0            000000000400 
ET0	033310 0      0   0   000000000400 0            000000000400 
ST1	033310 0      0   0   000000000400 0            000000000400 
ST2	033310 0      0   0   000000000400 0            000000000400 
ST9	033310 0      0   0   000000000400 0            000000000400 


*033310 ADD 	0,034027
INITIAL
C(AC)=000000 000400 
C(E)=000000 000400 
FINAL
C(AC)=000000 001000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033310 033310 0   0   270000034027 0            000000000400 
IT1	033310 0      0   0   270000034027 0            000000000400 
AT3	033310 0      0   0   000000034027 0            270000034027 
AT6	033310 034027 0   0   000000034027 0            270000034027 
FT0	033310 034027 0   0   000000000400 0            270000034027 
FT1A	033310 034027 0   0   000000000400 0            000000000400 
FT2	033310 034027 0   0   0            0            000000000400 
FT2RQ	033310 034027 0   0   000000000400 0            000000000400 
FT3	033310 034027 0   0   000000000400 0            000000000400 
FT9	033311 034027 0   0   000000000400 0            000000000400 
ET0	033311 034027 0   0   000000001000 0            000000000400 
ST1	033311 034027 0   0   000000001000 0            000000000400 
ST2	033311 034027 0   0   000000001000 0            000000000400 
ST9	033311 034027 0   0   000000001000 0            000000000400 


*033311 CAME	0,034030
INITIAL
C(AC)=000000 001000 
C(E)=000000 001000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033311 033311 0   0   312000034030 0            000000001000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 454
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0644

IT1	033311 0      0   0   312000034030 0            000000001000 
AT3	033311 0      0   0   000000034030 0            312000034030 
AT6	033311 034030 0   0   000000034030 0            312000034030 
FT0	033311 034030 0   0   000000001000 0            312000034030 
FT1A	033311 034030 0   0   000000001000 0            000000001000 
FT2	033311 034030 0   0   0            0            000000001000 
FT2RQ	033311 034030 0   0   000000001000 0            000000001000 
FT3	033311 034030 0   0   000000001000 0            000000001000 
FT9	033312 034030 0   0   000000001000 0            000000001000 
ET0	033313 034030 0   0   0            0            000000001000 
ST1A	033313 034030 0   0   0            0            000000001000 
ST9	033313 034030 0   0   0            0            000000001000 


*033313 JUMPA	0,033314
INITIAL
C(AC)=000000 001000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033313 033313 0   0   324000033314 0            000000033314 
IT1	033313 0      0   0   324000033314 0            000000033314 
AT3	033313 0      0   0   000000033314 0            324000033314 
AT6	033313 033314 0   0   000000033314 0            324000033314 
FT1A	033313 033314 0   0   000000033314 0            000000033314 
FT2	033313 033314 0   0   0            0            000000033314 
FT2RQ	033313 033314 0   0   000000001000 0            000000033314 
FT3	033313 033314 0   0   000000001000 0            000000033314 
FT9	033314 033314 0   0   000000001000 0            000000033314 
ET0	033314 033314 0   0   000000001000 0            000000033314 
ST1A	033314 033314 0   0   000000001000 0            000000033314 
ST9	033314 033314 0   0   000000001000 0            000000033314 


*033314 HRRZI	0,001000
INITIAL
C(AC)=000000 001000 
FINAL
C(AC)=000000 001000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033314 033314 0   0   551000001000 0            000000001000 
IT1	033314 0      0   0   551000001000 0            000000001000 
AT3	033314 0      0   0   000000001000 0            551000001000 
AT6	033314 0      0   0   000000001000 0            551000001000 
FT1A	033314 0      0   0   000000001000 0            000000001000 
FT9	033315 0      0   0   000000001000 0            000000001000 
ET0	033315 0      0   0   000000001000 0            000000001000 
ST1	033315 0      0   0   000000001000 0            000000001000 
ST2	033315 0      0   0   000000001000 0            000000001000 
ST9	033315 0      0   0   000000001000 0            000000001000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 455
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0645



*033315 ADD 	0,034030
INITIAL
C(AC)=000000 001000 
C(E)=000000 001000 
FINAL
C(AC)=000000 002000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033315 033315 0   0   270000034030 0            000000001000 
IT1	033315 0      0   0   270000034030 0            000000001000 
AT3	033315 0      0   0   000000034030 0            270000034030 
AT6	033315 034030 0   0   000000034030 0            270000034030 
FT0	033315 034030 0   0   000000001000 0            270000034030 
FT1A	033315 034030 0   0   000000001000 0            000000001000 
FT2	033315 034030 0   0   0            0            000000001000 
FT2RQ	033315 034030 0   0   000000001000 0            000000001000 
FT3	033315 034030 0   0   000000001000 0            000000001000 
FT9	033316 034030 0   0   000000001000 0            000000001000 
ET0	033316 034030 0   0   000000002000 0            000000001000 
ST1	033316 034030 0   0   000000002000 0            000000001000 
ST2	033316 034030 0   0   000000002000 0            000000001000 
ST9	033316 034030 0   0   000000002000 0            000000001000 


*033316 CAME	0,034031
INITIAL
C(AC)=000000 002000 
C(E)=000000 002000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033316 033316 0   0   312000034031 0            000000002000 
IT1	033316 0      0   0   312000034031 0            000000002000 
AT3	033316 0      0   0   000000034031 0            312000034031 
AT6	033316 034031 0   0   000000034031 0            312000034031 
FT0	033316 034031 0   0   000000002000 0            312000034031 
FT1A	033316 034031 0   0   000000002000 0            000000002000 
FT2	033316 034031 0   0   0            0            000000002000 
FT2RQ	033316 034031 0   0   000000002000 0            000000002000 
FT3	033316 034031 0   0   000000002000 0            000000002000 
FT9	033317 034031 0   0   000000002000 0            000000002000 
ET0	033320 034031 0   0   0            0            000000002000 
ST1A	033320 034031 0   0   0            0            000000002000 
ST9	033320 034031 0   0   0            0            000000002000 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 456
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0646

*033320 JUMPA	0,033321
INITIAL
C(AC)=000000 002000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033320 033320 0   0   324000033321 0            000000033321 
IT1	033320 0      0   0   324000033321 0            000000033321 
AT3	033320 0      0   0   000000033321 0            324000033321 
AT6	033320 033321 0   0   000000033321 0            324000033321 
FT1A	033320 033321 0   0   000000033321 0            000000033321 
FT2	033320 033321 0   0   0            0            000000033321 
FT2RQ	033320 033321 0   0   000000002000 0            000000033321 
FT3	033320 033321 0   0   000000002000 0            000000033321 
FT9	033321 033321 0   0   000000002000 0            000000033321 
ET0	033321 033321 0   0   000000002000 0            000000033321 
ST1A	033321 033321 0   0   000000002000 0            000000033321 
ST9	033321 033321 0   0   000000002000 0            000000033321 


*033321 HRRZI	0,002000
INITIAL
C(AC)=000000 002000 
FINAL
C(AC)=000000 002000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033321 033321 0   0   551000002000 0            000000002000 
IT1	033321 0      0   0   551000002000 0            000000002000 
AT3	033321 0      0   0   000000002000 0            551000002000 
AT6	033321 0      0   0   000000002000 0            551000002000 
FT1A	033321 0      0   0   000000002000 0            000000002000 
FT9	033322 0      0   0   000000002000 0            000000002000 
ET0	033322 0      0   0   000000002000 0            000000002000 
ST1	033322 0      0   0   000000002000 0            000000002000 
ST2	033322 0      0   0   000000002000 0            000000002000 
ST9	033322 0      0   0   000000002000 0            000000002000 


*033322 ADD 	0,034031
INITIAL
C(AC)=000000 002000 
C(E)=000000 002000 
FINAL
C(AC)=000000 004000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033322 033322 0   0   270000034031 0            000000002000 
IT1	033322 0      0   0   270000034031 0            000000002000 
AT3	033322 0      0   0   000000034031 0            270000034031 
AT6	033322 034031 0   0   000000034031 0            270000034031 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 457
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0647

FT0	033322 034031 0   0   000000002000 0            270000034031 
FT1A	033322 034031 0   0   000000002000 0            000000002000 
FT2	033322 034031 0   0   0            0            000000002000 
FT2RQ	033322 034031 0   0   000000002000 0            000000002000 
FT3	033322 034031 0   0   000000002000 0            000000002000 
FT9	033323 034031 0   0   000000002000 0            000000002000 
ET0	033323 034031 0   0   000000004000 0            000000002000 
ST1	033323 034031 0   0   000000004000 0            000000002000 
ST2	033323 034031 0   0   000000004000 0            000000002000 
ST9	033323 034031 0   0   000000004000 0            000000002000 


*033323 CAME	0,034032
INITIAL
C(AC)=000000 004000 
C(E)=000000 004000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033323 033323 0   0   312000034032 0            000000004000 
IT1	033323 0      0   0   312000034032 0            000000004000 
AT3	033323 0      0   0   000000034032 0            312000034032 
AT6	033323 034032 0   0   000000034032 0            312000034032 
FT0	033323 034032 0   0   000000004000 0            312000034032 
FT1A	033323 034032 0   0   000000004000 0            000000004000 
FT2	033323 034032 0   0   0            0            000000004000 
FT2RQ	033323 034032 0   0   000000004000 0            000000004000 
FT3	033323 034032 0   0   000000004000 0            000000004000 
FT9	033324 034032 0   0   000000004000 0            000000004000 
ET0	033325 034032 0   0   0            0            000000004000 
ST1A	033325 034032 0   0   0            0            000000004000 
ST9	033325 034032 0   0   0            0            000000004000 


*033325 JUMPA	0,033326
INITIAL
C(AC)=000000 004000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033325 033325 0   0   324000033326 0            000000033326 
IT1	033325 0      0   0   324000033326 0            000000033326 
AT3	033325 0      0   0   000000033326 0            324000033326 
AT6	033325 033326 0   0   000000033326 0            324000033326 
FT1A	033325 033326 0   0   000000033326 0            000000033326 
FT2	033325 033326 0   0   0            0            000000033326 
FT2RQ	033325 033326 0   0   000000004000 0            000000033326 
FT3	033325 033326 0   0   000000004000 0            000000033326 
FT9	033326 033326 0   0   000000004000 0            000000033326 
ET0	033326 033326 0   0   000000004000 0            000000033326 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 458
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0648

ST1A	033326 033326 0   0   000000004000 0            000000033326 
ST9	033326 033326 0   0   000000004000 0            000000033326 


*033326 HRRZI	0,004000
INITIAL
C(AC)=000000 004000 
FINAL
C(AC)=000000 004000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033326 033326 0   0   551000004000 0            000000004000 
IT1	033326 0      0   0   551000004000 0            000000004000 
AT3	033326 0      0   0   000000004000 0            551000004000 
AT6	033326 0      0   0   000000004000 0            551000004000 
FT1A	033326 0      0   0   000000004000 0            000000004000 
FT9	033327 0      0   0   000000004000 0            000000004000 
ET0	033327 0      0   0   000000004000 0            000000004000 
ST1	033327 0      0   0   000000004000 0            000000004000 
ST2	033327 0      0   0   000000004000 0            000000004000 
ST9	033327 0      0   0   000000004000 0            000000004000 


*033327 ADD 	0,034032
INITIAL
C(AC)=000000 004000 
C(E)=000000 004000 
FINAL
C(AC)=000000 010000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033327 033327 0   0   270000034032 0            000000004000 
IT1	033327 0      0   0   270000034032 0            000000004000 
AT3	033327 0      0   0   000000034032 0            270000034032 
AT6	033327 034032 0   0   000000034032 0            270000034032 
FT0	033327 034032 0   0   000000004000 0            270000034032 
FT1A	033327 034032 0   0   000000004000 0            000000004000 
FT2	033327 034032 0   0   0            0            000000004000 
FT2RQ	033327 034032 0   0   000000004000 0            000000004000 
FT3	033327 034032 0   0   000000004000 0            000000004000 
FT9	033330 034032 0   0   000000004000 0            000000004000 
ET0	033330 034032 0   0   000000010000 0            000000004000 
ST1	033330 034032 0   0   000000010000 0            000000004000 
ST2	033330 034032 0   0   000000010000 0            000000004000 
ST9	033330 034032 0   0   000000010000 0            000000004000 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 459
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0649

*033330 CAME	0,034033
INITIAL
C(AC)=000000 010000 
C(E)=000000 010000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033330 033330 0   0   312000034033 0            000000010000 
IT1	033330 0      0   0   312000034033 0            000000010000 
AT3	033330 0      0   0   000000034033 0            312000034033 
AT6	033330 034033 0   0   000000034033 0            312000034033 
FT0	033330 034033 0   0   000000010000 0            312000034033 
FT1A	033330 034033 0   0   000000010000 0            000000010000 
FT2	033330 034033 0   0   0            0            000000010000 
FT2RQ	033330 034033 0   0   000000010000 0            000000010000 
FT3	033330 034033 0   0   000000010000 0            000000010000 
FT9	033331 034033 0   0   000000010000 0            000000010000 
ET0	033332 034033 0   0   0            0            000000010000 
ST1A	033332 034033 0   0   0            0            000000010000 
ST9	033332 034033 0   0   0            0            000000010000 


*033332 JUMPA	0,033333
INITIAL
C(AC)=000000 010000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033332 033332 0   0   324000033333 0            000000033333 
IT1	033332 0      0   0   324000033333 0            000000033333 
AT3	033332 0      0   0   000000033333 0            324000033333 
AT6	033332 033333 0   0   000000033333 0            324000033333 
FT1A	033332 033333 0   0   000000033333 0            000000033333 
FT2	033332 033333 0   0   0            0            000000033333 
FT2RQ	033332 033333 0   0   000000010000 0            000000033333 
FT3	033332 033333 0   0   000000010000 0            000000033333 
FT9	033333 033333 0   0   000000010000 0            000000033333 
ET0	033333 033333 0   0   000000010000 0            000000033333 
ST1A	033333 033333 0   0   000000010000 0            000000033333 
ST9	033333 033333 0   0   000000010000 0            000000033333 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 460
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0650

*033333 HRRZI	0,010000
INITIAL
C(AC)=000000 010000 
FINAL
C(AC)=000000 010000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033333 033333 0   0   551000010000 0            000000010000 
IT1	033333 0      0   0   551000010000 0            000000010000 
AT3	033333 0      0   0   000000010000 0            551000010000 
AT6	033333 0      0   0   000000010000 0            551000010000 
FT1A	033333 0      0   0   000000010000 0            000000010000 
FT9	033334 0      0   0   000000010000 0            000000010000 
ET0	033334 0      0   0   000000010000 0            000000010000 
ST1	033334 0      0   0   000000010000 0            000000010000 
ST2	033334 0      0   0   000000010000 0            000000010000 
ST9	033334 0      0   0   000000010000 0            000000010000 


*033334 ADD 	0,034033
INITIAL
C(AC)=000000 010000 
C(E)=000000 010000 
FINAL
C(AC)=000000 020000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033334 033334 0   0   270000034033 0            000000010000 
IT1	033334 0      0   0   270000034033 0            000000010000 
AT3	033334 0      0   0   000000034033 0            270000034033 
AT6	033334 034033 0   0   000000034033 0            270000034033 
FT0	033334 034033 0   0   000000010000 0            270000034033 
FT1A	033334 034033 0   0   000000010000 0            000000010000 
FT2	033334 034033 0   0   0            0            000000010000 
FT2RQ	033334 034033 0   0   000000010000 0            000000010000 
FT3	033334 034033 0   0   000000010000 0            000000010000 
FT9	033335 034033 0   0   000000010000 0            000000010000 
ET0	033335 034033 0   0   000000020000 0            000000010000 
ST1	033335 034033 0   0   000000020000 0            000000010000 
ST2	033335 034033 0   0   000000020000 0            000000010000 
ST9	033335 034033 0   0   000000020000 0            000000010000 


*033335 CAME	0,034034
INITIAL
C(AC)=000000 020000 
C(E)=000000 020000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033335 033335 0   0   312000034034 0            000000020000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 461
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0651

IT1	033335 0      0   0   312000034034 0            000000020000 
AT3	033335 0      0   0   000000034034 0            312000034034 
AT6	033335 034034 0   0   000000034034 0            312000034034 
FT0	033335 034034 0   0   000000020000 0            312000034034 
FT1A	033335 034034 0   0   000000020000 0            000000020000 
FT2	033335 034034 0   0   0            0            000000020000 
FT2RQ	033335 034034 0   0   000000020000 0            000000020000 
FT3	033335 034034 0   0   000000020000 0            000000020000 
FT9	033336 034034 0   0   000000020000 0            000000020000 
ET0	033337 034034 0   0   0            0            000000020000 
ST1A	033337 034034 0   0   0            0            000000020000 
ST9	033337 034034 0   0   0            0            000000020000 


*033337 JUMPA	0,033340
INITIAL
C(AC)=000000 020000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033337 033337 0   0   324000033340 0            000000033340 
IT1	033337 0      0   0   324000033340 0            000000033340 
AT3	033337 0      0   0   000000033340 0            324000033340 
AT6	033337 033340 0   0   000000033340 0            324000033340 
FT1A	033337 033340 0   0   000000033340 0            000000033340 
FT2	033337 033340 0   0   0            0            000000033340 
FT2RQ	033337 033340 0   0   000000020000 0            000000033340 
FT3	033337 033340 0   0   000000020000 0            000000033340 
FT9	033340 033340 0   0   000000020000 0            000000033340 
ET0	033340 033340 0   0   000000020000 0            000000033340 
ST1A	033340 033340 0   0   000000020000 0            000000033340 
ST9	033340 033340 0   0   000000020000 0            000000033340 


*033340 HRRZI	0,020000
INITIAL
C(AC)=000000 020000 
FINAL
C(AC)=000000 020000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033340 033340 0   0   551000020000 0            000000020000 
IT1	033340 0      0   0   551000020000 0            000000020000 
AT3	033340 0      0   0   000000020000 0            551000020000 
AT6	033340 0      0   0   000000020000 0            551000020000 
FT1A	033340 0      0   0   000000020000 0            000000020000 
FT9	033341 0      0   0   000000020000 0            000000020000 
ET0	033341 0      0   0   000000020000 0            000000020000 
ST1	033341 0      0   0   000000020000 0            000000020000 
ST2	033341 0      0   0   000000020000 0            000000020000 
ST9	033341 0      0   0   000000020000 0            000000020000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 462
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0652



*033341 ADD 	0,034034
INITIAL
C(AC)=000000 020000 
C(E)=000000 020000 
FINAL
C(AC)=000000 040000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033341 033341 0   0   270000034034 0            000000020000 
IT1	033341 0      0   0   270000034034 0            000000020000 
AT3	033341 0      0   0   000000034034 0            270000034034 
AT6	033341 034034 0   0   000000034034 0            270000034034 
FT0	033341 034034 0   0   000000020000 0            270000034034 
FT1A	033341 034034 0   0   000000020000 0            000000020000 
FT2	033341 034034 0   0   0            0            000000020000 
FT2RQ	033341 034034 0   0   000000020000 0            000000020000 
FT3	033341 034034 0   0   000000020000 0            000000020000 
FT9	033342 034034 0   0   000000020000 0            000000020000 
ET0	033342 034034 0   0   000000040000 0            000000020000 
ST1	033342 034034 0   0   000000040000 0            000000020000 
ST2	033342 034034 0   0   000000040000 0            000000020000 
ST9	033342 034034 0   0   000000040000 0            000000020000 


*033342 CAME	0,034035
INITIAL
C(AC)=000000 040000 
C(E)=000000 040000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033342 033342 0   0   312000034035 0            000000040000 
IT1	033342 0      0   0   312000034035 0            000000040000 
AT3	033342 0      0   0   000000034035 0            312000034035 
AT6	033342 034035 0   0   000000034035 0            312000034035 
FT0	033342 034035 0   0   000000040000 0            312000034035 
FT1A	033342 034035 0   0   000000040000 0            000000040000 
FT2	033342 034035 0   0   0            0            000000040000 
FT2RQ	033342 034035 0   0   000000040000 0            000000040000 
FT3	033342 034035 0   0   000000040000 0            000000040000 
FT9	033343 034035 0   0   000000040000 0            000000040000 
ET0	033344 034035 0   0   0            0            000000040000 
ST1A	033344 034035 0   0   0            0            000000040000 
ST9	033344 034035 0   0   0            0            000000040000 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 463
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0653

*033344 JUMPA	0,033345
INITIAL
C(AC)=000000 040000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033344 033344 0   0   324000033345 0            000000033345 
IT1	033344 0      0   0   324000033345 0            000000033345 
AT3	033344 0      0   0   000000033345 0            324000033345 
AT6	033344 033345 0   0   000000033345 0            324000033345 
FT1A	033344 033345 0   0   000000033345 0            000000033345 
FT2	033344 033345 0   0   0            0            000000033345 
FT2RQ	033344 033345 0   0   000000040000 0            000000033345 
FT3	033344 033345 0   0   000000040000 0            000000033345 
FT9	033345 033345 0   0   000000040000 0            000000033345 
ET0	033345 033345 0   0   000000040000 0            000000033345 
ST1A	033345 033345 0   0   000000040000 0            000000033345 
ST9	033345 033345 0   0   000000040000 0            000000033345 


*033345 HRRZI	0,040000
INITIAL
C(AC)=000000 040000 
FINAL
C(AC)=000000 040000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033345 033345 0   0   551000040000 0            000000040000 
IT1	033345 0      0   0   551000040000 0            000000040000 
AT3	033345 0      0   0   000000040000 0            551000040000 
AT6	033345 0      0   0   000000040000 0            551000040000 
FT1A	033345 0      0   0   000000040000 0            000000040000 
FT9	033346 0      0   0   000000040000 0            000000040000 
ET0	033346 0      0   0   000000040000 0            000000040000 
ST1	033346 0      0   0   000000040000 0            000000040000 
ST2	033346 0      0   0   000000040000 0            000000040000 
ST9	033346 0      0   0   000000040000 0            000000040000 


*033346 ADD 	0,034035
INITIAL
C(AC)=000000 040000 
C(E)=000000 040000 
FINAL
C(AC)=000000 100000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033346 033346 0   0   270000034035 0            000000040000 
IT1	033346 0      0   0   270000034035 0            000000040000 
AT3	033346 0      0   0   000000034035 0            270000034035 
AT6	033346 034035 0   0   000000034035 0            270000034035 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 464
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0654

FT0	033346 034035 0   0   000000040000 0            270000034035 
FT1A	033346 034035 0   0   000000040000 0            000000040000 
FT2	033346 034035 0   0   0            0            000000040000 
FT2RQ	033346 034035 0   0   000000040000 0            000000040000 
FT3	033346 034035 0   0   000000040000 0            000000040000 
FT9	033347 034035 0   0   000000040000 0            000000040000 
ET0	033347 034035 0   0   000000100000 0            000000040000 
ST1	033347 034035 0   0   000000100000 0            000000040000 
ST2	033347 034035 0   0   000000100000 0            000000040000 
ST9	033347 034035 0   0   000000100000 0            000000040000 


*033347 CAME	0,034036
INITIAL
C(AC)=000000 100000 
C(E)=000000 100000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033347 033347 0   0   312000034036 0            000000100000 
IT1	033347 0      0   0   312000034036 0            000000100000 
AT3	033347 0      0   0   000000034036 0            312000034036 
AT6	033347 034036 0   0   000000034036 0            312000034036 
FT0	033347 034036 0   0   000000100000 0            312000034036 
FT1A	033347 034036 0   0   000000100000 0            000000100000 
FT2	033347 034036 0   0   0            0            000000100000 
FT2RQ	033347 034036 0   0   000000100000 0            000000100000 
FT3	033347 034036 0   0   000000100000 0            000000100000 
FT9	033350 034036 0   0   000000100000 0            000000100000 
ET0	033351 034036 0   0   0            0            000000100000 
ST1A	033351 034036 0   0   0            0            000000100000 
ST9	033351 034036 0   0   0            0            000000100000 


*033351 JUMPA	0,033352
INITIAL
C(AC)=000000 100000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033351 033351 0   0   324000033352 0            000000033352 
IT1	033351 0      0   0   324000033352 0            000000033352 
AT3	033351 0      0   0   000000033352 0            324000033352 
AT6	033351 033352 0   0   000000033352 0            324000033352 
FT1A	033351 033352 0   0   000000033352 0            000000033352 
FT2	033351 033352 0   0   0            0            000000033352 
FT2RQ	033351 033352 0   0   000000100000 0            000000033352 
FT3	033351 033352 0   0   000000100000 0            000000033352 
FT9	033352 033352 0   0   000000100000 0            000000033352 
ET0	033352 033352 0   0   000000100000 0            000000033352 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 465
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0655

ST1A	033352 033352 0   0   000000100000 0            000000033352 
ST9	033352 033352 0   0   000000100000 0            000000033352 


*033352 HRRZI	0,100000
INITIAL
C(AC)=000000 100000 
FINAL
C(AC)=000000 100000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033352 033352 0   0   551000100000 0            000000100000 
IT1	033352 0      0   0   551000100000 0            000000100000 
AT3	033352 0      0   0   000000100000 0            551000100000 
AT6	033352 0      0   0   000000100000 0            551000100000 
FT1A	033352 0      0   0   000000100000 0            000000100000 
FT9	033353 0      0   0   000000100000 0            000000100000 
ET0	033353 0      0   0   000000100000 0            000000100000 
ST1	033353 0      0   0   000000100000 0            000000100000 
ST2	033353 0      0   0   000000100000 0            000000100000 
ST9	033353 0      0   0   000000100000 0            000000100000 


*033353 ADD 	0,034036
INITIAL
C(AC)=000000 100000 
C(E)=000000 100000 
FINAL
C(AC)=000000 200000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033353 033353 0   0   270000034036 0            000000100000 
IT1	033353 0      0   0   270000034036 0            000000100000 
AT3	033353 0      0   0   000000034036 0            270000034036 
AT6	033353 034036 0   0   000000034036 0            270000034036 
FT0	033353 034036 0   0   000000100000 0            270000034036 
FT1A	033353 034036 0   0   000000100000 0            000000100000 
FT2	033353 034036 0   0   0            0            000000100000 
FT2RQ	033353 034036 0   0   000000100000 0            000000100000 
FT3	033353 034036 0   0   000000100000 0            000000100000 
FT9	033354 034036 0   0   000000100000 0            000000100000 
ET0	033354 034036 0   0   000000200000 0            000000100000 
ST1	033354 034036 0   0   000000200000 0            000000100000 
ST2	033354 034036 0   0   000000200000 0            000000100000 
ST9	033354 034036 0   0   000000200000 0            000000100000 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 466
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0656

*033354 CAME	0,034037
INITIAL
C(AC)=000000 200000 
C(E)=000000 200000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033354 033354 0   0   312000034037 0            000000200000 
IT1	033354 0      0   0   312000034037 0            000000200000 
AT3	033354 0      0   0   000000034037 0            312000034037 
AT6	033354 034037 0   0   000000034037 0            312000034037 
FT0	033354 034037 0   0   000000200000 0            312000034037 
FT1A	033354 034037 0   0   000000200000 0            000000200000 
FT2	033354 034037 0   0   0            0            000000200000 
FT2RQ	033354 034037 0   0   000000200000 0            000000200000 
FT3	033354 034037 0   0   000000200000 0            000000200000 
FT9	033355 034037 0   0   000000200000 0            000000200000 
ET0	033356 034037 0   0   0            0            000000200000 
ST1A	033356 034037 0   0   0            0            000000200000 
ST9	033356 034037 0   0   0            0            000000200000 


*033356 JUMPA	0,033357
INITIAL
C(AC)=000000 200000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033356 033356 0   0   324000033357 0            000000033357 
IT1	033356 0      0   0   324000033357 0            000000033357 
AT3	033356 0      0   0   000000033357 0            324000033357 
AT6	033356 033357 0   0   000000033357 0            324000033357 
FT1A	033356 033357 0   0   000000033357 0            000000033357 
FT2	033356 033357 0   0   0            0            000000033357 
FT2RQ	033356 033357 0   0   000000200000 0            000000033357 
FT3	033356 033357 0   0   000000200000 0            000000033357 
FT9	033357 033357 0   0   000000200000 0            000000033357 
ET0	033357 033357 0   0   000000200000 0            000000033357 
ST1A	033357 033357 0   0   000000200000 0            000000033357 
ST9	033357 033357 0   0   000000200000 0            000000033357 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 467
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0657

*033357 HRRZI	0,200000
INITIAL
C(AC)=000000 200000 
FINAL
C(AC)=000000 200000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033357 033357 0   0   551000200000 0            000000200000 
IT1	033357 0      0   0   551000200000 0            000000200000 
AT3	033357 0      0   0   000000200000 0            551000200000 
AT6	033357 0      0   0   000000200000 0            551000200000 
FT1A	033357 0      0   0   000000200000 0            000000200000 
FT9	033360 0      0   0   000000200000 0            000000200000 
ET0	033360 0      0   0   000000200000 0            000000200000 
ST1	033360 0      0   0   000000200000 0            000000200000 
ST2	033360 0      0   0   000000200000 0            000000200000 
ST9	033360 0      0   0   000000200000 0            000000200000 


*033360 ADD 	0,034037
INITIAL
C(AC)=000000 200000 
C(E)=000000 200000 
FINAL
C(AC)=000000 400000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033360 033360 0   0   270000034037 0            000000200000 
IT1	033360 0      0   0   270000034037 0            000000200000 
AT3	033360 0      0   0   000000034037 0            270000034037 
AT6	033360 034037 0   0   000000034037 0            270000034037 
FT0	033360 034037 0   0   000000200000 0            270000034037 
FT1A	033360 034037 0   0   000000200000 0            000000200000 
FT2	033360 034037 0   0   0            0            000000200000 
FT2RQ	033360 034037 0   0   000000200000 0            000000200000 
FT3	033360 034037 0   0   000000200000 0            000000200000 
FT9	033361 034037 0   0   000000200000 0            000000200000 
ET0	033361 034037 0   0   000000400000 0            000000200000 
ST1	033361 034037 0   0   000000400000 0            000000200000 
ST2	033361 034037 0   0   000000400000 0            000000200000 
ST9	033361 034037 0   0   000000400000 0            000000200000 


*033361 CAME	0,034040
INITIAL
C(AC)=000000 400000 
C(E)=000000 400000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033361 033361 0   0   312000034040 0            000000400000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 468
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0658

IT1	033361 0      0   0   312000034040 0            000000400000 
AT3	033361 0      0   0   000000034040 0            312000034040 
AT6	033361 034040 0   0   000000034040 0            312000034040 
FT0	033361 034040 0   0   000000400000 0            312000034040 
FT1A	033361 034040 0   0   000000400000 0            000000400000 
FT2	033361 034040 0   0   0            0            000000400000 
FT2RQ	033361 034040 0   0   000000400000 0            000000400000 
FT3	033361 034040 0   0   000000400000 0            000000400000 
FT9	033362 034040 0   0   000000400000 0            000000400000 
ET0	033363 034040 0   0   0            0            000000400000 
ST1A	033363 034040 0   0   0            0            000000400000 
ST9	033363 034040 0   0   0            0            000000400000 


*033363 JUMPA	0,033364
INITIAL
C(AC)=000000 400000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033363 033363 0   0   324000033364 0            000000033364 
IT1	033363 0      0   0   324000033364 0            000000033364 
AT3	033363 0      0   0   000000033364 0            324000033364 
AT6	033363 033364 0   0   000000033364 0            324000033364 
FT1A	033363 033364 0   0   000000033364 0            000000033364 
FT2	033363 033364 0   0   0            0            000000033364 
FT2RQ	033363 033364 0   0   000000400000 0            000000033364 
FT3	033363 033364 0   0   000000400000 0            000000033364 
FT9	033364 033364 0   0   000000400000 0            000000033364 
ET0	033364 033364 0   0   000000400000 0            000000033364 
ST1A	033364 033364 0   0   000000400000 0            000000033364 
ST9	033364 033364 0   0   000000400000 0            000000033364 


*033364 HRRZI	0,400000
INITIAL
C(AC)=000000 400000 
FINAL
C(AC)=000000 400000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033364 033364 0   0   551000400000 0            000000400000 
IT1	033364 0      0   0   551000400000 0            000000400000 
AT3	033364 0      0   0   000000400000 0            551000400000 
AT6	033364 0      0   0   000000400000 0            551000400000 
FT1A	033364 0      0   0   000000400000 0            000000400000 
FT9	033365 0      0   0   000000400000 0            000000400000 
ET0	033365 0      0   0   000000400000 0            000000400000 
ST1	033365 0      0   0   000000400000 0            000000400000 
ST2	033365 0      0   0   000000400000 0            000000400000 
ST9	033365 0      0   0   000000400000 0            000000400000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 469
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0659



*033365 ADD 	0,034040
INITIAL
C(AC)=000000 400000 
C(E)=000000 400000 
FINAL
C(AC)=000001 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033365 033365 0   0   270000034040 0            000000400000 
IT1	033365 0      0   0   270000034040 0            000000400000 
AT3	033365 0      0   0   000000034040 0            270000034040 
AT6	033365 034040 0   0   000000034040 0            270000034040 
FT0	033365 034040 0   0   000000400000 0            270000034040 
FT1A	033365 034040 0   0   000000400000 0            000000400000 
FT2	033365 034040 0   0   0            0            000000400000 
FT2RQ	033365 034040 0   0   000000400000 0            000000400000 
FT3	033365 034040 0   0   000000400000 0            000000400000 
FT9	033366 034040 0   0   000000400000 0            000000400000 
ET0	033366 034040 0   0   000001000000 0            000000400000 
ST1	033366 034040 0   0   000001000000 0            000000400000 
ST2	033366 034040 0   0   000001000000 0            000000400000 
ST9	033366 034040 0   0   000001000000 0            000000400000 


*033366 CAME	0,034041
INITIAL
C(AC)=000001 000000 
C(E)=000001 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033366 033366 0   0   312000034041 0            000001000000 
IT1	033366 0      0   0   312000034041 0            000001000000 
AT3	033366 0      0   0   000000034041 0            312000034041 
AT6	033366 034041 0   0   000000034041 0            312000034041 
FT0	033366 034041 0   0   000001000000 0            312000034041 
FT1A	033366 034041 0   0   000001000000 0            000001000000 
FT2	033366 034041 0   0   0            0            000001000000 
FT2RQ	033366 034041 0   0   000001000000 0            000001000000 
FT3	033366 034041 0   0   000001000000 0            000001000000 
FT9	033367 034041 0   0   000001000000 0            000001000000 
ET0	033370 034041 0   0   0            0            000001000000 
ST1A	033370 034041 0   0   0            0            000001000000 
ST9	033370 034041 0   0   0            0            000001000000 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 470
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0660

*033370 JUMPA	0,033371
INITIAL
C(AC)=000001 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033370 033370 0   0   324000033371 0            000000033371 
IT1	033370 0      0   0   324000033371 0            000000033371 
AT3	033370 0      0   0   000000033371 0            324000033371 
AT6	033370 033371 0   0   000000033371 0            324000033371 
FT1A	033370 033371 0   0   000000033371 0            000000033371 
FT2	033370 033371 0   0   0            0            000000033371 
FT2RQ	033370 033371 0   0   000001000000 0            000000033371 
FT3	033370 033371 0   0   000001000000 0            000000033371 
FT9	033371 033371 0   0   000001000000 0            000000033371 
ET0	033371 033371 0   0   000001000000 0            000000033371 
ST1A	033371 033371 0   0   000001000000 0            000000033371 
ST9	033371 033371 0   0   000001000000 0            000000033371 


*033371 HRLZI	0,000001
INITIAL
C(AC)=000001 000000 
FINAL
C(AC)=000001 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033371 033371 0   0   515000000001 0            000000000001 
IT1	033371 0      0   0   515000000001 0            000000000001 
AT3	033371 0      0   0   000000000001 0            515000000001 
AT6	033371 000001 0   0   000000000001 0            515000000001 
FT1A	033371 000001 0   0   000000000001 0            000000000001 
FT9	033372 000001 0   0   000000000001 0            000000000001 
ET0	033372 000001 0   0   000001000000 0            000000000001 
ST1	033372 000001 0   0   000001000000 0            000000000001 
ST2	033372 000001 0   0   000001000000 0            000000000001 
ST9	033372 000001 0   0   000001000000 0            000000000001 


*033372 ADD 	0,034041
INITIAL
C(AC)=000001 000000 
C(E)=000001 000000 
FINAL
C(AC)=000002 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033372 033372 0   0   270000034041 0            000001000000 
IT1	033372 0      0   0   270000034041 0            000001000000 
AT3	033372 0      0   0   000000034041 0            270000034041 
AT6	033372 034041 0   0   000000034041 0            270000034041 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 471
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0661

FT0	033372 034041 0   0   000001000000 0            270000034041 
FT1A	033372 034041 0   0   000001000000 0            000001000000 
FT2	033372 034041 0   0   0            0            000001000000 
FT2RQ	033372 034041 0   0   000001000000 0            000001000000 
FT3	033372 034041 0   0   000001000000 0            000001000000 
FT9	033373 034041 0   0   000001000000 0            000001000000 
ET0	033373 034041 0   0   000002000000 0            000001000000 
ST1	033373 034041 0   0   000002000000 0            000001000000 
ST2	033373 034041 0   0   000002000000 0            000001000000 
ST9	033373 034041 0   0   000002000000 0            000001000000 


*033373 CAME	0,034042
INITIAL
C(AC)=000002 000000 
C(E)=000002 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033373 033373 0   0   312000034042 0            000002000000 
IT1	033373 0      0   0   312000034042 0            000002000000 
AT3	033373 0      0   0   000000034042 0            312000034042 
AT6	033373 034042 0   0   000000034042 0            312000034042 
FT0	033373 034042 0   0   000002000000 0            312000034042 
FT1A	033373 034042 0   0   000002000000 0            000002000000 
FT2	033373 034042 0   0   0            0            000002000000 
FT2RQ	033373 034042 0   0   000002000000 0            000002000000 
FT3	033373 034042 0   0   000002000000 0            000002000000 
FT9	033374 034042 0   0   000002000000 0            000002000000 
ET0	033375 034042 0   0   0            0            000002000000 
ST1A	033375 034042 0   0   0            0            000002000000 
ST9	033375 034042 0   0   0            0            000002000000 


*033375 JUMPA	0,033376
INITIAL
C(AC)=000002 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033375 033375 0   0   324000033376 0            000000033376 
IT1	033375 0      0   0   324000033376 0            000000033376 
AT3	033375 0      0   0   000000033376 0            324000033376 
AT6	033375 033376 0   0   000000033376 0            324000033376 
FT1A	033375 033376 0   0   000000033376 0            000000033376 
FT2	033375 033376 0   0   0            0            000000033376 
FT2RQ	033375 033376 0   0   000002000000 0            000000033376 
FT3	033375 033376 0   0   000002000000 0            000000033376 
FT9	033376 033376 0   0   000002000000 0            000000033376 
ET0	033376 033376 0   0   000002000000 0            000000033376 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 472
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0662

ST1A	033376 033376 0   0   000002000000 0            000000033376 
ST9	033376 033376 0   0   000002000000 0            000000033376 


*033376 HRLZI	0,000002
INITIAL
C(AC)=000002 000000 
FINAL
C(AC)=000002 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033376 033376 0   0   515000000002 0            000000000002 
IT1	033376 0      0   0   515000000002 0            000000000002 
AT3	033376 0      0   0   000000000002 0            515000000002 
AT6	033376 000002 0   0   000000000002 0            515000000002 
FT1A	033376 000002 0   0   000000000002 0            000000000002 
FT9	033377 000002 0   0   000000000002 0            000000000002 
ET0	033377 000002 0   0   000002000000 0            000000000002 
ST1	033377 000002 0   0   000002000000 0            000000000002 
ST2	033377 000002 0   0   000002000000 0            000000000002 
ST9	033377 000002 0   0   000002000000 0            000000000002 


*033377 ADD 	0,034042
INITIAL
C(AC)=000002 000000 
C(E)=000002 000000 
FINAL
C(AC)=000004 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033377 033377 0   0   270000034042 0            000002000000 
IT1	033377 0      0   0   270000034042 0            000002000000 
AT3	033377 0      0   0   000000034042 0            270000034042 
AT6	033377 034042 0   0   000000034042 0            270000034042 
FT0	033377 034042 0   0   000002000000 0            270000034042 
FT1A	033377 034042 0   0   000002000000 0            000002000000 
FT2	033377 034042 0   0   0            0            000002000000 
FT2RQ	033377 034042 0   0   000002000000 0            000002000000 
FT3	033377 034042 0   0   000002000000 0            000002000000 
FT9	0      034042 0   0   000002000000 0            000002000000 
ET0	0      034042 0   0   000004000000 0            000002000000 
ST1	0      034042 0   0   000004000000 0            000002000000 
ST2	0      034042 0   0   000004000000 0            000002000000 
ST9	0      034042 0   0   000004000000 0            000002000000 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 473
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0663

*033400 CAME	0,034043
INITIAL
C(AC)=000004 000000 
C(E)=000004 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	0      0      0   0   312000034043 0            000004000000 
IT1	0      0      0   0   312000034043 0            000004000000 
AT3	0      0      0   0   000000034043 0            312000034043 
AT6	0      034043 0   0   000000034043 0            312000034043 
FT0	0      034043 0   0   000004000000 0            312000034043 
FT1A	0      034043 0   0   000004000000 0            000004000000 
FT2	0      034043 0   0   0            0            000004000000 
FT2RQ	0      034043 0   0   000004000000 0            000004000000 
FT3	0      034043 0   0   000004000000 0            000004000000 
FT9	033401 034043 0   0   000004000000 0            000004000000 
ET0	033402 034043 0   0   0            0            000004000000 
ST1A	033402 034043 0   0   0            0            000004000000 
ST9	033402 034043 0   0   0            0            000004000000 


*033402 JUMPA	0,033403
INITIAL
C(AC)=000004 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033402 033402 0   0   324000033403 0            000000033403 
IT1	033402 0      0   0   324000033403 0            000000033403 
AT3	033402 0      0   0   000000033403 0            324000033403 
AT6	033402 033403 0   0   000000033403 0            324000033403 
FT1A	033402 033403 0   0   000000033403 0            000000033403 
FT2	033402 033403 0   0   0            0            000000033403 
FT2RQ	033402 033403 0   0   000004000000 0            000000033403 
FT3	033402 033403 0   0   000004000000 0            000000033403 
FT9	033403 033403 0   0   000004000000 0            000000033403 
ET0	033403 033403 0   0   000004000000 0            000000033403 
ST1A	033403 033403 0   0   000004000000 0            000000033403 
ST9	033403 033403 0   0   000004000000 0            000000033403 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 474
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0664

*033403 HRLZI	0,000004
INITIAL
C(AC)=000004 000000 
FINAL
C(AC)=000004 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033403 033403 0   0   515000000004 0            000000000004 
IT1	033403 0      0   0   515000000004 0            000000000004 
AT3	033403 0      0   0   000000000004 0            515000000004 
AT6	033403 000004 0   0   000000000004 0            515000000004 
FT1A	033403 000004 0   0   000000000004 0            000000000004 
FT9	033404 000004 0   0   000000000004 0            000000000004 
ET0	033404 000004 0   0   000004000000 0            000000000004 
ST1	033404 000004 0   0   000004000000 0            000000000004 
ST2	033404 000004 0   0   000004000000 0            000000000004 
ST9	033404 000004 0   0   000004000000 0            000000000004 


*033404 ADD 	0,034043
INITIAL
C(AC)=000004 000000 
C(E)=000004 000000 
FINAL
C(AC)=000010 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033404 033404 0   0   270000034043 0            000004000000 
IT1	033404 0      0   0   270000034043 0            000004000000 
AT3	033404 0      0   0   000000034043 0            270000034043 
AT6	033404 034043 0   0   000000034043 0            270000034043 
FT0	033404 034043 0   0   000004000000 0            270000034043 
FT1A	033404 034043 0   0   000004000000 0            000004000000 
FT2	033404 034043 0   0   0            0            000004000000 
FT2RQ	033404 034043 0   0   000004000000 0            000004000000 
FT3	033404 034043 0   0   000004000000 0            000004000000 
FT9	033405 034043 0   0   000004000000 0            000004000000 
ET0	033405 034043 0   0   000010000000 0            000004000000 
ST1	033405 034043 0   0   000010000000 0            000004000000 
ST2	033405 034043 0   0   000010000000 0            000004000000 
ST9	033405 034043 0   0   000010000000 0            000004000000 


*033405 CAME	0,034044
INITIAL
C(AC)=000010 000000 
C(E)=000010 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033405 033405 0   0   312000034044 0            000010000000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 475
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0665

IT1	033405 0      0   0   312000034044 0            000010000000 
AT3	033405 0      0   0   000000034044 0            312000034044 
AT6	033405 034044 0   0   000000034044 0            312000034044 
FT0	033405 034044 0   0   000010000000 0            312000034044 
FT1A	033405 034044 0   0   000010000000 0            000010000000 
FT2	033405 034044 0   0   0            0            000010000000 
FT2RQ	033405 034044 0   0   000010000000 0            000010000000 
FT3	033405 034044 0   0   000010000000 0            000010000000 
FT9	033406 034044 0   0   000010000000 0            000010000000 
ET0	033407 034044 0   0   0            0            000010000000 
ST1A	033407 034044 0   0   0            0            000010000000 
ST9	033407 034044 0   0   0            0            000010000000 


*033407 JUMPA	0,033410
INITIAL
C(AC)=000010 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033407 033407 0   0   324000033410 0            000000033410 
IT1	033407 0      0   0   324000033410 0            000000033410 
AT3	033407 0      0   0   000000033410 0            324000033410 
AT6	033407 033410 0   0   000000033410 0            324000033410 
FT1A	033407 033410 0   0   000000033410 0            000000033410 
FT2	033407 033410 0   0   0            0            000000033410 
FT2RQ	033407 033410 0   0   000010000000 0            000000033410 
FT3	033407 033410 0   0   000010000000 0            000000033410 
FT9	033410 033410 0   0   000010000000 0            000000033410 
ET0	033410 033410 0   0   000010000000 0            000000033410 
ST1A	033410 033410 0   0   000010000000 0            000000033410 
ST9	033410 033410 0   0   000010000000 0            000000033410 


*033410 HRLZI	0,000010
INITIAL
C(AC)=000010 000000 
FINAL
C(AC)=000010 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033410 033410 0   0   515000000010 0            000000000010 
IT1	033410 0      0   0   515000000010 0            000000000010 
AT3	033410 0      0   0   000000000010 0            515000000010 
AT6	033410 000010 0   0   000000000010 0            515000000010 
FT1A	033410 000010 0   0   000000000010 0            000000000010 
FT9	033411 000010 0   0   000000000010 0            000000000010 
ET0	033411 000010 0   0   000010000000 0            000000000010 
ST1	033411 000010 0   0   000010000000 0            000000000010 
ST2	033411 000010 0   0   000010000000 0            000000000010 
ST9	033411 000010 0   0   000010000000 0            000000000010 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 476
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0666



*033411 ADD 	0,034044
INITIAL
C(AC)=000010 000000 
C(E)=000010 000000 
FINAL
C(AC)=000020 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033411 033411 0   0   270000034044 0            000010000000 
IT1	033411 0      0   0   270000034044 0            000010000000 
AT3	033411 0      0   0   000000034044 0            270000034044 
AT6	033411 034044 0   0   000000034044 0            270000034044 
FT0	033411 034044 0   0   000010000000 0            270000034044 
FT1A	033411 034044 0   0   000010000000 0            000010000000 
FT2	033411 034044 0   0   0            0            000010000000 
FT2RQ	033411 034044 0   0   000010000000 0            000010000000 
FT3	033411 034044 0   0   000010000000 0            000010000000 
FT9	033412 034044 0   0   000010000000 0            000010000000 
ET0	033412 034044 0   0   000020000000 0            000010000000 
ST1	033412 034044 0   0   000020000000 0            000010000000 
ST2	033412 034044 0   0   000020000000 0            000010000000 
ST9	033412 034044 0   0   000020000000 0            000010000000 


*033412 CAME	0,034045
INITIAL
C(AC)=000020 000000 
C(E)=000020 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033412 033412 0   0   312000034045 0            000020000000 
IT1	033412 0      0   0   312000034045 0            000020000000 
AT3	033412 0      0   0   000000034045 0            312000034045 
AT6	033412 034045 0   0   000000034045 0            312000034045 
FT0	033412 034045 0   0   000020000000 0            312000034045 
FT1A	033412 034045 0   0   000020000000 0            000020000000 
FT2	033412 034045 0   0   0            0            000020000000 
FT2RQ	033412 034045 0   0   000020000000 0            000020000000 
FT3	033412 034045 0   0   000020000000 0            000020000000 
FT9	033413 034045 0   0   000020000000 0            000020000000 
ET0	033414 034045 0   0   0            0            000020000000 
ST1A	033414 034045 0   0   0            0            000020000000 
ST9	033414 034045 0   0   0            0            000020000000 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 477
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0667

*033414 JUMPA	0,033415
INITIAL
C(AC)=000020 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033414 033414 0   0   324000033415 0            000000033415 
IT1	033414 0      0   0   324000033415 0            000000033415 
AT3	033414 0      0   0   000000033415 0            324000033415 
AT6	033414 033415 0   0   000000033415 0            324000033415 
FT1A	033414 033415 0   0   000000033415 0            000000033415 
FT2	033414 033415 0   0   0            0            000000033415 
FT2RQ	033414 033415 0   0   000020000000 0            000000033415 
FT3	033414 033415 0   0   000020000000 0            000000033415 
FT9	033415 033415 0   0   000020000000 0            000000033415 
ET0	033415 033415 0   0   000020000000 0            000000033415 
ST1A	033415 033415 0   0   000020000000 0            000000033415 
ST9	033415 033415 0   0   000020000000 0            000000033415 


*033415 HRLZI	0,000020
INITIAL
C(AC)=000020 000000 
FINAL
C(AC)=000020 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033415 033415 0   0   515000000020 0            000000000020 
IT1	033415 0      0   0   515000000020 0            000000000020 
AT3	033415 0      0   0   000000000020 0            515000000020 
AT6	033415 000020 0   0   000000000020 0            515000000020 
FT1A	033415 000020 0   0   000000000020 0            000000000020 
FT9	033416 000020 0   0   000000000020 0            000000000020 
ET0	033416 000020 0   0   000020000000 0            000000000020 
ST1	033416 000020 0   0   000020000000 0            000000000020 
ST2	033416 000020 0   0   000020000000 0            000000000020 
ST9	033416 000020 0   0   000020000000 0            000000000020 


*033416 ADD 	0,034045
INITIAL
C(AC)=000020 000000 
C(E)=000020 000000 
FINAL
C(AC)=000040 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033416 033416 0   0   270000034045 0            000020000000 
IT1	033416 0      0   0   270000034045 0            000020000000 
AT3	033416 0      0   0   000000034045 0            270000034045 
AT6	033416 034045 0   0   000000034045 0            270000034045 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 478
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0668

FT0	033416 034045 0   0   000020000000 0            270000034045 
FT1A	033416 034045 0   0   000020000000 0            000020000000 
FT2	033416 034045 0   0   0            0            000020000000 
FT2RQ	033416 034045 0   0   000020000000 0            000020000000 
FT3	033416 034045 0   0   000020000000 0            000020000000 
FT9	033417 034045 0   0   000020000000 0            000020000000 
ET0	033417 034045 0   0   000040000000 0            000020000000 
ST1	033417 034045 0   0   000040000000 0            000020000000 
ST2	033417 034045 0   0   000040000000 0            000020000000 
ST9	033417 034045 0   0   000040000000 0            000020000000 


*033417 CAME	0,034046
INITIAL
C(AC)=000040 000000 
C(E)=000040 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033417 033417 0   0   312000034046 0            000040000000 
IT1	033417 0      0   0   312000034046 0            000040000000 
AT3	033417 0      0   0   000000034046 0            312000034046 
AT6	033417 034046 0   0   000000034046 0            312000034046 
FT0	033417 034046 0   0   000040000000 0            312000034046 
FT1A	033417 034046 0   0   000040000000 0            000040000000 
FT2	033417 034046 0   0   0            0            000040000000 
FT2RQ	033417 034046 0   0   000040000000 0            000040000000 
FT3	033417 034046 0   0   000040000000 0            000040000000 
FT9	033420 034046 0   0   000040000000 0            000040000000 
ET0	033421 034046 0   0   0            0            000040000000 
ST1A	033421 034046 0   0   0            0            000040000000 
ST9	033421 034046 0   0   0            0            000040000000 


*033421 JUMPA	0,033422
INITIAL
C(AC)=000040 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033421 033421 0   0   324000033422 0            000000033422 
IT1	033421 0      0   0   324000033422 0            000000033422 
AT3	033421 0      0   0   000000033422 0            324000033422 
AT6	033421 033422 0   0   000000033422 0            324000033422 
FT1A	033421 033422 0   0   000000033422 0            000000033422 
FT2	033421 033422 0   0   0            0            000000033422 
FT2RQ	033421 033422 0   0   000040000000 0            000000033422 
FT3	033421 033422 0   0   000040000000 0            000000033422 
FT9	033422 033422 0   0   000040000000 0            000000033422 
ET0	033422 033422 0   0   000040000000 0            000000033422 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 479
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0669

ST1A	033422 033422 0   0   000040000000 0            000000033422 
ST9	033422 033422 0   0   000040000000 0            000000033422 


*033422 HRLZI	0,000040
INITIAL
C(AC)=000040 000000 
FINAL
C(AC)=000040 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033422 033422 0   0   515000000040 0            000000000040 
IT1	033422 0      0   0   515000000040 0            000000000040 
AT3	033422 0      0   0   000000000040 0            515000000040 
AT6	033422 000040 0   0   000000000040 0            515000000040 
FT1A	033422 000040 0   0   000000000040 0            000000000040 
FT9	033423 000040 0   0   000000000040 0            000000000040 
ET0	033423 000040 0   0   000040000000 0            000000000040 
ST1	033423 000040 0   0   000040000000 0            000000000040 
ST2	033423 000040 0   0   000040000000 0            000000000040 
ST9	033423 000040 0   0   000040000000 0            000000000040 


*033423 ADD 	0,034046
INITIAL
C(AC)=000040 000000 
C(E)=000040 000000 
FINAL
C(AC)=000100 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033423 033423 0   0   270000034046 0            000040000000 
IT1	033423 0      0   0   270000034046 0            000040000000 
AT3	033423 0      0   0   000000034046 0            270000034046 
AT6	033423 034046 0   0   000000034046 0            270000034046 
FT0	033423 034046 0   0   000040000000 0            270000034046 
FT1A	033423 034046 0   0   000040000000 0            000040000000 
FT2	033423 034046 0   0   0            0            000040000000 
FT2RQ	033423 034046 0   0   000040000000 0            000040000000 
FT3	033423 034046 0   0   000040000000 0            000040000000 
FT9	033424 034046 0   0   000040000000 0            000040000000 
ET0	033424 034046 0   0   000100000000 0            000040000000 
ST1	033424 034046 0   0   000100000000 0            000040000000 
ST2	033424 034046 0   0   000100000000 0            000040000000 
ST9	033424 034046 0   0   000100000000 0            000040000000 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 480
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0670

*033424 CAME	0,034047
INITIAL
C(AC)=000100 000000 
C(E)=000100 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033424 033424 0   0   312000034047 0            000100000000 
IT1	033424 0      0   0   312000034047 0            000100000000 
AT3	033424 0      0   0   000000034047 0            312000034047 
AT6	033424 034047 0   0   000000034047 0            312000034047 
FT0	033424 034047 0   0   000100000000 0            312000034047 
FT1A	033424 034047 0   0   000100000000 0            000100000000 
FT2	033424 034047 0   0   0            0            000100000000 
FT2RQ	033424 034047 0   0   000100000000 0            000100000000 
FT3	033424 034047 0   0   000100000000 0            000100000000 
FT9	033425 034047 0   0   000100000000 0            000100000000 
ET0	033426 034047 0   0   0            0            000100000000 
ST1A	033426 034047 0   0   0            0            000100000000 
ST9	033426 034047 0   0   0            0            000100000000 


*033426 JUMPA	0,033427
INITIAL
C(AC)=000100 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033426 033426 0   0   324000033427 0            000000033427 
IT1	033426 0      0   0   324000033427 0            000000033427 
AT3	033426 0      0   0   000000033427 0            324000033427 
AT6	033426 033427 0   0   000000033427 0            324000033427 
FT1A	033426 033427 0   0   000000033427 0            000000033427 
FT2	033426 033427 0   0   0            0            000000033427 
FT2RQ	033426 033427 0   0   000100000000 0            000000033427 
FT3	033426 033427 0   0   000100000000 0            000000033427 
FT9	033427 033427 0   0   000100000000 0            000000033427 
ET0	033427 033427 0   0   000100000000 0            000000033427 
ST1A	033427 033427 0   0   000100000000 0            000000033427 
ST9	033427 033427 0   0   000100000000 0            000000033427 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 481
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0671

*033427 HRLZI	0,000100
INITIAL
C(AC)=000100 000000 
FINAL
C(AC)=000100 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033427 033427 0   0   515000000100 0            000000000100 
IT1	033427 0      0   0   515000000100 0            000000000100 
AT3	033427 0      0   0   000000000100 0            515000000100 
AT6	033427 0      0   0   000000000100 0            515000000100 
FT1A	033427 0      0   0   000000000100 0            000000000100 
FT9	033430 0      0   0   000000000100 0            000000000100 
ET0	033430 0      0   0   000100000000 0            000000000100 
ST1	033430 0      0   0   000100000000 0            000000000100 
ST2	033430 0      0   0   000100000000 0            000000000100 
ST9	033430 0      0   0   000100000000 0            000000000100 


*033430 ADD 	0,034047
INITIAL
C(AC)=000100 000000 
C(E)=000100 000000 
FINAL
C(AC)=000200 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033430 033430 0   0   270000034047 0            000100000000 
IT1	033430 0      0   0   270000034047 0            000100000000 
AT3	033430 0      0   0   000000034047 0            270000034047 
AT6	033430 034047 0   0   000000034047 0            270000034047 
FT0	033430 034047 0   0   000100000000 0            270000034047 
FT1A	033430 034047 0   0   000100000000 0            000100000000 
FT2	033430 034047 0   0   0            0            000100000000 
FT2RQ	033430 034047 0   0   000100000000 0            000100000000 
FT3	033430 034047 0   0   000100000000 0            000100000000 
FT9	033431 034047 0   0   000100000000 0            000100000000 
ET0	033431 034047 0   0   000200000000 0            000100000000 
ST1	033431 034047 0   0   000200000000 0            000100000000 
ST2	033431 034047 0   0   000200000000 0            000100000000 
ST9	033431 034047 0   0   000200000000 0            000100000000 


*033431 CAME	0,034050
INITIAL
C(AC)=000200 000000 
C(E)=000200 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033431 033431 0   0   312000034050 0            000200000000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 482
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0672

IT1	033431 0      0   0   312000034050 0            000200000000 
AT3	033431 0      0   0   000000034050 0            312000034050 
AT6	033431 034050 0   0   000000034050 0            312000034050 
FT0	033431 034050 0   0   000200000000 0            312000034050 
FT1A	033431 034050 0   0   000200000000 0            000200000000 
FT2	033431 034050 0   0   0            0            000200000000 
FT2RQ	033431 034050 0   0   000200000000 0            000200000000 
FT3	033431 034050 0   0   000200000000 0            000200000000 
FT9	033432 034050 0   0   000200000000 0            000200000000 
ET0	033433 034050 0   0   0            0            000200000000 
ST1A	033433 034050 0   0   0            0            000200000000 
ST9	033433 034050 0   0   0            0            000200000000 


*033433 JUMPA	0,033434
INITIAL
C(AC)=000200 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033433 033433 0   0   324000033434 0            000000033434 
IT1	033433 0      0   0   324000033434 0            000000033434 
AT3	033433 0      0   0   000000033434 0            324000033434 
AT6	033433 033434 0   0   000000033434 0            324000033434 
FT1A	033433 033434 0   0   000000033434 0            000000033434 
FT2	033433 033434 0   0   0            0            000000033434 
FT2RQ	033433 033434 0   0   000200000000 0            000000033434 
FT3	033433 033434 0   0   000200000000 0            000000033434 
FT9	033434 033434 0   0   000200000000 0            000000033434 
ET0	033434 033434 0   0   000200000000 0            000000033434 
ST1A	033434 033434 0   0   000200000000 0            000000033434 
ST9	033434 033434 0   0   000200000000 0            000000033434 


*033434 HRLZI	0,000200
INITIAL
C(AC)=000200 000000 
FINAL
C(AC)=000200 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033434 033434 0   0   515000000200 0            000000000200 
IT1	033434 0      0   0   515000000200 0            000000000200 
AT3	033434 0      0   0   000000000200 0            515000000200 
AT6	033434 0      0   0   000000000200 0            515000000200 
FT1A	033434 0      0   0   000000000200 0            000000000200 
FT9	033435 0      0   0   000000000200 0            000000000200 
ET0	033435 0      0   0   000200000000 0            000000000200 
ST1	033435 0      0   0   000200000000 0            000000000200 
ST2	033435 0      0   0   000200000000 0            000000000200 
ST9	033435 0      0   0   000200000000 0            000000000200 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 483
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0673



*033435 ADD 	0,034050
INITIAL
C(AC)=000200 000000 
C(E)=000200 000000 
FINAL
C(AC)=000400 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033435 033435 0   0   270000034050 0            000200000000 
IT1	033435 0      0   0   270000034050 0            000200000000 
AT3	033435 0      0   0   000000034050 0            270000034050 
AT6	033435 034050 0   0   000000034050 0            270000034050 
FT0	033435 034050 0   0   000200000000 0            270000034050 
FT1A	033435 034050 0   0   000200000000 0            000200000000 
FT2	033435 034050 0   0   0            0            000200000000 
FT2RQ	033435 034050 0   0   000200000000 0            000200000000 
FT3	033435 034050 0   0   000200000000 0            000200000000 
FT9	033436 034050 0   0   000200000000 0            000200000000 
ET0	033436 034050 0   0   000400000000 0            000200000000 
ST1	033436 034050 0   0   000400000000 0            000200000000 
ST2	033436 034050 0   0   000400000000 0            000200000000 
ST9	033436 034050 0   0   000400000000 0            000200000000 


*033436 CAME	0,034051
INITIAL
C(AC)=000400 000000 
C(E)=000400 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033436 033436 0   0   312000034051 0            000400000000 
IT1	033436 0      0   0   312000034051 0            000400000000 
AT3	033436 0      0   0   000000034051 0            312000034051 
AT6	033436 034051 0   0   000000034051 0            312000034051 
FT0	033436 034051 0   0   000400000000 0            312000034051 
FT1A	033436 034051 0   0   000400000000 0            000400000000 
FT2	033436 034051 0   0   0            0            000400000000 
FT2RQ	033436 034051 0   0   000400000000 0            000400000000 
FT3	033436 034051 0   0   000400000000 0            000400000000 
FT9	033437 034051 0   0   000400000000 0            000400000000 
ET0	033440 034051 0   0   0            0            000400000000 
ST1A	033440 034051 0   0   0            0            000400000000 
ST9	033440 034051 0   0   0            0            000400000000 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 484
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0674

*033440 JUMPA	0,033441
INITIAL
C(AC)=000400 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033440 033440 0   0   324000033441 0            000000033441 
IT1	033440 0      0   0   324000033441 0            000000033441 
AT3	033440 0      0   0   000000033441 0            324000033441 
AT6	033440 033441 0   0   000000033441 0            324000033441 
FT1A	033440 033441 0   0   000000033441 0            000000033441 
FT2	033440 033441 0   0   0            0            000000033441 
FT2RQ	033440 033441 0   0   000400000000 0            000000033441 
FT3	033440 033441 0   0   000400000000 0            000000033441 
FT9	033441 033441 0   0   000400000000 0            000000033441 
ET0	033441 033441 0   0   000400000000 0            000000033441 
ST1A	033441 033441 0   0   000400000000 0            000000033441 
ST9	033441 033441 0   0   000400000000 0            000000033441 


*033441 HRLZI	0,000400
INITIAL
C(AC)=000400 000000 
FINAL
C(AC)=000400 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033441 033441 0   0   515000000400 0            000000000400 
IT1	033441 0      0   0   515000000400 0            000000000400 
AT3	033441 0      0   0   000000000400 0            515000000400 
AT6	033441 0      0   0   000000000400 0            515000000400 
FT1A	033441 0      0   0   000000000400 0            000000000400 
FT9	033442 0      0   0   000000000400 0            000000000400 
ET0	033442 0      0   0   000400000000 0            000000000400 
ST1	033442 0      0   0   000400000000 0            000000000400 
ST2	033442 0      0   0   000400000000 0            000000000400 
ST9	033442 0      0   0   000400000000 0            000000000400 


*033442 ADD 	0,034051
INITIAL
C(AC)=000400 000000 
C(E)=000400 000000 
FINAL
C(AC)=001000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033442 033442 0   0   270000034051 0            000400000000 
IT1	033442 0      0   0   270000034051 0            000400000000 
AT3	033442 0      0   0   000000034051 0            270000034051 
AT6	033442 034051 0   0   000000034051 0            270000034051 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 485
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0675

FT0	033442 034051 0   0   000400000000 0            270000034051 
FT1A	033442 034051 0   0   000400000000 0            000400000000 
FT2	033442 034051 0   0   0            0            000400000000 
FT2RQ	033442 034051 0   0   000400000000 0            000400000000 
FT3	033442 034051 0   0   000400000000 0            000400000000 
FT9	033443 034051 0   0   000400000000 0            000400000000 
ET0	033443 034051 0   0   001000000000 0            000400000000 
ST1	033443 034051 0   0   001000000000 0            000400000000 
ST2	033443 034051 0   0   001000000000 0            000400000000 
ST9	033443 034051 0   0   001000000000 0            000400000000 


*033443 CAME	0,034052
INITIAL
C(AC)=001000 000000 
C(E)=001000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033443 033443 0   0   312000034052 0            001000000000 
IT1	033443 0      0   0   312000034052 0            001000000000 
AT3	033443 0      0   0   000000034052 0            312000034052 
AT6	033443 034052 0   0   000000034052 0            312000034052 
FT0	033443 034052 0   0   001000000000 0            312000034052 
FT1A	033443 034052 0   0   001000000000 0            001000000000 
FT2	033443 034052 0   0   0            0            001000000000 
FT2RQ	033443 034052 0   0   001000000000 0            001000000000 
FT3	033443 034052 0   0   001000000000 0            001000000000 
FT9	033444 034052 0   0   001000000000 0            001000000000 
ET0	033445 034052 0   0   0            0            001000000000 
ST1A	033445 034052 0   0   0            0            001000000000 
ST9	033445 034052 0   0   0            0            001000000000 


*033445 JUMPA	0,033446
INITIAL
C(AC)=001000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033445 033445 0   0   324000033446 0            000000033446 
IT1	033445 0      0   0   324000033446 0            000000033446 
AT3	033445 0      0   0   000000033446 0            324000033446 
AT6	033445 033446 0   0   000000033446 0            324000033446 
FT1A	033445 033446 0   0   000000033446 0            000000033446 
FT2	033445 033446 0   0   0            0            000000033446 
FT2RQ	033445 033446 0   0   001000000000 0            000000033446 
FT3	033445 033446 0   0   001000000000 0            000000033446 
FT9	033446 033446 0   0   001000000000 0            000000033446 
ET0	033446 033446 0   0   001000000000 0            000000033446 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 486
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0676

ST1A	033446 033446 0   0   001000000000 0            000000033446 
ST9	033446 033446 0   0   001000000000 0            000000033446 


*033446 HRLZI	0,001000
INITIAL
C(AC)=001000 000000 
FINAL
C(AC)=001000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033446 033446 0   0   515000001000 0            000000001000 
IT1	033446 0      0   0   515000001000 0            000000001000 
AT3	033446 0      0   0   000000001000 0            515000001000 
AT6	033446 0      0   0   000000001000 0            515000001000 
FT1A	033446 0      0   0   000000001000 0            000000001000 
FT9	033447 0      0   0   000000001000 0            000000001000 
ET0	033447 0      0   0   001000000000 0            000000001000 
ST1	033447 0      0   0   001000000000 0            000000001000 
ST2	033447 0      0   0   001000000000 0            000000001000 
ST9	033447 0      0   0   001000000000 0            000000001000 


*033447 ADD 	0,034052
INITIAL
C(AC)=001000 000000 
C(E)=001000 000000 
FINAL
C(AC)=002000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033447 033447 0   0   270000034052 0            001000000000 
IT1	033447 0      0   0   270000034052 0            001000000000 
AT3	033447 0      0   0   000000034052 0            270000034052 
AT6	033447 034052 0   0   000000034052 0            270000034052 
FT0	033447 034052 0   0   001000000000 0            270000034052 
FT1A	033447 034052 0   0   001000000000 0            001000000000 
FT2	033447 034052 0   0   0            0            001000000000 
FT2RQ	033447 034052 0   0   001000000000 0            001000000000 
FT3	033447 034052 0   0   001000000000 0            001000000000 
FT9	033450 034052 0   0   001000000000 0            001000000000 
ET0	033450 034052 0   0   002000000000 0            001000000000 
ST1	033450 034052 0   0   002000000000 0            001000000000 
ST2	033450 034052 0   0   002000000000 0            001000000000 
ST9	033450 034052 0   0   002000000000 0            001000000000 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 487
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0677

*033450 CAME	0,034053
INITIAL
C(AC)=002000 000000 
C(E)=002000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033450 033450 0   0   312000034053 0            002000000000 
IT1	033450 0      0   0   312000034053 0            002000000000 
AT3	033450 0      0   0   000000034053 0            312000034053 
AT6	033450 034053 0   0   000000034053 0            312000034053 
FT0	033450 034053 0   0   002000000000 0            312000034053 
FT1A	033450 034053 0   0   002000000000 0            002000000000 
FT2	033450 034053 0   0   0            0            002000000000 
FT2RQ	033450 034053 0   0   002000000000 0            002000000000 
FT3	033450 034053 0   0   002000000000 0            002000000000 
FT9	033451 034053 0   0   002000000000 0            002000000000 
ET0	033452 034053 0   0   0            0            002000000000 
ST1A	033452 034053 0   0   0            0            002000000000 
ST9	033452 034053 0   0   0            0            002000000000 


*033452 JUMPA	0,033453
INITIAL
C(AC)=002000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033452 033452 0   0   324000033453 0            000000033453 
IT1	033452 0      0   0   324000033453 0            000000033453 
AT3	033452 0      0   0   000000033453 0            324000033453 
AT6	033452 033453 0   0   000000033453 0            324000033453 
FT1A	033452 033453 0   0   000000033453 0            000000033453 
FT2	033452 033453 0   0   0            0            000000033453 
FT2RQ	033452 033453 0   0   002000000000 0            000000033453 
FT3	033452 033453 0   0   002000000000 0            000000033453 
FT9	033453 033453 0   0   002000000000 0            000000033453 
ET0	033453 033453 0   0   002000000000 0            000000033453 
ST1A	033453 033453 0   0   002000000000 0            000000033453 
ST9	033453 033453 0   0   002000000000 0            000000033453 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 488
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0678

*033453 HRLZI	0,002000
INITIAL
C(AC)=002000 000000 
FINAL
C(AC)=002000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033453 033453 0   0   515000002000 0            000000002000 
IT1	033453 0      0   0   515000002000 0            000000002000 
AT3	033453 0      0   0   000000002000 0            515000002000 
AT6	033453 0      0   0   000000002000 0            515000002000 
FT1A	033453 0      0   0   000000002000 0            000000002000 
FT9	033454 0      0   0   000000002000 0            000000002000 
ET0	033454 0      0   0   002000000000 0            000000002000 
ST1	033454 0      0   0   002000000000 0            000000002000 
ST2	033454 0      0   0   002000000000 0            000000002000 
ST9	033454 0      0   0   002000000000 0            000000002000 


*033454 ADD 	0,034053
INITIAL
C(AC)=002000 000000 
C(E)=002000 000000 
FINAL
C(AC)=004000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033454 033454 0   0   270000034053 0            002000000000 
IT1	033454 0      0   0   270000034053 0            002000000000 
AT3	033454 0      0   0   000000034053 0            270000034053 
AT6	033454 034053 0   0   000000034053 0            270000034053 
FT0	033454 034053 0   0   002000000000 0            270000034053 
FT1A	033454 034053 0   0   002000000000 0            002000000000 
FT2	033454 034053 0   0   0            0            002000000000 
FT2RQ	033454 034053 0   0   002000000000 0            002000000000 
FT3	033454 034053 0   0   002000000000 0            002000000000 
FT9	033455 034053 0   0   002000000000 0            002000000000 
ET0	033455 034053 0   0   004000000000 0            002000000000 
ST1	033455 034053 0   0   004000000000 0            002000000000 
ST2	033455 034053 0   0   004000000000 0            002000000000 
ST9	033455 034053 0   0   004000000000 0            002000000000 


*033455 CAME	0,034054
INITIAL
C(AC)=004000 000000 
C(E)=004000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033455 033455 0   0   312000034054 0            004000000000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 489
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0679

IT1	033455 0      0   0   312000034054 0            004000000000 
AT3	033455 0      0   0   000000034054 0            312000034054 
AT6	033455 034054 0   0   000000034054 0            312000034054 
FT0	033455 034054 0   0   004000000000 0            312000034054 
FT1A	033455 034054 0   0   004000000000 0            004000000000 
FT2	033455 034054 0   0   0            0            004000000000 
FT2RQ	033455 034054 0   0   004000000000 0            004000000000 
FT3	033455 034054 0   0   004000000000 0            004000000000 
FT9	033456 034054 0   0   004000000000 0            004000000000 
ET0	033457 034054 0   0   0            0            004000000000 
ST1A	033457 034054 0   0   0            0            004000000000 
ST9	033457 034054 0   0   0            0            004000000000 


*033457 JUMPA	0,033460
INITIAL
C(AC)=004000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033457 033457 0   0   324000033460 0            000000033460 
IT1	033457 0      0   0   324000033460 0            000000033460 
AT3	033457 0      0   0   000000033460 0            324000033460 
AT6	033457 033460 0   0   000000033460 0            324000033460 
FT1A	033457 033460 0   0   000000033460 0            000000033460 
FT2	033457 033460 0   0   0            0            000000033460 
FT2RQ	033457 033460 0   0   004000000000 0            000000033460 
FT3	033457 033460 0   0   004000000000 0            000000033460 
FT9	033460 033460 0   0   004000000000 0            000000033460 
ET0	033460 033460 0   0   004000000000 0            000000033460 
ST1A	033460 033460 0   0   004000000000 0            000000033460 
ST9	033460 033460 0   0   004000000000 0            000000033460 


*033460 HRLZI	0,004000
INITIAL
C(AC)=004000 000000 
FINAL
C(AC)=004000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033460 033460 0   0   515000004000 0            000000004000 
IT1	033460 0      0   0   515000004000 0            000000004000 
AT3	033460 0      0   0   000000004000 0            515000004000 
AT6	033460 0      0   0   000000004000 0            515000004000 
FT1A	033460 0      0   0   000000004000 0            000000004000 
FT9	033461 0      0   0   000000004000 0            000000004000 
ET0	033461 0      0   0   004000000000 0            000000004000 
ST1	033461 0      0   0   004000000000 0            000000004000 
ST2	033461 0      0   0   004000000000 0            000000004000 
ST9	033461 0      0   0   004000000000 0            000000004000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 490
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0680



*033461 ADD 	0,034054
INITIAL
C(AC)=004000 000000 
C(E)=004000 000000 
FINAL
C(AC)=010000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033461 033461 0   0   270000034054 0            004000000000 
IT1	033461 0      0   0   270000034054 0            004000000000 
AT3	033461 0      0   0   000000034054 0            270000034054 
AT6	033461 034054 0   0   000000034054 0            270000034054 
FT0	033461 034054 0   0   004000000000 0            270000034054 
FT1A	033461 034054 0   0   004000000000 0            004000000000 
FT2	033461 034054 0   0   0            0            004000000000 
FT2RQ	033461 034054 0   0   004000000000 0            004000000000 
FT3	033461 034054 0   0   004000000000 0            004000000000 
FT9	033462 034054 0   0   004000000000 0            004000000000 
ET0	033462 034054 0   0   010000000000 0            004000000000 
ST1	033462 034054 0   0   010000000000 0            004000000000 
ST2	033462 034054 0   0   010000000000 0            004000000000 
ST9	033462 034054 0   0   010000000000 0            004000000000 


*033462 CAME	0,034055
INITIAL
C(AC)=010000 000000 
C(E)=010000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033462 033462 0   0   312000034055 0            010000000000 
IT1	033462 0      0   0   312000034055 0            010000000000 
AT3	033462 0      0   0   000000034055 0            312000034055 
AT6	033462 034055 0   0   000000034055 0            312000034055 
FT0	033462 034055 0   0   010000000000 0            312000034055 
FT1A	033462 034055 0   0   010000000000 0            010000000000 
FT2	033462 034055 0   0   0            0            010000000000 
FT2RQ	033462 034055 0   0   010000000000 0            010000000000 
FT3	033462 034055 0   0   010000000000 0            010000000000 
FT9	033463 034055 0   0   010000000000 0            010000000000 
ET0	033464 034055 0   0   0            0            010000000000 
ST1A	033464 034055 0   0   0            0            010000000000 
ST9	033464 034055 0   0   0            0            010000000000 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 491
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0681

*033464 JUMPA	0,033465
INITIAL
C(AC)=010000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033464 033464 0   0   324000033465 0            000000033465 
IT1	033464 0      0   0   324000033465 0            000000033465 
AT3	033464 0      0   0   000000033465 0            324000033465 
AT6	033464 033465 0   0   000000033465 0            324000033465 
FT1A	033464 033465 0   0   000000033465 0            000000033465 
FT2	033464 033465 0   0   0            0            000000033465 
FT2RQ	033464 033465 0   0   010000000000 0            000000033465 
FT3	033464 033465 0   0   010000000000 0            000000033465 
FT9	033465 033465 0   0   010000000000 0            000000033465 
ET0	033465 033465 0   0   010000000000 0            000000033465 
ST1A	033465 033465 0   0   010000000000 0            000000033465 
ST9	033465 033465 0   0   010000000000 0            000000033465 


*033465 HRLZI	0,010000
INITIAL
C(AC)=010000 000000 
FINAL
C(AC)=010000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033465 033465 0   0   515000010000 0            000000010000 
IT1	033465 0      0   0   515000010000 0            000000010000 
AT3	033465 0      0   0   000000010000 0            515000010000 
AT6	033465 0      0   0   000000010000 0            515000010000 
FT1A	033465 0      0   0   000000010000 0            000000010000 
FT9	033466 0      0   0   000000010000 0            000000010000 
ET0	033466 0      0   0   010000000000 0            000000010000 
ST1	033466 0      0   0   010000000000 0            000000010000 
ST2	033466 0      0   0   010000000000 0            000000010000 
ST9	033466 0      0   0   010000000000 0            000000010000 


*033466 ADD 	0,034055
INITIAL
C(AC)=010000 000000 
C(E)=010000 000000 
FINAL
C(AC)=020000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033466 033466 0   0   270000034055 0            010000000000 
IT1	033466 0      0   0   270000034055 0            010000000000 
AT3	033466 0      0   0   000000034055 0            270000034055 
AT6	033466 034055 0   0   000000034055 0            270000034055 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 492
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0682

FT0	033466 034055 0   0   010000000000 0            270000034055 
FT1A	033466 034055 0   0   010000000000 0            010000000000 
FT2	033466 034055 0   0   0            0            010000000000 
FT2RQ	033466 034055 0   0   010000000000 0            010000000000 
FT3	033466 034055 0   0   010000000000 0            010000000000 
FT9	033467 034055 0   0   010000000000 0            010000000000 
ET0	033467 034055 0   0   020000000000 0            010000000000 
ST1	033467 034055 0   0   020000000000 0            010000000000 
ST2	033467 034055 0   0   020000000000 0            010000000000 
ST9	033467 034055 0   0   020000000000 0            010000000000 


*033467 CAME	0,034056
INITIAL
C(AC)=020000 000000 
C(E)=020000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033467 033467 0   0   312000034056 0            020000000000 
IT1	033467 0      0   0   312000034056 0            020000000000 
AT3	033467 0      0   0   000000034056 0            312000034056 
AT6	033467 034056 0   0   000000034056 0            312000034056 
FT0	033467 034056 0   0   020000000000 0            312000034056 
FT1A	033467 034056 0   0   020000000000 0            020000000000 
FT2	033467 034056 0   0   0            0            020000000000 
FT2RQ	033467 034056 0   0   020000000000 0            020000000000 
FT3	033467 034056 0   0   020000000000 0            020000000000 
FT9	033470 034056 0   0   020000000000 0            020000000000 
ET0	033471 034056 0   0   0            0            020000000000 
ST1A	033471 034056 0   0   0            0            020000000000 
ST9	033471 034056 0   0   0            0            020000000000 


*033471 JUMPA	0,033472
INITIAL
C(AC)=020000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033471 033471 0   0   324000033472 0            000000033472 
IT1	033471 0      0   0   324000033472 0            000000033472 
AT3	033471 0      0   0   000000033472 0            324000033472 
AT6	033471 033472 0   0   000000033472 0            324000033472 
FT1A	033471 033472 0   0   000000033472 0            000000033472 
FT2	033471 033472 0   0   0            0            000000033472 
FT2RQ	033471 033472 0   0   020000000000 0            000000033472 
FT3	033471 033472 0   0   020000000000 0            000000033472 
FT9	033472 033472 0   0   020000000000 0            000000033472 
ET0	033472 033472 0   0   020000000000 0            000000033472 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 493
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0683

ST1A	033472 033472 0   0   020000000000 0            000000033472 
ST9	033472 033472 0   0   020000000000 0            000000033472 


*033472 HRLZI	0,020000
INITIAL
C(AC)=020000 000000 
FINAL
C(AC)=020000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033472 033472 0   0   515000020000 0            000000020000 
IT1	033472 0      0   0   515000020000 0            000000020000 
AT3	033472 0      0   0   000000020000 0            515000020000 
AT6	033472 0      0   0   000000020000 0            515000020000 
FT1A	033472 0      0   0   000000020000 0            000000020000 
FT9	033473 0      0   0   000000020000 0            000000020000 
ET0	033473 0      0   0   020000000000 0            000000020000 
ST1	033473 0      0   0   020000000000 0            000000020000 
ST2	033473 0      0   0   020000000000 0            000000020000 
ST9	033473 0      0   0   020000000000 0            000000020000 


*033473 ADD 	0,034056
INITIAL
C(AC)=020000 000000 
C(E)=020000 000000 
FINAL
C(AC)=040000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033473 033473 0   0   270000034056 0            020000000000 
IT1	033473 0      0   0   270000034056 0            020000000000 
AT3	033473 0      0   0   000000034056 0            270000034056 
AT6	033473 034056 0   0   000000034056 0            270000034056 
FT0	033473 034056 0   0   020000000000 0            270000034056 
FT1A	033473 034056 0   0   020000000000 0            020000000000 
FT2	033473 034056 0   0   0            0            020000000000 
FT2RQ	033473 034056 0   0   020000000000 0            020000000000 
FT3	033473 034056 0   0   020000000000 0            020000000000 
FT9	033474 034056 0   0   020000000000 0            020000000000 
ET0	033474 034056 0   0   040000000000 0            020000000000 
ST1	033474 034056 0   0   040000000000 0            020000000000 
ST2	033474 034056 0   0   040000000000 0            020000000000 
ST9	033474 034056 0   0   040000000000 0            020000000000 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 494
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0684

*033474 CAME	0,034057
INITIAL
C(AC)=040000 000000 
C(E)=040000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033474 033474 0   0   312000034057 0            040000000000 
IT1	033474 0      0   0   312000034057 0            040000000000 
AT3	033474 0      0   0   000000034057 0            312000034057 
AT6	033474 034057 0   0   000000034057 0            312000034057 
FT0	033474 034057 0   0   040000000000 0            312000034057 
FT1A	033474 034057 0   0   040000000000 0            040000000000 
FT2	033474 034057 0   0   0            0            040000000000 
FT2RQ	033474 034057 0   0   040000000000 0            040000000000 
FT3	033474 034057 0   0   040000000000 0            040000000000 
FT9	033475 034057 0   0   040000000000 0            040000000000 
ET0	033476 034057 0   0   0            0            040000000000 
ST1A	033476 034057 0   0   0            0            040000000000 
ST9	033476 034057 0   0   0            0            040000000000 


*033476 JUMPA	0,033477
INITIAL
C(AC)=040000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033476 033476 0   0   324000033477 0            000000033477 
IT1	033476 0      0   0   324000033477 0            000000033477 
AT3	033476 0      0   0   000000033477 0            324000033477 
AT6	033476 033477 0   0   000000033477 0            324000033477 
FT1A	033476 033477 0   0   000000033477 0            000000033477 
FT2	033476 033477 0   0   0            0            000000033477 
FT2RQ	033476 033477 0   0   040000000000 0            000000033477 
FT3	033476 033477 0   0   040000000000 0            000000033477 
FT9	033477 033477 0   0   040000000000 0            000000033477 
ET0	033477 033477 0   0   040000000000 0            000000033477 
ST1A	033477 033477 0   0   040000000000 0            000000033477 
ST9	033477 033477 0   0   040000000000 0            000000033477 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 495
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0685

*033477 HRLZI	0,040000
INITIAL
C(AC)=040000 000000 
FINAL
C(AC)=040000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033477 033477 0   0   515000040000 0            000000040000 
IT1	033477 0      0   0   515000040000 0            000000040000 
AT3	033477 0      0   0   000000040000 0            515000040000 
AT6	033477 0      0   0   000000040000 0            515000040000 
FT1A	033477 0      0   0   000000040000 0            000000040000 
FT9	0      0      0   0   000000040000 0            000000040000 
ET0	0      0      0   0   040000000000 0            000000040000 
ST1	0      0      0   0   040000000000 0            000000040000 
ST2	0      0      0   0   040000000000 0            000000040000 
ST9	0      0      0   0   040000000000 0            000000040000 


*033500 ADD 	0,034057
INITIAL
C(AC)=040000 000000 
C(E)=040000 000000 
FINAL
C(AC)=100000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	0      0      0   0   270000034057 0            040000000000 
IT1	0      0      0   0   270000034057 0            040000000000 
AT3	0      0      0   0   000000034057 0            270000034057 
AT6	0      034057 0   0   000000034057 0            270000034057 
FT0	0      034057 0   0   040000000000 0            270000034057 
FT1A	0      034057 0   0   040000000000 0            040000000000 
FT2	0      034057 0   0   0            0            040000000000 
FT2RQ	0      034057 0   0   040000000000 0            040000000000 
FT3	0      034057 0   0   040000000000 0            040000000000 
FT9	033501 034057 0   0   040000000000 0            040000000000 
ET0	033501 034057 0   0   100000000000 0            040000000000 
ST1	033501 034057 0   0   100000000000 0            040000000000 
ST2	033501 034057 0   0   100000000000 0            040000000000 
ST9	033501 034057 0   0   100000000000 0            040000000000 


*033501 CAME	0,034060
INITIAL
C(AC)=100000 000000 
C(E)=100000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033501 033501 0   0   312000034060 0            100000000000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 496
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0686

IT1	033501 0      0   0   312000034060 0            100000000000 
AT3	033501 0      0   0   000000034060 0            312000034060 
AT6	033501 034060 0   0   000000034060 0            312000034060 
FT0	033501 034060 0   0   100000000000 0            312000034060 
FT1A	033501 034060 0   0   100000000000 0            100000000000 
FT2	033501 034060 0   0   0            0            100000000000 
FT2RQ	033501 034060 0   0   100000000000 0            100000000000 
FT3	033501 034060 0   0   100000000000 0            100000000000 
FT9	033502 034060 0   0   100000000000 0            100000000000 
ET0	033503 034060 0   0   0            0            100000000000 
ST1A	033503 034060 0   0   0            0            100000000000 
ST9	033503 034060 0   0   0            0            100000000000 


*033503 JUMPA	0,033504
INITIAL
C(AC)=100000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033503 033503 0   0   324000033504 0            000000033504 
IT1	033503 0      0   0   324000033504 0            000000033504 
AT3	033503 0      0   0   000000033504 0            324000033504 
AT6	033503 033504 0   0   000000033504 0            324000033504 
FT1A	033503 033504 0   0   000000033504 0            000000033504 
FT2	033503 033504 0   0   0            0            000000033504 
FT2RQ	033503 033504 0   0   100000000000 0            000000033504 
FT3	033503 033504 0   0   100000000000 0            000000033504 
FT9	033504 033504 0   0   100000000000 0            000000033504 
ET0	033504 033504 0   0   100000000000 0            000000033504 
ST1A	033504 033504 0   0   100000000000 0            000000033504 
ST9	033504 033504 0   0   100000000000 0            000000033504 


*033504 HRLZI	0,100000
INITIAL
C(AC)=100000 000000 
FINAL
C(AC)=100000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033504 033504 0   0   515000100000 0            000000100000 
IT1	033504 0      0   0   515000100000 0            000000100000 
AT3	033504 0      0   0   000000100000 0            515000100000 
AT6	033504 0      0   0   000000100000 0            515000100000 
FT1A	033504 0      0   0   000000100000 0            000000100000 
FT9	033505 0      0   0   000000100000 0            000000100000 
ET0	033505 0      0   0   100000000000 0            000000100000 
ST1	033505 0      0   0   100000000000 0            000000100000 
ST2	033505 0      0   0   100000000000 0            000000100000 
ST9	033505 0      0   0   100000000000 0            000000100000 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 497
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0687



*033505 ADD 	0,034060
INITIAL
C(AC)=100000 000000 
C(E)=100000 000000 
FINAL
C(AC)=200000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033505 033505 0   0   270000034060 0            100000000000 
IT1	033505 0      0   0   270000034060 0            100000000000 
AT3	033505 0      0   0   000000034060 0            270000034060 
AT6	033505 034060 0   0   000000034060 0            270000034060 
FT0	033505 034060 0   0   100000000000 0            270000034060 
FT1A	033505 034060 0   0   100000000000 0            100000000000 
FT2	033505 034060 0   0   0            0            100000000000 
FT2RQ	033505 034060 0   0   100000000000 0            100000000000 
FT3	033505 034060 0   0   100000000000 0            100000000000 
FT9	033506 034060 0   0   100000000000 0            100000000000 
ET0	033506 034060 0   0   200000000000 0            100000000000 
ST1	033506 034060 0   0   200000000000 0            100000000000 
ST2	033506 034060 0   0   200000000000 0            100000000000 
ST9	033506 034060 0   0   200000000000 0            100000000000 


*033506 CAME	0,034061
INITIAL
C(AC)=200000 000000 
C(E)=200000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033506 033506 0   0   312000034061 0            200000000000 
IT1	033506 0      0   0   312000034061 0            200000000000 
AT3	033506 0      0   0   000000034061 0            312000034061 
AT6	033506 034061 0   0   000000034061 0            312000034061 
FT0	033506 034061 0   0   200000000000 0            312000034061 
FT1A	033506 034061 0   0   200000000000 0            200000000000 
FT2	033506 034061 0   0   0            0            200000000000 
FT2RQ	033506 034061 0   0   200000000000 0            200000000000 
FT3	033506 034061 0   0   200000000000 0            200000000000 
FT9	033507 034061 0   0   200000000000 0            200000000000 
ET0	033510 034061 0   0   0            0            200000000000 
ST1A	033510 034061 0   0   0            0            200000000000 
ST9	033510 034061 0   0   0            0            200000000000 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 498
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0688

*033510 JUMPA	0,033511
INITIAL
C(AC)=200000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033510 033510 0   0   324000033511 0            000000033511 
IT1	033510 0      0   0   324000033511 0            000000033511 
AT3	033510 0      0   0   000000033511 0            324000033511 
AT6	033510 033511 0   0   000000033511 0            324000033511 
FT1A	033510 033511 0   0   000000033511 0            000000033511 
FT2	033510 033511 0   0   0            0            000000033511 
FT2RQ	033510 033511 0   0   200000000000 0            000000033511 
FT3	033510 033511 0   0   200000000000 0            000000033511 
FT9	033511 033511 0   0   200000000000 0            000000033511 
ET0	033511 033511 0   0   200000000000 0            000000033511 
ST1A	033511 033511 0   0   200000000000 0            000000033511 
ST9	033511 033511 0   0   200000000000 0            000000033511 


*033511 HRLZI	0,200000
INITIAL
C(AC)=200000 000000 
FINAL
C(AC)=200000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033511 033511 0   0   515000200000 0            000000200000 
IT1	033511 0      0   0   515000200000 0            000000200000 
AT3	033511 0      0   0   000000200000 0            515000200000 
AT6	033511 0      0   0   000000200000 0            515000200000 
FT1A	033511 0      0   0   000000200000 0            000000200000 
FT9	033512 0      0   0   000000200000 0            000000200000 
ET0	033512 0      0   0   200000000000 0            000000200000 
ST1	033512 0      0   0   200000000000 0            000000200000 
ST2	033512 0      0   0   200000000000 0            000000200000 
ST9	033512 0      0   0   200000000000 0            000000200000 


*033512 ADD 	0,034061
INITIAL
C(AC)=200000 000000 
C(E)=200000 000000 
FINAL
C(AC)=400000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033512 033512 0   0   270000034061 0            200000000000 
IT1	033512 0      0   0   270000034061 0            200000000000 
AT3	033512 0      0   0   000000034061 0            270000034061 
AT6	033512 034061 0   0   000000034061 0            270000034061 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 499
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0689

FT0	033512 034061 0   0   200000000000 0            270000034061 
FT1A	033512 034061 0   0   200000000000 0            200000000000 
FT2	033512 034061 0   0   0            0            200000000000 
FT2RQ	033512 034061 0   0   200000000000 0            200000000000 
FT3	033512 034061 0   0   200000000000 0            200000000000 
FT9	033513 034061 0   0   200000000000 0            200000000000 
ET0	033513 034061 0   0   400000000000 0            200000000000 
ST1	033513 034061 0   0   400000000000 0            200000000000 
ST2	033513 034061 0   0   400000000000 0            200000000000 
ST9	033513 034061 0   0   400000000000 0            200000000000 


*033513 CAME	0,034062
INITIAL
C(AC)=400000 000000 
C(E)=400000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033513 033513 0   0   312000034062 0            400000000000 
IT1	033513 0      0   0   312000034062 0            400000000000 
AT3	033513 0      0   0   000000034062 0            312000034062 
AT6	033513 034062 0   0   000000034062 0            312000034062 
FT0	033513 034062 0   0   400000000000 0            312000034062 
FT1A	033513 034062 0   0   400000000000 0            400000000000 
FT2	033513 034062 0   0   0            0            400000000000 
FT2RQ	033513 034062 0   0   400000000000 0            400000000000 
FT3	033513 034062 0   0   400000000000 0            400000000000 
FT9	033514 034062 0   0   400000000000 0            400000000000 
ET0	033515 034062 0   0   0            0            400000000000 
ST1A	033515 034062 0   0   0            0            400000000000 
ST9	033515 034062 0   0   0            0            400000000000 


*033515 JUMPA	0,033516
INITIAL
C(AC)=400000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033515 033515 0   0   324000033516 0            000000033516 
IT1	033515 0      0   0   324000033516 0            000000033516 
AT3	033515 0      0   0   000000033516 0            324000033516 
AT6	033515 033516 0   0   000000033516 0            324000033516 
FT1A	033515 033516 0   0   000000033516 0            000000033516 
FT2	033515 033516 0   0   0            0            000000033516 
FT2RQ	033515 033516 0   0   400000000000 0            000000033516 
FT3	033515 033516 0   0   400000000000 0            000000033516 
FT9	033516 033516 0   0   400000000000 0            000000033516 
ET0	033516 033516 0   0   400000000000 0            000000033516 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 500
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0690

ST1A	033516 033516 0   0   400000000000 0            000000033516 
ST9	033516 033516 0   0   400000000000 0            000000033516 


*033516 HRLZI	0,400000
INITIAL
C(AC)=400000 000000 
FINAL
C(AC)=400000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033516 033516 0   0   515000400000 0            000000400000 
IT1	033516 0      0   0   515000400000 0            000000400000 
AT3	033516 0      0   0   000000400000 0            515000400000 
AT6	033516 0      0   0   000000400000 0            515000400000 
FT1A	033516 0      0   0   000000400000 0            000000400000 
FT9	033517 0      0   0   000000400000 0            000000400000 
ET0	033517 0      0   0   400000000000 0            000000400000 
ST1	033517 0      0   0   400000000000 0            000000400000 
ST2	033517 0      0   0   400000000000 0            000000400000 
ST9	033517 0      0   0   400000000000 0            000000400000 


*033517 ADD 	0,034062
INITIAL
C(AC)=400000 000000 
C(E)=400000 000000 
FINAL
C(AC)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033517 033517 0   0   270000034062 0            400000000000 
IT1	033517 0      0   0   270000034062 0            400000000000 
AT3	033517 0      0   0   000000034062 0            270000034062 
AT6	033517 034062 0   0   000000034062 0            270000034062 
FT0	033517 034062 0   0   400000000000 0            270000034062 
FT1A	033517 034062 0   0   400000000000 0            400000000000 
FT2	033517 034062 0   0   0            0            400000000000 
FT2RQ	033517 034062 0   0   400000000000 0            400000000000 
FT3	033517 034062 0   0   400000000000 0            400000000000 
FT9	033520 034062 0   0   400000000000 0            400000000000 
ET0	033520 034062 0   0   0            0            400000000000 
ST1	033520 034062 0   0   0            0            400000000000 
ST2	033520 034062 0   0   0            0            400000000000 
ST9	033520 034062 0   0   0            0            400000000000 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 501
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0691

*033520 CAME	0,034127
INITIAL
C(AC)=000000 000000 
C(E)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033520 033520 0   0   312000034127 0            0            
IT1	033520 0      0   0   312000034127 0            0            
AT3	033520 0      0   0   000000034127 0            312000034127 
AT6	033520 034127 0   0   000000034127 0            312000034127 
FT0	033520 034127 0   0   0            0            312000034127 
FT1A	033520 034127 0   0   0            0            0            
FT2	033520 034127 0   0   0            0            0            
FT2RQ	033520 034127 0   0   0            0            0            
FT3	033520 034127 0   0   0            0            0            
FT9	033521 034127 0   0   0            0            0            
ET0	033522 034127 0   0   0            0            0            
ST1A	033522 034127 0   0   0            0            0            
ST9	033522 034127 0   0   0            0            0            


*033522 JUMPA	0,033523
INITIAL
C(AC)=000000 000000 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033522 033522 0   0   324000033523 0            000000033523 
IT1	033522 0      0   0   324000033523 0            000000033523 
AT3	033522 0      0   0   000000033523 0            324000033523 
AT6	033522 033523 0   0   000000033523 0            324000033523 
FT1A	033522 033523 0   0   000000033523 0            000000033523 
FT2	033522 033523 0   0   0            0            000000033523 
FT2RQ	033522 033523 0   0   0            0            000000033523 
FT3	033522 033523 0   0   0            0            000000033523 
FT9	033523 033523 0   0   0            0            000000033523 
ET0	033523 033523 0   0   0            0            000000033523 
ST1A	033523 033523 0   0   0            0            000000033523 
ST9	033523 033523 0   0   0            0            000000033523 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 502
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0692

*033523 HRROI	0,777776
INITIAL
C(AC)=000000 000000 
FINAL
C(AC)=777777 777776 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033523 033523 0   0   561000777776 0            000000777776 
IT1	033523 0      0   0   561000777776 0            000000777776 
AT3	033523 0      0   0   000000777776 0            561000777776 
AT6	033523 777776 0   0   000000777776 0            561000777776 
FT1A	033523 777776 0   0   000000777776 0            000000777776 
FT9	033524 777776 0   0   000000777776 0            000000777776 
ET0	033524 777776 0   0   777777777776 0            000000777776 
ST1	033524 777776 0   0   777777777776 0            000000777776 
ST2	033524 777776 0   0   777777777776 0            000000777776 
ST9	033524 777776 0   0   777777777776 0            000000777776 


*033524 ADD 	0,034063
INITIAL
C(AC)=777777 777776 
C(E)=777777 777776 
FINAL
C(AC)=777777 777774 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033524 033524 0   0   270000034063 0            777777777776 
IT1	033524 0      0   0   270000034063 0            777777777776 
AT3	033524 0      0   0   000000034063 0            270000034063 
AT6	033524 034063 0   0   000000034063 0            270000034063 
FT0	033524 034063 0   0   777777777776 0            270000034063 
FT1A	033524 034063 0   0   777777777776 0            777777777776 
FT2	033524 034063 0   0   0            0            777777777776 
FT2RQ	033524 034063 0   0   777777777776 0            777777777776 
FT3	033524 034063 0   0   777777777776 0            777777777776 
FT9	033525 034063 0   0   777777777776 0            777777777776 
ET0	033525 034063 0   0   777777777774 0            777777777776 
ST1	033525 034063 0   0   777777777774 0            777777777776 
ST2	033525 034063 0   0   777777777774 0            777777777776 
ST9	033525 034063 0   0   777777777774 0            777777777776 


*033525 CAME	0,034130
INITIAL
C(AC)=777777 777774 
C(E)=777777 777774 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033525 033525 0   0   312000034130 0            777777777774 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 503
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0693

IT1	033525 0      0   0   312000034130 0            777777777774 
AT3	033525 0      0   0   000000034130 0            312000034130 
AT6	033525 034130 0   0   000000034130 0            312000034130 
FT0	033525 034130 0   0   777777777774 0            312000034130 
FT1A	033525 034130 0   0   777777777774 0            777777777774 
FT2	033525 034130 0   0   0            0            777777777774 
FT2RQ	033525 034130 0   0   777777777774 0            777777777774 
FT3	033525 034130 0   0   777777777774 0            777777777774 
FT9	033526 034130 0   0   777777777774 0            777777777774 
ET0	033527 034130 0   0   0            0            777777777774 
ST1A	033527 034130 0   0   0            0            777777777774 
ST9	033527 034130 0   0   0            0            777777777774 


*033527 JUMPA	0,033530
INITIAL
C(AC)=777777 777774 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033527 033527 0   0   324000033530 0            000000033530 
IT1	033527 0      0   0   324000033530 0            000000033530 
AT3	033527 0      0   0   000000033530 0            324000033530 
AT6	033527 033530 0   0   000000033530 0            324000033530 
FT1A	033527 033530 0   0   000000033530 0            000000033530 
FT2	033527 033530 0   0   0            0            000000033530 
FT2RQ	033527 033530 0   0   777777777774 0            000000033530 
FT3	033527 033530 0   0   777777777774 0            000000033530 
FT9	033530 033530 0   0   777777777774 0            000000033530 
ET0	033530 033530 0   0   777777777774 0            000000033530 
ST1A	033530 033530 0   0   777777777774 0            000000033530 
ST9	033530 033530 0   0   777777777774 0            000000033530 


*033530 HRROI	0,777775
INITIAL
C(AC)=777777 777774 
FINAL
C(AC)=777777 777775 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033530 033530 0   0   561000777775 0            000000777775 
IT1	033530 0      0   0   561000777775 0            000000777775 
AT3	033530 0      0   0   000000777775 0            561000777775 
AT6	033530 777775 0   0   000000777775 0            561000777775 
FT1A	033530 777775 0   0   000000777775 0            000000777775 
FT9	033531 777775 0   0   000000777775 0            000000777775 
ET0	033531 777775 0   0   777777777775 0            000000777775 
ST1	033531 777775 0   0   777777777775 0            000000777775 
ST2	033531 777775 0   0   777777777775 0            000000777775 
ST9	033531 777775 0   0   777777777775 0            000000777775 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 504
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0694



*033531 ADD 	0,034064
INITIAL
C(AC)=777777 777775 
C(E)=777777 777775 
FINAL
C(AC)=777777 777772 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033531 033531 0   0   270000034064 0            777777777775 
IT1	033531 0      0   0   270000034064 0            777777777775 
AT3	033531 0      0   0   000000034064 0            270000034064 
AT6	033531 034064 0   0   000000034064 0            270000034064 
FT0	033531 034064 0   0   777777777775 0            270000034064 
FT1A	033531 034064 0   0   777777777775 0            777777777775 
FT2	033531 034064 0   0   0            0            777777777775 
FT2RQ	033531 034064 0   0   777777777775 0            777777777775 
FT3	033531 034064 0   0   777777777775 0            777777777775 
FT9	033532 034064 0   0   777777777775 0            777777777775 
ET0	033532 034064 0   0   777777777772 0            777777777775 
ST1	033532 034064 0   0   777777777772 0            777777777775 
ST2	033532 034064 0   0   777777777772 0            777777777775 
ST9	033532 034064 0   0   777777777772 0            777777777775 


*033532 CAME	0,034131
INITIAL
C(AC)=777777 777772 
C(E)=777777 777772 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033532 033532 0   0   312000034131 0            777777777772 
IT1	033532 0      0   0   312000034131 0            777777777772 
AT3	033532 0      0   0   000000034131 0            312000034131 
AT6	033532 034131 0   0   000000034131 0            312000034131 
FT0	033532 034131 0   0   777777777772 0            312000034131 
FT1A	033532 034131 0   0   777777777772 0            777777777772 
FT2	033532 034131 0   0   0            0            777777777772 
FT2RQ	033532 034131 0   0   777777777772 0            777777777772 
FT3	033532 034131 0   0   777777777772 0            777777777772 
FT9	033533 034131 0   0   777777777772 0            777777777772 
ET0	033534 034131 0   0   0            0            777777777772 
ST1A	033534 034131 0   0   0            0            777777777772 
ST9	033534 034131 0   0   0            0            777777777772 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 505
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0695

*033534 JUMPA	0,033535
INITIAL
C(AC)=777777 777772 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033534 033534 0   0   324000033535 0            000000033535 
IT1	033534 0      0   0   324000033535 0            000000033535 
AT3	033534 0      0   0   000000033535 0            324000033535 
AT6	033534 033535 0   0   000000033535 0            324000033535 
FT1A	033534 033535 0   0   000000033535 0            000000033535 
FT2	033534 033535 0   0   0            0            000000033535 
FT2RQ	033534 033535 0   0   777777777772 0            000000033535 
FT3	033534 033535 0   0   777777777772 0            000000033535 
FT9	033535 033535 0   0   777777777772 0            000000033535 
ET0	033535 033535 0   0   777777777772 0            000000033535 
ST1A	033535 033535 0   0   777777777772 0            000000033535 
ST9	033535 033535 0   0   777777777772 0            000000033535 


*033535 HRROI	0,777773
INITIAL
C(AC)=777777 777772 
FINAL
C(AC)=777777 777773 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033535 033535 0   0   561000777773 0            000000777773 
IT1	033535 0      0   0   561000777773 0            000000777773 
AT3	033535 0      0   0   000000777773 0            561000777773 
AT6	033535 777773 0   0   000000777773 0            561000777773 
FT1A	033535 777773 0   0   000000777773 0            000000777773 
FT9	033536 777773 0   0   000000777773 0            000000777773 
ET0	033536 777773 0   0   777777777773 0            000000777773 
ST1	033536 777773 0   0   777777777773 0            000000777773 
ST2	033536 777773 0   0   777777777773 0            000000777773 
ST9	033536 777773 0   0   777777777773 0            000000777773 


*033536 ADD 	0,034065
INITIAL
C(AC)=777777 777773 
C(E)=777777 777773 
FINAL
C(AC)=777777 777766 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033536 033536 0   0   270000034065 0            777777777773 
IT1	033536 0      0   0   270000034065 0            777777777773 
AT3	033536 0      0   0   000000034065 0            270000034065 
AT6	033536 034065 0   0   000000034065 0            270000034065 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 506
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0696

FT0	033536 034065 0   0   777777777773 0            270000034065 
FT1A	033536 034065 0   0   777777777773 0            777777777773 
FT2	033536 034065 0   0   0            0            777777777773 
FT2RQ	033536 034065 0   0   777777777773 0            777777777773 
FT3	033536 034065 0   0   777777777773 0            777777777773 
FT9	033537 034065 0   0   777777777773 0            777777777773 
ET0	033537 034065 0   0   777777777766 0            777777777773 
ST1	033537 034065 0   0   777777777766 0            777777777773 
ST2	033537 034065 0   0   777777777766 0            777777777773 
ST9	033537 034065 0   0   777777777766 0            777777777773 


*033537 CAME	0,034132
INITIAL
C(AC)=777777 777766 
C(E)=777777 777766 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033537 033537 0   0   312000034132 0            777777777766 
IT1	033537 0      0   0   312000034132 0            777777777766 
AT3	033537 0      0   0   000000034132 0            312000034132 
AT6	033537 034132 0   0   000000034132 0            312000034132 
FT0	033537 034132 0   0   777777777766 0            312000034132 
FT1A	033537 034132 0   0   777777777766 0            777777777766 
FT2	033537 034132 0   0   0            0            777777777766 
FT2RQ	033537 034132 0   0   777777777766 0            777777777766 
FT3	033537 034132 0   0   777777777766 0            777777777766 
FT9	033540 034132 0   0   777777777766 0            777777777766 
ET0	033541 034132 0   0   0            0            777777777766 
ST1A	033541 034132 0   0   0            0            777777777766 
ST9	033541 034132 0   0   0            0            777777777766 


*033541 JUMPA	0,033542
INITIAL
C(AC)=777777 777766 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033541 033541 0   0   324000033542 0            000000033542 
IT1	033541 0      0   0   324000033542 0            000000033542 
AT3	033541 0      0   0   000000033542 0            324000033542 
AT6	033541 033542 0   0   000000033542 0            324000033542 
FT1A	033541 033542 0   0   000000033542 0            000000033542 
FT2	033541 033542 0   0   0            0            000000033542 
FT2RQ	033541 033542 0   0   777777777766 0            000000033542 
FT3	033541 033542 0   0   777777777766 0            000000033542 
FT9	033542 033542 0   0   777777777766 0            000000033542 
ET0	033542 033542 0   0   777777777766 0            000000033542 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 507
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0697

ST1A	033542 033542 0   0   777777777766 0            000000033542 
ST9	033542 033542 0   0   777777777766 0            000000033542 


*033542 HRROI	0,777767
INITIAL
C(AC)=777777 777766 
FINAL
C(AC)=777777 777767 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033542 033542 0   0   561000777767 0            000000777767 
IT1	033542 0      0   0   561000777767 0            000000777767 
AT3	033542 0      0   0   000000777767 0            561000777767 
AT6	033542 777767 0   0   000000777767 0            561000777767 
FT1A	033542 777767 0   0   000000777767 0            000000777767 
FT9	033543 777767 0   0   000000777767 0            000000777767 
ET0	033543 777767 0   0   777777777767 0            000000777767 
ST1	033543 777767 0   0   777777777767 0            000000777767 
ST2	033543 777767 0   0   777777777767 0            000000777767 
ST9	033543 777767 0   0   777777777767 0            000000777767 


*033543 ADD 	0,034066
INITIAL
C(AC)=777777 777767 
C(E)=777777 777767 
FINAL
C(AC)=777777 777756 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033543 033543 0   0   270000034066 0            777777777767 
IT1	033543 0      0   0   270000034066 0            777777777767 
AT3	033543 0      0   0   000000034066 0            270000034066 
AT6	033543 034066 0   0   000000034066 0            270000034066 
FT0	033543 034066 0   0   777777777767 0            270000034066 
FT1A	033543 034066 0   0   777777777767 0            777777777767 
FT2	033543 034066 0   0   0            0            777777777767 
FT2RQ	033543 034066 0   0   777777777767 0            777777777767 
FT3	033543 034066 0   0   777777777767 0            777777777767 
FT9	033544 034066 0   0   777777777767 0            777777777767 
ET0	033544 034066 0   0   777777777756 0            777777777767 
ST1	033544 034066 0   0   777777777756 0            777777777767 
ST2	033544 034066 0   0   777777777756 0            777777777767 
ST9	033544 034066 0   0   777777777756 0            777777777767 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 508
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0698

*033544 CAME	0,034133
INITIAL
C(AC)=777777 777756 
C(E)=777777 777756 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033544 033544 0   0   312000034133 0            777777777756 
IT1	033544 0      0   0   312000034133 0            777777777756 
AT3	033544 0      0   0   000000034133 0            312000034133 
AT6	033544 034133 0   0   000000034133 0            312000034133 
FT0	033544 034133 0   0   777777777756 0            312000034133 
FT1A	033544 034133 0   0   777777777756 0            777777777756 
FT2	033544 034133 0   0   0            0            777777777756 
FT2RQ	033544 034133 0   0   777777777756 0            777777777756 
FT3	033544 034133 0   0   777777777756 0            777777777756 
FT9	033545 034133 0   0   777777777756 0            777777777756 
ET0	033546 034133 0   0   0            0            777777777756 
ST1A	033546 034133 0   0   0            0            777777777756 
ST9	033546 034133 0   0   0            0            777777777756 


*033546 JUMPA	0,033547
INITIAL
C(AC)=777777 777756 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033546 033546 0   0   324000033547 0            000000033547 
IT1	033546 0      0   0   324000033547 0            000000033547 
AT3	033546 0      0   0   000000033547 0            324000033547 
AT6	033546 033547 0   0   000000033547 0            324000033547 
FT1A	033546 033547 0   0   000000033547 0            000000033547 
FT2	033546 033547 0   0   0            0            000000033547 
FT2RQ	033546 033547 0   0   777777777756 0            000000033547 
FT3	033546 033547 0   0   777777777756 0            000000033547 
FT9	033547 033547 0   0   777777777756 0            000000033547 
ET0	033547 033547 0   0   777777777756 0            000000033547 
ST1A	033547 033547 0   0   777777777756 0            000000033547 
ST9	033547 033547 0   0   777777777756 0            000000033547 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 509
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0699

*033547 HRROI	0,777757
INITIAL
C(AC)=777777 777756 
FINAL
C(AC)=777777 777757 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033547 033547 0   0   561000777757 0            000000777757 
IT1	033547 0      0   0   561000777757 0            000000777757 
AT3	033547 0      0   0   000000777757 0            561000777757 
AT6	033547 777757 0   0   000000777757 0            561000777757 
FT1A	033547 777757 0   0   000000777757 0            000000777757 
FT9	033550 777757 0   0   000000777757 0            000000777757 
ET0	033550 777757 0   0   777777777757 0            000000777757 
ST1	033550 777757 0   0   777777777757 0            000000777757 
ST2	033550 777757 0   0   777777777757 0            000000777757 
ST9	033550 777757 0   0   777777777757 0            000000777757 


*033550 ADD 	0,034067
INITIAL
C(AC)=777777 777757 
C(E)=777777 777757 
FINAL
C(AC)=777777 777736 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033550 033550 0   0   270000034067 0            777777777757 
IT1	033550 0      0   0   270000034067 0            777777777757 
AT3	033550 0      0   0   000000034067 0            270000034067 
AT6	033550 034067 0   0   000000034067 0            270000034067 
FT0	033550 034067 0   0   777777777757 0            270000034067 
FT1A	033550 034067 0   0   777777777757 0            777777777757 
FT2	033550 034067 0   0   0            0            777777777757 
FT2RQ	033550 034067 0   0   777777777757 0            777777777757 
FT3	033550 034067 0   0   777777777757 0            777777777757 
FT9	033551 034067 0   0   777777777757 0            777777777757 
ET0	033551 034067 0   0   777777777736 0            777777777757 
ST1	033551 034067 0   0   777777777736 0            777777777757 
ST2	033551 034067 0   0   777777777736 0            777777777757 
ST9	033551 034067 0   0   777777777736 0            777777777757 


*033551 CAME	0,034134
INITIAL
C(AC)=777777 777736 
C(E)=777777 777736 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033551 033551 0   0   312000034134 0            777777777736 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 510
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0700

IT1	033551 0      0   0   312000034134 0            777777777736 
AT3	033551 0      0   0   000000034134 0            312000034134 
AT6	033551 034134 0   0   000000034134 0            312000034134 
FT0	033551 034134 0   0   777777777736 0            312000034134 
FT1A	033551 034134 0   0   777777777736 0            777777777736 
FT2	033551 034134 0   0   0            0            777777777736 
FT2RQ	033551 034134 0   0   777777777736 0            777777777736 
FT3	033551 034134 0   0   777777777736 0            777777777736 
FT9	033552 034134 0   0   777777777736 0            777777777736 
ET0	033553 034134 0   0   0            0            777777777736 
ST1A	033553 034134 0   0   0            0            777777777736 
ST9	033553 034134 0   0   0            0            777777777736 


*033553 JUMPA	0,033554
INITIAL
C(AC)=777777 777736 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033553 033553 0   0   324000033554 0            000000033554 
IT1	033553 0      0   0   324000033554 0            000000033554 
AT3	033553 0      0   0   000000033554 0            324000033554 
AT6	033553 033554 0   0   000000033554 0            324000033554 
FT1A	033553 033554 0   0   000000033554 0            000000033554 
FT2	033553 033554 0   0   0            0            000000033554 
FT2RQ	033553 033554 0   0   777777777736 0            000000033554 
FT3	033553 033554 0   0   777777777736 0            000000033554 
FT9	033554 033554 0   0   777777777736 0            000000033554 
ET0	033554 033554 0   0   777777777736 0            000000033554 
ST1A	033554 033554 0   0   777777777736 0            000000033554 
ST9	033554 033554 0   0   777777777736 0            000000033554 


*033554 HRROI	0,777737
INITIAL
C(AC)=777777 777736 
FINAL
C(AC)=777777 777737 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033554 033554 0   0   561000777737 0            000000777737 
IT1	033554 0      0   0   561000777737 0            000000777737 
AT3	033554 0      0   0   000000777737 0            561000777737 
AT6	033554 777737 0   0   000000777737 0            561000777737 
FT1A	033554 777737 0   0   000000777737 0            000000777737 
FT9	033555 777737 0   0   000000777737 0            000000777737 
ET0	033555 777737 0   0   777777777737 0            000000777737 
ST1	033555 777737 0   0   777777777737 0            000000777737 
ST2	033555 777737 0   0   777777777737 0            000000777737 
ST9	033555 777737 0   0   777777777737 0            000000777737 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 511
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0701



*033555 ADD 	0,034070
INITIAL
C(AC)=777777 777737 
C(E)=777777 777737 
FINAL
C(AC)=777777 777676 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033555 033555 0   0   270000034070 0            777777777737 
IT1	033555 0      0   0   270000034070 0            777777777737 
AT3	033555 0      0   0   000000034070 0            270000034070 
AT6	033555 034070 0   0   000000034070 0            270000034070 
FT0	033555 034070 0   0   777777777737 0            270000034070 
FT1A	033555 034070 0   0   777777777737 0            777777777737 
FT2	033555 034070 0   0   0            0            777777777737 
FT2RQ	033555 034070 0   0   777777777737 0            777777777737 
FT3	033555 034070 0   0   777777777737 0            777777777737 
FT9	033556 034070 0   0   777777777737 0            777777777737 
ET0	033556 034070 0   0   777777777676 0            777777777737 
ST1	033556 034070 0   0   777777777676 0            777777777737 
ST2	033556 034070 0   0   777777777676 0            777777777737 
ST9	033556 034070 0   0   777777777676 0            777777777737 


*033556 CAME	0,034135
INITIAL
C(AC)=777777 777676 
C(E)=777777 777676 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033556 033556 0   0   312000034135 0            777777777676 
IT1	033556 0      0   0   312000034135 0            777777777676 
AT3	033556 0      0   0   000000034135 0            312000034135 
AT6	033556 034135 0   0   000000034135 0            312000034135 
FT0	033556 034135 0   0   777777777676 0            312000034135 
FT1A	033556 034135 0   0   777777777676 0            777777777676 
FT2	033556 034135 0   0   0            0            777777777676 
FT2RQ	033556 034135 0   0   777777777676 0            777777777676 
FT3	033556 034135 0   0   777777777676 0            777777777676 
FT9	033557 034135 0   0   777777777676 0            777777777676 
ET0	033560 034135 0   0   0            0            777777777676 
ST1A	033560 034135 0   0   0            0            777777777676 
ST9	033560 034135 0   0   0            0            777777777676 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 512
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0702

*033560 JUMPA	0,033561
INITIAL
C(AC)=777777 777676 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033560 033560 0   0   324000033561 0            000000033561 
IT1	033560 0      0   0   324000033561 0            000000033561 
AT3	033560 0      0   0   000000033561 0            324000033561 
AT6	033560 033561 0   0   000000033561 0            324000033561 
FT1A	033560 033561 0   0   000000033561 0            000000033561 
FT2	033560 033561 0   0   0            0            000000033561 
FT2RQ	033560 033561 0   0   777777777676 0            000000033561 
FT3	033560 033561 0   0   777777777676 0            000000033561 
FT9	033561 033561 0   0   777777777676 0            000000033561 
ET0	033561 033561 0   0   777777777676 0            000000033561 
ST1A	033561 033561 0   0   777777777676 0            000000033561 
ST9	033561 033561 0   0   777777777676 0            000000033561 


*033561 HRROI	0,777677
INITIAL
C(AC)=777777 777676 
FINAL
C(AC)=777777 777677 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033561 033561 0   0   561000777677 0            000000777677 
IT1	033561 0      0   0   561000777677 0            000000777677 
AT3	033561 0      0   0   000000777677 0            561000777677 
AT6	033561 777677 0   0   000000777677 0            561000777677 
FT1A	033561 777677 0   0   000000777677 0            000000777677 
FT9	033562 777677 0   0   000000777677 0            000000777677 
ET0	033562 777677 0   0   777777777677 0            000000777677 
ST1	033562 777677 0   0   777777777677 0            000000777677 
ST2	033562 777677 0   0   777777777677 0            000000777677 
ST9	033562 777677 0   0   777777777677 0            000000777677 


*033562 ADD 	0,034071
INITIAL
C(AC)=777777 777677 
C(E)=777777 777677 
FINAL
C(AC)=777777 777576 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033562 033562 0   0   270000034071 0            777777777677 
IT1	033562 0      0   0   270000034071 0            777777777677 
AT3	033562 0      0   0   000000034071 0            270000034071 
AT6	033562 034071 0   0   000000034071 0            270000034071 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 513
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0703

FT0	033562 034071 0   0   777777777677 0            270000034071 
FT1A	033562 034071 0   0   777777777677 0            777777777677 
FT2	033562 034071 0   0   0            0            777777777677 
FT2RQ	033562 034071 0   0   777777777677 0            777777777677 
FT3	033562 034071 0   0   777777777677 0            777777777677 
FT9	033563 034071 0   0   777777777677 0            777777777677 
ET0	033563 034071 0   0   777777777576 0            777777777677 
ST1	033563 034071 0   0   777777777576 0            777777777677 
ST2	033563 034071 0   0   777777777576 0            777777777677 
ST9	033563 034071 0   0   777777777576 0            777777777677 


*033563 CAME	0,034136
INITIAL
C(AC)=777777 777576 
C(E)=777777 777576 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033563 033563 0   0   312000034136 0            777777777576 
IT1	033563 0      0   0   312000034136 0            777777777576 
AT3	033563 0      0   0   000000034136 0            312000034136 
AT6	033563 034136 0   0   000000034136 0            312000034136 
FT0	033563 034136 0   0   777777777576 0            312000034136 
FT1A	033563 034136 0   0   777777777576 0            777777777576 
FT2	033563 034136 0   0   0            0            777777777576 
FT2RQ	033563 034136 0   0   777777777576 0            777777777576 
FT3	033563 034136 0   0   777777777576 0            777777777576 
FT9	033564 034136 0   0   777777777576 0            777777777576 
ET0	033565 034136 0   0   0            0            777777777576 
ST1A	033565 034136 0   0   0            0            777777777576 
ST9	033565 034136 0   0   0            0            777777777576 


*033565 JUMPA	0,033566
INITIAL
C(AC)=777777 777576 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033565 033565 0   0   324000033566 0            000000033566 
IT1	033565 0      0   0   324000033566 0            000000033566 
AT3	033565 0      0   0   000000033566 0            324000033566 
AT6	033565 033566 0   0   000000033566 0            324000033566 
FT1A	033565 033566 0   0   000000033566 0            000000033566 
FT2	033565 033566 0   0   0            0            000000033566 
FT2RQ	033565 033566 0   0   777777777576 0            000000033566 
FT3	033565 033566 0   0   777777777576 0            000000033566 
FT9	033566 033566 0   0   777777777576 0            000000033566 
ET0	033566 033566 0   0   777777777576 0            000000033566 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 514
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0704

ST1A	033566 033566 0   0   777777777576 0            000000033566 
ST9	033566 033566 0   0   777777777576 0            000000033566 


*033566 HRROI	0,777577
INITIAL
C(AC)=777777 777576 
FINAL
C(AC)=777777 777577 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033566 033566 0   0   561000777577 0            000000777577 
IT1	033566 0      0   0   561000777577 0            000000777577 
AT3	033566 0      0   0   000000777577 0            561000777577 
AT6	033566 777577 0   0   000000777577 0            561000777577 
FT1A	033566 777577 0   0   000000777577 0            000000777577 
FT9	033567 777577 0   0   000000777577 0            000000777577 
ET0	033567 777577 0   0   777777777577 0            000000777577 
ST1	033567 777577 0   0   777777777577 0            000000777577 
ST2	033567 777577 0   0   777777777577 0            000000777577 
ST9	033567 777577 0   0   777777777577 0            000000777577 


*033567 ADD 	0,034072
INITIAL
C(AC)=777777 777577 
C(E)=777777 777577 
FINAL
C(AC)=777777 777376 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033567 033567 0   0   270000034072 0            777777777577 
IT1	033567 0      0   0   270000034072 0            777777777577 
AT3	033567 0      0   0   000000034072 0            270000034072 
AT6	033567 034072 0   0   000000034072 0            270000034072 
FT0	033567 034072 0   0   777777777577 0            270000034072 
FT1A	033567 034072 0   0   777777777577 0            777777777577 
FT2	033567 034072 0   0   0            0            777777777577 
FT2RQ	033567 034072 0   0   777777777577 0            777777777577 
FT3	033567 034072 0   0   777777777577 0            777777777577 
FT9	033570 034072 0   0   777777777577 0            777777777577 
ET0	033570 034072 0   0   777777777376 0            777777777577 
ST1	033570 034072 0   0   777777777376 0            777777777577 
ST2	033570 034072 0   0   777777777376 0            777777777577 
ST9	033570 034072 0   0   777777777376 0            777777777577 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 515
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0705

*033570 CAME	0,034137
INITIAL
C(AC)=777777 777376 
C(E)=777777 777376 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033570 033570 0   0   312000034137 0            777777777376 
IT1	033570 0      0   0   312000034137 0            777777777376 
AT3	033570 0      0   0   000000034137 0            312000034137 
AT6	033570 034137 0   0   000000034137 0            312000034137 
FT0	033570 034137 0   0   777777777376 0            312000034137 
FT1A	033570 034137 0   0   777777777376 0            777777777376 
FT2	033570 034137 0   0   0            0            777777777376 
FT2RQ	033570 034137 0   0   777777777376 0            777777777376 
FT3	033570 034137 0   0   777777777376 0            777777777376 
FT9	033571 034137 0   0   777777777376 0            777777777376 
ET0	033572 034137 0   0   0            0            777777777376 
ST1A	033572 034137 0   0   0            0            777777777376 
ST9	033572 034137 0   0   0            0            777777777376 


*033572 JUMPA	0,033573
INITIAL
C(AC)=777777 777376 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033572 033572 0   0   324000033573 0            000000033573 
IT1	033572 0      0   0   324000033573 0            000000033573 
AT3	033572 0      0   0   000000033573 0            324000033573 
AT6	033572 033573 0   0   000000033573 0            324000033573 
FT1A	033572 033573 0   0   000000033573 0            000000033573 
FT2	033572 033573 0   0   0            0            000000033573 
FT2RQ	033572 033573 0   0   777777777376 0            000000033573 
FT3	033572 033573 0   0   777777777376 0            000000033573 
FT9	033573 033573 0   0   777777777376 0            000000033573 
ET0	033573 033573 0   0   777777777376 0            000000033573 
ST1A	033573 033573 0   0   777777777376 0            000000033573 
ST9	033573 033573 0   0   777777777376 0            000000033573 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 516
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0706

*033573 HRROI	0,777377
INITIAL
C(AC)=777777 777376 
FINAL
C(AC)=777777 777377 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033573 033573 0   0   561000777377 0            000000777377 
IT1	033573 0      0   0   561000777377 0            000000777377 
AT3	033573 0      0   0   000000777377 0            561000777377 
AT6	033573 777377 0   0   000000777377 0            561000777377 
FT1A	033573 777377 0   0   000000777377 0            000000777377 
FT9	033574 777377 0   0   000000777377 0            000000777377 
ET0	033574 777377 0   0   777777777377 0            000000777377 
ST1	033574 777377 0   0   777777777377 0            000000777377 
ST2	033574 777377 0   0   777777777377 0            000000777377 
ST9	033574 777377 0   0   777777777377 0            000000777377 


*033574 ADD 	0,034073
INITIAL
C(AC)=777777 777377 
C(E)=777777 777377 
FINAL
C(AC)=777777 776776 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033574 033574 0   0   270000034073 0            777777777377 
IT1	033574 0      0   0   270000034073 0            777777777377 
AT3	033574 0      0   0   000000034073 0            270000034073 
AT6	033574 034073 0   0   000000034073 0            270000034073 
FT0	033574 034073 0   0   777777777377 0            270000034073 
FT1A	033574 034073 0   0   777777777377 0            777777777377 
FT2	033574 034073 0   0   0            0            777777777377 
FT2RQ	033574 034073 0   0   777777777377 0            777777777377 
FT3	033574 034073 0   0   777777777377 0            777777777377 
FT9	033575 034073 0   0   777777777377 0            777777777377 
ET0	033575 034073 0   0   777777776776 0            777777777377 
ST1	033575 034073 0   0   777777776776 0            777777777377 
ST2	033575 034073 0   0   777777776776 0            777777777377 
ST9	033575 034073 0   0   777777776776 0            777777777377 


*033575 CAME	0,034140
INITIAL
C(AC)=777777 776776 
C(E)=777777 776776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033575 033575 0   0   312000034140 0            777777776776 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 517
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0707

IT1	033575 0      0   0   312000034140 0            777777776776 
AT3	033575 0      0   0   000000034140 0            312000034140 
AT6	033575 034140 0   0   000000034140 0            312000034140 
FT0	033575 034140 0   0   777777776776 0            312000034140 
FT1A	033575 034140 0   0   777777776776 0            777777776776 
FT2	033575 034140 0   0   0            0            777777776776 
FT2RQ	033575 034140 0   0   777777776776 0            777777776776 
FT3	033575 034140 0   0   777777776776 0            777777776776 
FT9	033576 034140 0   0   777777776776 0            777777776776 
ET0	033577 034140 0   0   0            0            777777776776 
ST1A	033577 034140 0   0   0            0            777777776776 
ST9	033577 034140 0   0   0            0            777777776776 


*033577 JUMPA	0,033600
INITIAL
C(AC)=777777 776776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033577 033577 0   0   324000033600 0            000000033600 
IT1	033577 0      0   0   324000033600 0            000000033600 
AT3	033577 0      0   0   000000033600 0            324000033600 
AT6	033577 0      0   0   000000033600 0            324000033600 
FT1A	033577 0      0   0   000000033600 0            000000033600 
FT2	033577 0      0   0   0            0            000000033600 
FT2RQ	033577 0      0   0   777777776776 0            000000033600 
FT3	033577 0      0   0   777777776776 0            000000033600 
FT9	0      0      0   0   777777776776 0            000000033600 
ET0	0      0      0   0   777777776776 0            000000033600 
ST1A	0      0      0   0   777777776776 0            000000033600 
ST9	0      0      0   0   777777776776 0            000000033600 


*033600 HRROI	0,776777
INITIAL
C(AC)=777777 776776 
FINAL
C(AC)=777777 776777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	0      0      0   0   561000776777 0            000000776777 
IT1	0      0      0   0   561000776777 0            000000776777 
AT3	0      0      0   0   000000776777 0            561000776777 
AT6	0      776777 0   0   000000776777 0            561000776777 
FT1A	0      776777 0   0   000000776777 0            000000776777 
FT9	033601 776777 0   0   000000776777 0            000000776777 
ET0	033601 776777 0   0   777777776777 0            000000776777 
ST1	033601 776777 0   0   777777776777 0            000000776777 
ST2	033601 776777 0   0   777777776777 0            000000776777 
ST9	033601 776777 0   0   777777776777 0            000000776777 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 518
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0708



*033601 ADD 	0,034074
INITIAL
C(AC)=777777 776777 
C(E)=777777 776777 
FINAL
C(AC)=777777 775776 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033601 033601 0   0   270000034074 0            777777776777 
IT1	033601 0      0   0   270000034074 0            777777776777 
AT3	033601 0      0   0   000000034074 0            270000034074 
AT6	033601 034074 0   0   000000034074 0            270000034074 
FT0	033601 034074 0   0   777777776777 0            270000034074 
FT1A	033601 034074 0   0   777777776777 0            777777776777 
FT2	033601 034074 0   0   0            0            777777776777 
FT2RQ	033601 034074 0   0   777777776777 0            777777776777 
FT3	033601 034074 0   0   777777776777 0            777777776777 
FT9	033602 034074 0   0   777777776777 0            777777776777 
ET0	033602 034074 0   0   777777775776 0            777777776777 
ST1	033602 034074 0   0   777777775776 0            777777776777 
ST2	033602 034074 0   0   777777775776 0            777777776777 
ST9	033602 034074 0   0   777777775776 0            777777776777 


*033602 CAME	0,034141
INITIAL
C(AC)=777777 775776 
C(E)=777777 775776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033602 033602 0   0   312000034141 0            777777775776 
IT1	033602 0      0   0   312000034141 0            777777775776 
AT3	033602 0      0   0   000000034141 0            312000034141 
AT6	033602 034141 0   0   000000034141 0            312000034141 
FT0	033602 034141 0   0   777777775776 0            312000034141 
FT1A	033602 034141 0   0   777777775776 0            777777775776 
FT2	033602 034141 0   0   0            0            777777775776 
FT2RQ	033602 034141 0   0   777777775776 0            777777775776 
FT3	033602 034141 0   0   777777775776 0            777777775776 
FT9	033603 034141 0   0   777777775776 0            777777775776 
ET0	033604 034141 0   0   0            0            777777775776 
ST1A	033604 034141 0   0   0            0            777777775776 
ST9	033604 034141 0   0   0            0            777777775776 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 519
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0709

*033604 JUMPA	0,033605
INITIAL
C(AC)=777777 775776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033604 033604 0   0   324000033605 0            000000033605 
IT1	033604 0      0   0   324000033605 0            000000033605 
AT3	033604 0      0   0   000000033605 0            324000033605 
AT6	033604 033605 0   0   000000033605 0            324000033605 
FT1A	033604 033605 0   0   000000033605 0            000000033605 
FT2	033604 033605 0   0   0            0            000000033605 
FT2RQ	033604 033605 0   0   777777775776 0            000000033605 
FT3	033604 033605 0   0   777777775776 0            000000033605 
FT9	033605 033605 0   0   777777775776 0            000000033605 
ET0	033605 033605 0   0   777777775776 0            000000033605 
ST1A	033605 033605 0   0   777777775776 0            000000033605 
ST9	033605 033605 0   0   777777775776 0            000000033605 


*033605 HRROI	0,775777
INITIAL
C(AC)=777777 775776 
FINAL
C(AC)=777777 775777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033605 033605 0   0   561000775777 0            000000775777 
IT1	033605 0      0   0   561000775777 0            000000775777 
AT3	033605 0      0   0   000000775777 0            561000775777 
AT6	033605 775777 0   0   000000775777 0            561000775777 
FT1A	033605 775777 0   0   000000775777 0            000000775777 
FT9	033606 775777 0   0   000000775777 0            000000775777 
ET0	033606 775777 0   0   777777775777 0            000000775777 
ST1	033606 775777 0   0   777777775777 0            000000775777 
ST2	033606 775777 0   0   777777775777 0            000000775777 
ST9	033606 775777 0   0   777777775777 0            000000775777 


*033606 ADD 	0,034075
INITIAL
C(AC)=777777 775777 
C(E)=777777 775777 
FINAL
C(AC)=777777 773776 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033606 033606 0   0   270000034075 0            777777775777 
IT1	033606 0      0   0   270000034075 0            777777775777 
AT3	033606 0      0   0   000000034075 0            270000034075 
AT6	033606 034075 0   0   000000034075 0            270000034075 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 520
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0710

FT0	033606 034075 0   0   777777775777 0            270000034075 
FT1A	033606 034075 0   0   777777775777 0            777777775777 
FT2	033606 034075 0   0   0            0            777777775777 
FT2RQ	033606 034075 0   0   777777775777 0            777777775777 
FT3	033606 034075 0   0   777777775777 0            777777775777 
FT9	033607 034075 0   0   777777775777 0            777777775777 
ET0	033607 034075 0   0   777777773776 0            777777775777 
ST1	033607 034075 0   0   777777773776 0            777777775777 
ST2	033607 034075 0   0   777777773776 0            777777775777 
ST9	033607 034075 0   0   777777773776 0            777777775777 


*033607 CAME	0,034142
INITIAL
C(AC)=777777 773776 
C(E)=777777 773776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033607 033607 0   0   312000034142 0            777777773776 
IT1	033607 0      0   0   312000034142 0            777777773776 
AT3	033607 0      0   0   000000034142 0            312000034142 
AT6	033607 034142 0   0   000000034142 0            312000034142 
FT0	033607 034142 0   0   777777773776 0            312000034142 
FT1A	033607 034142 0   0   777777773776 0            777777773776 
FT2	033607 034142 0   0   0            0            777777773776 
FT2RQ	033607 034142 0   0   777777773776 0            777777773776 
FT3	033607 034142 0   0   777777773776 0            777777773776 
FT9	033610 034142 0   0   777777773776 0            777777773776 
ET0	033611 034142 0   0   0            0            777777773776 
ST1A	033611 034142 0   0   0            0            777777773776 
ST9	033611 034142 0   0   0            0            777777773776 


*033611 JUMPA	0,033612
INITIAL
C(AC)=777777 773776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033611 033611 0   0   324000033612 0            000000033612 
IT1	033611 0      0   0   324000033612 0            000000033612 
AT3	033611 0      0   0   000000033612 0            324000033612 
AT6	033611 033612 0   0   000000033612 0            324000033612 
FT1A	033611 033612 0   0   000000033612 0            000000033612 
FT2	033611 033612 0   0   0            0            000000033612 
FT2RQ	033611 033612 0   0   777777773776 0            000000033612 
FT3	033611 033612 0   0   777777773776 0            000000033612 
FT9	033612 033612 0   0   777777773776 0            000000033612 
ET0	033612 033612 0   0   777777773776 0            000000033612 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 521
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0711

ST1A	033612 033612 0   0   777777773776 0            000000033612 
ST9	033612 033612 0   0   777777773776 0            000000033612 


*033612 HRROI	0,773777
INITIAL
C(AC)=777777 773776 
FINAL
C(AC)=777777 773777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033612 033612 0   0   561000773777 0            000000773777 
IT1	033612 0      0   0   561000773777 0            000000773777 
AT3	033612 0      0   0   000000773777 0            561000773777 
AT6	033612 773777 0   0   000000773777 0            561000773777 
FT1A	033612 773777 0   0   000000773777 0            000000773777 
FT9	033613 773777 0   0   000000773777 0            000000773777 
ET0	033613 773777 0   0   777777773777 0            000000773777 
ST1	033613 773777 0   0   777777773777 0            000000773777 
ST2	033613 773777 0   0   777777773777 0            000000773777 
ST9	033613 773777 0   0   777777773777 0            000000773777 


*033613 ADD 	0,034076
INITIAL
C(AC)=777777 773777 
C(E)=777777 773777 
FINAL
C(AC)=777777 767776 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033613 033613 0   0   270000034076 0            777777773777 
IT1	033613 0      0   0   270000034076 0            777777773777 
AT3	033613 0      0   0   000000034076 0            270000034076 
AT6	033613 034076 0   0   000000034076 0            270000034076 
FT0	033613 034076 0   0   777777773777 0            270000034076 
FT1A	033613 034076 0   0   777777773777 0            777777773777 
FT2	033613 034076 0   0   0            0            777777773777 
FT2RQ	033613 034076 0   0   777777773777 0            777777773777 
FT3	033613 034076 0   0   777777773777 0            777777773777 
FT9	033614 034076 0   0   777777773777 0            777777773777 
ET0	033614 034076 0   0   777777767776 0            777777773777 
ST1	033614 034076 0   0   777777767776 0            777777773777 
ST2	033614 034076 0   0   777777767776 0            777777773777 
ST9	033614 034076 0   0   777777767776 0            777777773777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 522
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0712

*033614 CAME	0,034143
INITIAL
C(AC)=777777 767776 
C(E)=777777 767776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033614 033614 0   0   312000034143 0            777777767776 
IT1	033614 0      0   0   312000034143 0            777777767776 
AT3	033614 0      0   0   000000034143 0            312000034143 
AT6	033614 034143 0   0   000000034143 0            312000034143 
FT0	033614 034143 0   0   777777767776 0            312000034143 
FT1A	033614 034143 0   0   777777767776 0            777777767776 
FT2	033614 034143 0   0   0            0            777777767776 
FT2RQ	033614 034143 0   0   777777767776 0            777777767776 
FT3	033614 034143 0   0   777777767776 0            777777767776 
FT9	033615 034143 0   0   777777767776 0            777777767776 
ET0	033616 034143 0   0   0            0            777777767776 
ST1A	033616 034143 0   0   0            0            777777767776 
ST9	033616 034143 0   0   0            0            777777767776 


*033616 JUMPA	0,033617
INITIAL
C(AC)=777777 767776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033616 033616 0   0   324000033617 0            000000033617 
IT1	033616 0      0   0   324000033617 0            000000033617 
AT3	033616 0      0   0   000000033617 0            324000033617 
AT6	033616 033617 0   0   000000033617 0            324000033617 
FT1A	033616 033617 0   0   000000033617 0            000000033617 
FT2	033616 033617 0   0   0            0            000000033617 
FT2RQ	033616 033617 0   0   777777767776 0            000000033617 
FT3	033616 033617 0   0   777777767776 0            000000033617 
FT9	033617 033617 0   0   777777767776 0            000000033617 
ET0	033617 033617 0   0   777777767776 0            000000033617 
ST1A	033617 033617 0   0   777777767776 0            000000033617 
ST9	033617 033617 0   0   777777767776 0            000000033617 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 523
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0713

*033617 HRROI	0,767777
INITIAL
C(AC)=777777 767776 
FINAL
C(AC)=777777 767777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033617 033617 0   0   561000767777 0            000000767777 
IT1	033617 0      0   0   561000767777 0            000000767777 
AT3	033617 0      0   0   000000767777 0            561000767777 
AT6	033617 767777 0   0   000000767777 0            561000767777 
FT1A	033617 767777 0   0   000000767777 0            000000767777 
FT9	033620 767777 0   0   000000767777 0            000000767777 
ET0	033620 767777 0   0   777777767777 0            000000767777 
ST1	033620 767777 0   0   777777767777 0            000000767777 
ST2	033620 767777 0   0   777777767777 0            000000767777 
ST9	033620 767777 0   0   777777767777 0            000000767777 


*033620 ADD 	0,034077
INITIAL
C(AC)=777777 767777 
C(E)=777777 767777 
FINAL
C(AC)=777777 757776 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033620 033620 0   0   270000034077 0            777777767777 
IT1	033620 0      0   0   270000034077 0            777777767777 
AT3	033620 0      0   0   000000034077 0            270000034077 
AT6	033620 034077 0   0   000000034077 0            270000034077 
FT0	033620 034077 0   0   777777767777 0            270000034077 
FT1A	033620 034077 0   0   777777767777 0            777777767777 
FT2	033620 034077 0   0   0            0            777777767777 
FT2RQ	033620 034077 0   0   777777767777 0            777777767777 
FT3	033620 034077 0   0   777777767777 0            777777767777 
FT9	033621 034077 0   0   777777767777 0            777777767777 
ET0	033621 034077 0   0   777777757776 0            777777767777 
ST1	033621 034077 0   0   777777757776 0            777777767777 
ST2	033621 034077 0   0   777777757776 0            777777767777 
ST9	033621 034077 0   0   777777757776 0            777777767777 


*033621 CAME	0,034144
INITIAL
C(AC)=777777 757776 
C(E)=777777 757776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033621 033621 0   0   312000034144 0            777777757776 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 524
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0714

IT1	033621 0      0   0   312000034144 0            777777757776 
AT3	033621 0      0   0   000000034144 0            312000034144 
AT6	033621 034144 0   0   000000034144 0            312000034144 
FT0	033621 034144 0   0   777777757776 0            312000034144 
FT1A	033621 034144 0   0   777777757776 0            777777757776 
FT2	033621 034144 0   0   0            0            777777757776 
FT2RQ	033621 034144 0   0   777777757776 0            777777757776 
FT3	033621 034144 0   0   777777757776 0            777777757776 
FT9	033622 034144 0   0   777777757776 0            777777757776 
ET0	033623 034144 0   0   0            0            777777757776 
ST1A	033623 034144 0   0   0            0            777777757776 
ST9	033623 034144 0   0   0            0            777777757776 


*033623 JUMPA	0,033624
INITIAL
C(AC)=777777 757776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033623 033623 0   0   324000033624 0            000000033624 
IT1	033623 0      0   0   324000033624 0            000000033624 
AT3	033623 0      0   0   000000033624 0            324000033624 
AT6	033623 033624 0   0   000000033624 0            324000033624 
FT1A	033623 033624 0   0   000000033624 0            000000033624 
FT2	033623 033624 0   0   0            0            000000033624 
FT2RQ	033623 033624 0   0   777777757776 0            000000033624 
FT3	033623 033624 0   0   777777757776 0            000000033624 
FT9	033624 033624 0   0   777777757776 0            000000033624 
ET0	033624 033624 0   0   777777757776 0            000000033624 
ST1A	033624 033624 0   0   777777757776 0            000000033624 
ST9	033624 033624 0   0   777777757776 0            000000033624 


*033624 HRROI	0,757777
INITIAL
C(AC)=777777 757776 
FINAL
C(AC)=777777 757777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033624 033624 0   0   561000757777 0            000000757777 
IT1	033624 0      0   0   561000757777 0            000000757777 
AT3	033624 0      0   0   000000757777 0            561000757777 
AT6	033624 757777 0   0   000000757777 0            561000757777 
FT1A	033624 757777 0   0   000000757777 0            000000757777 
FT9	033625 757777 0   0   000000757777 0            000000757777 
ET0	033625 757777 0   0   777777757777 0            000000757777 
ST1	033625 757777 0   0   777777757777 0            000000757777 
ST2	033625 757777 0   0   777777757777 0            000000757777 
ST9	033625 757777 0   0   777777757777 0            000000757777 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 525
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0715



*033625 ADD 	0,034100
INITIAL
C(AC)=777777 757777 
C(E)=777777 757777 
FINAL
C(AC)=777777 737776 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033625 033625 0   0   270000034100 0            777777757777 
IT1	033625 0      0   0   270000034100 0            777777757777 
AT3	033625 0      0   0   000000034100 0            270000034100 
AT6	033625 0      0   0   000000034100 0            270000034100 
FT0	033625 0      0   0   777777757777 0            270000034100 
FT1A	033625 0      0   0   777777757777 0            777777757777 
FT2	033625 0      0   0   0            0            777777757777 
FT2RQ	033625 0      0   0   777777757777 0            777777757777 
FT3	033625 0      0   0   777777757777 0            777777757777 
FT9	033626 0      0   0   777777757777 0            777777757777 
ET0	033626 0      0   0   777777737776 0            777777757777 
ST1	033626 0      0   0   777777737776 0            777777757777 
ST2	033626 0      0   0   777777737776 0            777777757777 
ST9	033626 0      0   0   777777737776 0            777777757777 


*033626 CAME	0,034145
INITIAL
C(AC)=777777 737776 
C(E)=777777 737776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033626 033626 0   0   312000034145 0            777777737776 
IT1	033626 0      0   0   312000034145 0            777777737776 
AT3	033626 0      0   0   000000034145 0            312000034145 
AT6	033626 034145 0   0   000000034145 0            312000034145 
FT0	033626 034145 0   0   777777737776 0            312000034145 
FT1A	033626 034145 0   0   777777737776 0            777777737776 
FT2	033626 034145 0   0   0            0            777777737776 
FT2RQ	033626 034145 0   0   777777737776 0            777777737776 
FT3	033626 034145 0   0   777777737776 0            777777737776 
FT9	033627 034145 0   0   777777737776 0            777777737776 
ET0	033630 034145 0   0   0            0            777777737776 
ST1A	033630 034145 0   0   0            0            777777737776 
ST9	033630 034145 0   0   0            0            777777737776 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 526
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0716

*033630 JUMPA	0,033631
INITIAL
C(AC)=777777 737776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033630 033630 0   0   324000033631 0            000000033631 
IT1	033630 0      0   0   324000033631 0            000000033631 
AT3	033630 0      0   0   000000033631 0            324000033631 
AT6	033630 033631 0   0   000000033631 0            324000033631 
FT1A	033630 033631 0   0   000000033631 0            000000033631 
FT2	033630 033631 0   0   0            0            000000033631 
FT2RQ	033630 033631 0   0   777777737776 0            000000033631 
FT3	033630 033631 0   0   777777737776 0            000000033631 
FT9	033631 033631 0   0   777777737776 0            000000033631 
ET0	033631 033631 0   0   777777737776 0            000000033631 
ST1A	033631 033631 0   0   777777737776 0            000000033631 
ST9	033631 033631 0   0   777777737776 0            000000033631 


*033631 HRROI	0,737777
INITIAL
C(AC)=777777 737776 
FINAL
C(AC)=777777 737777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033631 033631 0   0   561000737777 0            000000737777 
IT1	033631 0      0   0   561000737777 0            000000737777 
AT3	033631 0      0   0   000000737777 0            561000737777 
AT6	033631 737777 0   0   000000737777 0            561000737777 
FT1A	033631 737777 0   0   000000737777 0            000000737777 
FT9	033632 737777 0   0   000000737777 0            000000737777 
ET0	033632 737777 0   0   777777737777 0            000000737777 
ST1	033632 737777 0   0   777777737777 0            000000737777 
ST2	033632 737777 0   0   777777737777 0            000000737777 
ST9	033632 737777 0   0   777777737777 0            000000737777 


*033632 ADD 	0,034101
INITIAL
C(AC)=777777 737777 
C(E)=777777 737777 
FINAL
C(AC)=777777 677776 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033632 033632 0   0   270000034101 0            777777737777 
IT1	033632 0      0   0   270000034101 0            777777737777 
AT3	033632 0      0   0   000000034101 0            270000034101 
AT6	033632 034101 0   0   000000034101 0            270000034101 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 527
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0717

FT0	033632 034101 0   0   777777737777 0            270000034101 
FT1A	033632 034101 0   0   777777737777 0            777777737777 
FT2	033632 034101 0   0   0            0            777777737777 
FT2RQ	033632 034101 0   0   777777737777 0            777777737777 
FT3	033632 034101 0   0   777777737777 0            777777737777 
FT9	033633 034101 0   0   777777737777 0            777777737777 
ET0	033633 034101 0   0   777777677776 0            777777737777 
ST1	033633 034101 0   0   777777677776 0            777777737777 
ST2	033633 034101 0   0   777777677776 0            777777737777 
ST9	033633 034101 0   0   777777677776 0            777777737777 


*033633 CAME	0,034146
INITIAL
C(AC)=777777 677776 
C(E)=777777 677776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033633 033633 0   0   312000034146 0            777777677776 
IT1	033633 0      0   0   312000034146 0            777777677776 
AT3	033633 0      0   0   000000034146 0            312000034146 
AT6	033633 034146 0   0   000000034146 0            312000034146 
FT0	033633 034146 0   0   777777677776 0            312000034146 
FT1A	033633 034146 0   0   777777677776 0            777777677776 
FT2	033633 034146 0   0   0            0            777777677776 
FT2RQ	033633 034146 0   0   777777677776 0            777777677776 
FT3	033633 034146 0   0   777777677776 0            777777677776 
FT9	033634 034146 0   0   777777677776 0            777777677776 
ET0	033635 034146 0   0   0            0            777777677776 
ST1A	033635 034146 0   0   0            0            777777677776 
ST9	033635 034146 0   0   0            0            777777677776 


*033635 JUMPA	0,033636
INITIAL
C(AC)=777777 677776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033635 033635 0   0   324000033636 0            000000033636 
IT1	033635 0      0   0   324000033636 0            000000033636 
AT3	033635 0      0   0   000000033636 0            324000033636 
AT6	033635 033636 0   0   000000033636 0            324000033636 
FT1A	033635 033636 0   0   000000033636 0            000000033636 
FT2	033635 033636 0   0   0            0            000000033636 
FT2RQ	033635 033636 0   0   777777677776 0            000000033636 
FT3	033635 033636 0   0   777777677776 0            000000033636 
FT9	033636 033636 0   0   777777677776 0            000000033636 
ET0	033636 033636 0   0   777777677776 0            000000033636 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 528
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0718

ST1A	033636 033636 0   0   777777677776 0            000000033636 
ST9	033636 033636 0   0   777777677776 0            000000033636 


*033636 HRROI	0,677777
INITIAL
C(AC)=777777 677776 
FINAL
C(AC)=777777 677777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033636 033636 0   0   561000677777 0            000000677777 
IT1	033636 0      0   0   561000677777 0            000000677777 
AT3	033636 0      0   0   000000677777 0            561000677777 
AT6	033636 677777 0   0   000000677777 0            561000677777 
FT1A	033636 677777 0   0   000000677777 0            000000677777 
FT9	033637 677777 0   0   000000677777 0            000000677777 
ET0	033637 677777 0   0   777777677777 0            000000677777 
ST1	033637 677777 0   0   777777677777 0            000000677777 
ST2	033637 677777 0   0   777777677777 0            000000677777 
ST9	033637 677777 0   0   777777677777 0            000000677777 


*033637 ADD 	0,034102
INITIAL
C(AC)=777777 677777 
C(E)=777777 677777 
FINAL
C(AC)=777777 577776 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033637 033637 0   0   270000034102 0            777777677777 
IT1	033637 0      0   0   270000034102 0            777777677777 
AT3	033637 0      0   0   000000034102 0            270000034102 
AT6	033637 034102 0   0   000000034102 0            270000034102 
FT0	033637 034102 0   0   777777677777 0            270000034102 
FT1A	033637 034102 0   0   777777677777 0            777777677777 
FT2	033637 034102 0   0   0            0            777777677777 
FT2RQ	033637 034102 0   0   777777677777 0            777777677777 
FT3	033637 034102 0   0   777777677777 0            777777677777 
FT9	033640 034102 0   0   777777677777 0            777777677777 
ET0	033640 034102 0   0   777777577776 0            777777677777 
ST1	033640 034102 0   0   777777577776 0            777777677777 
ST2	033640 034102 0   0   777777577776 0            777777677777 
ST9	033640 034102 0   0   777777577776 0            777777677777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 529
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0719

*033640 CAME	0,034147
INITIAL
C(AC)=777777 577776 
C(E)=777777 577776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033640 033640 0   0   312000034147 0            777777577776 
IT1	033640 0      0   0   312000034147 0            777777577776 
AT3	033640 0      0   0   000000034147 0            312000034147 
AT6	033640 034147 0   0   000000034147 0            312000034147 
FT0	033640 034147 0   0   777777577776 0            312000034147 
FT1A	033640 034147 0   0   777777577776 0            777777577776 
FT2	033640 034147 0   0   0            0            777777577776 
FT2RQ	033640 034147 0   0   777777577776 0            777777577776 
FT3	033640 034147 0   0   777777577776 0            777777577776 
FT9	033641 034147 0   0   777777577776 0            777777577776 
ET0	033642 034147 0   0   0            0            777777577776 
ST1A	033642 034147 0   0   0            0            777777577776 
ST9	033642 034147 0   0   0            0            777777577776 


*033642 JUMPA	0,033643
INITIAL
C(AC)=777777 577776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033642 033642 0   0   324000033643 0            000000033643 
IT1	033642 0      0   0   324000033643 0            000000033643 
AT3	033642 0      0   0   000000033643 0            324000033643 
AT6	033642 033643 0   0   000000033643 0            324000033643 
FT1A	033642 033643 0   0   000000033643 0            000000033643 
FT2	033642 033643 0   0   0            0            000000033643 
FT2RQ	033642 033643 0   0   777777577776 0            000000033643 
FT3	033642 033643 0   0   777777577776 0            000000033643 
FT9	033643 033643 0   0   777777577776 0            000000033643 
ET0	033643 033643 0   0   777777577776 0            000000033643 
ST1A	033643 033643 0   0   777777577776 0            000000033643 
ST9	033643 033643 0   0   777777577776 0            000000033643 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 530
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0720

*033643 HRROI	0,577777
INITIAL
C(AC)=777777 577776 
FINAL
C(AC)=777777 577777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033643 033643 0   0   561000577777 0            000000577777 
IT1	033643 0      0   0   561000577777 0            000000577777 
AT3	033643 0      0   0   000000577777 0            561000577777 
AT6	033643 577777 0   0   000000577777 0            561000577777 
FT1A	033643 577777 0   0   000000577777 0            000000577777 
FT9	033644 577777 0   0   000000577777 0            000000577777 
ET0	033644 577777 0   0   777777577777 0            000000577777 
ST1	033644 577777 0   0   777777577777 0            000000577777 
ST2	033644 577777 0   0   777777577777 0            000000577777 
ST9	033644 577777 0   0   777777577777 0            000000577777 


*033644 ADD 	0,034103
INITIAL
C(AC)=777777 577777 
C(E)=777777 577777 
FINAL
C(AC)=777777 377776 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033644 033644 0   0   270000034103 0            777777577777 
IT1	033644 0      0   0   270000034103 0            777777577777 
AT3	033644 0      0   0   000000034103 0            270000034103 
AT6	033644 034103 0   0   000000034103 0            270000034103 
FT0	033644 034103 0   0   777777577777 0            270000034103 
FT1A	033644 034103 0   0   777777577777 0            777777577777 
FT2	033644 034103 0   0   0            0            777777577777 
FT2RQ	033644 034103 0   0   777777577777 0            777777577777 
FT3	033644 034103 0   0   777777577777 0            777777577777 
FT9	033645 034103 0   0   777777577777 0            777777577777 
ET0	033645 034103 0   0   777777377776 0            777777577777 
ST1	033645 034103 0   0   777777377776 0            777777577777 
ST2	033645 034103 0   0   777777377776 0            777777577777 
ST9	033645 034103 0   0   777777377776 0            777777577777 


*033645 CAME	0,034150
INITIAL
C(AC)=777777 377776 
C(E)=777777 377776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033645 033645 0   0   312000034150 0            777777377776 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 531
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0721

IT1	033645 0      0   0   312000034150 0            777777377776 
AT3	033645 0      0   0   000000034150 0            312000034150 
AT6	033645 034150 0   0   000000034150 0            312000034150 
FT0	033645 034150 0   0   777777377776 0            312000034150 
FT1A	033645 034150 0   0   777777377776 0            777777377776 
FT2	033645 034150 0   0   0            0            777777377776 
FT2RQ	033645 034150 0   0   777777377776 0            777777377776 
FT3	033645 034150 0   0   777777377776 0            777777377776 
FT9	033646 034150 0   0   777777377776 0            777777377776 
ET0	033647 034150 0   0   0            0            777777377776 
ST1A	033647 034150 0   0   0            0            777777377776 
ST9	033647 034150 0   0   0            0            777777377776 


*033647 JUMPA	0,033650
INITIAL
C(AC)=777777 377776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033647 033647 0   0   324000033650 0            000000033650 
IT1	033647 0      0   0   324000033650 0            000000033650 
AT3	033647 0      0   0   000000033650 0            324000033650 
AT6	033647 033650 0   0   000000033650 0            324000033650 
FT1A	033647 033650 0   0   000000033650 0            000000033650 
FT2	033647 033650 0   0   0            0            000000033650 
FT2RQ	033647 033650 0   0   777777377776 0            000000033650 
FT3	033647 033650 0   0   777777377776 0            000000033650 
FT9	033650 033650 0   0   777777377776 0            000000033650 
ET0	033650 033650 0   0   777777377776 0            000000033650 
ST1A	033650 033650 0   0   777777377776 0            000000033650 
ST9	033650 033650 0   0   777777377776 0            000000033650 


*033650 HRROI	0,377777
INITIAL
C(AC)=777777 377776 
FINAL
C(AC)=777777 377777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033650 033650 0   0   561000377777 0            000000377777 
IT1	033650 0      0   0   561000377777 0            000000377777 
AT3	033650 0      0   0   000000377777 0            561000377777 
AT6	033650 377777 0   0   000000377777 0            561000377777 
FT1A	033650 377777 0   0   000000377777 0            000000377777 
FT9	033651 377777 0   0   000000377777 0            000000377777 
ET0	033651 377777 0   0   777777377777 0            000000377777 
ST1	033651 377777 0   0   777777377777 0            000000377777 
ST2	033651 377777 0   0   777777377777 0            000000377777 
ST9	033651 377777 0   0   777777377777 0            000000377777 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 532
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0722



*033651 ADD 	0,034104
INITIAL
C(AC)=777777 377777 
C(E)=777777 377777 
FINAL
C(AC)=777776 777776 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033651 033651 0   0   270000034104 0            777777377777 
IT1	033651 0      0   0   270000034104 0            777777377777 
AT3	033651 0      0   0   000000034104 0            270000034104 
AT6	033651 034104 0   0   000000034104 0            270000034104 
FT0	033651 034104 0   0   777777377777 0            270000034104 
FT1A	033651 034104 0   0   777777377777 0            777777377777 
FT2	033651 034104 0   0   0            0            777777377777 
FT2RQ	033651 034104 0   0   777777377777 0            777777377777 
FT3	033651 034104 0   0   777777377777 0            777777377777 
FT9	033652 034104 0   0   777777377777 0            777777377777 
ET0	033652 034104 0   0   777776777776 0            777777377777 
ST1	033652 034104 0   0   777776777776 0            777777377777 
ST2	033652 034104 0   0   777776777776 0            777777377777 
ST9	033652 034104 0   0   777776777776 0            777777377777 


*033652 CAME	0,034151
INITIAL
C(AC)=777776 777776 
C(E)=777776 777776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033652 033652 0   0   312000034151 0            777776777776 
IT1	033652 0      0   0   312000034151 0            777776777776 
AT3	033652 0      0   0   000000034151 0            312000034151 
AT6	033652 034151 0   0   000000034151 0            312000034151 
FT0	033652 034151 0   0   777776777776 0            312000034151 
FT1A	033652 034151 0   0   777776777776 0            777776777776 
FT2	033652 034151 0   0   0            0            777776777776 
FT2RQ	033652 034151 0   0   777776777776 0            777776777776 
FT3	033652 034151 0   0   777776777776 0            777776777776 
FT9	033653 034151 0   0   777776777776 0            777776777776 
ET0	033654 034151 0   0   0            0            777776777776 
ST1A	033654 034151 0   0   0            0            777776777776 
ST9	033654 034151 0   0   0            0            777776777776 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 533
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0723

*033654 JUMPA	0,033655
INITIAL
C(AC)=777776 777776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033654 033654 0   0   324000033655 0            000000033655 
IT1	033654 0      0   0   324000033655 0            000000033655 
AT3	033654 0      0   0   000000033655 0            324000033655 
AT6	033654 033655 0   0   000000033655 0            324000033655 
FT1A	033654 033655 0   0   000000033655 0            000000033655 
FT2	033654 033655 0   0   0            0            000000033655 
FT2RQ	033654 033655 0   0   777776777776 0            000000033655 
FT3	033654 033655 0   0   777776777776 0            000000033655 
FT9	033655 033655 0   0   777776777776 0            000000033655 
ET0	033655 033655 0   0   777776777776 0            000000033655 
ST1A	033655 033655 0   0   777776777776 0            000000033655 
ST9	033655 033655 0   0   777776777776 0            000000033655 


*033655 HRLOI	0,777776
INITIAL
C(AC)=777776 777776 
FINAL
C(AC)=777776 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033655 033655 0   0   525000777776 0            000000777776 
IT1	033655 0      0   0   525000777776 0            000000777776 
AT3	033655 0      0   0   000000777776 0            525000777776 
AT6	033655 777776 0   0   000000777776 0            525000777776 
FT1A	033655 777776 0   0   000000777776 0            000000777776 
FT9	033656 777776 0   0   000000777776 0            000000777776 
ET0	033656 777776 0   0   777776777777 0            000000777776 
ST1	033656 777776 0   0   777776777777 0            000000777776 
ST2	033656 777776 0   0   777776777777 0            000000777776 
ST9	033656 777776 0   0   777776777777 0            000000777776 


*033656 ADD 	0,034105
INITIAL
C(AC)=777776 777777 
C(E)=777776 777777 
FINAL
C(AC)=777775 777776 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033656 033656 0   0   270000034105 0            777776777777 
IT1	033656 0      0   0   270000034105 0            777776777777 
AT3	033656 0      0   0   000000034105 0            270000034105 
AT6	033656 034105 0   0   000000034105 0            270000034105 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 534
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0724

FT0	033656 034105 0   0   777776777777 0            270000034105 
FT1A	033656 034105 0   0   777776777777 0            777776777777 
FT2	033656 034105 0   0   0            0            777776777777 
FT2RQ	033656 034105 0   0   777776777777 0            777776777777 
FT3	033656 034105 0   0   777776777777 0            777776777777 
FT9	033657 034105 0   0   777776777777 0            777776777777 
ET0	033657 034105 0   0   777775777776 0            777776777777 
ST1	033657 034105 0   0   777775777776 0            777776777777 
ST2	033657 034105 0   0   777775777776 0            777776777777 
ST9	033657 034105 0   0   777775777776 0            777776777777 


*033657 CAME	0,034152
INITIAL
C(AC)=777775 777776 
C(E)=777775 777776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033657 033657 0   0   312000034152 0            777775777776 
IT1	033657 0      0   0   312000034152 0            777775777776 
AT3	033657 0      0   0   000000034152 0            312000034152 
AT6	033657 034152 0   0   000000034152 0            312000034152 
FT0	033657 034152 0   0   777775777776 0            312000034152 
FT1A	033657 034152 0   0   777775777776 0            777775777776 
FT2	033657 034152 0   0   0            0            777775777776 
FT2RQ	033657 034152 0   0   777775777776 0            777775777776 
FT3	033657 034152 0   0   777775777776 0            777775777776 
FT9	033660 034152 0   0   777775777776 0            777775777776 
ET0	033661 034152 0   0   0            0            777775777776 
ST1A	033661 034152 0   0   0            0            777775777776 
ST9	033661 034152 0   0   0            0            777775777776 


*033661 JUMPA	0,033662
INITIAL
C(AC)=777775 777776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033661 033661 0   0   324000033662 0            000000033662 
IT1	033661 0      0   0   324000033662 0            000000033662 
AT3	033661 0      0   0   000000033662 0            324000033662 
AT6	033661 033662 0   0   000000033662 0            324000033662 
FT1A	033661 033662 0   0   000000033662 0            000000033662 
FT2	033661 033662 0   0   0            0            000000033662 
FT2RQ	033661 033662 0   0   777775777776 0            000000033662 
FT3	033661 033662 0   0   777775777776 0            000000033662 
FT9	033662 033662 0   0   777775777776 0            000000033662 
ET0	033662 033662 0   0   777775777776 0            000000033662 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 535
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0725

ST1A	033662 033662 0   0   777775777776 0            000000033662 
ST9	033662 033662 0   0   777775777776 0            000000033662 


*033662 HRLOI	0,777775
INITIAL
C(AC)=777775 777776 
FINAL
C(AC)=777775 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033662 033662 0   0   525000777775 0            000000777775 
IT1	033662 0      0   0   525000777775 0            000000777775 
AT3	033662 0      0   0   000000777775 0            525000777775 
AT6	033662 777775 0   0   000000777775 0            525000777775 
FT1A	033662 777775 0   0   000000777775 0            000000777775 
FT9	033663 777775 0   0   000000777775 0            000000777775 
ET0	033663 777775 0   0   777775777777 0            000000777775 
ST1	033663 777775 0   0   777775777777 0            000000777775 
ST2	033663 777775 0   0   777775777777 0            000000777775 
ST9	033663 777775 0   0   777775777777 0            000000777775 


*033663 ADD 	0,034106
INITIAL
C(AC)=777775 777777 
C(E)=777775 777777 
FINAL
C(AC)=777773 777776 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033663 033663 0   0   270000034106 0            777775777777 
IT1	033663 0      0   0   270000034106 0            777775777777 
AT3	033663 0      0   0   000000034106 0            270000034106 
AT6	033663 034106 0   0   000000034106 0            270000034106 
FT0	033663 034106 0   0   777775777777 0            270000034106 
FT1A	033663 034106 0   0   777775777777 0            777775777777 
FT2	033663 034106 0   0   0            0            777775777777 
FT2RQ	033663 034106 0   0   777775777777 0            777775777777 
FT3	033663 034106 0   0   777775777777 0            777775777777 
FT9	033664 034106 0   0   777775777777 0            777775777777 
ET0	033664 034106 0   0   777773777776 0            777775777777 
ST1	033664 034106 0   0   777773777776 0            777775777777 
ST2	033664 034106 0   0   777773777776 0            777775777777 
ST9	033664 034106 0   0   777773777776 0            777775777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 536
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0726

*033664 CAME	0,034153
INITIAL
C(AC)=777773 777776 
C(E)=777773 777776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033664 033664 0   0   312000034153 0            777773777776 
IT1	033664 0      0   0   312000034153 0            777773777776 
AT3	033664 0      0   0   000000034153 0            312000034153 
AT6	033664 034153 0   0   000000034153 0            312000034153 
FT0	033664 034153 0   0   777773777776 0            312000034153 
FT1A	033664 034153 0   0   777773777776 0            777773777776 
FT2	033664 034153 0   0   0            0            777773777776 
FT2RQ	033664 034153 0   0   777773777776 0            777773777776 
FT3	033664 034153 0   0   777773777776 0            777773777776 
FT9	033665 034153 0   0   777773777776 0            777773777776 
ET0	033666 034153 0   0   0            0            777773777776 
ST1A	033666 034153 0   0   0            0            777773777776 
ST9	033666 034153 0   0   0            0            777773777776 


*033666 JUMPA	0,033667
INITIAL
C(AC)=777773 777776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033666 033666 0   0   324000033667 0            000000033667 
IT1	033666 0      0   0   324000033667 0            000000033667 
AT3	033666 0      0   0   000000033667 0            324000033667 
AT6	033666 033667 0   0   000000033667 0            324000033667 
FT1A	033666 033667 0   0   000000033667 0            000000033667 
FT2	033666 033667 0   0   0            0            000000033667 
FT2RQ	033666 033667 0   0   777773777776 0            000000033667 
FT3	033666 033667 0   0   777773777776 0            000000033667 
FT9	033667 033667 0   0   777773777776 0            000000033667 
ET0	033667 033667 0   0   777773777776 0            000000033667 
ST1A	033667 033667 0   0   777773777776 0            000000033667 
ST9	033667 033667 0   0   777773777776 0            000000033667 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 537
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0727

*033667 HRLOI	0,777773
INITIAL
C(AC)=777773 777776 
FINAL
C(AC)=777773 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033667 033667 0   0   525000777773 0            000000777773 
IT1	033667 0      0   0   525000777773 0            000000777773 
AT3	033667 0      0   0   000000777773 0            525000777773 
AT6	033667 777773 0   0   000000777773 0            525000777773 
FT1A	033667 777773 0   0   000000777773 0            000000777773 
FT9	033670 777773 0   0   000000777773 0            000000777773 
ET0	033670 777773 0   0   777773777777 0            000000777773 
ST1	033670 777773 0   0   777773777777 0            000000777773 
ST2	033670 777773 0   0   777773777777 0            000000777773 
ST9	033670 777773 0   0   777773777777 0            000000777773 


*033670 ADD 	0,034107
INITIAL
C(AC)=777773 777777 
C(E)=777773 777777 
FINAL
C(AC)=777767 777776 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033670 033670 0   0   270000034107 0            777773777777 
IT1	033670 0      0   0   270000034107 0            777773777777 
AT3	033670 0      0   0   000000034107 0            270000034107 
AT6	033670 034107 0   0   000000034107 0            270000034107 
FT0	033670 034107 0   0   777773777777 0            270000034107 
FT1A	033670 034107 0   0   777773777777 0            777773777777 
FT2	033670 034107 0   0   0            0            777773777777 
FT2RQ	033670 034107 0   0   777773777777 0            777773777777 
FT3	033670 034107 0   0   777773777777 0            777773777777 
FT9	033671 034107 0   0   777773777777 0            777773777777 
ET0	033671 034107 0   0   777767777776 0            777773777777 
ST1	033671 034107 0   0   777767777776 0            777773777777 
ST2	033671 034107 0   0   777767777776 0            777773777777 
ST9	033671 034107 0   0   777767777776 0            777773777777 


*033671 CAME	0,034154
INITIAL
C(AC)=777767 777776 
C(E)=777767 777776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033671 033671 0   0   312000034154 0            777767777776 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 538
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0728

IT1	033671 0      0   0   312000034154 0            777767777776 
AT3	033671 0      0   0   000000034154 0            312000034154 
AT6	033671 034154 0   0   000000034154 0            312000034154 
FT0	033671 034154 0   0   777767777776 0            312000034154 
FT1A	033671 034154 0   0   777767777776 0            777767777776 
FT2	033671 034154 0   0   0            0            777767777776 
FT2RQ	033671 034154 0   0   777767777776 0            777767777776 
FT3	033671 034154 0   0   777767777776 0            777767777776 
FT9	033672 034154 0   0   777767777776 0            777767777776 
ET0	033673 034154 0   0   0            0            777767777776 
ST1A	033673 034154 0   0   0            0            777767777776 
ST9	033673 034154 0   0   0            0            777767777776 


*033673 JUMPA	0,033674
INITIAL
C(AC)=777767 777776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033673 033673 0   0   324000033674 0            000000033674 
IT1	033673 0      0   0   324000033674 0            000000033674 
AT3	033673 0      0   0   000000033674 0            324000033674 
AT6	033673 033674 0   0   000000033674 0            324000033674 
FT1A	033673 033674 0   0   000000033674 0            000000033674 
FT2	033673 033674 0   0   0            0            000000033674 
FT2RQ	033673 033674 0   0   777767777776 0            000000033674 
FT3	033673 033674 0   0   777767777776 0            000000033674 
FT9	033674 033674 0   0   777767777776 0            000000033674 
ET0	033674 033674 0   0   777767777776 0            000000033674 
ST1A	033674 033674 0   0   777767777776 0            000000033674 
ST9	033674 033674 0   0   777767777776 0            000000033674 


*033674 HRLOI	0,777767
INITIAL
C(AC)=777767 777776 
FINAL
C(AC)=777767 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033674 033674 0   0   525000777767 0            000000777767 
IT1	033674 0      0   0   525000777767 0            000000777767 
AT3	033674 0      0   0   000000777767 0            525000777767 
AT6	033674 777767 0   0   000000777767 0            525000777767 
FT1A	033674 777767 0   0   000000777767 0            000000777767 
FT9	033675 777767 0   0   000000777767 0            000000777767 
ET0	033675 777767 0   0   777767777777 0            000000777767 
ST1	033675 777767 0   0   777767777777 0            000000777767 
ST2	033675 777767 0   0   777767777777 0            000000777767 
ST9	033675 777767 0   0   777767777777 0            000000777767 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 539
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0729



*033675 ADD 	0,034110
INITIAL
C(AC)=777767 777777 
C(E)=777767 777777 
FINAL
C(AC)=777757 777776 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033675 033675 0   0   270000034110 0            777767777777 
IT1	033675 0      0   0   270000034110 0            777767777777 
AT3	033675 0      0   0   000000034110 0            270000034110 
AT6	033675 034110 0   0   000000034110 0            270000034110 
FT0	033675 034110 0   0   777767777777 0            270000034110 
FT1A	033675 034110 0   0   777767777777 0            777767777777 
FT2	033675 034110 0   0   0            0            777767777777 
FT2RQ	033675 034110 0   0   777767777777 0            777767777777 
FT3	033675 034110 0   0   777767777777 0            777767777777 
FT9	033676 034110 0   0   777767777777 0            777767777777 
ET0	033676 034110 0   0   777757777776 0            777767777777 
ST1	033676 034110 0   0   777757777776 0            777767777777 
ST2	033676 034110 0   0   777757777776 0            777767777777 
ST9	033676 034110 0   0   777757777776 0            777767777777 


*033676 CAME	0,034155
INITIAL
C(AC)=777757 777776 
C(E)=777757 777776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033676 033676 0   0   312000034155 0            777757777776 
IT1	033676 0      0   0   312000034155 0            777757777776 
AT3	033676 0      0   0   000000034155 0            312000034155 
AT6	033676 034155 0   0   000000034155 0            312000034155 
FT0	033676 034155 0   0   777757777776 0            312000034155 
FT1A	033676 034155 0   0   777757777776 0            777757777776 
FT2	033676 034155 0   0   0            0            777757777776 
FT2RQ	033676 034155 0   0   777757777776 0            777757777776 
FT3	033676 034155 0   0   777757777776 0            777757777776 
FT9	033677 034155 0   0   777757777776 0            777757777776 
ET0	0      034155 0   0   0            0            777757777776 
ST1A	0      034155 0   0   0            0            777757777776 
ST9	0      034155 0   0   0            0            777757777776 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 540
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0730

*033700 JUMPA	0,033701
INITIAL
C(AC)=777757 777776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	0      0      0   0   324000033701 0            000000033701 
IT1	0      0      0   0   324000033701 0            000000033701 
AT3	0      0      0   0   000000033701 0            324000033701 
AT6	0      033701 0   0   000000033701 0            324000033701 
FT1A	0      033701 0   0   000000033701 0            000000033701 
FT2	0      033701 0   0   0            0            000000033701 
FT2RQ	0      033701 0   0   777757777776 0            000000033701 
FT3	0      033701 0   0   777757777776 0            000000033701 
FT9	033701 033701 0   0   777757777776 0            000000033701 
ET0	033701 033701 0   0   777757777776 0            000000033701 
ST1A	033701 033701 0   0   777757777776 0            000000033701 
ST9	033701 033701 0   0   777757777776 0            000000033701 


*033701 HRLOI	0,777757
INITIAL
C(AC)=777757 777776 
FINAL
C(AC)=777757 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033701 033701 0   0   525000777757 0            000000777757 
IT1	033701 0      0   0   525000777757 0            000000777757 
AT3	033701 0      0   0   000000777757 0            525000777757 
AT6	033701 777757 0   0   000000777757 0            525000777757 
FT1A	033701 777757 0   0   000000777757 0            000000777757 
FT9	033702 777757 0   0   000000777757 0            000000777757 
ET0	033702 777757 0   0   777757777777 0            000000777757 
ST1	033702 777757 0   0   777757777777 0            000000777757 
ST2	033702 777757 0   0   777757777777 0            000000777757 
ST9	033702 777757 0   0   777757777777 0            000000777757 


*033702 ADD 	0,034111
INITIAL
C(AC)=777757 777777 
C(E)=777757 777777 
FINAL
C(AC)=777737 777776 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033702 033702 0   0   270000034111 0            777757777777 
IT1	033702 0      0   0   270000034111 0            777757777777 
AT3	033702 0      0   0   000000034111 0            270000034111 
AT6	033702 034111 0   0   000000034111 0            270000034111 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 541
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0731

FT0	033702 034111 0   0   777757777777 0            270000034111 
FT1A	033702 034111 0   0   777757777777 0            777757777777 
FT2	033702 034111 0   0   0            0            777757777777 
FT2RQ	033702 034111 0   0   777757777777 0            777757777777 
FT3	033702 034111 0   0   777757777777 0            777757777777 
FT9	033703 034111 0   0   777757777777 0            777757777777 
ET0	033703 034111 0   0   777737777776 0            777757777777 
ST1	033703 034111 0   0   777737777776 0            777757777777 
ST2	033703 034111 0   0   777737777776 0            777757777777 
ST9	033703 034111 0   0   777737777776 0            777757777777 


*033703 CAME	0,034156
INITIAL
C(AC)=777737 777776 
C(E)=777737 777776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033703 033703 0   0   312000034156 0            777737777776 
IT1	033703 0      0   0   312000034156 0            777737777776 
AT3	033703 0      0   0   000000034156 0            312000034156 
AT6	033703 034156 0   0   000000034156 0            312000034156 
FT0	033703 034156 0   0   777737777776 0            312000034156 
FT1A	033703 034156 0   0   777737777776 0            777737777776 
FT2	033703 034156 0   0   0            0            777737777776 
FT2RQ	033703 034156 0   0   777737777776 0            777737777776 
FT3	033703 034156 0   0   777737777776 0            777737777776 
FT9	033704 034156 0   0   777737777776 0            777737777776 
ET0	033705 034156 0   0   0            0            777737777776 
ST1A	033705 034156 0   0   0            0            777737777776 
ST9	033705 034156 0   0   0            0            777737777776 


*033705 JUMPA	0,033706
INITIAL
C(AC)=777737 777776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033705 033705 0   0   324000033706 0            000000033706 
IT1	033705 0      0   0   324000033706 0            000000033706 
AT3	033705 0      0   0   000000033706 0            324000033706 
AT6	033705 033706 0   0   000000033706 0            324000033706 
FT1A	033705 033706 0   0   000000033706 0            000000033706 
FT2	033705 033706 0   0   0            0            000000033706 
FT2RQ	033705 033706 0   0   777737777776 0            000000033706 
FT3	033705 033706 0   0   777737777776 0            000000033706 
FT9	033706 033706 0   0   777737777776 0            000000033706 
ET0	033706 033706 0   0   777737777776 0            000000033706 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 542
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0732

ST1A	033706 033706 0   0   777737777776 0            000000033706 
ST9	033706 033706 0   0   777737777776 0            000000033706 


*033706 HRLOI	0,777737
INITIAL
C(AC)=777737 777776 
FINAL
C(AC)=777737 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033706 033706 0   0   525000777737 0            000000777737 
IT1	033706 0      0   0   525000777737 0            000000777737 
AT3	033706 0      0   0   000000777737 0            525000777737 
AT6	033706 777737 0   0   000000777737 0            525000777737 
FT1A	033706 777737 0   0   000000777737 0            000000777737 
FT9	033707 777737 0   0   000000777737 0            000000777737 
ET0	033707 777737 0   0   777737777777 0            000000777737 
ST1	033707 777737 0   0   777737777777 0            000000777737 
ST2	033707 777737 0   0   777737777777 0            000000777737 
ST9	033707 777737 0   0   777737777777 0            000000777737 


*033707 ADD 	0,034112
INITIAL
C(AC)=777737 777777 
C(E)=777737 777777 
FINAL
C(AC)=777677 777776 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033707 033707 0   0   270000034112 0            777737777777 
IT1	033707 0      0   0   270000034112 0            777737777777 
AT3	033707 0      0   0   000000034112 0            270000034112 
AT6	033707 034112 0   0   000000034112 0            270000034112 
FT0	033707 034112 0   0   777737777777 0            270000034112 
FT1A	033707 034112 0   0   777737777777 0            777737777777 
FT2	033707 034112 0   0   0            0            777737777777 
FT2RQ	033707 034112 0   0   777737777777 0            777737777777 
FT3	033707 034112 0   0   777737777777 0            777737777777 
FT9	033710 034112 0   0   777737777777 0            777737777777 
ET0	033710 034112 0   0   777677777776 0            777737777777 
ST1	033710 034112 0   0   777677777776 0            777737777777 
ST2	033710 034112 0   0   777677777776 0            777737777777 
ST9	033710 034112 0   0   777677777776 0            777737777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 543
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0733

*033710 CAME	0,034157
INITIAL
C(AC)=777677 777776 
C(E)=777677 777776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033710 033710 0   0   312000034157 0            777677777776 
IT1	033710 0      0   0   312000034157 0            777677777776 
AT3	033710 0      0   0   000000034157 0            312000034157 
AT6	033710 034157 0   0   000000034157 0            312000034157 
FT0	033710 034157 0   0   777677777776 0            312000034157 
FT1A	033710 034157 0   0   777677777776 0            777677777776 
FT2	033710 034157 0   0   0            0            777677777776 
FT2RQ	033710 034157 0   0   777677777776 0            777677777776 
FT3	033710 034157 0   0   777677777776 0            777677777776 
FT9	033711 034157 0   0   777677777776 0            777677777776 
ET0	033712 034157 0   0   0            0            777677777776 
ST1A	033712 034157 0   0   0            0            777677777776 
ST9	033712 034157 0   0   0            0            777677777776 


*033712 JUMPA	0,033713
INITIAL
C(AC)=777677 777776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033712 033712 0   0   324000033713 0            000000033713 
IT1	033712 0      0   0   324000033713 0            000000033713 
AT3	033712 0      0   0   000000033713 0            324000033713 
AT6	033712 033713 0   0   000000033713 0            324000033713 
FT1A	033712 033713 0   0   000000033713 0            000000033713 
FT2	033712 033713 0   0   0            0            000000033713 
FT2RQ	033712 033713 0   0   777677777776 0            000000033713 
FT3	033712 033713 0   0   777677777776 0            000000033713 
FT9	033713 033713 0   0   777677777776 0            000000033713 
ET0	033713 033713 0   0   777677777776 0            000000033713 
ST1A	033713 033713 0   0   777677777776 0            000000033713 
ST9	033713 033713 0   0   777677777776 0            000000033713 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 544
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0734

*033713 HRLOI	0,777677
INITIAL
C(AC)=777677 777776 
FINAL
C(AC)=777677 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033713 033713 0   0   525000777677 0            000000777677 
IT1	033713 0      0   0   525000777677 0            000000777677 
AT3	033713 0      0   0   000000777677 0            525000777677 
AT6	033713 777677 0   0   000000777677 0            525000777677 
FT1A	033713 777677 0   0   000000777677 0            000000777677 
FT9	033714 777677 0   0   000000777677 0            000000777677 
ET0	033714 777677 0   0   777677777777 0            000000777677 
ST1	033714 777677 0   0   777677777777 0            000000777677 
ST2	033714 777677 0   0   777677777777 0            000000777677 
ST9	033714 777677 0   0   777677777777 0            000000777677 


*033714 ADD 	0,034113
INITIAL
C(AC)=777677 777777 
C(E)=777677 777777 
FINAL
C(AC)=777577 777776 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033714 033714 0   0   270000034113 0            777677777777 
IT1	033714 0      0   0   270000034113 0            777677777777 
AT3	033714 0      0   0   000000034113 0            270000034113 
AT6	033714 034113 0   0   000000034113 0            270000034113 
FT0	033714 034113 0   0   777677777777 0            270000034113 
FT1A	033714 034113 0   0   777677777777 0            777677777777 
FT2	033714 034113 0   0   0            0            777677777777 
FT2RQ	033714 034113 0   0   777677777777 0            777677777777 
FT3	033714 034113 0   0   777677777777 0            777677777777 
FT9	033715 034113 0   0   777677777777 0            777677777777 
ET0	033715 034113 0   0   777577777776 0            777677777777 
ST1	033715 034113 0   0   777577777776 0            777677777777 
ST2	033715 034113 0   0   777577777776 0            777677777777 
ST9	033715 034113 0   0   777577777776 0            777677777777 


*033715 CAME	0,034160
INITIAL
C(AC)=777577 777776 
C(E)=777577 777776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033715 033715 0   0   312000034160 0            777577777776 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 545
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0735

IT1	033715 0      0   0   312000034160 0            777577777776 
AT3	033715 0      0   0   000000034160 0            312000034160 
AT6	033715 034160 0   0   000000034160 0            312000034160 
FT0	033715 034160 0   0   777577777776 0            312000034160 
FT1A	033715 034160 0   0   777577777776 0            777577777776 
FT2	033715 034160 0   0   0            0            777577777776 
FT2RQ	033715 034160 0   0   777577777776 0            777577777776 
FT3	033715 034160 0   0   777577777776 0            777577777776 
FT9	033716 034160 0   0   777577777776 0            777577777776 
ET0	033717 034160 0   0   0            0            777577777776 
ST1A	033717 034160 0   0   0            0            777577777776 
ST9	033717 034160 0   0   0            0            777577777776 


*033717 JUMPA	0,033720
INITIAL
C(AC)=777577 777776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033717 033717 0   0   324000033720 0            000000033720 
IT1	033717 0      0   0   324000033720 0            000000033720 
AT3	033717 0      0   0   000000033720 0            324000033720 
AT6	033717 033720 0   0   000000033720 0            324000033720 
FT1A	033717 033720 0   0   000000033720 0            000000033720 
FT2	033717 033720 0   0   0            0            000000033720 
FT2RQ	033717 033720 0   0   777577777776 0            000000033720 
FT3	033717 033720 0   0   777577777776 0            000000033720 
FT9	033720 033720 0   0   777577777776 0            000000033720 
ET0	033720 033720 0   0   777577777776 0            000000033720 
ST1A	033720 033720 0   0   777577777776 0            000000033720 
ST9	033720 033720 0   0   777577777776 0            000000033720 


*033720 HRLOI	0,777577
INITIAL
C(AC)=777577 777776 
FINAL
C(AC)=777577 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033720 033720 0   0   525000777577 0            000000777577 
IT1	033720 0      0   0   525000777577 0            000000777577 
AT3	033720 0      0   0   000000777577 0            525000777577 
AT6	033720 777577 0   0   000000777577 0            525000777577 
FT1A	033720 777577 0   0   000000777577 0            000000777577 
FT9	033721 777577 0   0   000000777577 0            000000777577 
ET0	033721 777577 0   0   777577777777 0            000000777577 
ST1	033721 777577 0   0   777577777777 0            000000777577 
ST2	033721 777577 0   0   777577777777 0            000000777577 
ST9	033721 777577 0   0   777577777777 0            000000777577 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 546
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0736



*033721 ADD 	0,034114
INITIAL
C(AC)=777577 777777 
C(E)=777577 777777 
FINAL
C(AC)=777377 777776 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033721 033721 0   0   270000034114 0            777577777777 
IT1	033721 0      0   0   270000034114 0            777577777777 
AT3	033721 0      0   0   000000034114 0            270000034114 
AT6	033721 034114 0   0   000000034114 0            270000034114 
FT0	033721 034114 0   0   777577777777 0            270000034114 
FT1A	033721 034114 0   0   777577777777 0            777577777777 
FT2	033721 034114 0   0   0            0            777577777777 
FT2RQ	033721 034114 0   0   777577777777 0            777577777777 
FT3	033721 034114 0   0   777577777777 0            777577777777 
FT9	033722 034114 0   0   777577777777 0            777577777777 
ET0	033722 034114 0   0   777377777776 0            777577777777 
ST1	033722 034114 0   0   777377777776 0            777577777777 
ST2	033722 034114 0   0   777377777776 0            777577777777 
ST9	033722 034114 0   0   777377777776 0            777577777777 


*033722 CAME	0,034161
INITIAL
C(AC)=777377 777776 
C(E)=777377 777776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033722 033722 0   0   312000034161 0            777377777776 
IT1	033722 0      0   0   312000034161 0            777377777776 
AT3	033722 0      0   0   000000034161 0            312000034161 
AT6	033722 034161 0   0   000000034161 0            312000034161 
FT0	033722 034161 0   0   777377777776 0            312000034161 
FT1A	033722 034161 0   0   777377777776 0            777377777776 
FT2	033722 034161 0   0   0            0            777377777776 
FT2RQ	033722 034161 0   0   777377777776 0            777377777776 
FT3	033722 034161 0   0   777377777776 0            777377777776 
FT9	033723 034161 0   0   777377777776 0            777377777776 
ET0	033724 034161 0   0   0            0            777377777776 
ST1A	033724 034161 0   0   0            0            777377777776 
ST9	033724 034161 0   0   0            0            777377777776 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 547
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0737

*033724 JUMPA	0,033725
INITIAL
C(AC)=777377 777776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033724 033724 0   0   324000033725 0            000000033725 
IT1	033724 0      0   0   324000033725 0            000000033725 
AT3	033724 0      0   0   000000033725 0            324000033725 
AT6	033724 033725 0   0   000000033725 0            324000033725 
FT1A	033724 033725 0   0   000000033725 0            000000033725 
FT2	033724 033725 0   0   0            0            000000033725 
FT2RQ	033724 033725 0   0   777377777776 0            000000033725 
FT3	033724 033725 0   0   777377777776 0            000000033725 
FT9	033725 033725 0   0   777377777776 0            000000033725 
ET0	033725 033725 0   0   777377777776 0            000000033725 
ST1A	033725 033725 0   0   777377777776 0            000000033725 
ST9	033725 033725 0   0   777377777776 0            000000033725 


*033725 HRLOI	0,777377
INITIAL
C(AC)=777377 777776 
FINAL
C(AC)=777377 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033725 033725 0   0   525000777377 0            000000777377 
IT1	033725 0      0   0   525000777377 0            000000777377 
AT3	033725 0      0   0   000000777377 0            525000777377 
AT6	033725 777377 0   0   000000777377 0            525000777377 
FT1A	033725 777377 0   0   000000777377 0            000000777377 
FT9	033726 777377 0   0   000000777377 0            000000777377 
ET0	033726 777377 0   0   777377777777 0            000000777377 
ST1	033726 777377 0   0   777377777777 0            000000777377 
ST2	033726 777377 0   0   777377777777 0            000000777377 
ST9	033726 777377 0   0   777377777777 0            000000777377 


*033726 ADD 	0,034115
INITIAL
C(AC)=777377 777777 
C(E)=777377 777777 
FINAL
C(AC)=776777 777776 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033726 033726 0   0   270000034115 0            777377777777 
IT1	033726 0      0   0   270000034115 0            777377777777 
AT3	033726 0      0   0   000000034115 0            270000034115 
AT6	033726 034115 0   0   000000034115 0            270000034115 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 548
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0738

FT0	033726 034115 0   0   777377777777 0            270000034115 
FT1A	033726 034115 0   0   777377777777 0            777377777777 
FT2	033726 034115 0   0   0            0            777377777777 
FT2RQ	033726 034115 0   0   777377777777 0            777377777777 
FT3	033726 034115 0   0   777377777777 0            777377777777 
FT9	033727 034115 0   0   777377777777 0            777377777777 
ET0	033727 034115 0   0   776777777776 0            777377777777 
ST1	033727 034115 0   0   776777777776 0            777377777777 
ST2	033727 034115 0   0   776777777776 0            777377777777 
ST9	033727 034115 0   0   776777777776 0            777377777777 


*033727 CAME	0,034162
INITIAL
C(AC)=776777 777776 
C(E)=776777 777776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033727 033727 0   0   312000034162 0            776777777776 
IT1	033727 0      0   0   312000034162 0            776777777776 
AT3	033727 0      0   0   000000034162 0            312000034162 
AT6	033727 034162 0   0   000000034162 0            312000034162 
FT0	033727 034162 0   0   776777777776 0            312000034162 
FT1A	033727 034162 0   0   776777777776 0            776777777776 
FT2	033727 034162 0   0   0            0            776777777776 
FT2RQ	033727 034162 0   0   776777777776 0            776777777776 
FT3	033727 034162 0   0   776777777776 0            776777777776 
FT9	033730 034162 0   0   776777777776 0            776777777776 
ET0	033731 034162 0   0   0            0            776777777776 
ST1A	033731 034162 0   0   0            0            776777777776 
ST9	033731 034162 0   0   0            0            776777777776 


*033731 JUMPA	0,033732
INITIAL
C(AC)=776777 777776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033731 033731 0   0   324000033732 0            000000033732 
IT1	033731 0      0   0   324000033732 0            000000033732 
AT3	033731 0      0   0   000000033732 0            324000033732 
AT6	033731 033732 0   0   000000033732 0            324000033732 
FT1A	033731 033732 0   0   000000033732 0            000000033732 
FT2	033731 033732 0   0   0            0            000000033732 
FT2RQ	033731 033732 0   0   776777777776 0            000000033732 
FT3	033731 033732 0   0   776777777776 0            000000033732 
FT9	033732 033732 0   0   776777777776 0            000000033732 
ET0	033732 033732 0   0   776777777776 0            000000033732 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 549
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0739

ST1A	033732 033732 0   0   776777777776 0            000000033732 
ST9	033732 033732 0   0   776777777776 0            000000033732 


*033732 HRLOI	0,776777
INITIAL
C(AC)=776777 777776 
FINAL
C(AC)=776777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033732 033732 0   0   525000776777 0            000000776777 
IT1	033732 0      0   0   525000776777 0            000000776777 
AT3	033732 0      0   0   000000776777 0            525000776777 
AT6	033732 776777 0   0   000000776777 0            525000776777 
FT1A	033732 776777 0   0   000000776777 0            000000776777 
FT9	033733 776777 0   0   000000776777 0            000000776777 
ET0	033733 776777 0   0   776777777777 0            000000776777 
ST1	033733 776777 0   0   776777777777 0            000000776777 
ST2	033733 776777 0   0   776777777777 0            000000776777 
ST9	033733 776777 0   0   776777777777 0            000000776777 


*033733 ADD 	0,034116
INITIAL
C(AC)=776777 777777 
C(E)=776777 777777 
FINAL
C(AC)=775777 777776 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033733 033733 0   0   270000034116 0            776777777777 
IT1	033733 0      0   0   270000034116 0            776777777777 
AT3	033733 0      0   0   000000034116 0            270000034116 
AT6	033733 034116 0   0   000000034116 0            270000034116 
FT0	033733 034116 0   0   776777777777 0            270000034116 
FT1A	033733 034116 0   0   776777777777 0            776777777777 
FT2	033733 034116 0   0   0            0            776777777777 
FT2RQ	033733 034116 0   0   776777777777 0            776777777777 
FT3	033733 034116 0   0   776777777777 0            776777777777 
FT9	033734 034116 0   0   776777777777 0            776777777777 
ET0	033734 034116 0   0   775777777776 0            776777777777 
ST1	033734 034116 0   0   775777777776 0            776777777777 
ST2	033734 034116 0   0   775777777776 0            776777777777 
ST9	033734 034116 0   0   775777777776 0            776777777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 550
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0740

*033734 CAME	0,034163
INITIAL
C(AC)=775777 777776 
C(E)=775777 777776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033734 033734 0   0   312000034163 0            775777777776 
IT1	033734 0      0   0   312000034163 0            775777777776 
AT3	033734 0      0   0   000000034163 0            312000034163 
AT6	033734 034163 0   0   000000034163 0            312000034163 
FT0	033734 034163 0   0   775777777776 0            312000034163 
FT1A	033734 034163 0   0   775777777776 0            775777777776 
FT2	033734 034163 0   0   0            0            775777777776 
FT2RQ	033734 034163 0   0   775777777776 0            775777777776 
FT3	033734 034163 0   0   775777777776 0            775777777776 
FT9	033735 034163 0   0   775777777776 0            775777777776 
ET0	033736 034163 0   0   0            0            775777777776 
ST1A	033736 034163 0   0   0            0            775777777776 
ST9	033736 034163 0   0   0            0            775777777776 


*033736 JUMPA	0,033737
INITIAL
C(AC)=775777 777776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033736 033736 0   0   324000033737 0            000000033737 
IT1	033736 0      0   0   324000033737 0            000000033737 
AT3	033736 0      0   0   000000033737 0            324000033737 
AT6	033736 033737 0   0   000000033737 0            324000033737 
FT1A	033736 033737 0   0   000000033737 0            000000033737 
FT2	033736 033737 0   0   0            0            000000033737 
FT2RQ	033736 033737 0   0   775777777776 0            000000033737 
FT3	033736 033737 0   0   775777777776 0            000000033737 
FT9	033737 033737 0   0   775777777776 0            000000033737 
ET0	033737 033737 0   0   775777777776 0            000000033737 
ST1A	033737 033737 0   0   775777777776 0            000000033737 
ST9	033737 033737 0   0   775777777776 0            000000033737 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 551
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0741

*033737 HRLOI	0,775777
INITIAL
C(AC)=775777 777776 
FINAL
C(AC)=775777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033737 033737 0   0   525000775777 0            000000775777 
IT1	033737 0      0   0   525000775777 0            000000775777 
AT3	033737 0      0   0   000000775777 0            525000775777 
AT6	033737 775777 0   0   000000775777 0            525000775777 
FT1A	033737 775777 0   0   000000775777 0            000000775777 
FT9	033740 775777 0   0   000000775777 0            000000775777 
ET0	033740 775777 0   0   775777777777 0            000000775777 
ST1	033740 775777 0   0   775777777777 0            000000775777 
ST2	033740 775777 0   0   775777777777 0            000000775777 
ST9	033740 775777 0   0   775777777777 0            000000775777 


*033740 ADD 	0,034117
INITIAL
C(AC)=775777 777777 
C(E)=775777 777777 
FINAL
C(AC)=773777 777776 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033740 033740 0   0   270000034117 0            775777777777 
IT1	033740 0      0   0   270000034117 0            775777777777 
AT3	033740 0      0   0   000000034117 0            270000034117 
AT6	033740 034117 0   0   000000034117 0            270000034117 
FT0	033740 034117 0   0   775777777777 0            270000034117 
FT1A	033740 034117 0   0   775777777777 0            775777777777 
FT2	033740 034117 0   0   0            0            775777777777 
FT2RQ	033740 034117 0   0   775777777777 0            775777777777 
FT3	033740 034117 0   0   775777777777 0            775777777777 
FT9	033741 034117 0   0   775777777777 0            775777777777 
ET0	033741 034117 0   0   773777777776 0            775777777777 
ST1	033741 034117 0   0   773777777776 0            775777777777 
ST2	033741 034117 0   0   773777777776 0            775777777777 
ST9	033741 034117 0   0   773777777776 0            775777777777 


*033741 CAME	0,034164
INITIAL
C(AC)=773777 777776 
C(E)=773777 777776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033741 033741 0   0   312000034164 0            773777777776 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 552
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0742

IT1	033741 0      0   0   312000034164 0            773777777776 
AT3	033741 0      0   0   000000034164 0            312000034164 
AT6	033741 034164 0   0   000000034164 0            312000034164 
FT0	033741 034164 0   0   773777777776 0            312000034164 
FT1A	033741 034164 0   0   773777777776 0            773777777776 
FT2	033741 034164 0   0   0            0            773777777776 
FT2RQ	033741 034164 0   0   773777777776 0            773777777776 
FT3	033741 034164 0   0   773777777776 0            773777777776 
FT9	033742 034164 0   0   773777777776 0            773777777776 
ET0	033743 034164 0   0   0            0            773777777776 
ST1A	033743 034164 0   0   0            0            773777777776 
ST9	033743 034164 0   0   0            0            773777777776 


*033743 JUMPA	0,033744
INITIAL
C(AC)=773777 777776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033743 033743 0   0   324000033744 0            000000033744 
IT1	033743 0      0   0   324000033744 0            000000033744 
AT3	033743 0      0   0   000000033744 0            324000033744 
AT6	033743 033744 0   0   000000033744 0            324000033744 
FT1A	033743 033744 0   0   000000033744 0            000000033744 
FT2	033743 033744 0   0   0            0            000000033744 
FT2RQ	033743 033744 0   0   773777777776 0            000000033744 
FT3	033743 033744 0   0   773777777776 0            000000033744 
FT9	033744 033744 0   0   773777777776 0            000000033744 
ET0	033744 033744 0   0   773777777776 0            000000033744 
ST1A	033744 033744 0   0   773777777776 0            000000033744 
ST9	033744 033744 0   0   773777777776 0            000000033744 


*033744 HRLOI	0,773777
INITIAL
C(AC)=773777 777776 
FINAL
C(AC)=773777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033744 033744 0   0   525000773777 0            000000773777 
IT1	033744 0      0   0   525000773777 0            000000773777 
AT3	033744 0      0   0   000000773777 0            525000773777 
AT6	033744 773777 0   0   000000773777 0            525000773777 
FT1A	033744 773777 0   0   000000773777 0            000000773777 
FT9	033745 773777 0   0   000000773777 0            000000773777 
ET0	033745 773777 0   0   773777777777 0            000000773777 
ST1	033745 773777 0   0   773777777777 0            000000773777 
ST2	033745 773777 0   0   773777777777 0            000000773777 
ST9	033745 773777 0   0   773777777777 0            000000773777 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 553
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0743



*033745 ADD 	0,034120
INITIAL
C(AC)=773777 777777 
C(E)=773777 777777 
FINAL
C(AC)=767777 777776 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033745 033745 0   0   270000034120 0            773777777777 
IT1	033745 0      0   0   270000034120 0            773777777777 
AT3	033745 0      0   0   000000034120 0            270000034120 
AT6	033745 034120 0   0   000000034120 0            270000034120 
FT0	033745 034120 0   0   773777777777 0            270000034120 
FT1A	033745 034120 0   0   773777777777 0            773777777777 
FT2	033745 034120 0   0   0            0            773777777777 
FT2RQ	033745 034120 0   0   773777777777 0            773777777777 
FT3	033745 034120 0   0   773777777777 0            773777777777 
FT9	033746 034120 0   0   773777777777 0            773777777777 
ET0	033746 034120 0   0   767777777776 0            773777777777 
ST1	033746 034120 0   0   767777777776 0            773777777777 
ST2	033746 034120 0   0   767777777776 0            773777777777 
ST9	033746 034120 0   0   767777777776 0            773777777777 


*033746 CAME	0,034165
INITIAL
C(AC)=767777 777776 
C(E)=767777 777776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033746 033746 0   0   312000034165 0            767777777776 
IT1	033746 0      0   0   312000034165 0            767777777776 
AT3	033746 0      0   0   000000034165 0            312000034165 
AT6	033746 034165 0   0   000000034165 0            312000034165 
FT0	033746 034165 0   0   767777777776 0            312000034165 
FT1A	033746 034165 0   0   767777777776 0            767777777776 
FT2	033746 034165 0   0   0            0            767777777776 
FT2RQ	033746 034165 0   0   767777777776 0            767777777776 
FT3	033746 034165 0   0   767777777776 0            767777777776 
FT9	033747 034165 0   0   767777777776 0            767777777776 
ET0	033750 034165 0   0   0            0            767777777776 
ST1A	033750 034165 0   0   0            0            767777777776 
ST9	033750 034165 0   0   0            0            767777777776 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 554
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0744

*033750 JUMPA	0,033751
INITIAL
C(AC)=767777 777776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033750 033750 0   0   324000033751 0            000000033751 
IT1	033750 0      0   0   324000033751 0            000000033751 
AT3	033750 0      0   0   000000033751 0            324000033751 
AT6	033750 033751 0   0   000000033751 0            324000033751 
FT1A	033750 033751 0   0   000000033751 0            000000033751 
FT2	033750 033751 0   0   0            0            000000033751 
FT2RQ	033750 033751 0   0   767777777776 0            000000033751 
FT3	033750 033751 0   0   767777777776 0            000000033751 
FT9	033751 033751 0   0   767777777776 0            000000033751 
ET0	033751 033751 0   0   767777777776 0            000000033751 
ST1A	033751 033751 0   0   767777777776 0            000000033751 
ST9	033751 033751 0   0   767777777776 0            000000033751 


*033751 HRLOI	0,767777
INITIAL
C(AC)=767777 777776 
FINAL
C(AC)=767777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033751 033751 0   0   525000767777 0            000000767777 
IT1	033751 0      0   0   525000767777 0            000000767777 
AT3	033751 0      0   0   000000767777 0            525000767777 
AT6	033751 767777 0   0   000000767777 0            525000767777 
FT1A	033751 767777 0   0   000000767777 0            000000767777 
FT9	033752 767777 0   0   000000767777 0            000000767777 
ET0	033752 767777 0   0   767777777777 0            000000767777 
ST1	033752 767777 0   0   767777777777 0            000000767777 
ST2	033752 767777 0   0   767777777777 0            000000767777 
ST9	033752 767777 0   0   767777777777 0            000000767777 


*033752 ADD 	0,034121
INITIAL
C(AC)=767777 777777 
C(E)=767777 777777 
FINAL
C(AC)=757777 777776 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033752 033752 0   0   270000034121 0            767777777777 
IT1	033752 0      0   0   270000034121 0            767777777777 
AT3	033752 0      0   0   000000034121 0            270000034121 
AT6	033752 034121 0   0   000000034121 0            270000034121 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 555
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0745

FT0	033752 034121 0   0   767777777777 0            270000034121 
FT1A	033752 034121 0   0   767777777777 0            767777777777 
FT2	033752 034121 0   0   0            0            767777777777 
FT2RQ	033752 034121 0   0   767777777777 0            767777777777 
FT3	033752 034121 0   0   767777777777 0            767777777777 
FT9	033753 034121 0   0   767777777777 0            767777777777 
ET0	033753 034121 0   0   757777777776 0            767777777777 
ST1	033753 034121 0   0   757777777776 0            767777777777 
ST2	033753 034121 0   0   757777777776 0            767777777777 
ST9	033753 034121 0   0   757777777776 0            767777777777 


*033753 CAME	0,034166
INITIAL
C(AC)=757777 777776 
C(E)=757777 777776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033753 033753 0   0   312000034166 0            757777777776 
IT1	033753 0      0   0   312000034166 0            757777777776 
AT3	033753 0      0   0   000000034166 0            312000034166 
AT6	033753 034166 0   0   000000034166 0            312000034166 
FT0	033753 034166 0   0   757777777776 0            312000034166 
FT1A	033753 034166 0   0   757777777776 0            757777777776 
FT2	033753 034166 0   0   0            0            757777777776 
FT2RQ	033753 034166 0   0   757777777776 0            757777777776 
FT3	033753 034166 0   0   757777777776 0            757777777776 
FT9	033754 034166 0   0   757777777776 0            757777777776 
ET0	033755 034166 0   0   0            0            757777777776 
ST1A	033755 034166 0   0   0            0            757777777776 
ST9	033755 034166 0   0   0            0            757777777776 


*033755 JUMPA	0,033756
INITIAL
C(AC)=757777 777776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033755 033755 0   0   324000033756 0            000000033756 
IT1	033755 0      0   0   324000033756 0            000000033756 
AT3	033755 0      0   0   000000033756 0            324000033756 
AT6	033755 033756 0   0   000000033756 0            324000033756 
FT1A	033755 033756 0   0   000000033756 0            000000033756 
FT2	033755 033756 0   0   0            0            000000033756 
FT2RQ	033755 033756 0   0   757777777776 0            000000033756 
FT3	033755 033756 0   0   757777777776 0            000000033756 
FT9	033756 033756 0   0   757777777776 0            000000033756 
ET0	033756 033756 0   0   757777777776 0            000000033756 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 556
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0746

ST1A	033756 033756 0   0   757777777776 0            000000033756 
ST9	033756 033756 0   0   757777777776 0            000000033756 


*033756 HRLOI	0,757777
INITIAL
C(AC)=757777 777776 
FINAL
C(AC)=757777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033756 033756 0   0   525000757777 0            000000757777 
IT1	033756 0      0   0   525000757777 0            000000757777 
AT3	033756 0      0   0   000000757777 0            525000757777 
AT6	033756 757777 0   0   000000757777 0            525000757777 
FT1A	033756 757777 0   0   000000757777 0            000000757777 
FT9	033757 757777 0   0   000000757777 0            000000757777 
ET0	033757 757777 0   0   757777777777 0            000000757777 
ST1	033757 757777 0   0   757777777777 0            000000757777 
ST2	033757 757777 0   0   757777777777 0            000000757777 
ST9	033757 757777 0   0   757777777777 0            000000757777 


*033757 ADD 	0,034122
INITIAL
C(AC)=757777 777777 
C(E)=757777 777777 
FINAL
C(AC)=737777 777776 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033757 033757 0   0   270000034122 0            757777777777 
IT1	033757 0      0   0   270000034122 0            757777777777 
AT3	033757 0      0   0   000000034122 0            270000034122 
AT6	033757 034122 0   0   000000034122 0            270000034122 
FT0	033757 034122 0   0   757777777777 0            270000034122 
FT1A	033757 034122 0   0   757777777777 0            757777777777 
FT2	033757 034122 0   0   0            0            757777777777 
FT2RQ	033757 034122 0   0   757777777777 0            757777777777 
FT3	033757 034122 0   0   757777777777 0            757777777777 
FT9	033760 034122 0   0   757777777777 0            757777777777 
ET0	033760 034122 0   0   737777777776 0            757777777777 
ST1	033760 034122 0   0   737777777776 0            757777777777 
ST2	033760 034122 0   0   737777777776 0            757777777777 
ST9	033760 034122 0   0   737777777776 0            757777777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 557
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0747

*033760 CAME	0,034167
INITIAL
C(AC)=737777 777776 
C(E)=737777 777776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033760 033760 0   0   312000034167 0            737777777776 
IT1	033760 0      0   0   312000034167 0            737777777776 
AT3	033760 0      0   0   000000034167 0            312000034167 
AT6	033760 034167 0   0   000000034167 0            312000034167 
FT0	033760 034167 0   0   737777777776 0            312000034167 
FT1A	033760 034167 0   0   737777777776 0            737777777776 
FT2	033760 034167 0   0   0            0            737777777776 
FT2RQ	033760 034167 0   0   737777777776 0            737777777776 
FT3	033760 034167 0   0   737777777776 0            737777777776 
FT9	033761 034167 0   0   737777777776 0            737777777776 
ET0	033762 034167 0   0   0            0            737777777776 
ST1A	033762 034167 0   0   0            0            737777777776 
ST9	033762 034167 0   0   0            0            737777777776 


*033762 JUMPA	0,033763
INITIAL
C(AC)=737777 777776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033762 033762 0   0   324000033763 0            000000033763 
IT1	033762 0      0   0   324000033763 0            000000033763 
AT3	033762 0      0   0   000000033763 0            324000033763 
AT6	033762 033763 0   0   000000033763 0            324000033763 
FT1A	033762 033763 0   0   000000033763 0            000000033763 
FT2	033762 033763 0   0   0            0            000000033763 
FT2RQ	033762 033763 0   0   737777777776 0            000000033763 
FT3	033762 033763 0   0   737777777776 0            000000033763 
FT9	033763 033763 0   0   737777777776 0            000000033763 
ET0	033763 033763 0   0   737777777776 0            000000033763 
ST1A	033763 033763 0   0   737777777776 0            000000033763 
ST9	033763 033763 0   0   737777777776 0            000000033763 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 558
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0748

*033763 HRLOI	0,737777
INITIAL
C(AC)=737777 777776 
FINAL
C(AC)=737777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033763 033763 0   0   525000737777 0            000000737777 
IT1	033763 0      0   0   525000737777 0            000000737777 
AT3	033763 0      0   0   000000737777 0            525000737777 
AT6	033763 737777 0   0   000000737777 0            525000737777 
FT1A	033763 737777 0   0   000000737777 0            000000737777 
FT9	033764 737777 0   0   000000737777 0            000000737777 
ET0	033764 737777 0   0   737777777777 0            000000737777 
ST1	033764 737777 0   0   737777777777 0            000000737777 
ST2	033764 737777 0   0   737777777777 0            000000737777 
ST9	033764 737777 0   0   737777777777 0            000000737777 


*033764 ADD 	0,034123
INITIAL
C(AC)=737777 777777 
C(E)=737777 777777 
FINAL
C(AC)=677777 777776 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033764 033764 0   0   270000034123 0            737777777777 
IT1	033764 0      0   0   270000034123 0            737777777777 
AT3	033764 0      0   0   000000034123 0            270000034123 
AT6	033764 034123 0   0   000000034123 0            270000034123 
FT0	033764 034123 0   0   737777777777 0            270000034123 
FT1A	033764 034123 0   0   737777777777 0            737777777777 
FT2	033764 034123 0   0   0            0            737777777777 
FT2RQ	033764 034123 0   0   737777777777 0            737777777777 
FT3	033764 034123 0   0   737777777777 0            737777777777 
FT9	033765 034123 0   0   737777777777 0            737777777777 
ET0	033765 034123 0   0   677777777776 0            737777777777 
ST1	033765 034123 0   0   677777777776 0            737777777777 
ST2	033765 034123 0   0   677777777776 0            737777777777 
ST9	033765 034123 0   0   677777777776 0            737777777777 


*033765 CAME	0,034170
INITIAL
C(AC)=677777 777776 
C(E)=677777 777776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033765 033765 0   0   312000034170 0            677777777776 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 559
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0749

IT1	033765 0      0   0   312000034170 0            677777777776 
AT3	033765 0      0   0   000000034170 0            312000034170 
AT6	033765 034170 0   0   000000034170 0            312000034170 
FT0	033765 034170 0   0   677777777776 0            312000034170 
FT1A	033765 034170 0   0   677777777776 0            677777777776 
FT2	033765 034170 0   0   0            0            677777777776 
FT2RQ	033765 034170 0   0   677777777776 0            677777777776 
FT3	033765 034170 0   0   677777777776 0            677777777776 
FT9	033766 034170 0   0   677777777776 0            677777777776 
ET0	033767 034170 0   0   0            0            677777777776 
ST1A	033767 034170 0   0   0            0            677777777776 
ST9	033767 034170 0   0   0            0            677777777776 


*033767 JUMPA	0,033770
INITIAL
C(AC)=677777 777776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033767 033767 0   0   324000033770 0            000000033770 
IT1	033767 0      0   0   324000033770 0            000000033770 
AT3	033767 0      0   0   000000033770 0            324000033770 
AT6	033767 033770 0   0   000000033770 0            324000033770 
FT1A	033767 033770 0   0   000000033770 0            000000033770 
FT2	033767 033770 0   0   0            0            000000033770 
FT2RQ	033767 033770 0   0   677777777776 0            000000033770 
FT3	033767 033770 0   0   677777777776 0            000000033770 
FT9	033770 033770 0   0   677777777776 0            000000033770 
ET0	033770 033770 0   0   677777777776 0            000000033770 
ST1A	033770 033770 0   0   677777777776 0            000000033770 
ST9	033770 033770 0   0   677777777776 0            000000033770 


*033770 HRLOI	0,677777
INITIAL
C(AC)=677777 777776 
FINAL
C(AC)=677777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033770 033770 0   0   525000677777 0            000000677777 
IT1	033770 0      0   0   525000677777 0            000000677777 
AT3	033770 0      0   0   000000677777 0            525000677777 
AT6	033770 677777 0   0   000000677777 0            525000677777 
FT1A	033770 677777 0   0   000000677777 0            000000677777 
FT9	033771 677777 0   0   000000677777 0            000000677777 
ET0	033771 677777 0   0   677777777777 0            000000677777 
ST1	033771 677777 0   0   677777777777 0            000000677777 
ST2	033771 677777 0   0   677777777777 0            000000677777 
ST9	033771 677777 0   0   677777777777 0            000000677777 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 560
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0750



*033771 ADD 	0,034124
INITIAL
C(AC)=677777 777777 
C(E)=677777 777777 
FINAL
C(AC)=577777 777776 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033771 033771 0   0   270000034124 0            677777777777 
IT1	033771 0      0   0   270000034124 0            677777777777 
AT3	033771 0      0   0   000000034124 0            270000034124 
AT6	033771 034124 0   0   000000034124 0            270000034124 
FT0	033771 034124 0   0   677777777777 0            270000034124 
FT1A	033771 034124 0   0   677777777777 0            677777777777 
FT2	033771 034124 0   0   0            0            677777777777 
FT2RQ	033771 034124 0   0   677777777777 0            677777777777 
FT3	033771 034124 0   0   677777777777 0            677777777777 
FT9	033772 034124 0   0   677777777777 0            677777777777 
ET0	033772 034124 0   0   577777777776 0            677777777777 
ST1	033772 034124 0   0   577777777776 0            677777777777 
ST2	033772 034124 0   0   577777777776 0            677777777777 
ST9	033772 034124 0   0   577777777776 0            677777777777 


*033772 CAME	0,034171
INITIAL
C(AC)=577777 777776 
C(E)=577777 777776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033772 033772 0   0   312000034171 0            577777777776 
IT1	033772 0      0   0   312000034171 0            577777777776 
AT3	033772 0      0   0   000000034171 0            312000034171 
AT6	033772 034171 0   0   000000034171 0            312000034171 
FT0	033772 034171 0   0   577777777776 0            312000034171 
FT1A	033772 034171 0   0   577777777776 0            577777777776 
FT2	033772 034171 0   0   0            0            577777777776 
FT2RQ	033772 034171 0   0   577777777776 0            577777777776 
FT3	033772 034171 0   0   577777777776 0            577777777776 
FT9	033773 034171 0   0   577777777776 0            577777777776 
ET0	033774 034171 0   0   0            0            577777777776 
ST1A	033774 034171 0   0   0            0            577777777776 
ST9	033774 034171 0   0   0            0            577777777776 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 561
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0751

*033774 JUMPA	0,033775
INITIAL
C(AC)=577777 777776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033774 033774 0   0   324000033775 0            000000033775 
IT1	033774 0      0   0   324000033775 0            000000033775 
AT3	033774 0      0   0   000000033775 0            324000033775 
AT6	033774 033775 0   0   000000033775 0            324000033775 
FT1A	033774 033775 0   0   000000033775 0            000000033775 
FT2	033774 033775 0   0   0            0            000000033775 
FT2RQ	033774 033775 0   0   577777777776 0            000000033775 
FT3	033774 033775 0   0   577777777776 0            000000033775 
FT9	033775 033775 0   0   577777777776 0            000000033775 
ET0	033775 033775 0   0   577777777776 0            000000033775 
ST1A	033775 033775 0   0   577777777776 0            000000033775 
ST9	033775 033775 0   0   577777777776 0            000000033775 


*033775 HRLOI	0,577777
INITIAL
C(AC)=577777 777776 
FINAL
C(AC)=577777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033775 033775 0   0   525000577777 0            000000577777 
IT1	033775 0      0   0   525000577777 0            000000577777 
AT3	033775 0      0   0   000000577777 0            525000577777 
AT6	033775 577777 0   0   000000577777 0            525000577777 
FT1A	033775 577777 0   0   000000577777 0            000000577777 
FT9	033776 577777 0   0   000000577777 0            000000577777 
ET0	033776 577777 0   0   577777777777 0            000000577777 
ST1	033776 577777 0   0   577777777777 0            000000577777 
ST2	033776 577777 0   0   577777777777 0            000000577777 
ST9	033776 577777 0   0   577777777777 0            000000577777 


*033776 ADD 	0,034125
INITIAL
C(AC)=577777 777777 
C(E)=577777 777777 
FINAL
C(AC)=377777 777776 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033776 033776 0   0   270000034125 0            577777777777 
IT1	033776 0      0   0   270000034125 0            577777777777 
AT3	033776 0      0   0   000000034125 0            270000034125 
AT6	033776 034125 0   0   000000034125 0            270000034125 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 562
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0752

FT0	033776 034125 0   0   577777777777 0            270000034125 
FT1A	033776 034125 0   0   577777777777 0            577777777777 
FT2	033776 034125 0   0   0            0            577777777777 
FT2RQ	033776 034125 0   0   577777777777 0            577777777777 
FT3	033776 034125 0   0   577777777777 0            577777777777 
FT9	033777 034125 0   0   577777777777 0            577777777777 
ET0	033777 034125 0   0   377777777776 0            577777777777 
ST1	033777 034125 0   0   377777777776 0            577777777777 
ST2	033777 034125 0   0   377777777776 0            577777777777 
ST9	033777 034125 0   0   377777777776 0            577777777777 


*033777 CAME	0,034172
INITIAL
C(AC)=377777 777776 
C(E)=377777 777776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	033777 033777 0   0   312000034172 0            377777777776 
IT1	033777 0      0   0   312000034172 0            377777777776 
AT3	033777 0      0   0   000000034172 0            312000034172 
AT6	033777 034172 0   0   000000034172 0            312000034172 
FT0	033777 034172 0   0   377777777776 0            312000034172 
FT1A	033777 034172 0   0   377777777776 0            377777777776 
FT2	033777 034172 0   0   0            0            377777777776 
FT2RQ	033777 034172 0   0   377777777776 0            377777777776 
FT3	033777 034172 0   0   377777777776 0            377777777776 
FT9	0      034172 0   0   377777777776 0            377777777776 
ET0	034001 034172 0   0   0            0            377777777776 
ST1A	034001 034172 0   0   0            0            377777777776 
ST9	034001 034172 0   0   0            0            377777777776 


*034001 JUMPA	0,034002
INITIAL
C(AC)=377777 777776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	034001 034001 0   0   324000034002 0            000000034002 
IT1	034001 0      0   0   324000034002 0            000000034002 
AT3	034001 0      0   0   000000034002 0            324000034002 
AT6	034001 034002 0   0   000000034002 0            324000034002 
FT1A	034001 034002 0   0   000000034002 0            000000034002 
FT2	034001 034002 0   0   0            0            000000034002 
FT2RQ	034001 034002 0   0   377777777776 0            000000034002 
FT3	034001 034002 0   0   377777777776 0            000000034002 
FT9	034002 034002 0   0   377777777776 0            000000034002 
ET0	034002 034002 0   0   377777777776 0            000000034002 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 563
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0753

ST1A	034002 034002 0   0   377777777776 0            000000034002 
ST9	034002 034002 0   0   377777777776 0            000000034002 


*034002 HRLOI	0,377777
INITIAL
C(AC)=377777 777776 
FINAL
C(AC)=377777 777777 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	034002 034002 0   0   525000377777 0            000000377777 
IT1	034002 0      0   0   525000377777 0            000000377777 
AT3	034002 0      0   0   000000377777 0            525000377777 
AT6	034002 377777 0   0   000000377777 0            525000377777 
FT1A	034002 377777 0   0   000000377777 0            000000377777 
FT9	034003 377777 0   0   000000377777 0            000000377777 
ET0	034003 377777 0   0   377777777777 0            000000377777 
ST1	034003 377777 0   0   377777777777 0            000000377777 
ST2	034003 377777 0   0   377777777777 0            000000377777 
ST9	034003 377777 0   0   377777777777 0            000000377777 


*034003 ADD 	0,034126
INITIAL
C(AC)=377777 777777 
C(E)=377777 777777 
FINAL
C(AC)=777777 777776 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	034003 034003 0   0   270000034126 0            377777777777 
IT1	034003 0      0   0   270000034126 0            377777777777 
AT3	034003 0      0   0   000000034126 0            270000034126 
AT6	034003 034126 0   0   000000034126 0            270000034126 
FT0	034003 034126 0   0   377777777777 0            270000034126 
FT1A	034003 034126 0   0   377777777777 0            377777777777 
FT2	034003 034126 0   0   0            0            377777777777 
FT2RQ	034003 034126 0   0   377777777777 0            377777777777 
FT3	034003 034126 0   0   377777777777 0            377777777777 
FT9	034004 034126 0   0   377777777777 0            377777777777 
ET0	034004 034126 0   0   777777777776 0            377777777777 
ST1	034004 034126 0   0   777777777776 0            377777777777 
ST2	034004 034126 0   0   777777777776 0            377777777777 
ST9	034004 034126 0   0   777777777776 0            377777777777 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 564
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0754

*034004 CAME	0,034063
INITIAL
C(AC)=777777 777776 
C(E)=777777 777776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	034004 034004 0   0   312000034063 0            777777777776 
IT1	034004 0      0   0   312000034063 0            777777777776 
AT3	034004 0      0   0   000000034063 0            312000034063 
AT6	034004 034063 0   0   000000034063 0            312000034063 
FT0	034004 034063 0   0   777777777776 0            312000034063 
FT1A	034004 034063 0   0   777777777776 0            777777777776 
FT2	034004 034063 0   0   0            0            777777777776 
FT2RQ	034004 034063 0   0   777777777776 0            777777777776 
FT3	034004 034063 0   0   777777777776 0            777777777776 
FT9	034005 034063 0   0   777777777776 0            777777777776 
ET0	034006 034063 0   0   0            0            777777777776 
ST1A	034006 034063 0   0   0            0            777777777776 
ST9	034006 034063 0   0   0            0            777777777776 


*034006 JUMPA	0,034007
INITIAL
C(AC)=777777 777776 
FINAL


TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	034006 034006 0   0   324000034007 0            000000034007 
IT1	034006 0      0   0   324000034007 0            000000034007 
AT3	034006 0      0   0   000000034007 0            324000034007 
AT6	034006 034007 0   0   000000034007 0            324000034007 
FT1A	034006 034007 0   0   000000034007 0            000000034007 
FT2	034006 034007 0   0   0            0            000000034007 
FT2RQ	034006 034007 0   0   777777777776 0            000000034007 
FT3	034006 034007 0   0   777777777776 0            000000034007 
FT9	034007 034007 0   0   777777777776 0            000000034007 
ET0	034007 034007 0   0   777777777776 0            000000034007 
ST1A	034007 034007 0   0   777777777776 0            000000034007 
ST9	034007 034007 0   0   777777777776 0            000000034007 


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 565
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0755

*034007 JRST	0,030057
INITIAL
C(AC)=777777 777776 
C(E)=254000 030641 
FINAL

C(E)=254000 030641 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	034007 034007 0   0   254000030057 0            254000030057 
IT1	034007 0      0   0   254000030057 0            254000030057 
AT3	034007 0      0   0   000000030057 0            254000030057 
AT6	034007 030057 0   0   000000030057 0            254000030057 
FT1A	034007 030057 0   0   000000030057 0            254000030057 
FT9	034010 030057 0   0   000000030057 0            254000030057 
ET0	030057 034010 0   0   000000030057 0            254000030057 
ST1A	030057 034010 0   0   000000030057 0            254000030057 
ST9	030057 034010 0   0   000000030057 0            254000030057 


*030057 JRST	0,030641
INITIAL
C(AC)=777777 777776 
C(E)=350000 030047 
FINAL

C(E)=350000 030047 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030057 030057 0   0   254000030641 0            254000030641 
IT1	030057 0      0   0   254000030641 0            254000030641 
AT3	030057 0      0   0   000000030641 0            254000030641 
AT6	030057 030641 0   0   000000030641 0            254000030641 
FT1A	030057 030641 0   0   000000030641 0            254000030641 
FT9	030060 030641 0   0   000000030641 0            254000030641 
ET0	030641 030060 0   0   000000030641 0            254000030641 
ST1A	030641 030060 0   0   000000030641 0            254000030641 
ST9	030641 030060 0   0   000000030641 0            254000030641 


*030641 AOS 	0,030047
INITIAL
C(AC)=777777 777776 
C(E)=000000 000000 
FINAL
C(AC)=777777 777776 
C(E)=000000 000000 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030641 030641 0   0   350000030047 0            0            
IT1	030641 0      0   0   350000030047 0            0            
AT3	030641 0      0   0   000000030047 0            350000030047 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 566
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0756

AT6	030641 030047 0   0   000000030047 0            350000030047 
FT0	030641 030047 0   0   0            0            350000030047 
FT1A	030641 030047 0   0   0            0            0            
FT9	030642 030047 0   0   0            0            0            
ET0	030642 030047 0   0   000000000001 0            0            
ST5	030642 030047 0   0   000000000001 0            0            
ST6A	030642 030047 0   0   000000000001 0            0            
ST9	030642 030047 0   0   000000000001 0            0            


*030642 SOS 	0,030024
INITIAL
C(AC)=777777 777776 
C(E)=000000 000001 
FINAL
C(AC)=777777 777776 
C(E)=000000 000001 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030642 030642 0   0   370000030024 0            000000000001 
IT1	030642 0      0   0   370000030024 0            000000000001 
AT3	030642 0      0   0   000000030024 0            370000030024 
AT6	030642 030024 0   0   000000030024 0            370000030024 
FT0	030642 030024 0   0   000000000001 0            370000030024 
FT1A	030642 030024 0   0   000000000001 0            000000000001 
FT9	030643 030024 0   0   000000000001 0            000000000001 
ET0	030643 030024 0   0   0            0            000000000001 
ST5	030643 030024 0   0   0            0            000000000001 
ST6A	030643 030024 0   0   0            0            000000000001 
ST9	030643 030024 0   0   0            0            000000000001 


*030643 SKIPN	0,030037
INITIAL
C(AC)=777777 777776 
C(E)=000000 000000 
FINAL
C(AC)=777777 777776 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030643 030643 0   0   336000030037 0            0            
IT1	030643 0      0   0   336000030037 0            0            
AT3	030643 0      0   0   000000030037 0            336000030037 
AT6	030643 030037 0   0   000000030037 0            336000030037 
FT0	030643 030037 0   0   0            0            336000030037 
FT1A	030643 030037 0   0   0            0            0            
FT9	030644 030037 0   0   0            0            0            
ET0	030644 030037 0   0   0            0            0            
ST1A	030644 030037 0   0   0            0            0            
ST9	030644 030037 0   0   0            0            0            


PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 567
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0757

*030644 JRST	0,030652
INITIAL
C(AC)=777777 777776 
C(E)=332000 030041 
FINAL

C(E)=332000 030041 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030644 030644 0   0   254000030652 0            254000030652 
IT1	030644 0      0   0   254000030652 0            254000030652 
AT3	030644 0      0   0   000000030652 0            254000030652 
AT6	030644 030652 0   0   000000030652 0            254000030652 
FT1A	030644 030652 0   0   000000030652 0            254000030652 
FT9	030645 030652 0   0   000000030652 0            254000030652 
ET0	030652 030645 0   0   000000030652 0            254000030652 
ST1A	030652 030645 0   0   000000030652 0            254000030652 
ST9	030652 030645 0   0   000000030652 0            254000030652 


*030652 SKIPE	0,030041
INITIAL
C(AC)=777777 777776 
C(E)=000000 000000 
FINAL
C(AC)=777777 777776 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030652 030652 0   0   332000030041 0            0            
IT1	030652 0      0   0   332000030041 0            0            
AT3	030652 0      0   0   000000030041 0            332000030041 
AT6	030652 030041 0   0   000000030041 0            332000030041 
FT0	030652 030041 0   0   0            0            332000030041 
FT1A	030652 030041 0   0   0            0            0            
FT9	030653 030041 0   0   0            0            0            
ET0	030654 030041 0   0   0            0            0            
ST1A	030654 030041 0   0   0            0            0            
ST9	030654 030041 0   0   0            0            0            


*030654 DATAO	4,030024

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030654 030654 0   0   700540030024 0            000000030024 
IT1	030654 0      0   0   700540030024 0            000000030024 
AT3	030654 0      0   0   000000030024 0            700540030024 
AT6	030654 030024 0   0   000000030024 0            700540030024 
FT1A	030654 030024 0   0   000000030024 0            000000030024 
FT2	030654 030024 0   0   0            0            000000030024 
FT2RQ	030654 030024 0   0   0            0            000000030024 
FT3	030654 030024 0   0   0            0            000000030024 
FT9	030655 030024 0   0   0            0            000000030024 
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC	KASIM VER 0.2  19-JAN-77   PAGE 568
DAKAC	000000 000000  000000 000000  000000 000000  030000  777777                                                        SEQ 0758

ST1	030655 030024 0   0   0            0            000000030024 
ST2	030655 030024 0   0   0            0            000000030024 
ST9	030655 030024 0   0   0            0            000000030024 


*030655 SKIPE	0,030024
INITIAL
C(AC)=777777 777776 
C(E)=000000 000000 
FINAL
C(AC)=777777 777776 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030655 030655 0   0   332000030024 0            0            
IT1	030655 0      0   0   332000030024 0            0            
AT3	030655 0      0   0   000000030024 0            332000030024 
AT6	030655 030024 0   0   000000030024 0            332000030024 
FT0	030655 030024 0   0   0            0            332000030024 
FT1A	030655 030024 0   0   0            0            0            
FT9	030656 030024 0   0   0            0            0            
ET0	030657 030024 0   0   0            0            0            
ST1A	030657 030024 0   0   0            0            0            
ST9	030657 030024 0   0   0            0            0            


*030657 JRST	0,@030012
INITIAL
C(AC)=777777 777776 
C(E)=000000 431100 
FINAL

C(E)=000000 431100 

TIME    PC     MA     SC  FE  AR           MQ           BR
IT0	030657 030657 0   0   254020030012 0            000000431100 
IT1	030657 0      0   0   254020030012 0            000000431100 
AT3	030657 0      0   0   000000030012 0            254020030012 
AT4	030657 030012 0   0   000000431100 0            254020030012 
IT1	030657 0      0   0   000000431100 0            254020030012 
AT3	030657 0      0   0   000000431100 0            000000431100 
AT6	030657 0      0   0   000000431100 0            000000431100 
FT1A	030657 0      0   0   000000431100 0            000000431100 
FT9	030660 0      0   0   000000431100 0            000000431100 
ET0	0      030660 0   0   000000431100 0            000000431100 
ST1A	0      030660 0   0   000000431100 0            000000431100 
ST9	0      030660 0   0   000000431100 0            000000431100