Google
 

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





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


	PRODUCT CODE:	MAINDEC-10-DBKCC

	PRODUCT NAME:	DECSYSTEM10 PDP-10 KI10 ADVANCED
			INSTRUCTION DIAGNOSTIC (3)

	FUNCTION:	FIX, FIXR, FLTR, DOUBLE MOVES

	VERSION:	0.3

	DATE RELEASED:	AUGUST,1976

	MAINTAINED BY:	DIAGNOSTIC ENGINEERING GROUP

	AUTHOR:		JOHN R. KIRCHOFF

COPYRIGHT(C) 1976
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-DBKCC.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	DATA SWITCH FUNCTIONS

5.0	ERRORS

6.0	ITERATION COUNTER

7.0	CYCLE TIME

8.0	OPERATIONAL VARIATIONS

9.0	MISCELLANEOUS

10.0	LISTING
							MAINDEC-10-DBKCC.TXT
							PAGE 3                                                             SEQ 0003

1.0	ABSTRACT

	THIS PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC IS THE
	THIRD IN A SERIES OF PDP-10 KI10 PROCESSOR FLOATING
	POINT DIAGNOSTICS.
	THE DIAGNOSTIC TESTS THE SINGLE PRECISION FLOATING
	POINT INSTRUCTIONS; FIX, FIXR, FLTR.  ALSO IT TESTS THE
	DOUBLE PRECISION MOVES; DMOVE, DMOVN, DMOVEM, DMOVNM.

2.0	REQUIREMENTS

2.1	EQUIPMENT

	A PDP-10 KI10 EQUIPPED WITH A MINIMUM OF 32K OF MEMORY

	CONSOLE TELETYPE
	DECTAPE
	LINE PRINTER (OPTIONAL)

2.2	STORAGE

	THE PROGRAM RUNS WITHIN 32K OF MEMORY.

2.3	PRELIMINARY PROGRAMS

	PREVIOUS PROCESSOR DIAGNOSTICS

3.0	PROGRAM PROCEDURES

3.1	LOADING PROCEDURE

	THIS DIAGNOSTIC REQUIRES THAT THE DECSYSTEM10 SUBROUTINE
	PROGRAM BE RESIDENT IN THE PDP-10.

	DECTAPE - LOAD WITH DIAMON (DECTAPE DEVICE CODE 320)
	TIME SHARING - RUN UNDER DIAMON.
							MAINDEC-10-DBKCC.TXT
							PAGE 4                                                             SEQ 0004

3.2	STARTING PROCEDURE

	A.  SELECT OPERATIONAL CONSOLE DATA SWITCH SETTINGS (REFER TO
	    4.0 DATA SWITCH FUNCTIONS).

	B.  EXEC MODE

	    STAND-ALONE STARTING ADDRESS IS 30000.

	C.  USER MODE

	    RUN UNDER "DIAMON".
	    IN USER MODE THE FOLLOWING QUESTIONS WILL BE ASKED TO 
	    SELECT THE OPERATIONAL SWITCHES:

		    TELETYPE SWITCH CONTROL ? 0,S,Y OR N (CR) -

		    IF THE OPERATOR TYPES "N", THE ACTUAL CONSOLE
		    SWITCHES ARE USED.

		    IF THE OPERATOR TYPES "Y", THE FOLLOWING QUESTIONS
		    ARE ASKED AND THE OPERATOR RESPONDS BY TYPING
		    THE ANSWER AS SIX OCTAL DIGITS REPRESENTING
		    THE DESIRED SWITCH SETTINGS.

		    SPECIFY LH SWITCHES IN OCTAL-

		    SPECIFY RH SWITCHES IN OCTAL-

		    IF THE OPERATOR TYPES "0", ZERO'S ARE USED FOR
		    THE SWITCH SETTINGS.

		    IF THE OPERATOR TYPES "S", PREVIOUSLY SET SWITCHES
		    ARE USED.  THIS IS ONLY VALID UPON RESTARTING
		    OF AN INTERRUPTED PROGRAM.
							MAINDEC-10-DBKCC.TXT
							PAGE 5                                                             SEQ 0005

3.3	OPERATING PROCEDURE

	A.  TO THROUGHLY TEST ALL HARDWARE, ALL TEST CONTROL DATA 
	    SWITCHES SHOULD BE SET TO 0.

	B.  WHEN DEBUGGING HARDWARE, SET SWITCHES TO 0.  ALLOW THE 
	    TELETYPE TO PRINT THE ERROR MESSAGES.  THIS ALLOWS THE 
	    PROGRAM TO RUN A COMPLETE PASS AND THEN THE ERROR MESSAGES
	    MAY BE CORRELATED TO QUICKLY DIAGNOSE THE FAILURE.  IF A
	    HARDWARE PROBLEM IS SUCH THAT THE ERROR MESSAGES, AFTER THE
	    FIRST ONE, HAVE NO MEANING (FIRST ERROR CAUSES ALL FOLLOWING
	    TESTS TO FAIL) SET THE LOOP ON ERROR SWITCH AND RESTART THE
	    TEST FROM THE BEGINNING.  THE FIRST FAILURE WILL THEN CAUSE
	    THE PROGRAM TO ENTER A LOOP SUITABLE FOR SCOPING.

	    THE ERROR MESSAGE USED IN CONJUNCTION WITH THE LISTING AND
	    SCOPING IF NECESSARY SHOULD ALLOW THE FAILING CONPONENT 
	    TO BE ISOLATED AND REPLACED AND/OR REPAIRED.

	C.  WHEN TAKING MARGINS, SET DATA SWITCHES 'NOPNT' AND 'DING'.
	    THIS WILL INHIBIT PRINTOUT BUT WILL ALLOW THE TELETYPE
	    BELL TO BE RUNG WHEN A ERROR OCCURS.  IF THE MARGIN OBTAINED
	    IS UNACCEPTABLE, THE OPERATOR MAY REVERT TO STANDARD SWITCH
	    SETTINGS FOR DEBUGGING PURPOSES.

	D.  ERROR INFORMATION MAY BE OBTAINED QUICKLY BY PRINTING 
	    ERRORS ON THE LINE PRINTER.

	E.  IN THE EVENT OF A PRINT ROUTINE FAILURE THE 'NOPNT' SWITCH
	    AND THE 'ERSTOP' SWITCH MAY BE SET TO INHIBIT PRINTOUT 
	    BUT HALT THE PROGRAM POINTING TO THE ERROR.
							MAINDEC-10-DBKCC.TXT
							PAGE 6                                                             SEQ 0006

4.0	DATA SWITCH FUNCTIONS

	SWITCH		STATE	FUNCTION
	------		-----	--------

	0    ABORT	0	NORMAL OPERATION
			1	ABORT AT END OF PASS

	1    RSTART		NOT USED

	2    TOTALS		NOT USED

	3    NOPNT	0	NORMAL TYPEOUT
			1	INHIBIT ALL PRINT/TYPEOUT
				(EXCEPT FORCED)

	4    PNTLPT	0	NORMAL OUTPUT TO TTY
			1	PRINT ALL DATA ON LPT
				(LOGICAL DEVICE, USER MODE)

	5    DING	0	NO FUNCTION
			1	RING TTY BELL ON ERROR

	6    LOOPER	0	PROCEED TO NEXT TEST
			1	ENTER SCOPE LOOP ON TEST ERROR

	7    ERSTOP	0	NO FUNCTION
			1	HALT ON TEST ERROR

	8    PALERS	0	PRINT ONLY FIRST ERROR WHEN LOOPING
			1	PRINT ALL ERRORS, EVEN IF SAME ERROR

	9    RELIAB		NOT USED

	10   TXTINH	0	PRINT FULL ERROR MESSAGES.
			1	INHIBIT COMMENT PORTION OF 
				ERROR MESSAGES.

	11   INHPAG	0	ALLOW PAGING AND TRAP ENABLE
			1	INHIBIT PAGING AND TRAPPING

	12   MODDVC		NOT USED

	13   INHCSH		NOT USED
							MAINDEC-10-DBKCC.TXT
							PAGE 7                                                             SEQ 0007

5.0	ERRORS

	ERRORS ARE PRINTED ON THE TTY OR LINE PRINTER.  THE ERROR 
	PRINTOUT CONTAINS THE TEST TITLE, THE PC OF THE FAILURE, ERROR
	NUMBER AND THE CONTENTS OF AN APPLICABLE AC.

	THE PC VALUE IS USEFUL IN RELATING THE FAILURE TO THE LISTING.
	THE ERROR NUMBER IS PROVIDED SUCH THAT AN ERROR DICTIONARY MAY
	BE MADE AT SOME FUTURE DATE.

	WHEN THE SCOPE LOOP MODE IS USED THE MI REGISTER WILL COUNT 
	FOR EACH OCCURANCE OF AN ERROR.  IF AN AUDIO INDICATION OF
	A CONTINUING ERROR IS DESIRED THE 'DING' SWITCH MAY BE SET.

6.0	ITERATION COUNTER

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

7.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-DBKCC.TXT
							PAGE 8                                                             SEQ 0008

8.0	OPERATIONAL VARIATIONS

	A.  DIAGNOSTIC MONITOR

	    THE PROGRAM IS USABLE WITH THE DIAGNOSTIC MONITOR TO PROVIDE
	    RELIABILITY TESTS, ACCEPTANCE TESTS, AND/OR TO PROVIDE 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 PROGRAM
		AND STARTS IT AT LOCATION 30002.

	    2.	MONCTL - LOCATION 30043 IS USED AS THE DIAGNOSTIC MONITOR
		CONTROL WORD.
			LH = 0, STAND-ALONE OPERATION
			    -1, RUNNING UNDER DIAGNOSTIC MONITOR

			RH = RIGHT HALF OF CONSOLE SWITCHES IF UNDER
			     DIAGNOSTIC MONITOR CONTROL.

	B.  USER MODE

	    TO OUTPUT THE PRINTED ERROR MESSAGES TO A USER SPECIFIED
	    DEVICE IN USER MODE, ASSIGN THE DESIRED OUTPUT DEVICE TO
	    DEVICE NAME 'DEV' AND SET SWITCH 'PNTLPT'.  THE PHYSICAL
	    DEVICE USED CAN BE ANY DEVICE THAT CAN ACCEPT ASCII OUTPUT
	    FORMAT SUCH AS LPT, DSK, DTA, ETC.  THE CORRESPONDING 
	    OUTPUT FILE IS 'DBKCC.PNT'

	    EXAMPLE DEVICE ASSIGNMENT:

	    .ASSIGN DSK DEV

	    IN USER MODE THE PROGRAM WILL MAKE 1000(8) PASSES AND THEN
	    RETURN TO DIAMON COMMAND MODE.
							MAINDEC-10-DBKCC.TXT
							PAGE 9                                                             SEQ 0009

8.0	OPERATIONAL VARIATIONS (CON'T)

	THE OUTPUT FILE (IF USED) MAY THEN BE LISTED BY USING THE
	NORMAL MONITOR COMMANDS (PRINT, LIST, TYPE, PIP, ETC.).

	IF THE PROGRAM IS ABORTED BEFORE COMPLETION (BY ^C, ETC.) THE
	OUTPUT FILE MAY BE CLOSED BY USING THE MONITOR 'REENTER' 
	COMMAND.

	C.  SYSTEM EXERCISER

	    START ADDRESS IS 30003.  DATA SWITCHES ARE PRESTORED IN
	    'SWTEXR' LOC 30023.

9.0	MISCELLANEOUS

	THE NON-EX-MEMORY AND PARITY STOP SWITCHES SHOULD BE RESET 
	(0).  THESE ERRORS, ILLEGAL UUO'S AND OTHER ERRORS OF THIS
	TYPE ARE HANDLED BY PRINTOUT ON THE TELETYPE.

10.0	LISTING
	THIS IS A HISTORY OF THE DEVELOPMENT OF MAINDEC-10-DBKCC
                                                                                                                           SEQ 0010
************************************************************************

PRODUCT CODE:		MAINDEC-10-DBKCC

PRODUCT NAME:		ADVANCED INSTRUCTION DIAGNOSTIC #3


DATE RELEASED:		AUGUST,1976

VERSION:		0.3

UPDATE AUTHOR:		EDWARD G. PRENTICE

CHANGES MADE:

	1. UPGRADE TO ALLOW COMPATABILITY WITH THE SUBROUTINE PACKAGE.

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


VERSION:		0.2

UPDATE AUTHOR:		JOHN R. KIRCHOFF

DATE RELEASED:		15-JAN-74

REASON FOR UPDATE:	DIAGNOSTIC DID NOT TEST CHANGES TO KI10
			 AS A RESULT OF ECO #42

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

ORIGINAL VERSION:	0.1

ORIGINAL AUTHOR:	JOHN R. KIRCHOFF

ORIGINAL RELEASE:	16-MAR-72

************************************************************************
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 1
DBKCCT	MAC	30-JUL-76 12:47		DIAGNOSTIC PARAMETERS                                                              SEQ 0011

     1					;MAINDEC-10-DBKCC
     2
     3			000003		DECVER=003
     4			000000		MCNVER=000
     5
     6						XLIST
     7						LIST
     8						LALL
     9
    10					NAME	\MCNVER,\DECVER^
    11					TITLE	DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 ^
    12
    13						XALL
    14					;(FIX,FIXR,FLTR AND DOUBLE MOVE)
    15
    16					;COPYRIGHT 1972, 1973, 1974,1975
    17					;DIGITAL EQUIPMENT CORPORATION
    18					;MAYNARD, MASS., 01754
    19
    20					;JOHN R. KIRCHOFF
    21					;LINDA GARLAND
    22
    23	000137				LOC	137
    24	000137	000000	000003		MCNVER,,DECVER
    25						NOSYM
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 2
DBKCCT	MAC	30-JUL-76 12:47		DIAGNOSTIC PARAMETERS                                                              SEQ 0012

    26					SUBTTL	DIAGNOSTIC PARAMETERS
    27
    28					;OPERATOR DEFINITIONS
    29
    30		001000	000000		OPDEF	ER1	[1B8]
    31		002000	000000		OPDEF	ER2	[2B8]
    32		003000	000000		OPDEF	ER3	[3B8]
    33		004000	000000		OPDEF	ER4	[4B8]
    34		005000	000000		OPDEF	ER5	[5B8]
    35		006000	000000		OPDEF	ER6	[6B8]
    36		007000	000000		OPDEF	ER7	[7B8]
    37		010000	000000		OPDEF	ER10	[10B8]
    38		011000	000000		OPDEF	ER11	[11B8]
    39		012000	000000		OPDEF	ER12	[12B8]
    40		013000	000000		OPDEF	ER13	[13B8]
    41
    42			036526		LUUO1==ERRMES
    43			036526		LUUO2==ERRMES
    44			036526		LUUO3==ERRMES
    45			036526		LUUO4==ERRMES
    46			036526		LUUO5==ERRMES
    47			036526		LUUO6==ERRMES
    48			036526		LUUO7==ERRMES
    49			036526		LUUO10==ERRMES
    50			036526		LUUO11==ERRMES
    51			036526		LUUO12==ERRMES
    52			036526		LUUO13==ERRMES
    53
    54					;SUBROUTINE ASSEMBLY DEFINITIONS
    55
    56			000100		DEBUG=100
    57			000001		EXCASB=1
    58			000001		USRASB=1
    59			000001		KI10=1
    60			000001		PGMEND=1
    61			000001		ERDIAG=1
    62			000001		KLOLD=1
    63			030000		MODDVU=BEGIN
    64			030000		MODDVL=BEGIN
    65
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 3
DBKCCT	MAC	30-JUL-76 12:47		DIAGNOSTIC PARAMETERS                                                              SEQ 0013

    66					;MACROS
    67
    68					DEFINE	SAVEAC	(A,B)<
    69						MOVEI	SAC,.
    70						MOVEM	SAC,TESTPC	;SETUP SUBTEST PC
    71						MOVEI	SAC,SAC		;INFORM ERROR ROUTINE WHICH
    72						MOVEM	SAC,ERRLOP#	;AC IS USED FOR ITERATION>
    73
    74					;BEGIN ASSEMBLY PARAMETERS
    75
    76			030000		SADR1=BEGIN
    77			030076		SADR2=RESRT1
    78			030600		SADR3=RENTR1
    79			030000		SADR4=BEGIN
    80			030000		SADR5=BEGIN
    81			030000		SADR6=BEGIN
    82			000000		SADR7=0
    83			000000		SADR8=0
    84			000000		SADR9=0
    85			000000		SADR10=0
    86			000000		SADR11=0
    87
    88			000000		PAREA1=0
    89			000000		PAREA2=0
    90		444253	434300		PAREA3=SIXBIT/DBKCC/
    91		605664	000000		PAREA4=SIXBIT/PNT/
    92			000000		PAREA5=0
    93			000000		PAREA6=0
    94
    95			001000		ITERAT=1000
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 4
DBKCCT	MAC	30-JUL-76 12:47		DIAGNOSTIC PARAMETERS                                                              SEQ 0014

    96					DEFINE	DMVE	(L,A,B,C,D)	<
    97					;THIS MACRO TESTS THE DMOVE INSTRUCTION
    98					;FIRST, AC, AC+1 ARE PRELOADED WITH DATA OTHER THAN THE TEST WORDS.
    99					;THEN, THE DATA SPECIFIED BY [XWD A,B] AND [XWD C,D] IS MOVED
   100					;FROM MEMORY TO AC, AC+1 VIA THE DMOVE INSTRUCTION.
   101					;C(AC) AND C(AC+1) ARE THEN COMPARED WITH THE TEST WORDS
   102					;[XWD A,B] AND [XWD C,D], RESPECTIVELY.  THE TEST PASSES IF THESE
   103					;COMPARISONS AGREE.
   104					
   105					Q'L'0:	MOVE	AC+5,[XWD A,B]	;INITIALIZE TEST WORDS
   106						MOVE	AC+6,[XWD C,D]	;FOR COMPARISON
   107						MOVE	AC,[XWD 707070,707070]
   108						MOVE	AC+1,[XWD 070707,070707]  ;INITIALIZE AC,AC+1
   109						DMOVE	AC,[XWD A,B	;*MOVE DOUBLE WORD A,B ; C,D
   110							    XWD C,D]	;FROM MEMORY TO AC, AC+1
   111						CAME	AC,<AC+5>&17	;WAS AC LOADED CORRECTLY?
   112						ER3	AC,L'1	;FAIL IF CONTENTS(AC) NOT = A,B
   113						CAME	AC+1,<AC+6>&17	;WAS AC+1 LOADED CORRECTLY?
   114						ER4	AC+1,L'2	;FAIL IF CONTENTS(AC+1) NOT = C,D
   115						JUMPL	SAC,Q'L'0	;LOOP ON ERROR SWITCH>
   116
   117
   118					DEFINE 	DMVE17	(L,T,A,B,C,D)	<
   119					;THIS MACRO TESTS THE DMOVE INSTRUCTION
   120					;FIRST, AC, AC+1 ARE PRELOADED WITH DATA OTHER THAN THE TEST WORDS.
   121					;THEN, THE DATA SPECIFIED BY [XWD A,B] AND [XWD C,D] IS MOVED
   122					;FROM MEMORY TO AC, AC+1 VIA THE DMOVE INSTRUCTION.
   123					;C(AC) AND C(AC+1) ARE THEN COMPARED WITH THE TEST
   124					;WORDS [XWD A,B] AND [XWD C,D], RESPECTIVELY.
   125					;THE TEST PASSES IF THESE COMPARISONS AGREE.
   126					
   127					Q'T'0:	MOVEM	AC,%SV17#	;SAVE AC17
   128					Q'L'0:	MOVE	AC+5,[XWD A,B]	;INITIALIZE TEST WORDS
   129						MOVE	AC+6,[XWD C,D]	;FOR COMPARISON
   130						MOVE	AC,[XWD 707070,707070]
   131						MOVE	AC+1,[XWD 070707,070707]  ;INITIALIZE AC,AC+1
   132						DMOVE	AC,[XWD A,B	;*MOVE DOUBLE WORD A,B ; C,D
   133							    XWD C,D]	;FROM MEMORY TO AC, AC+1
   134					Q'T'3:	CAMN	AC,<AC+5>&17	;WAS AC LOADED CORRECTLY?
   135						JRST	.+4		;HERE IF NO ERROR
   136						MOVEM	AC,AC-1		;STORE INCORRECT RESLUTS
   137						MOVE	AC,%SV17	;RESTORE P
   138						ER3	AC-1,L'1	;FAIL IF CONTENTS(AC) NOT = A,B
   139						CAMN	AC+1,<AC+6>&17	;WAS AC+1 LOADED CORRECTLY?
   140						JRST	.+4		;HERE IF NO ERROR
   141						MOVEM	AC+1,AC-1	;STORE INCORRECT WORD
   142						MOVE	AC,%SV17	;RESTORE P
   143						ER4	AC-1,L'2
   144						MOVE	AC,%SV17	;RESTORE AC UNCONDITIONALLY
   145						JUMPL	SAC,Q'T'0	;LOOP ON ERROR SWITCH>
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 5
DBKCCT	MAC	30-JUL-76 12:47		DIAGNOSTIC PARAMETERS                                                              SEQ 0015

   146					DEFINE	DMVN	(L,A,B,C,D)	<
   147					;THIS MACRO TESTS THE DMOVN INSTRUCTION
   148					;FIRST, AC, AC+1 ARE PRELOADED WITH DATA OTHER THAN THE TEST WORDS.
   149					;THEN, THE NEGATIVE (TWOS COMPLEMENT) OF THE DATA SPECIFIED BY
   150					;[XWD A,B] AND [XWD C,D] IS MOVED FROM MEMORY TO AC, AC+1 VIA
   151					;THE DMOVN INSTRUCTION.  C(AC) AND C(AC+1) ARE THEN COMPARED
   152					;WITH THE NEGATIVE (TWOS COMPLEMENT) OF THE TEST
   153					;WORDS [XWD A,B] AND [XWD C,D], RESPECTIVELY.
   154					;THE TEST PASSES IF THESE COMPARISONS AGREE.
   155					
   156					Q'L'0:	DMOVE	AC,[XWD 707070,707070
   157							    XWD 070707,070707]  ;INITIALIZE AC,AC+1
   158						SETCM	AC+5,[XWD A,B]	;INITIALIZE TEST WORDS FOR COMPARISON
   159						IFIDN	<C,D><0,0>,<
   160						SETZ	AC+6,
   161						ADDI	AC+5,1	>
   162						IFIDN	<C,D><400000,0>,<
   163						SETZ	AC+6,
   164						ADDI	AC+5,1	>
   165						IFDIF	<C,D><0,0>,<
   166						IFDIF	<C,D><400000,0>,<
   167						MOVN	AC+6,[XWD C,D]
   168						TLZ	AC+6,1B18	;CLEAR SIGN BIT OF LOW ORDER WORD >>
   169						DMOVN	AC,[XWD A,B	;*MOVE NEGATIVE OF DOUBLE WORD A,B ;
   170							    XWD C,D]	;C,D FROM MEMORY TO AC, AC+1
   171						CAME	AC,<AC+5>&17	;WAS AC LOADED CORRECTLY?
   172						ER3	AC,L'1	;FAIL IF CONTENTS(AC) NOT = COMPLEMENT OF A,B
   173						CAME	AC+1,<AC+6>&17	;WAS AC+1 LOADED CORRECTLY?
   174						ER4	AC+1,L'2	;FAIL IF CONTENTS(AC+1) NOT = MINUS C,D
   175						JUMPL	SAC,Q'L'0	;LOOP ON ERROR SWITCH>
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 6
DBKCCT	MAC	30-JUL-76 12:47		DIAGNOSTIC PARAMETERS                                                              SEQ 0016

   176					DEFINE	DMVN17	(L,A,B,C,D)	<
   177					;THIS MACRO TESTS THE DMOVN INSTRUCTION
   178					;FIRST, AC, AC+1 ARE PRELOADED WITH DATA OTHER THAN THE TEST WORDS.
   179					;THEN, THE NEGATIVE (TWOS COMPLEMENT) OF THE DATA SPECIFIED BY
   180					;[XWD A,B] AND [XWD C,D] IS MOVED FROM MEMORY TO AC, AC+1 VIA
   181					;THE DMOVN INSTRUCTION.  C(AC) AND C(AC+1) ARE THEN COMPARED
   182					;WITH THE NEGATIVE (TWOS COMPLEMENT) OF THE TEST
   183					;WORDS [XWD A,B] AND [XWD C,D], RESPECTIVELY.
   184					;THE TEST PASSES IF THESE COMPARISONS AGREE.
   185					
   186					Q'L'0:	MOVEM	AC,%SV17	;SAVE P
   187						DMOVE	AC,[XWD 707070,707070
   188							    XWD 070707,070707]  ;INITIALIZE AC,AC+1
   189						SETCM	AC+5,[XWD A,B]	;INITIALIZE TEST WORDS FOR COMPARISON
   190						IFIDN	<C,D><0,0>,<
   191						SETZ	AC+6,
   192						ADDI	AC+5,1	>
   193						IFIDN	<C,D><400000,0>,<
   194						SETZ	AC+6,
   195						ADDI	AC+5,1	>
   196						IFDIF	<C,D><0,0>,<
   197						IFDIF	<C,D><400000,0>,<
   198						MOVN	AC+6,[XWD C,D]
   199						TLZ	AC+6,1B18	;CLEAR SIGN BIT OF LOW ORDER WORD >>
   200						DMOVN	AC,[XWD A,B	;*MOVE NEGATIVE OF DOUBLE WORD A,B ;
   201							    XWD C,D]	;C,D FROM MEMORY TO AC, AC+1
   202						CAMN	AC,<AC+5>&17	;WAS AC LOADED CORRECTLY?
   203						JRST	.+4		;HERE IF TESTS OK
   204						MOVEM	AC,AC-1		;SAVE BAD WORD
   205						MOVE	AC,%SV17	;RESTORE P
   206						ER3	AC-1,L'1	;FAIL IF CONTENTS(AC) NOT = COMPLEMENT OF A,B
   207						CAMN	AC+1,<AC+6>&17	;WAS AC+1 LOADED CORRECTLY?
   208						JRST	.+4		;HERE IF TESTS OK
   209						MOVEM	AC,AC-1
   210						MOVE	AC,%SV17	;RESTORE P
   211						ER4	AC+1,L'2	;FAIL IF CONTENTS(AC+1) NOT = MINUS C,D
   212						MOVE	AC,%SV17	;RESTORE P UNCODITIONALLY
   213						JUMPL	SAC,Q'L'0	;LOOP ON ERROR SWITCH>
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 7
DBKCCT	MAC	30-JUL-76 12:47		DIAGNOSTIC PARAMETERS                                                              SEQ 0017

   214					DEFINE	DMVNF	(L,A,B,C,D,KIEF,KIUF,KLEF,KLUF)	<
   215					;**KI10**
   216					;THIS MACRO VERIFIES THAT THE DMOVN INSTRUCTION DOES NOT SET OVERFLOW
   217					;OR CARRY FLAGS ON THE KI10.  FIRST, OVFL AND CRY0,1 FLAGS ARE CLEARED;
   218					;THEN,DMOVN IS EXECUTED.  NEXT, OVFL AND CRY0,1 FLAGS ARE EXAMINED.
   219					;IF ANY OF THESE FLAGS ARE SET, THE TEST FAILS.
   220					
   221					;**KL10**
   222					;THIS MACRO VERIFIES THAT THE DMOVN INSTRUCTION DOES SET OVERFLOW
   223					;OR CARRY FLAGS ON THE KL10.  FIRST, OVFL AND CRY0,1 FLAGS ARE CLEARED;
   224					;THEN,DMOVN IS EXECUTED.  NEXT, OVFL AND CRY0,1 FLAGS ARE EXAMINED.
   225					;IF THE PROPER FLAGS ARE NOT SET, THE TEST FAILS.
   226					
   227					Q'L'0:	JFCL	17,.+1		;CLEAR OVFL AND CRY0,1 FLAGS
   228						DMOVN	AC+1,[XWD A,B	;*DMOVN TEST
   229							      XWD C,D]
   230						JSP	AC,.+1		;READ FLAGS
   231					Q'L'1:	TLZ	AC,027777	;CLEAR EXTRA JUNK
   232						TLNE	AC,USERF	;IN USER MODE ?
   233						JRST	Q'L'4		;YES
   234						SKIPE	KLFLG		;KL10 ?
   235						JRST	Q'L'3		;YES
   236					;KI10 EXEC MODE
   237						CAME	AC,[KIEF,,Q'L'1]
   238						ER13	AC,L'1		;FAIL IF OVFL OR CRY0,1 FLG SET
   239					Q'L'2:	JUMPL	SAC,Q'L'0	;LOOP ON ERROR SWITCH
   240						JRST	Q'L'6
   241					;KL10 EXEC MODE
   242					Q'L'3:	CAME	AC,[KLEF,,Q'L'1]
   243						ER13	AC,L'1		;FAIL IF FLAGS NOT SET
   244						JRST	Q'L'2
   245					;KL10/KI10 USER MODE
   246					Q'L'4:	SKIPE	KLFLG		;KL10 ?
   247						JRST	Q'L'5		;YES
   248					;KI10 USER MODE
   249						CAME	AC,[KIUF,,Q'L'1]
   250						ER13	AC,L'1		;FAIL IF ANY FLAGS SET
   251						JRST	Q'L'2
   252					;KL10 USER MODE
   253					Q'L'5:	CAME	AC,[KLUF,,Q'L'1]
   254						ER13	AC,L'1		;FAIL IF FLAGS NOT SET
   255						JRST	Q'L'2
   256					
   257					Q'L'6:	JRST	.+1>
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 8
DBKCCT	MAC	30-JUL-76 12:47		DIAGNOSTIC PARAMETERS                                                              SEQ 0018

   258					DEFINE	DMVM	(L,A,B,C,D)	<
   259					;THIS MACRO TESTS THE DMOVEM INSTRUCTION
   260					;FIRST, TSTWD, TSTWD+1 ARE PRELOADED WITH DATA OTHER THAN THE
   261					;TEST WORDS AND AC,AC+1 ARE LOADED WITH THE TEST WORDS.
   262					;THEN, THE DATA SPECIFIED BY [XWD A,B] AND [XWD C,D] IS MOVED
   263					;FROM AC, AC+1 TO MEMORY (TSTWD, TSTWD+1) VIA
   264					;THE DMOVEM INSTRUCTION.  C(TSTWD) AND C(TSTWD+1) ARE THEN
   265					;COMPARED WITH THE TEST WORDS [XWD A,B] AND [XWD C,D], RESPECTIVELY.
   266					;THE TEST PASSES IF THESE COMPARISONS AGREE.
   267					
   268					Q'L'0:	DMOVE	AC,[XWD 707070,707070
   269							    XWD 070707,070707]	;INITIALIZE TEST WORDS
   270						MOVEM	AC,TSTWD	;TSTWD, TSTWD+1 ARE IN MEMORY JUST
   271						MOVEM	AC+1,TSTWD+1	;AFTER THE FINAL TEST OF THIS PROGRAM
   272						DMOVE	AC,[XWD A,B
   273							    XWD C,D]	;INITIALIZE AC,AC+1
   274						DMOVEM	AC,TSTWD	;*MOVE DOUBLE WORD FROM AC, AC+1
   275									;TO MEMORY (TSTWD, TSTWD+1)
   276						DMOVE	AC,TSTWD	;PUT RESULTS OF TEST IN AC,AC+1 FOR COMPARISON
   277						CAME	AC,[XWD A,B]	;WAS TSTWD LOADED CORRECTLY?
   278						ER5	AC,L'1	;FAIL IF CONTENTS(TSTWD) NOT = A,B
   279						CAME	AC+1,[XWD C,D]	;WAS TSTWD+1 LOADED CORRECTLY?
   280						ER6	AC+1,L'2	;FAIL IF CONTENTS(TSTWD+1) NOT = C,D
   281						JUMPL	SAC,Q'L'0	;LOOP ON ERROR SWITCH>
   282
   283					DEFINE	DMVNM	(L,A,B,C,D)	<
   284					;THIS MACRO TESTS THE DMOVNM INSTRUCTION
   285					;FIRST, TSTWD, TSTWD+1 ARE PRELOADED WITH DATA OTHER THAN THE
   286					;TEST WORDS AND AC, AC+1 ARE LOADED WITH THE TEST WORDS.
   287					;THEN, THE NEGATIVE (TWOS COMPLEMENT) OF THE DATA SPECIFIED BY
   288					;[XWD A,B] AND [XWD C,D] IS MOVED FROM AC, AC+1 TO MEMORY
   289					;(TSTWD, TSTWD+1) VIA THE DMOVNM INSTRUCTION.
   290					;C(TSTWD) AND C(TSTWD+1) ARE THEN COMPARED WITH THE
   291					;NEGATIVE (TWOS COMPLEMENT) OF THE TEST
   292					;WORDS [XWD A,B] AND [XWD C,D], RESPECTIVELY.
   293					;THE TEST PASSES IF THESE COMPARISONS AGREE.
   294					
   295					Q'L'0:	DMOVE	AC,[XWD 707070,707070
   296							    XWD 070707,070707]
   297						DMOVEM	AC,TSTWD	;INITIALIZE TEST WORDS
   298						DMOVE	AC,[XWD A,B
   299							    XWD C,D]	;INITIALIZE AC,AC+1
   300						DMOVN	AC+5,[XWD A,B
   301							      XWD C,D]	;SET-UP TO CHECK RESULTS
   302						DMOVNM	AC,TSTWD	;*MOVE NEGATIVE OF DOUBLE WORD FROM AC, AC+1
   303									;TO MEMORY (TSTWD, TSTWD+1)
   304						DMOVE	AC,TSTWD	;PUT TEST RESULTS IN AC,AC+1
   305						CAME	AC,<AC+5>&17	;WAS TSTWD LOADED CORRECTLY?
   306						ER5	AC,L'1	;FAIL IF CONTENTS(TSTWD) NOT = COMPLEMENT OF A,B
   307						CAME	AC+1,<AC+6>&17	;WAS TSTWD+1 LOADED CORRECTLY?
   308						ER6	AC+1,L'2	;FAIL IF CONTENTS(TSTWD) NOT = MINUS C,D
   309						JUMPL	SAC,Q'L'0	;LOOP ON ERROR SWITCH>
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 9
DBKCCT	MAC	30-JUL-76 12:47		DIAGNOSTIC PARAMETERS                                                              SEQ 0019

   310					DEFINE	DMVM17	(L,A,B,C,D)	<
   311					;THIS MACRO TESTS THE DMOVEM INSTRUCTION
   312					;FIRST, TSTWD, TSTWD+1 ARE PRELOADED WITH DATA OTHER THAN THE
   313					;TEST WORDS AND AC,AC+1 ARE LOADED WITH THE TEST WORDS.
   314					;THEN, THE DATA SPECIFIED BY [XWD A,B] AND [XWD C,D] IS MOVED
   315					;FROM AC, AC+1 TO MEMORY (TSTWD, TSTWD+1) VIA THE DMOVEM INSTRUCTION.
   316					;C(TSTWD) AND C(TSTWD+1) ARE THEN COMPARED WITH THE TEST
   317					;WORDS [XWD A,B] AND [XWD C,D], RESPECTIVELY.
   318					;THE TEST PASSES IF THESE COMPARISONS AGREE.
   319					
   320					Q'L'0:	MOVEM	AC,%SV17	;SAVE AC17 CAUSE IT HAS PDP
   321						DMOVE	AC,[XWD 707070,707070
   322							    XWD 070707,070707]	;INITIALIZE TEST WORDS
   323						MOVEM	AC,TSTWD	;TSTWD, TSTWD+1 ARE IN MEMORY JUST
   324						MOVEM	AC+1,TSTWD+1	;AFTER THE FINAL TEST OF THIS PROGRAM
   325						DMOVE	AC,[XWD A,B
   326							    XWD C,D]	;INITIALIZE AC,AC+1
   327						DMOVEM	AC,TSTWD	;*MOVE DOUBLE WORD FROM AC, AC+1
   328									;TO MEMORY (TSTWD, TSTWD+1)
   329						DMOVE	AC,TSTWD	;PUT RESULTS OF TEST IN AC,AC+1 FOR COMPARISON
   330						CAMN	AC,[XWD A,B]	;WAS TSTWD LOADED CORRECTLY?
   331						JRST	.+4		;HERE IF TESTS OK
   332						MOVEM	AC,AC-1		;SAVE BAD WORD
   333						MOVE	AC,%SV17	;RESTORE P
   334						ER5	AC-1,L'1	;FAIL IF CONTENTS(TSTWD) NOT = A,B
   335						CAMN	AC+1,[XWD C,D]	;WAS TSTWD+1 LOADED CORRECTLY?
   336						JRST	.+4		;HERE IF TESTS OK
   337						MOVEM	AC,AC-1		;SAVE BAD WORD
   338						MOVE	AC,%SV17	;RESTORE P
   339						ER6	AC+1,L'2	;FAIL IF CONTENTS(TSTWD+1) NOT = C,D
   340						MOVE	AC,%SV17	;RESTORE AC UNCONDITIONALLY
   341						JUMPL	SAC,Q'L'0	;LOOP ON ERROR SWITCH>
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 10
DBKCCT	MAC	30-JUL-76 12:47		DIAGNOSTIC PARAMETERS                                                              SEQ 0020

   342					DEFINE	DMVNM17	(L,A,B,C,D)	<
   343					;THIS MACRO TESTS THE DMOVNM INSTRUCTION
   344					;FIRST, TSTWD, TSTWD+1 ARE PRELOADED WITH DATA OTHER THAN THE
   345					;TEST WORDS AND AC, AC+1 ARE LOADED WITH THE TEST WORDS.
   346					;THEN, THE NEGATIVE (TWOS COMPLEMENT) OF THE DATA SPECIFIED BY
   347					;[XWD A,B] AND [XWD C,D] IS MOVED FROM AC, AC+1 TO MEMORY
   348					;(TSTWD, TSTWD+1) VIA THE DMOVNM INSTRUCTION.
   349					;C(TSTWD) AND C(TSTWD+1) ARE THEN COMPARED WITH THE
   350					;NEGATIVE (TWOS COMPLEMENT) OF THE TEST
   351					;WORDS [XWD A,B] AND [XWD C,D], RESPECTIVELY.
   352					;THE TEST PASSES IF THESE COMPARISONS AGREE.
   353					
   354					Q'L'0:	DMOVE	AC,[XWD 707070,707070
   355							    XWD 070707,070707]
   356						DMOVEM	AC,TSTWD	;INITIALIZE TEST WORDS
   357						DMOVE	AC,[XWD A,B
   358							    XWD C,D]	;INITIALIZE AC,AC+1
   359						DMOVN	AC+5,[XWD A,B
   360							      XWD C,D]	;SET-UP TO CHECK RESULTS
   361						DMOVNM	AC,TSTWD	;*MOVE NEGATIVE OF DOUBLE WORD FROM AC, AC+1
   362									;TO MEMORY (TSTWD, TSTWD+1)
   363					
   364						DMOVE	AC,TSTWD	;PUT TEST RESULTS IN AC,AC+1
   365						CAMN	AC,<AC+5>&17	;WAS TSTWD LOADED CORRECTLY?
   366						JRST	.+4
   367						MOVEM	AC,AC-1		;SAVE BAD WORD
   368						MOVE	AC,%SV17	;RESTORE P
   369						ER5	AC-1,L'1	;FAIL IF CONTENTS(TSTWD) NOT = COMPLEMENT OF A,B
   370						CAMN	AC+1,<AC+6>&17	;WAS TSTWD+1 LOADED CORRECTLY?
   371						JRST	.+4		;HERE IF TESTS OK
   372						MOVEM	AC,AC-1		;SAVE BAD WORD
   373						MOVE	AC,%SV17
   374						ER6	AC+1,L'2	;FAIL IF CONTENTS(TSTWD) NOT = MINUS C,D
   375						MOVE	AC,%SV17
   376						JUMPL	SAC,Q'L'0	;LOOP ON ERROR SWITCH>
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 11
DBKCCT	MAC	30-JUL-76 12:47		DIAGNOSTIC PARAMETERS                                                              SEQ 0021

   377					DEFINE	DMVNMF	(L,A,B,C,D,KIEF,KIUF,KLEF,KLUF)	<
   378					;**KI10**
   379					;THIS MACRO VERIFIES THAT THE DMOVN INSTRUCTION DOES NOT SET OVERFLOW
   380					;OR CARRY FLAGS ON THE KI10.  FIRST, OVFL AND CRY0,1 FLAGS ARE CLEARED;
   381					;THEN,DMOVN IS EXECUTED.  NEXT, OVFL AND CRY0,1 FLAGS ARE EXAMINED.
   382					;IF ANY OF THESE FLAGS ARE SET, THE TEST FAILS.
   383					
   384					;**KL10**
   385					;THIS MACRO VERIFIES THAT THE DMOVN INSTRUCTION DOES SET OVERFLOW
   386					;OR CARRY FLAGS ON THE KL10.  FIRST, OVFL AND CRY0,1 FLAGS ARE CLEARED;
   387					;THEN,DMOVN IS EXECUTED.  NEXT, OVFL AND CRY0,1 FLAGS ARE EXAMINED.
   388					;IF THE PROPER FLAGS ARE NOT SET, THE TEST FAILS.
   389					
   390					Q'L'0:	JFCL	17,.+1		;CLEAR OVFL AND CRY0,1 FLAGS
   391						DMOVE	AC,[XWD A,B
   392							    XWD C,D]	;SETUP INITIAL
   393						DMOVNM	AC,TSTWD	;*DMOVNM TEST
   394						JSP	AC,.+1		;READ FLAGS
   395					Q'L'1:	TLZ	AC,027777	;CLEAR EXTRA JUNK
   396						TLNE	AC,USERF	;IN USER MODE ?
   397						JRST	Q'L'4		;YES
   398						SKIPE	KLFLG		;KL10 ?
   399						JRST	Q'L'3		;YES
   400					;KI10 EXEC MODE
   401						CAME	AC,[KIEF,,Q'L'1]
   402						ER13	AC,L'1		;FAIL IF OVFL OR CRY0,1 FLG SET
   403					Q'L'2:	JUMPL	SAC,Q'L'0	;LOOP ON ERROR SWITCH
   404						JRST	Q'L'6
   405					;KL10 EXEC MODE
   406					Q'L'3:	CAME	AC,[KLEF,,Q'L'1]
   407						ER13	AC,L'1		;FAIL IF FLAGS NOT SET
   408						JRST	Q'L'2
   409					;KL10/KI10 USER MODE
   410					Q'L'4:	SKIPE	KLFLG		;KL10 ?
   411						JRST	Q'L'5		;YES
   412					;KI10 USER MODE
   413						CAME	AC,[KIUF,,Q'L'1]
   414						ER13	AC,L'1		;FAIL IF ANY FLAGS SET
   415						JRST	Q'L'2
   416					;KL10 USER MODE
   417					Q'L'5:	CAME	AC,[KLUF,,Q'L'1]
   418						ER13	AC,L'1		;FAIL IF FLAGS NOT SET
   419						JRST	Q'L'2
   420					
   421					Q'L'6:	JRST	.+1>
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 1
PARAM	KLM	26-FEB-76		*PARAM*	CONSOLE DATA SWITCH ASSIGNMENTS, FEB 26,1976                               SEQ 0022

   422					SUBTTL	*PARAM*	CONSOLE DATA SWITCH ASSIGNMENTS, FEB 26,1976
   423
   424					DEFINE	S,<;*********************************************************************>
   425
   426					S^;*********************************************************************^
   427					;*DATA SWITCHES (READ FROM CONSOLE IN EXEC MODE OR TYPED IN IN USER MODE)
   428					;*LEFT HALF SWITCHES ARE PRE-ASSIGNED FOR SUBROUTINE PACKAGE USE
   429					;*AND CONTROL LOOPING, PRINTING (TTY OR OTHER DEVICE) AND MISC. FUNCTIONS
   430					S^;*********************************************************************^
   431
   432			400000		ABORT==	400000			;ABORT PROGRAM ON PASS COMPLETION
   433			200000		RSTART==200000			;RESTART TEST, PRINT TOTALS
   434			100000		TOTALS==100000			;PRINT TOTALS, CONTINUE
   435
   436			040000		NOPNT==	040000			;INHIBIT ALL PRINT/TYPE OUT (EXCEPT FORCED)
   437			020000		PNTLPT==020000			;PRINT ALL DATA ON LPT (LOGICAL DEVICE, USER MODE)
   438			010000		DING==	010000			;RING BELL ON ERROR
   439
   440			004000		LOOPER==004000			;ENTER EXERCISE/CHECK LOOP ON ERROR
   441			002000		ERSTOP==002000			;HALT ON TEST ERROR
   442			001000		PALERS==001000			;PRINT ALL ERRORS
   443
   444			000400		RELIAB==000400			;RELIABILITY MODE
   445			000200		TXTINH==000200			;INHIBIT ERROR TEXT
   446			000100		INHPAG==000100			;INHIBIT PAGING
   447
   448			000040		MODDVC==000040			;MODIFY DEVICE CODE
   449			000020		INHCSH==000020			;INHIBIT CACHE
   450			000010		OPRSEL==000010			;OPERATOR SELECTION
   451
   452			000004		CHAIN==	000004			;CHAIN CONTROL SWITCH
   453
   454			000002		KAHZ50==000002			;KA10 50 HERTZ POWER
   455
   456									;SWITCH 17 RESERVED !!!
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 2
PARAM	KLM	26-FEB-76		*PARAM* PROGRAM/SUBROUTINE PARAMETERS, FEB 26,1976                                 SEQ 0023

   457					SUBTTL	*PARAM* PROGRAM/SUBROUTINE PARAMETERS, FEB 26,1976
   458
   459					S^;*********************************************************************^
   460					;*SPECIAL SUBPROGRAM LINKAGES
   461					S^;*********************************************************************^
   462
   463			027772		FSELNK=	27772	;FILE SELECT LINK
   464			027773		FRDLNK=	27773	;FILE READ LINK
   465			027774		LDLNK=	27774	;LOAD LINKAGE ADDRESS
   466			027775		DDTLNK=	27775	;DDT LINKAGE ADDRESS
   467			027776		MODLNK=	27776	;OPERATIONAL MODE CHECK LINKAGE ADDRESS
   468			027777		SUBLNK=	27777	;SUBROUTINE LINKAGE ADDRESS
   469
   470					S^;*********************************************************************^
   471					;*SPECIAL SUBROUTINE FATAL HALTS
   472					;*USED TO REPORT ERRORS THAT CAUSE THE SUBROUTINES TO BE UNUSABLE
   473					S^;*********************************************************************^
   474
   475					;ADDRESS   TAG	REASON
   476					;---------------------
   477
   478					; 1010 	NOEXEC	;PROGRAM NOT CODED FOR EXEC MODE OPERATION
   479					; 1011  PLERR	;FATAL PUSH LIST POINTER ERROR
   480					; 1012  PLERR1	;INITIAL PUSH LIST POINTER ERROR
   481					; 1013  MUOERR	;MUUO WITH LUUO HANDLER WIPED OUT
   482					; 1014  DTEBER	;DTE20 INTERRUPT WITHOUT DOORBELL
   483					; 1015  DTECER	;DTE20 CLOCK INTERRUPT WITHOUT FLAG SET
   484					; 1016  CPIERR	;CPU INITIALIZATION ERROR
   485					; 1017  EOPERR	;END OF PROGRAM ERROR
   486					; 1020  LUOERR	;INTERRUPT WITH LUUO HANDLER WIPED OUT
   487
   488					S^;*********************************************************************^
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 3
PARAM	KLM	26-FEB-76		*PARAM* PROGRAM/SUBROUTINE PARAMETERS, FEB 26,1976                                 SEQ 0024

   489					S^;*********************************************************************^
   490					;OPERATOR DEFINITIONS (NON-UUO'S)
   491					S^;*********************************************************************^
   492
   493		260740	000000		OPDEF	GO	[PUSHJ	P,]	;SUBROUTINE CALL
   494		263740	000000		OPDEF	RTN	[POPJ	P,]	;SUBROUTINE RETURN 
   495		261740	000000		OPDEF	PUT	[PUSH	P,]	;PUT DATA ON PUSH LIST
   496		262740	000000		OPDEF	GET	[POP	P,]	;GET DATA FROM PUSH LIST 
   497		254000	000000		OPDEF	PJRST	[JRST	]	;JRST TO ROUTINE THAT RTN'S
   498		254200	000000		OPDEF	HALT	[JRST	4,]	;DEFINITION FOR DDT
   499		254100	000000		OPDEF	JRSTF	[JRST	2,]	;DEFINITION FOR DDT
   500		254500	000000		OPDEF	JEN	[JRST	12,]	;DEFINITION FOR DDT
   501
   502					S^;*********************************************************************^
   503					;*SUBROUTINE INITIALIZATION CALL
   504					S^;*********************************************************************^
   505
   506		265000	030011		OPDEF	PGMINT	[JSP	0,SBINIT]	;SUBROUTINE INITIALIZATION
   507
   508					S^;*********************************************************************^
   509					;*HALTING UUO'S (A MORE GRACEFUL HALT THAN SIMPLY USING THE HALT INSTRUCTION).
   510					S^;*********************************************************************^
   511
   512		037640	000004		OPDEF	FATAL	[37B8!15B12!4]	;FATAL PROGRAMMING HALT
   513		037600	000004		OPDEF	ERRHLT	[37B8!14B12!4]	;PROGRAM ERROR HALT
   514
   515					S^;*********************************************************************^
   516					;*TERMINAL INPUT UUO'S
   517					;*ALWAYS COME FROM THE CONSOLE TERMINAL IN EXEC MODE OR THE
   518					;*CONTROLLING TERMINAL (REAL TERMINAL OR PTY) IN USER MODE.
   519					S^;*********************************************************************^
   520
   521		037000	000003		OPDEF	TTICHR 	[37B8!0B12!3]	;TTY, INPUT ANY CHARACTER
   522		037040	000003		OPDEF	TTIYES	[37B8!1B12!3]	;TTY, NORMAL RETURN Y
   523		037100	000003		OPDEF	TTINO	[37B8!2B12!3]	;TTY, NORMAL RETURN N
   524		037140	000003		OPDEF	TTIOCT	[37B8!3B12!3]	;TTY, INPUT OCTAL WORD
   525		037200	000003		OPDEF	TTIDEC	[37B8!4B12!3]	;TTY, INPUT DECIMAL WORD
   526		037240	000003		OPDEF	TTICNV	[37B8!5B12!3]	;TTY, INPUT CONVERTABLE WORD
   527		037300	000003		OPDEF	TTLOOK	[37B8!6B12!3]	;TTY, KEYBOARD CHECK
   528		037340	000003		OPDEF	TTALTM	[37B8!7B12!3]	;TTY, ALT-MODE CHECK
   529		037400	000003		OPDEF	TTSIXB	[37B8!10B12!3]	;TTY, INPUT SIXBIT WORD
   530		037440	000003		OPDEF	TTYINP	[37B8!11B12!3]	;TTY, IMAGE MODE INPUT
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 4
PARAM	KLM	26-FEB-76		*PARAM* PROGRAM/SUBROUTINE PARAMETERS, FEB 26,1976                                 SEQ 0025

   531					;*TERMINAL OUTPUT UUO'S.
   532
   533		037000	000000		OPDEF	PNTA	[37B8!0B12!0]	;PRINT ASCII WORD
   534		037000	000001		OPDEF	PNTAF	[37B8!0B12!1]	;PRINT ASCII WORD FORCED
   535		037740	000000		OPDEF	PNTAL	[37B8!17B12!0]	;PRINT ASCIZ LINE
   536		037740	000001		OPDEF	PNTALF	[37B8!17B12!1]	;PRINT ASCIZ LINE FORCED
   537		037600	000003		OPDEF	PSIXL	[37B8!14B12!3]	;PRINT SIXBIT'Z LINE
   538		037640	000003		OPDEF	PSIXLF	[37B8!15B12!3]	;PRINT SIXBIT'Z LINE FORCED
   539		037000	000000		OPDEF	PNTMSG	[37B8!0B12!0]	;PRINT MESSAGE IMMEDIATE
   540		037040	000000		OPDEF	PNTMSF	[37B8!1B12!0]	;PRINT MESSAGE IMMEDIATE FORCED
   541		037100	000000		OPDEF	PSIXM	[37B8!2B12!0]	;PRINT SIXBIT'Z MSG IMMEDIATE
   542		037200	000000		OPDEF	PSIXMF	[37B8!4B12!0]	;PRINT SIXBIT'Z MSG IMM FORCED
   543		037000	000000		OPDEF	PNTCI	[37B8!0B12!0]	;PRINT CHARACTER IMMEDIATE
   544		037040	000000		OPDEF	PNTCIF	[37B8!1B12!0]	;PRINT CHARACTER IMMEDIATE FORCED
   545		037500	000000		OPDEF	PNTCHR	[37B8!12B12!0]	;PRINT CHARACTER
   546		037500	000001		OPDEF	PNTCHF	[37B8!12B12!1]	;PRINT CHARACTER FORCED
   547		037040	000000		OPDEF	PNT1	[37B8!1B12!0]	;PRINT ONE OCTAL DIGIT
   548		037040	000001		OPDEF	PNT1F	[37B8!1B12!1]	;PRINT 1 OCTAL DIGIT FORCED	
   549		037100	000000		OPDEF	PNT2	[37B8!2B12!0]	;PRINT TWO OCTAL DIGITS
   550		037100	000001		OPDEF	PNT2F	[37B8!2B12!1]	;PRINT 2 OCTAL DIGITS FORCED	
   551		037140	000000		OPDEF	PNT3	[37B8!3B12!0]	;PRINT THREE OCTAL DIGITS
   552		037140	000001		OPDEF	PNT3F	[37B8!3B12!1]	;PRINT THREE OCTAL DIGITS FORCED	
   553		037200	000000		OPDEF	PNT4	[37B8!4B12!0]	;PRINT FOUR OCTAL DIGITS
   554		037200	000001		OPDEF	PNT4F	[37B8!4B12!1]	;PRINT FOUR OCTAL DIGITS FORCED
   555		037240	000000		OPDEF	PNT5	[37B8!5B12!0]	;PRINT FIVE OCTAL DIGITS
   556		037240	000001		OPDEF	PNT5F	[37B8!5B12!1]	;PRINT FIVE OCTAL DIGITS FORCED
   557		037300	000000		OPDEF	PNT6	[37B8!6B12!0]	;PRINT SIX OCTAL DIGITS
   558		037300	000001		OPDEF	PNT6F	[37B8!6B12!1]	;PRINT SIX OCTAL DIGITS FORCED
   559		037340	000000		OPDEF	PNT7	[37B8!7B12!0]	;PRINT 7 OCTAL DIGITS
   560		037340	000001		OPDEF	PNT7F	[37B8!7B12!1]	;PRINT 7 OCTAL DIGITS FORCED
   561		037440	000000		OPDEF	PNT11	[37B8!11B12!0]	;PRINT 11 OCTAL DIGITS
   562		037440	000001		OPDEF	PNT11F	[37B8!11B12!1]	;PRINT 11 OCTAL DIGITS FORCED.
   563		037400	000000		OPDEF	PNTADR	[37B8!10B12!0]	;PRINT PHYSICAL ADDRESS
   564		037400	000001		OPDEF	PNTADF	[37B8!10B12!1]	;PRINT PHYSICAL ADDRESS FORCED
   565		037600	000000		OPDEF	PNTOCT  [37B8!14B12!0]	;PRINT FULL WORD OCTAL
   566		037600	000001		OPDEF	PNTOTF	[37B8!14B12!1]	;PRINT FULL WORD OCTAL FORCED
   567		037540	000000		OPDEF	PNTHW	[37B8!13B12!0]	;PRINT OCTAL HALF WORDS, 6 SP 6
   568		037540	000001		OPDEF	PNTHWF	[37B8!13B12!1]	;PRINT OCTAL HALF WORDS, 6 SP 6 FORCED
   569		037700	000003		OPDEF	PNTOCS	[37B8!16B12!3]	;PRINT OCTAL, SUPPRESS LEADING 0'S
   570		037740	000003		OPDEF	PNTOCF	[37B8!17B12!3]	;PRINT OCTAL, SUPPRESS LEADING 0'S FORCED
   571		037640	000000		OPDEF	PNTDEC	[37B8!15B12!0]	;PRINT DECIMAL, SUPRESS LEADING 0'S
   572		037640	000001		OPDEF	PNTDCF	[37B8!15B12!1]	;PRINT DECIMAL, SUPRESS LEADING 0'S FORCED
   573		037700	000000		OPDEF	PNTDS	[37B8!16B12!0]	;PRINT DECIMAL, SPACES FOR LD 0'S
   574		037700	000001		OPDEF	PNTDSF	[37B8!16B12!1]	;PRINT DECIMAL, SPACES FOR LD 0'S FORCED
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 5
PARAM	KLM	26-FEB-76		*PARAM* PROGRAM/SUBROUTINE PARAMETERS, FEB 26,1976                                 SEQ 0026

   575		037200	000002		OPDEF	PNTNM	[37B8!4B12!2]	;PRINT PROGRAM NAME
   576		037000	000002		OPDEF	PNTSIX	[37B8!0B12!2]	;PRINT SIXBIT WORD
   577		037040	000002		OPDEF	PNTSXF	[37B8!1B12!2]	;PRINT SIXBIT WORD FORCED
   578		037240	000002		OPDEF	DROPDV	[37B8!5B12!2]	;CLOSE LOGICAL FILE, USER MODE
   579		037100	000002		OPDEF	PNTCW	[37B8!2B12!2]	;PRINT DF10 CONTROL WORD
   580		037140	000002		OPDEF	PNTCWF	[37B8!3B12!2]	;PRINT DF10 CONTROL WORD FORCED
   581		037000	030242		OPDEF	PCRL	[37B8!0B12!CRLF] ;PRINT CARRIAGE RETURN/LINE FEED
   582		037040	030242		OPDEF	PCRLF	[37B8!1B12!CRLF] ;PRINT CARRIAGE RETURN/LINE FEED FORCED
   583		037000	000040		OPDEF	PSP	[37B8!0B12!40]	;PRINT SPACE
   584		037040	000040		OPDEF	PSPF	[37B8!1B12!40]	;PRINT SPACE FORCED
   585		037000	030243		OPDEF	PCRL2	[37B8!0B12!CRLF2] ;PRINT CARRIAGE RETURN/LINE FEED (TWICE)
   586		037040	030243		OPDEF	PCRL2F	[37B8!1B12!CRLF2] ;PRINT CARRIAGE RETURN/LINE FEED (TWICE) FORCED
   587		037040	000007		OPDEF	PBELL	[37B8!1B12!7]	;PRINT TTY BELL
   588
   589		037040	000026		OPDEF	PFORCE	[37B8!1B12!26]	;PRINT FORCE, CONTROL O OVERRIDE
   590
   591					DEFINE	PMSG	(ARG),<
   592						PSIXM	[SIXBIT\ARG'_\]>
   593
   594					DEFINE	PMSGF	(ARG),<
   595						PSIXMF	[SIXBIT\ARG'_\]>
   596
   597					;*SIXBTZ -- MACRO TO GENERATE SIXBIT DATA FOR PRINTING
   598					;*	CONSERVES CORE OVER ASCIZ
   599
   600					DEFINE	SIXBTZ	(ARG),<	[SIXBIT\ARG'_\]>
   601
   602					;*CONSOLE SWITCH INPUT UUO.
   603					;*READS CONSOLE SWITCHES IF IN EXEC MODE OR ASKS FOR THEM IF
   604					;* USER MODE.
   605
   606		037400	000002		OPDEF	SWITCH	[37B8!10B12!2]	;INPUT CONSOLE SWITCHES
   607
   608					;*CLOCK INITIALIZATION UUO - TO SET DESIRED CLOCK OPERATION
   609					;*EITHER IGNORE CLOCK, ONLY LET IT TICK OR CAUSE INTERRUPT TO OCCUR.
   610
   611		037540	000004		OPDEF	CLOKOP	[37B8!13B12!4]	;CLOCK OPERATION UUO - PDP-11 CLOCK
   612		037200	000004		OPDEF	MTROP	[37B8!4B12!4]	;CLOCK OPERATION UUO - DK20 METER
   613
   614					;*KL10 ONLY CACHE OPERATION UUO'S
   615
   616		037040	000004		OPDEF	CINVAL	[37B8!1B12!4]	;CACHE INVALIDATE
   617		037100	000004		OPDEF	CFLUSH	[37B8!2B12!4]	;CACHE FLUSH
   618		037140	000004		OPDEF	CWRTBI	[37B8!3B12!4]	;CACHE WRITE-BACK & INVALIDATE
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 6
PARAM	KLM	26-FEB-76		*PARAM* PROGRAM/SUBROUTINE PARAMETERS, FEB 26,1976                                 SEQ 0027

   619					;*END OF PASS/PROGRAM UUOS
   620
   621					;PERFORMS THE END OF PASS FUNCTIONS. INCREMENT PASS COUNT,
   622					;*DECREMENT ITERATION COUNT, CHECK IF FINISHED WITH THIS PROGRAM ETC.
   623
   624		037500	000004		OPDEF	ENDUUO	[37B8!12B12!4]	;UUO TO DISPLAY LIGHTS
   625		037700	000004		OPDEF	EOPUUO	[37B8!16B12!4]	;END OF PROGRAM UUO
   626
   627					;*MEMORY MANAGEMENT UUO'S
   628					;*UUO'S TO PERFORM VARIOUS MEMORY FUNCTIONS. MAPPING, ZEROING, PAGING,
   629					;*ADDRESS CONVERSION, ETC...
   630
   631		037000	000004		OPDEF	MAPMEM	[37B8!0B12!4]	;MAP MEMORY
   632		037500	000002		OPDEF	MEMZRO	[37B8!12B12!2]	;ZERO MEMORY
   633		037440	000002		OPDEF	MEMSEG	[37B8!11B12!2]	;SETUP MEMORY SEGMENT
   634		037540	000002		OPDEF	MAPADR	[37B8!13B12!2]	;VIRTUAL TO PHYSICAL ADR CONVERT
   635		037640	000002		OPDEF	MAPCNK	[37B8!15B12!2]	;MAP MEMORY CHUNK
   636		037600	000002		OPDEF	MAPSET	[37B8!14B12!2]	;SET KI10 EXEC PAGE MAP
   637		037740	000002		OPDEF	MAPPNT	[37B8!17B12!2]	;PRINT MEMORY MAP
   638
   639					;*DEVICE CODE MODIFICATION UUO
   640					;*ALLOWS THE MODIFICATION OF IOT'S TO ONE DEVICE TO BE CHANGED TO
   641					;*IOT'S TO A DIFFERENT DEVICE CODE.
   642
   643		037340	000002		OPDEF	MODPCU	[37B8!7B12!2]	;MODIFY PERHIPERAL CODE, USER
   644		037300	000002		OPDEF	MODPCP	[37B8!6B12!2]	;MODIFY PERHIPERAL CODE, PROGRAM
   645
   646						IFNDEF	MODDVL,<MODDVL==BEGIN>
   647						IFNDEF	MODDVU,<MODDVU==BEGIN>
   648
   649					;*"DIAMON" FILE SELECTION AND READ UUOS
   650
   651		037240	000004		OPDEF	FSELECT	[37B8!5B12!4]	;FILE SELECTION
   652		037300	000004		OPDEF	FREAD	[37B8!6B12!4]	;FILE READ - ASCII DATA
   653		037340	000004		OPDEF	FRD36	[37B8!7B12!4]	;FILE READ - 36 BIT DATA
   654		037400	000004		OPDEF	FRD8	[37B8!10B12!4]	;FILE READ - 8 BIT DATA
   655
   656					;*KI10 ONLY UUO FOR PRINTING MARGIN VALUES
   657
   658		037700	000002		OPDEF	PNTMGN	[37B8!16B12!2]	;PRINT MARGIN VALUE
   659
   660						XLIST
   661						LIST
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 1
FIXED	KLM	26-FEB-76		*FIXED* FIXED CONTROL AND DISPATCH STORAGE, FEB 26,1976                            SEQ 0028

   662					SUBTTL	*FIXED* FIXED CONTROL AND DISPATCH STORAGE, FEB 26,1976
   663
   664	030000					LOC	30000
   665
   666					S^;*********************************************************************^
   667					;*PROGRAM STARTING ADDRESSES
   668					;*THESE ADDRESSES CALL VARIOUS SPECIAL START ROUTINES AND OR OPTIONS
   669					;*NORMAL START ADDRESS IS 30000 ALL OTHERS ARE SPECIAL. INVOKED BECAUSE
   670					;*OF END OF PASS, POWER FAILURE, DDT START, RE-ENTERING(TYPICALLY USER
   671					;*MODE), OR ANY NUMBER OF SPECIAL FEATURE TESTS.
   672					S^;*********************************************************************^
   673
   674	030000	254 00 1 00 027776 	BEGIN:	JRST	@MODLNK		;STAND-ALONE START
   675	030001	254 00 0 00 030616 	$START:	JRST	START		;MODE CHECK STARTING ADDRESS
   676
   677	030002	254 00 1 00 027774 	DIAGMN:	JRST	@LDLNK		;DIAGNOSTIC MONITOR START
   678
   679	030003	254 00 1 00 027774 	SYSEXR:	JRST	@LDLNK		;SYSTEM EXERCISER START
   680
   681	030004	254 00 0 00 030000 	SFSTRT:	JRST	SADR1		;SPECIAL FEATURE START
   682
   683	030005	254 00 0 00 030076 	PFSTRT:	JRST	SADR2		;POWER FAIL RESTART
   684
   685	030006	254 00 0 00 030600 	REENTR:	JRST	SADR3		;REENTER START(USUALLY USER MODE ONLY)
   686
   687	030007				SRTDDT:				;COMMONLY MISTAKEN NAME FOR "DDTSRT"
   688	030007	254 00 1 00 027775 	DDTSRT:	JRST	@DDTLNK		;DDT START
   689
   690	030010	254 00 0 00 030621 	BEGIN1:	JRST	STARTA		;LOOP START(END OF PASS COMES HERE)
   691	030011	254 00 1 00 027777 	SBINIT:	JRST	@SUBLNK		;PMGINT LINKAGE
   692	030012	000000	000000		RETURN:	0			;RETURN ADDRESS STORAGE
   693
   694	030013	000000	000000		START1:	SADR7			;OPTIONAL STARTING ADR/INSTRUCTIONS
   695	030014	000000	000000		START2:	SADR8			; "
   696	030015	000000	000000		START3:	SADR9			; "
   697	030016	000000	000000		START4:	SADR10			; "
   698	030017	000000	000000		START5:	SADR11			; "
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 2
FIXED	KLM	26-FEB-76		*FIXED* FIXED CONTROL AND DISPATCH STORAGE, FEB 26,1976                            SEQ 0029

   699					S^;*********************************************************************^
   700					;*PROGRAM FIXED PARAMETER AREA
   701					S^;*********************************************************************^
   702
   703	030020	444253	434300		PNTNAM:	PAREA3		;SIXBIT PROGRAM NAME
   704	030021	605664	000000		PNTEXT:	PAREA4		;SIXBIT PROGRAM EXTENSION
   705	030022	000000	000000		RANDBS:	PAREA1		;RANDOM BASE NUMBER
   706	030023	000000	000000		SWTEXR:	PAREA2		;SYSTEM EXERCISER SWITCHES
   707	030024	000000	001000		ITRCNT:	ITERAT		;PROGRAM ITERATIONS
   708	030025	000000	030602		$PNAME:	PGMNAM		;POINTER TO PROGRAMS NAME
   709	030026	000000	000003		$PVER:	MCNVER,,DECVER	;MCN & DEC VERSION LEVEL
   710	030027	000000	030000		$MODVL:	MODDVL		;DEVICE CODE CHANGE LOWER LIMIT
   711	030030	000000	030000		$MODVU:	MODDVU		;DEVICE CODE CHANGE UPPER LIMIT
   712	030031	777777	777777		$EMODE:	IFNDEF EXCASB,<0> IFDEF EXCASB,<-1>	;EXEC ALLOWED
   713	030032	777777	777777		$UMODE:	IFNDEF USRASB,<0> IFDEF USRASB,<-1>	;USER ALLOWED
   714	030033	000000	000000		$DSKUP:	IFNDEF DSKUPD,<0> IFDEF DSKUPD,<-1>	;DISK UPDATE MODE
   715	030034	000000	000000		$MMAP:	IFNDEF MEMMAP,<0> IFDEF MEMMAP,<-1>	;ALLOW MEMORY RTNS
   716	030035	000000	000000		PAREA7:	PAREA5		;OPTIONAL PARAMETER
   717	030036	000000	000000		PAREA8:	PAREA6		;OPTIONAL PARAMETER
   718
   719					S^;*********************************************************************^
   720					;*PROGRAM VARIABLE PARAMETER AREA
   721					S^;*********************************************************************^
   722
   723	030037	000000	000000		USER:	0		; 0 = EXEC, -1 = USER MODE FLAG
   724	030040	000000	000000		KAIFLG:	0		;PROCESSOR TYPE, 0 = KA10, -1 = KI10
   725	030041	000000	000000		KLFLG:	0		;PROCESSOR TYPE, 0 = KA/KI, -1 = KL10
   726	030042	777777	777777		MONFLG:	-1		;DIAG MONITOR SPECIAL USER FLAG
   727	030043	000000	000000		MONCTL:	0		;DIAG MON/SYS EXR FLAG
   728	030044	000000	000000		MONTEN:	0		;-1= LOADED BY 10
   729	030045	000000	000000		CLOCKF:	0		;CLOCK TICKED FLAG
   730	030046	000000	000000		CONSW:	0		;CONSOLE SWITCH SETTINGS
   731	030047	000000	000000		PASCNT:	0		;PROGRAM PASS COUNT
   732	030050	000000	000000		RUNFLG:	0		;PROGRAM RUN FLAG
   733	030051	000000	000000		TESTPC:	0		;SUBTEST PC
   734	030052	000000	000000		ERRPC:	0		;ERROR PC
   735	030053	000000	000000		ERRTLS:	0		;ERROR TOTALS
   736	030054	000000	000000		TICKS:	0		;PROGRAM RUNNING TIME
   737	030055	000000	000000		MARGIN:	0		;KI10 MARGIN WORD VALUE
   738	030056	000000	000000		$ONETM:	0		;SUBROUTINE INITIALIZATION FLAG
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 3
FIXED	KLM	26-FEB-76		*FIXED* FIXED CONTROL AND DISPATCH STORAGE, FEB 26,1976                            SEQ 0030

   739					S^;*********************************************************************^
   740					;*SPECIAL PROGRAM DISPATCH ADDRESSES
   741					S^;*********************************************************************^
   742
   743	030057	037 12 0 00 000004 	BEGEND:	ENDUUO		;END OF PASS
   744	030060	254 00 0 00 030010 	$BEND1:	JRST	BEGIN1	;KEEP RUNNING PROGRAM
   745	030061	037 16 0 00 000004 	$BEND2:	EOPUUO		;END OF PROGRAM - NO RETURN
   746	030062	000000	030000		CNTLC:	SADR5		;CONTROL C XFER ADDRESS
   747	030063	000000	030000		ALTMGO:	SADR6		;ALTMODE XFER ADDRESS
   748	030064				CPOPJ1:			;SKIP RETURN
   749	030064	350 00 0 17 000000 	UUOSKP:	AOS	(P)	;SKIP RETURN FROM UUO
   750	030065				CPOPJ:			;NON-SKIP REGULAR RETURN
   751	030065	263 17 0 00 000000 	UUOEXT:	RTN		;UUO RETURN
   752	030066	255 00 0 00 000000 	UUORTN:	JFCL		;ADDITIONAL USERS UUO ROUTINE
   753	030067	255 00 0 00 000000 	$UORTX:	JFCL		;ADDITIONAL UUO LINKAGE
   754	030070	255 00 0 00 000000 	$UUOER:	JFCL		;INITED AS (JRST $UOERX)
   755	030071	255 00 0 00 000000 	$ITRHL:	JFCL		;ADDITIONAL INTERRUPT LINKAGE
   756	030072	255 00 0 00 000000 	$ITRX1:	JFCL		; "
   757	030073	255 00 0 00 000000 	$USRHL:	JFCL		; "
   758	030074	255 00 0 00 000000 	$RSRTX:	JFCL		;ADDITIONAL POWER FAIL LINKAGE
   759	030075	255 00 0 00 000000 	$RSRTY:	JFCL		; "
   760	030076	255 00 0 00 000000 	RESRT1:	JFCL		; INITED AS (JRST RESRTX)
   761	030077	255 00 0 00 000000 	RESRT2:	JFCL		; "
   762	030100	255 00 0 00 000000 	$PARER:	JFCL		;ADDITIONAL PARITY ERROR LINKAGE
   763	030101	255 00 0 00 000000 	ERMORE:	JFCL		;ADDITIONAL ERROR HANDLER LINKAGE
   764	030102	254 04 0 00 030102 		HALT	.	;IMPROPER TRANSFER HALT
   765
   766	030103	000000	000000		$PSHER:	0		;INITED AS (JRST PSHERR)
   767	030104	000000	000000		ITRCH1:	0		;PC & FLAGS OF CURRENT INTERRUPT
   768	030105	000000	000000			0		;INITED AS (JRST $ITRC1)
   769
   770					S^;*********************************************************************^
   771					;*PROCESSOR CONTROL STORAGE
   772					S^;*********************************************************************^
   773
   774	030106	000000	000000		$ACC0:	0		;INTERRUPT SAVED AC0
   775	030107	000000	000000		$SVPI:	0		;INTERRUPT SAVED PI
   776	030110	000000	000000		$SVAPR:	0		;INTERRUPT SAVED APR
   777	030111	000000	000000		$SVPAG:	0		;INTERRUPT SAVED PAG (DATAI)
   778	030112	000000	000000		$SPAG1:	0		;INTERRUPT SAVED PAG (CONI)
   779
   780	030113	000000	000000		$SVUUO:	0		;CURRENT USERS UUO
   781	030114	000000	000000		$SVUPC:	0		;PC OF CURRENT USERS UUO
   782
   783	030115	000000	000000		REPTU:	0		;REPEAT UUO ITERATIONS
   784	030116	000000	000000		SCOPE:	0		;ERROR HANDLER SCOPE LOOP FLAG
   785	030117	000000	000000		%CORFLG:0		; " CORRECT FLAG
   786	030120	000000	000000		%COREC:	0		; " CORRECT DATA
   787	030121	000000	000000		%ACTFL:	0		; " ACTUAL FLAG
   788	030122	000000	000000		%ACTUL:	0		; " ACTUAL DATA
   789	030123	000000	000000		%DISCR:	0		; " DISCREPENCY DATA
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 4
FIXED	KLM	26-FEB-76		*FIXED* FIXED CONTROL AND DISPATCH STORAGE, FEB 26,1976                            SEQ 0031

   790					S^;*********************************************************************^
   791					;*UUO DISPATCH TABLE
   792					S^;*********************************************************************^
   793						XLIST
   794						LIST
   795	030124	036526	030070		UUODIS:	LUUO1,,$UUOER
   796	030125	036526	036526			LUUO3,,LUUO2
   797	030126	036526	036526			LUUO5,,LUUO4
   798	030127	036526	036526			LUUO7,,LUUO6
   799	030130	036526	036526			LUUO11,,LUUO10
   800	030131	036526	036526			LUUO13,,LUUO12
   801	030132	030070	030070			LUUO15,,LUUO14
   802	030133	030070	030070			LUUO17,,LUUO16
   803	030134	030070	030070			LUUO21,,LUUO20
   804	030135	030070	030070			LUUO23,,LUUO22
   805	030136	030070	030070			LUUO25,,LUUO24
   806	030137	030070	030070			LUUO27,,LUUO26
   807	030140	030070	030070			LUUO31,,LUUO30
   808	030141	030070	030070			LUUO33,,LUUO32
   809
   810					S^;*********************************************************************^
   811					;*MEMORY MANAGMENT STORAGE
   812					S^;*********************************************************************^
   813
   814	030142	000000	000000		DF22F:	0		;DF10 CONTROL FLAG, 0 = 18, -1 = 22 BIT
   815	030143	000000	000000		MAPNEW:	0		;MEMORY MAPPING CONTROL FLAG, -1 = 4096K MAPPING
   816	030144	000000	000000		MEMTOT:	0		;TOTAL MEMORY SIZE IN K (1024.)
   817	030145	000000	000000		MEMLOW:	0		;LOWEST USABLE MEMORY
   818	030146				MEMSIZ:	BLOCK ^D41	;MEMORY SEGMENT POINTER TABLE
   819
   820					S^;*********************************************************************^
   821					;*PRINT CONTROL STORAGE
   822					S^;*********************************************************************^
   823
   824	030217	000000	000000		PNTFLG:	0		;PRINT FLAG, -1 WHILE IN PRINT ROUTINE
   825	030220	000000	000000		PNTENB:	0		;PRINT ENABLE
   826	030221	000000	000000		PDISF:	0		;PRINT DISABLED FLAG
   827	030222	000000	000000		PNTINH:	0		;INHIBIT PRINT INPUT CHECKS
   828	030223	000000	000000		PNTSPC:	0		;PRINT SPACE CONTROL
   829	030224	000000	000000		OPTIME:	0		;TYPE-IN WAIT TIME
   830	030225	000000	000000		$TWCNT:	0		;TIME WAITED
   831	030226	000000	000000		$DVOFF:	0		;LOGICAL DEVICE INITED FLAG
   832	030227	000000	000000		TTYFIL:	0		;TTY EXEC FILLERS FLAG
   833	030230	000000	000000		TTYSPD:	0		;TTY EXEC BAUD RATE
   834	030231	000000	000000		$TTCHR:	0		;ACTUAL TYPED IN CHAR
   835	030232	000000	000000		$CHRIN:	0		;UPPER CASED & PARITY STRIPPED CHAR
   836	030233	000000	000000		$TYPNB:	0		;TYPED IN NUMBER
   837	030234	000000	000000		$CRLF:	0		;FREE CR/LF FLAG
   838	030235	000000	000000		$TABF:	0		;TAB CONVERSION FLAG
   839	030236	000000	000000		$FFF:	0		;FORM FEED CONVERSION FLAG
   840	030237	000000	000000		$VTF:	0		;VERTICAL TAB CONVERSION FLAG
   841	030240	000000	000000		USRLFF:	0		;USER LF FILLERS
   842	030241	000000	000000		USRCRF:	0		;USER CR FILLERS
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 5
FIXED	KLM	26-FEB-76		*FIXED* FIXED CONTROL AND DISPATCH STORAGE, FEB 26,1976                            SEQ 0032

   843					S^;*********************************************************************^
   844					;*THE FOLLOWING MISCELLANEOUS PRINT CHARACTERS ARE INCLUDED
   845					;*TO FACILITATE PRINTING AND ARE CALLED AS FOLLOWS:
   846					;*	MOVEI	NAME
   847					;*	PNTA		;OR PNTAF
   848					S^;*********************************************************************^
   849
   850	030242				CRLF:	ASCII/
   851	030242	015 012 000 000 000 	/
   852	030243				CRLF2:	ASCII/
   853
   854	030243	015 012 015 012 000 	/
   855	030244	054 000 000 000 000 	COMMA:	ASCII/,/
   856	030245	056 000 000 000 000 	PERIOD:	ASCII/./
   857	030246	040 000 000 000 000 	SPACE:	ASCII/ /
   858	030247	011 000 000 000 000 	TAB:	ASCII/	/
   859	030250				MINUS:
   860	030250	055 000 000 000 000 	HYPEN:	ASCII/-/
   861	030251	053 000 000 000 000 	PLUS:	ASCII/+/
   862	030252	052 000 000 000 000 	AST:	ASCII/*/
   863	030253	100 000 000 000 000 	ATSIN:	ASCII/@/
   864	030254	050 000 000 000 000 	LFP:	ASCII/(/
   865	030255	051 000 000 000 000 	RTP:	ASCII/)/
   866	030256	007 0000000000 		BELL:	BYTE (7) 007
   867	030257	077 000 000 000 000 	QUEST:	ASCII/?/
   868	030260	057 000 000 000 000 	SLASH:	ASCII!/!
   869	030261	044 000 000 000 000 	DOLLAR:	ASCII/$/
   870	030262	000000	000012		RADIX:	^D10			;DECIMAL PRINT RADIX
   871	030263	000000	000040		RADLSP:	40			;DECIMAL PRINT LEADING CHAR
   872	030264	000000	000012		RADLSC:	^D10			;DECIMAL PRINT LEADING CHAR COUNT
   873
   874					S^;*********************************************************************^
   875					;*USER MODE OUTPUT FILE INFORMATION
   876					S^;*********************************************************************^
   877
   878	030265				$OBUF:	BLOCK	3		;LOGICAL FILE OUTPUT BUFFER HEADER
   879	030270	60 62 51 56 64 00 	$OUTNM:	SIXBIT	/PRINT/		;FILE NAME
   880	030271	60 56 64 00 00 00 	$OUTEX:	SIXBIT	/PNT/		;FILE NAME EXTENSION
   881	030272					BLOCK	2
   882
   883					S^;*********************************************************************^
   884					;*DISK UPDATE MODE FILE INFORMATION
   885					S^;*********************************************************************^
   886
   887	030274				$IBUF:	BLOCK	3
   888	030277	60 62 51 56 64 00 	$INNM:	SIXBIT	/PRINT/
   889	030300	60 56 64 00 00 00 	$INEXT:	SIXBIT	/PNT/
   890	030301					BLOCK	2
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 6
FIXED	KLM	26-FEB-76		*FIXED* FIXED CONTROL AND DISPATCH STORAGE, FEB 26,1976                            SEQ 0033

   891					S^;*********************************************************************^
   892					;*PUSHDOWN LIST CONTROL INFORMATION
   893					S^;*********************************************************************^
   894
   895	030303	777577	030303		PLIST:	PLIST-PLISTE,,PLIST
   896	030304				PLISTS:	BLOCK	200
   897	030504	000000	000000		PLISTE:	0		;END OF PUSHDOWN LIST
   898
   899					S^;*********************************************************************^
   900					;*POWER LINE CLOCK FREQUENCY FLAG
   901					S^;*********************************************************************^
   902
   903	030505	000000	000000		CYCL60:	0	;0 = 60, -1 = 50 CYCLE
   904
   905					S^;*********************************************************************^
   906					;*KL10 CACHE CONTROL FLAGS
   907					S^;*********************************************************************^
   908
   909	030506	000000	000000		CSHFLG:	0	;ALLOW CACHE IF 0
   910	030507	000000	000000		CSHMEM:	0	;CACHE MEMORY SEGMENTS IF 0
   911
   912					S^;*********************************************************************^
   913					;*NUMBER INPUT DIGIT FLAG
   914					S^;*********************************************************************^
   915
   916	030510	000000	000000		TTNBRF:	0	;-1 IF ANY DIGIT TYPED
   917
   918					S^;*********************************************************************^
   919					;*KL10 & KI10 "INHPAG" SWITCH PAGING PREVENTION
   920					S^;*********************************************************************^
   921
   922	030511	000000	000000		PVPAGI:	0	;IF NON-ZERO, OVERRIDE "INHPAG" SWITCH ACTION
   923
   924					S^;*********************************************************************^
   925					;*ERROR REPORTING ROUTINE ADDITIONAL USERS CONTROL INSTRUCTIONS
   926					S^;*********************************************************************^
   927
   928	030512	000000	000000		%ERHI1:	0	;IF NON-ZERO, XCT'D AT START OF %ERUUO
   929	030513	000000	000000		%ERHI2:	0	;IF NON-ZERO, XCT'D AT END OF %ERUUO
   930	030514	000000	000000		%ERHI3:	0	;IF NON-ZERO, XCT'D AFTER "PC" OF %ERUUO
   931
   932					S^;*********************************************************************^
   933					;*SPECIAL USERS UUO INTERCEPT INSTRUCTION
   934					S^;*********************************************************************^
   935
   936	030515	000000	000000		$$UUO:	0	;IF NON-ZERO, XCT'D AT START OF $UORTN
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 7
FIXED	KLM	26-FEB-76		*FIXED* FIXED CONTROL AND DISPATCH STORAGE, FEB 26,1976                            SEQ 0034

   937					S^;*********************************************************************^
   938					;*KL10 PROCESSOR TYPE FLAG, 0=P0, 1=BBD NEW, 2=BBD OLD
   939					S^;*********************************************************************^
   940
   941	030516	000000	000000		KLTYP:	0
   942
   943					S^;*********************************************************************^
   944					;*SPECIAL USERS MUUO INTERCEPT INSTRUCTION
   945					S^;*********************************************************************^
   946
   947	030517	000000	000000		$$MUUO:	0	;IF NON-ZERO, XCT'D AT START OF MUUOER
   948
   949					S^;*********************************************************************^
   950					;*SPECIAL USERS USER MODE OUTPUT ERROR INTERCEPT INSTUCTION
   951					S^;*********************************************************************^
   952
   953	030520	000000	000000		$$OUTER:0	;IF NON-ZERO, XCT'D AT END OF USER MODE ERROR
   954
   955					S^;*********************************************************************^
   956					;*"SWITCH" CALL USAGE CONTROL
   957					S^;*********************************************************************^
   958
   959	030521	000000	000000		$$TOGGLE:0	;IF NON-ZERO, USE C(CONSW) FOR SWITCHES
   960
   961					S^;*********************************************************************^
   962					;*SPECIAL USERS ALTMODE SWITCH CALL INTERCEPT INSTRUCTIONS
   963					S^;*********************************************************************^
   964
   965	030522	000000	000000		$$TAX1:	0	;IF NON-ZERO, XCT'D AT START OF ALTMODE SWITCH CALL
   966	030523	000000	000000		$$TAX2:	0	;IF NON-ZERO, XCT'D AT END OF ALTMODE SWITCH CALL
   967
   968					S^;*********************************************************************^
   969					;*SPECIAL FUTURE EXPANSION ROOM
   970					;*IF ANY FIXED AREA TAGS ARE ADDED, REDUCE THE SIZE OF
   971					;*THIS BLOCK STATEMENT ACCORDINGLY.  THIS MUST BE DONE
   972					;*SO THAT PREVIOUS FIXED ASSIGNMENTS DO NOT CHANGE.
   973					S^;*********************************************************************^
   974
   975	030524					BLOCK	53	;HOPEFULLY THIS IS ENOUGH FOREVER
   976
   977					S^;*********************************************************************^
   978					;*END OF FIXED STORAGE
   979					S^;*********************************************************************^
   980
   981			030577			$ENDFX=<PLISTE+100>&<777700>-1
   982	030577					LOC	$ENDFX
   983	030577	000000	000000		ENDFIX:	0		;END OF FIXED STORAGE
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 1
DBKCCM	MAC	28-MAY-76 11:09		*FIXED* FIXED CONTROL AND DISPATCH STORAGE, FEB 26,1976                            SEQ 0035

   984						LALL
   985	030600	037 05 0 00 000002 	RENTR1:	DROPDV			;CLOSE LOGICAL OUTPUT FILE
   986	030601	040 00 0 00 036733 		CALL	[SIXBIT .EXIT.]
   987
   988	030602				PGMNAM:	ASCIZ /
   989	030602	015 012 120 104 120 	PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3 (DBKCC)
   990	030603	055 061 060 040 113 
   991	030604	111 061 060 040 101 
   992	030605	104 126 101 116 103 
   993	030606	105 104 040 111 116 
   994	030607	123 124 122 125 103 
   995	030610	124 111 117 116 040 
   996	030611	104 111 101 107 116 
   997	030612	117 123 124 111 103 
   998	030613	040 043 063 040 050 
   999	030614	104 102 113 103 103 
  1000	030615	051 015 012 000 000 	/
  1001
  1002					;INITIALIZE SUBROUTINES
  1003
  1004	030616	265 00 0 00 030011 	START:	PGMINT
  1005	030617	200 00 0 00 036734 		MOVE	[ASCIZ/CC/]
  1006	030620	202 00 0 00 036647 		MOVEM	TLET		;INITIALIZE TEST LETTER
  1007
  1008	030621	254 00 0 00 030622 	STARTA:	JRST	CC00		;GO PERFORM DIAGNOSTIC
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 2
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - CONVERSION OF 0                                         SEQ 0036

  1009					SUBTTL	DIAGNOSTIC SECTION - FIX - CONVERSION OF 0
  1010
  1011					;CHECK THAT 'FIX AC,E' DOES NOT MODIFY C(E)
  1012			000004		CC00:	AC=4
  1013			000010			SAC=<AC+4>&17
  1014						SAVEAC	(1,1)^
  1015	030622	201 10 0 00 030622 		MOVEI	SAC,.
  1016	030623	202 10 0 00 030051 		MOVEM	SAC,TESTPC	;SETUP SUBTEST PC
  1017	030624	201 10 0 00 000010 		MOVEI	SAC,SAC		;INFORM ERROR ROUTINE WHICH
  1018	030625	202 10 0 00 037213 		MOVEM	SAC,ERRLOP#	;AC IS USED FOR ITERATION^
  1019
  1020					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION DOES NOT DESTROY C(E)
  1021
  1022	030626	200 02 0 00 036735 	Q10:	MOVE	AC-2,[233525,,252525]	;LOAD 'E' WITH DATA
  1023	030627	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN E TO FIX PT AND STORE IN AC
  1024	030630	312 02 0 00 036735 		CAME	AC-2,[233525,,252525]	;WAS FLT PT NBR MODIFIED
  1025	030631	005 02 0 00 000011 		ER5	AC-2,11		;C(E) WAS CLOBBERED
  1026	030632	321 10 0 00 030626 		JUMPL	SAC,Q10		;LOOP ON ERROR SWITCH
  1027
  1028					;CONVERT A FLOAT POINT NO. OF ZEROS TO FIXED PT
  1029
  1030			000004			AC=4
  1031			000010			SAC=<AC+4>&17
  1032						SAVEAC	(1,1)^
  1033	030633	201 10 0 00 030633 		MOVEI	SAC,.
  1034	030634	202 10 0 00 030051 		MOVEM	SAC,TESTPC	;SETUP SUBTEST PC
  1035	030635	201 10 0 00 000010 		MOVEI	SAC,SAC		;INFORM ERROR ROUTINE WHICH
  1036	030636	202 10 0 00 037213 		MOVEM	SAC,ERRLOP#	;AC IS USED FOR ITERATION^
  1037
  1038					;THIS TEST VERIFIES THAT A FLT PT NO. OF 0 CONVERTED TO FIX PT BY
  1039					;FIX, REMAINS 0.
  1040
  1041	030637	402 00 0 00 000002 	Q100:	SETZM	AC-2		;INITIALIZE FLT PT NBR IN 'E'
  1042	030640	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO OF 0 TO FIX PT
  1043	030641	302 04 0 00 000000 		CAIE	AC,0		;WAS FLT PT 0 CONVERTED CORRECTLY?
  1044	030642	003 04 0 00 000101 		ER3	AC,101		;FIX PT NBR IS INCORRECT
  1045	030643	321 10 0 00 030637 		JUMPL	SAC,Q100	;LOOP ON ERROR SWITCH
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 3
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - POSITIVE INTEGERS-RIPPLE ONES                           SEQ 0037

  1046					SUBTTL	DIAGNOSTIC SECTION - FIX - POSITIVE INTEGERS-RIPPLE ONES
  1047
  1048			000200		SN=200
  1049			200400			XX=200400
  1050			000000			YY=0
  1051
  1052					Q200:	REPEAT	^D18,<
  1053					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1054					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1055					;DATA: RIPPLE A "1" THROUGH A FIELD OF "0'S" - POSITIVE INTEGERS
  1056					
  1057					SN=SN+1
  1058						XX=XX+1000
  1059						YY=YY+YY
  1060						IFE	YY,<YY=1>
  1061						MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1062						HRRZI	AC-1,YY		;RESULT FOR COMPARISON
  1063						FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT AND PLACE IN AC
  1064						CAME	AC,AC-1		;FAILURE IF TESTED BIT IS NOT SET
  1065						ER3	AC,SN		;FIX PT NBR INCORRECT
  1066						JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1067					>
  1068
  1069					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1070					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1071					;DATA: RIPPLE A "1" THROUGH A FIELD OF "0'S" - POSITIVE INTEGERS
  1072
  1073			000201		SN=SN+1
  1074			201400			XX=XX+1000
  1075			000000			YY=YY+YY
  1076			000001			IFE	YY,<YY=1>
  1077	030644	205 02 0 00 201400 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1078	030645	551 03 0 00 000001 		HRRZI	AC-1,YY		;RESULT FOR COMPARISON
  1079	030646	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT AND PLACE IN AC
  1080	030647	312 04 0 00 000003 		CAME	AC,AC-1		;FAILURE IF TESTED BIT IS NOT SET
  1081	030650	003 04 0 00 000201 		ER3	AC,SN		;FIX PT NBR INCORRECT
  1082	030651	321 10 0 00 030644 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1083
  1084
  1085					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1086					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1087					;DATA: RIPPLE A "1" THROUGH A FIELD OF "0'S" - POSITIVE INTEGERS
  1088
  1089			000202		SN=SN+1
  1090			202400			XX=XX+1000
  1091			000002			YY=YY+YY
  1092						IFE	YY,<YY=1>
  1093	030652	205 02 0 00 202400 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1094	030653	551 03 0 00 000002 		HRRZI	AC-1,YY		;RESULT FOR COMPARISON
  1095	030654	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT AND PLACE IN AC
  1096	030655	312 04 0 00 000003 		CAME	AC,AC-1		;FAILURE IF TESTED BIT IS NOT SET
  1097	030656	003 04 0 00 000202 		ER3	AC,SN		;FIX PT NBR INCORRECT
  1098	030657	321 10 0 00 030652 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1099
  1100
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 3-1
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - POSITIVE INTEGERS-RIPPLE ONES                           SEQ 0038

  1101					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1102					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1103					;DATA: RIPPLE A "1" THROUGH A FIELD OF "0'S" - POSITIVE INTEGERS
  1104
  1105			000203		SN=SN+1
  1106			203400			XX=XX+1000
  1107			000004			YY=YY+YY
  1108						IFE	YY,<YY=1>
  1109	030660	205 02 0 00 203400 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1110	030661	551 03 0 00 000004 		HRRZI	AC-1,YY		;RESULT FOR COMPARISON
  1111	030662	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT AND PLACE IN AC
  1112	030663	312 04 0 00 000003 		CAME	AC,AC-1		;FAILURE IF TESTED BIT IS NOT SET
  1113	030664	003 04 0 00 000203 		ER3	AC,SN		;FIX PT NBR INCORRECT
  1114	030665	321 10 0 00 030660 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1115
  1116
  1117					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1118					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1119					;DATA: RIPPLE A "1" THROUGH A FIELD OF "0'S" - POSITIVE INTEGERS
  1120
  1121			000204		SN=SN+1
  1122			204400			XX=XX+1000
  1123			000010			YY=YY+YY
  1124						IFE	YY,<YY=1>
  1125	030666	205 02 0 00 204400 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1126	030667	551 03 0 00 000010 		HRRZI	AC-1,YY		;RESULT FOR COMPARISON
  1127	030670	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT AND PLACE IN AC
  1128	030671	312 04 0 00 000003 		CAME	AC,AC-1		;FAILURE IF TESTED BIT IS NOT SET
  1129	030672	003 04 0 00 000204 		ER3	AC,SN		;FIX PT NBR INCORRECT
  1130	030673	321 10 0 00 030666 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1131
  1132
  1133					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1134					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1135					;DATA: RIPPLE A "1" THROUGH A FIELD OF "0'S" - POSITIVE INTEGERS
  1136
  1137			000205		SN=SN+1
  1138			205400			XX=XX+1000
  1139			000020			YY=YY+YY
  1140						IFE	YY,<YY=1>
  1141	030674	205 02 0 00 205400 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1142	030675	551 03 0 00 000020 		HRRZI	AC-1,YY		;RESULT FOR COMPARISON
  1143	030676	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT AND PLACE IN AC
  1144	030677	312 04 0 00 000003 		CAME	AC,AC-1		;FAILURE IF TESTED BIT IS NOT SET
  1145	030700	003 04 0 00 000205 		ER3	AC,SN		;FIX PT NBR INCORRECT
  1146	030701	321 10 0 00 030674 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1147
  1148
  1149					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1150					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1151					;DATA: RIPPLE A "1" THROUGH A FIELD OF "0'S" - POSITIVE INTEGERS
  1152
  1153			000206		SN=SN+1
  1154			206400			XX=XX+1000
  1155			000040			YY=YY+YY
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 3-2
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - POSITIVE INTEGERS-RIPPLE ONES                           SEQ 0039

  1156						IFE	YY,<YY=1>
  1157	030702	205 02 0 00 206400 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1158	030703	551 03 0 00 000040 		HRRZI	AC-1,YY		;RESULT FOR COMPARISON
  1159	030704	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT AND PLACE IN AC
  1160	030705	312 04 0 00 000003 		CAME	AC,AC-1		;FAILURE IF TESTED BIT IS NOT SET
  1161	030706	003 04 0 00 000206 		ER3	AC,SN		;FIX PT NBR INCORRECT
  1162	030707	321 10 0 00 030702 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1163
  1164
  1165					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1166					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1167					;DATA: RIPPLE A "1" THROUGH A FIELD OF "0'S" - POSITIVE INTEGERS
  1168
  1169			000207		SN=SN+1
  1170			207400			XX=XX+1000
  1171			000100			YY=YY+YY
  1172						IFE	YY,<YY=1>
  1173	030710	205 02 0 00 207400 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1174	030711	551 03 0 00 000100 		HRRZI	AC-1,YY		;RESULT FOR COMPARISON
  1175	030712	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT AND PLACE IN AC
  1176	030713	312 04 0 00 000003 		CAME	AC,AC-1		;FAILURE IF TESTED BIT IS NOT SET
  1177	030714	003 04 0 00 000207 		ER3	AC,SN		;FIX PT NBR INCORRECT
  1178	030715	321 10 0 00 030710 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1179
  1180
  1181					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1182					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1183					;DATA: RIPPLE A "1" THROUGH A FIELD OF "0'S" - POSITIVE INTEGERS
  1184
  1185			000210		SN=SN+1
  1186			210400			XX=XX+1000
  1187			000200			YY=YY+YY
  1188						IFE	YY,<YY=1>
  1189	030716	205 02 0 00 210400 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1190	030717	551 03 0 00 000200 		HRRZI	AC-1,YY		;RESULT FOR COMPARISON
  1191	030720	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT AND PLACE IN AC
  1192	030721	312 04 0 00 000003 		CAME	AC,AC-1		;FAILURE IF TESTED BIT IS NOT SET
  1193	030722	003 04 0 00 000210 		ER3	AC,SN		;FIX PT NBR INCORRECT
  1194	030723	321 10 0 00 030716 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1195
  1196
  1197					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1198					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1199					;DATA: RIPPLE A "1" THROUGH A FIELD OF "0'S" - POSITIVE INTEGERS
  1200
  1201			000211		SN=SN+1
  1202			211400			XX=XX+1000
  1203			000400			YY=YY+YY
  1204						IFE	YY,<YY=1>
  1205	030724	205 02 0 00 211400 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1206	030725	551 03 0 00 000400 		HRRZI	AC-1,YY		;RESULT FOR COMPARISON
  1207	030726	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT AND PLACE IN AC
  1208	030727	312 04 0 00 000003 		CAME	AC,AC-1		;FAILURE IF TESTED BIT IS NOT SET
  1209	030730	003 04 0 00 000211 		ER3	AC,SN		;FIX PT NBR INCORRECT
  1210	030731	321 10 0 00 030724 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 3-3
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - POSITIVE INTEGERS-RIPPLE ONES                           SEQ 0040

  1211
  1212
  1213					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1214					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1215					;DATA: RIPPLE A "1" THROUGH A FIELD OF "0'S" - POSITIVE INTEGERS
  1216
  1217			000212		SN=SN+1
  1218			212400			XX=XX+1000
  1219			001000			YY=YY+YY
  1220						IFE	YY,<YY=1>
  1221	030732	205 02 0 00 212400 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1222	030733	551 03 0 00 001000 		HRRZI	AC-1,YY		;RESULT FOR COMPARISON
  1223	030734	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT AND PLACE IN AC
  1224	030735	312 04 0 00 000003 		CAME	AC,AC-1		;FAILURE IF TESTED BIT IS NOT SET
  1225	030736	003 04 0 00 000212 		ER3	AC,SN		;FIX PT NBR INCORRECT
  1226	030737	321 10 0 00 030732 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1227
  1228
  1229					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1230					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1231					;DATA: RIPPLE A "1" THROUGH A FIELD OF "0'S" - POSITIVE INTEGERS
  1232
  1233			000213		SN=SN+1
  1234			213400			XX=XX+1000
  1235			002000			YY=YY+YY
  1236						IFE	YY,<YY=1>
  1237	030740	205 02 0 00 213400 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1238	030741	551 03 0 00 002000 		HRRZI	AC-1,YY		;RESULT FOR COMPARISON
  1239	030742	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT AND PLACE IN AC
  1240	030743	312 04 0 00 000003 		CAME	AC,AC-1		;FAILURE IF TESTED BIT IS NOT SET
  1241	030744	003 04 0 00 000213 		ER3	AC,SN		;FIX PT NBR INCORRECT
  1242	030745	321 10 0 00 030740 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1243
  1244
  1245					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1246					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1247					;DATA: RIPPLE A "1" THROUGH A FIELD OF "0'S" - POSITIVE INTEGERS
  1248
  1249			000214		SN=SN+1
  1250			214400			XX=XX+1000
  1251			004000			YY=YY+YY
  1252						IFE	YY,<YY=1>
  1253	030746	205 02 0 00 214400 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1254	030747	551 03 0 00 004000 		HRRZI	AC-1,YY		;RESULT FOR COMPARISON
  1255	030750	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT AND PLACE IN AC
  1256	030751	312 04 0 00 000003 		CAME	AC,AC-1		;FAILURE IF TESTED BIT IS NOT SET
  1257	030752	003 04 0 00 000214 		ER3	AC,SN		;FIX PT NBR INCORRECT
  1258	030753	321 10 0 00 030746 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1259
  1260
  1261					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1262					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1263					;DATA: RIPPLE A "1" THROUGH A FIELD OF "0'S" - POSITIVE INTEGERS
  1264
  1265			000215		SN=SN+1
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 3-4
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - POSITIVE INTEGERS-RIPPLE ONES                           SEQ 0041

  1266			215400			XX=XX+1000
  1267			010000			YY=YY+YY
  1268						IFE	YY,<YY=1>
  1269	030754	205 02 0 00 215400 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1270	030755	551 03 0 00 010000 		HRRZI	AC-1,YY		;RESULT FOR COMPARISON
  1271	030756	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT AND PLACE IN AC
  1272	030757	312 04 0 00 000003 		CAME	AC,AC-1		;FAILURE IF TESTED BIT IS NOT SET
  1273	030760	003 04 0 00 000215 		ER3	AC,SN		;FIX PT NBR INCORRECT
  1274	030761	321 10 0 00 030754 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1275
  1276
  1277					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1278					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1279					;DATA: RIPPLE A "1" THROUGH A FIELD OF "0'S" - POSITIVE INTEGERS
  1280
  1281			000216		SN=SN+1
  1282			216400			XX=XX+1000
  1283			020000			YY=YY+YY
  1284						IFE	YY,<YY=1>
  1285	030762	205 02 0 00 216400 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1286	030763	551 03 0 00 020000 		HRRZI	AC-1,YY		;RESULT FOR COMPARISON
  1287	030764	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT AND PLACE IN AC
  1288	030765	312 04 0 00 000003 		CAME	AC,AC-1		;FAILURE IF TESTED BIT IS NOT SET
  1289	030766	003 04 0 00 000216 		ER3	AC,SN		;FIX PT NBR INCORRECT
  1290	030767	321 10 0 00 030762 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1291
  1292
  1293					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1294					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1295					;DATA: RIPPLE A "1" THROUGH A FIELD OF "0'S" - POSITIVE INTEGERS
  1296
  1297			000217		SN=SN+1
  1298			217400			XX=XX+1000
  1299			040000			YY=YY+YY
  1300						IFE	YY,<YY=1>
  1301	030770	205 02 0 00 217400 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1302	030771	551 03 0 00 040000 		HRRZI	AC-1,YY		;RESULT FOR COMPARISON
  1303	030772	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT AND PLACE IN AC
  1304	030773	312 04 0 00 000003 		CAME	AC,AC-1		;FAILURE IF TESTED BIT IS NOT SET
  1305	030774	003 04 0 00 000217 		ER3	AC,SN		;FIX PT NBR INCORRECT
  1306	030775	321 10 0 00 030770 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1307
  1308
  1309					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1310					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1311					;DATA: RIPPLE A "1" THROUGH A FIELD OF "0'S" - POSITIVE INTEGERS
  1312
  1313			000220		SN=SN+1
  1314			220400			XX=XX+1000
  1315			100000			YY=YY+YY
  1316						IFE	YY,<YY=1>
  1317	030776	205 02 0 00 220400 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1318	030777	551 03 0 00 100000 		HRRZI	AC-1,YY		;RESULT FOR COMPARISON
  1319	031000	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT AND PLACE IN AC
  1320	031001	312 04 0 00 000003 		CAME	AC,AC-1		;FAILURE IF TESTED BIT IS NOT SET
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 3-5
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - POSITIVE INTEGERS-RIPPLE ONES                           SEQ 0042

  1321	031002	003 04 0 00 000220 		ER3	AC,SN		;FIX PT NBR INCORRECT
  1322	031003	321 10 0 00 030776 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1323
  1324
  1325					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1326					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1327					;DATA: RIPPLE A "1" THROUGH A FIELD OF "0'S" - POSITIVE INTEGERS
  1328
  1329			000221		SN=SN+1
  1330			221400			XX=XX+1000
  1331			200000			YY=YY+YY
  1332						IFE	YY,<YY=1>
  1333	031004	205 02 0 00 221400 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1334	031005	551 03 0 00 200000 		HRRZI	AC-1,YY		;RESULT FOR COMPARISON
  1335	031006	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT AND PLACE IN AC
  1336	031007	312 04 0 00 000003 		CAME	AC,AC-1		;FAILURE IF TESTED BIT IS NOT SET
  1337	031010	003 04 0 00 000221 		ER3	AC,SN		;FIX PT NBR INCORRECT
  1338	031011	321 10 0 00 031004 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1339
  1340
  1341					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1342					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1343					;DATA: RIPPLE A "1" THROUGH A FIELD OF "0'S" - POSITIVE INTEGERS
  1344
  1345			000222		SN=SN+1
  1346			222400			XX=XX+1000
  1347			400000			YY=YY+YY
  1348						IFE	YY,<YY=1>
  1349	031012	205 02 0 00 222400 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1350	031013	551 03 0 00 400000 		HRRZI	AC-1,YY		;RESULT FOR COMPARISON
  1351	031014	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT AND PLACE IN AC
  1352	031015	312 04 0 00 000003 		CAME	AC,AC-1		;FAILURE IF TESTED BIT IS NOT SET
  1353	031016	003 04 0 00 000222 		ER3	AC,SN		;FIX PT NBR INCORRECT
  1354	031017	321 10 0 00 031012 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1355
  1356					PAGE
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 3-6
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - POSITIVE INTEGERS-RIPPLE ONES                           SEQ 0043

  1357			000300		SN=300
  1358			000000			YY=0
  1359
  1360					Q300:	REPEAT	^D17,<
  1361					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1362					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1363					;DATA: RIPPLE A "1" THROUGH A FIELD OF "0'S" - POSITIVE INTEGERS
  1364					
  1365					SN=SN+1
  1366						XX=XX+1000
  1367						YY=YY+YY
  1368						IFE	YY,<YY=1>
  1369						MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1370						MOVSI	AC-1,YY		;RESULT FOR COMPARISON
  1371						FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT AND PLACE IN AC
  1372						CAME	AC,AC-1		;FAILURE IF TESTED BIT IS NOT SET
  1373						ER3	AC,SN		;FIX PT NBR INCORRECT
  1374						JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1375					>
  1376
  1377					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1378					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1379					;DATA: RIPPLE A "1" THROUGH A FIELD OF "0'S" - POSITIVE INTEGERS
  1380
  1381			000301		SN=SN+1
  1382			223400			XX=XX+1000
  1383			000000			YY=YY+YY
  1384			000001			IFE	YY,<YY=1>
  1385	031020	205 02 0 00 223400 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1386	031021	205 03 0 00 000001 		MOVSI	AC-1,YY		;RESULT FOR COMPARISON
  1387	031022	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT AND PLACE IN AC
  1388	031023	312 04 0 00 000003 		CAME	AC,AC-1		;FAILURE IF TESTED BIT IS NOT SET
  1389	031024	003 04 0 00 000301 		ER3	AC,SN		;FIX PT NBR INCORRECT
  1390	031025	321 10 0 00 031020 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1391
  1392
  1393					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1394					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1395					;DATA: RIPPLE A "1" THROUGH A FIELD OF "0'S" - POSITIVE INTEGERS
  1396
  1397			000302		SN=SN+1
  1398			224400			XX=XX+1000
  1399			000002			YY=YY+YY
  1400						IFE	YY,<YY=1>
  1401	031026	205 02 0 00 224400 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1402	031027	205 03 0 00 000002 		MOVSI	AC-1,YY		;RESULT FOR COMPARISON
  1403	031030	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT AND PLACE IN AC
  1404	031031	312 04 0 00 000003 		CAME	AC,AC-1		;FAILURE IF TESTED BIT IS NOT SET
  1405	031032	003 04 0 00 000302 		ER3	AC,SN		;FIX PT NBR INCORRECT
  1406	031033	321 10 0 00 031026 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1407
  1408
  1409					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1410					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1411					;DATA: RIPPLE A "1" THROUGH A FIELD OF "0'S" - POSITIVE INTEGERS
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 3-7
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - POSITIVE INTEGERS-RIPPLE ONES                           SEQ 0044

  1412
  1413			000303		SN=SN+1
  1414			225400			XX=XX+1000
  1415			000004			YY=YY+YY
  1416						IFE	YY,<YY=1>
  1417	031034	205 02 0 00 225400 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1418	031035	205 03 0 00 000004 		MOVSI	AC-1,YY		;RESULT FOR COMPARISON
  1419	031036	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT AND PLACE IN AC
  1420	031037	312 04 0 00 000003 		CAME	AC,AC-1		;FAILURE IF TESTED BIT IS NOT SET
  1421	031040	003 04 0 00 000303 		ER3	AC,SN		;FIX PT NBR INCORRECT
  1422	031041	321 10 0 00 031034 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1423
  1424
  1425					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1426					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1427					;DATA: RIPPLE A "1" THROUGH A FIELD OF "0'S" - POSITIVE INTEGERS
  1428
  1429			000304		SN=SN+1
  1430			226400			XX=XX+1000
  1431			000010			YY=YY+YY
  1432						IFE	YY,<YY=1>
  1433	031042	205 02 0 00 226400 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1434	031043	205 03 0 00 000010 		MOVSI	AC-1,YY		;RESULT FOR COMPARISON
  1435	031044	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT AND PLACE IN AC
  1436	031045	312 04 0 00 000003 		CAME	AC,AC-1		;FAILURE IF TESTED BIT IS NOT SET
  1437	031046	003 04 0 00 000304 		ER3	AC,SN		;FIX PT NBR INCORRECT
  1438	031047	321 10 0 00 031042 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1439
  1440
  1441					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1442					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1443					;DATA: RIPPLE A "1" THROUGH A FIELD OF "0'S" - POSITIVE INTEGERS
  1444
  1445			000305		SN=SN+1
  1446			227400			XX=XX+1000
  1447			000020			YY=YY+YY
  1448						IFE	YY,<YY=1>
  1449	031050	205 02 0 00 227400 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1450	031051	205 03 0 00 000020 		MOVSI	AC-1,YY		;RESULT FOR COMPARISON
  1451	031052	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT AND PLACE IN AC
  1452	031053	312 04 0 00 000003 		CAME	AC,AC-1		;FAILURE IF TESTED BIT IS NOT SET
  1453	031054	003 04 0 00 000305 		ER3	AC,SN		;FIX PT NBR INCORRECT
  1454	031055	321 10 0 00 031050 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1455
  1456
  1457					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1458					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1459					;DATA: RIPPLE A "1" THROUGH A FIELD OF "0'S" - POSITIVE INTEGERS
  1460
  1461			000306		SN=SN+1
  1462			230400			XX=XX+1000
  1463			000040			YY=YY+YY
  1464						IFE	YY,<YY=1>
  1465	031056	205 02 0 00 230400 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1466	031057	205 03 0 00 000040 		MOVSI	AC-1,YY		;RESULT FOR COMPARISON
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 3-8
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - POSITIVE INTEGERS-RIPPLE ONES                           SEQ 0045

  1467	031060	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT AND PLACE IN AC
  1468	031061	312 04 0 00 000003 		CAME	AC,AC-1		;FAILURE IF TESTED BIT IS NOT SET
  1469	031062	003 04 0 00 000306 		ER3	AC,SN		;FIX PT NBR INCORRECT
  1470	031063	321 10 0 00 031056 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1471
  1472
  1473					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1474					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1475					;DATA: RIPPLE A "1" THROUGH A FIELD OF "0'S" - POSITIVE INTEGERS
  1476
  1477			000307		SN=SN+1
  1478			231400			XX=XX+1000
  1479			000100			YY=YY+YY
  1480						IFE	YY,<YY=1>
  1481	031064	205 02 0 00 231400 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1482	031065	205 03 0 00 000100 		MOVSI	AC-1,YY		;RESULT FOR COMPARISON
  1483	031066	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT AND PLACE IN AC
  1484	031067	312 04 0 00 000003 		CAME	AC,AC-1		;FAILURE IF TESTED BIT IS NOT SET
  1485	031070	003 04 0 00 000307 		ER3	AC,SN		;FIX PT NBR INCORRECT
  1486	031071	321 10 0 00 031064 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1487
  1488
  1489					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1490					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1491					;DATA: RIPPLE A "1" THROUGH A FIELD OF "0'S" - POSITIVE INTEGERS
  1492
  1493			000310		SN=SN+1
  1494			232400			XX=XX+1000
  1495			000200			YY=YY+YY
  1496						IFE	YY,<YY=1>
  1497	031072	205 02 0 00 232400 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1498	031073	205 03 0 00 000200 		MOVSI	AC-1,YY		;RESULT FOR COMPARISON
  1499	031074	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT AND PLACE IN AC
  1500	031075	312 04 0 00 000003 		CAME	AC,AC-1		;FAILURE IF TESTED BIT IS NOT SET
  1501	031076	003 04 0 00 000310 		ER3	AC,SN		;FIX PT NBR INCORRECT
  1502	031077	321 10 0 00 031072 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1503
  1504
  1505					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1506					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1507					;DATA: RIPPLE A "1" THROUGH A FIELD OF "0'S" - POSITIVE INTEGERS
  1508
  1509			000311		SN=SN+1
  1510			233400			XX=XX+1000
  1511			000400			YY=YY+YY
  1512						IFE	YY,<YY=1>
  1513	031100	205 02 0 00 233400 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1514	031101	205 03 0 00 000400 		MOVSI	AC-1,YY		;RESULT FOR COMPARISON
  1515	031102	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT AND PLACE IN AC
  1516	031103	312 04 0 00 000003 		CAME	AC,AC-1		;FAILURE IF TESTED BIT IS NOT SET
  1517	031104	003 04 0 00 000311 		ER3	AC,SN		;FIX PT NBR INCORRECT
  1518	031105	321 10 0 00 031100 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1519
  1520
  1521					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 3-9
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - POSITIVE INTEGERS-RIPPLE ONES                           SEQ 0046

  1522					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1523					;DATA: RIPPLE A "1" THROUGH A FIELD OF "0'S" - POSITIVE INTEGERS
  1524
  1525			000312		SN=SN+1
  1526			234400			XX=XX+1000
  1527			001000			YY=YY+YY
  1528						IFE	YY,<YY=1>
  1529	031106	205 02 0 00 234400 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1530	031107	205 03 0 00 001000 		MOVSI	AC-1,YY		;RESULT FOR COMPARISON
  1531	031110	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT AND PLACE IN AC
  1532	031111	312 04 0 00 000003 		CAME	AC,AC-1		;FAILURE IF TESTED BIT IS NOT SET
  1533	031112	003 04 0 00 000312 		ER3	AC,SN		;FIX PT NBR INCORRECT
  1534	031113	321 10 0 00 031106 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1535
  1536
  1537					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1538					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1539					;DATA: RIPPLE A "1" THROUGH A FIELD OF "0'S" - POSITIVE INTEGERS
  1540
  1541			000313		SN=SN+1
  1542			235400			XX=XX+1000
  1543			002000			YY=YY+YY
  1544						IFE	YY,<YY=1>
  1545	031114	205 02 0 00 235400 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1546	031115	205 03 0 00 002000 		MOVSI	AC-1,YY		;RESULT FOR COMPARISON
  1547	031116	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT AND PLACE IN AC
  1548	031117	312 04 0 00 000003 		CAME	AC,AC-1		;FAILURE IF TESTED BIT IS NOT SET
  1549	031120	003 04 0 00 000313 		ER3	AC,SN		;FIX PT NBR INCORRECT
  1550	031121	321 10 0 00 031114 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1551
  1552
  1553					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1554					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1555					;DATA: RIPPLE A "1" THROUGH A FIELD OF "0'S" - POSITIVE INTEGERS
  1556
  1557			000314		SN=SN+1
  1558			236400			XX=XX+1000
  1559			004000			YY=YY+YY
  1560						IFE	YY,<YY=1>
  1561	031122	205 02 0 00 236400 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1562	031123	205 03 0 00 004000 		MOVSI	AC-1,YY		;RESULT FOR COMPARISON
  1563	031124	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT AND PLACE IN AC
  1564	031125	312 04 0 00 000003 		CAME	AC,AC-1		;FAILURE IF TESTED BIT IS NOT SET
  1565	031126	003 04 0 00 000314 		ER3	AC,SN		;FIX PT NBR INCORRECT
  1566	031127	321 10 0 00 031122 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1567
  1568
  1569					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1570					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1571					;DATA: RIPPLE A "1" THROUGH A FIELD OF "0'S" - POSITIVE INTEGERS
  1572
  1573			000315		SN=SN+1
  1574			237400			XX=XX+1000
  1575			010000			YY=YY+YY
  1576						IFE	YY,<YY=1>
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 3-10
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - POSITIVE INTEGERS-RIPPLE ONES                           SEQ 0047

  1577	031130	205 02 0 00 237400 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1578	031131	205 03 0 00 010000 		MOVSI	AC-1,YY		;RESULT FOR COMPARISON
  1579	031132	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT AND PLACE IN AC
  1580	031133	312 04 0 00 000003 		CAME	AC,AC-1		;FAILURE IF TESTED BIT IS NOT SET
  1581	031134	003 04 0 00 000315 		ER3	AC,SN		;FIX PT NBR INCORRECT
  1582	031135	321 10 0 00 031130 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1583
  1584
  1585					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1586					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1587					;DATA: RIPPLE A "1" THROUGH A FIELD OF "0'S" - POSITIVE INTEGERS
  1588
  1589			000316		SN=SN+1
  1590			240400			XX=XX+1000
  1591			020000			YY=YY+YY
  1592						IFE	YY,<YY=1>
  1593	031136	205 02 0 00 240400 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1594	031137	205 03 0 00 020000 		MOVSI	AC-1,YY		;RESULT FOR COMPARISON
  1595	031140	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT AND PLACE IN AC
  1596	031141	312 04 0 00 000003 		CAME	AC,AC-1		;FAILURE IF TESTED BIT IS NOT SET
  1597	031142	003 04 0 00 000316 		ER3	AC,SN		;FIX PT NBR INCORRECT
  1598	031143	321 10 0 00 031136 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1599
  1600
  1601					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1602					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1603					;DATA: RIPPLE A "1" THROUGH A FIELD OF "0'S" - POSITIVE INTEGERS
  1604
  1605			000317		SN=SN+1
  1606			241400			XX=XX+1000
  1607			040000			YY=YY+YY
  1608						IFE	YY,<YY=1>
  1609	031144	205 02 0 00 241400 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1610	031145	205 03 0 00 040000 		MOVSI	AC-1,YY		;RESULT FOR COMPARISON
  1611	031146	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT AND PLACE IN AC
  1612	031147	312 04 0 00 000003 		CAME	AC,AC-1		;FAILURE IF TESTED BIT IS NOT SET
  1613	031150	003 04 0 00 000317 		ER3	AC,SN		;FIX PT NBR INCORRECT
  1614	031151	321 10 0 00 031144 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1615
  1616
  1617					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1618					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1619					;DATA: RIPPLE A "1" THROUGH A FIELD OF "0'S" - POSITIVE INTEGERS
  1620
  1621			000320		SN=SN+1
  1622			242400			XX=XX+1000
  1623			100000			YY=YY+YY
  1624						IFE	YY,<YY=1>
  1625	031152	205 02 0 00 242400 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1626	031153	205 03 0 00 100000 		MOVSI	AC-1,YY		;RESULT FOR COMPARISON
  1627	031154	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT AND PLACE IN AC
  1628	031155	312 04 0 00 000003 		CAME	AC,AC-1		;FAILURE IF TESTED BIT IS NOT SET
  1629	031156	003 04 0 00 000320 		ER3	AC,SN		;FIX PT NBR INCORRECT
  1630	031157	321 10 0 00 031152 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1631
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 3-11
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - POSITIVE INTEGERS-RIPPLE ONES                           SEQ 0048

  1632
  1633					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1634					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1635					;DATA: RIPPLE A "1" THROUGH A FIELD OF "0'S" - POSITIVE INTEGERS
  1636
  1637			000321		SN=SN+1
  1638			243400			XX=XX+1000
  1639			200000			YY=YY+YY
  1640						IFE	YY,<YY=1>
  1641	031160	205 02 0 00 243400 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1642	031161	205 03 0 00 200000 		MOVSI	AC-1,YY		;RESULT FOR COMPARISON
  1643	031162	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT AND PLACE IN AC
  1644	031163	312 04 0 00 000003 		CAME	AC,AC-1		;FAILURE IF TESTED BIT IS NOT SET
  1645	031164	003 04 0 00 000321 		ER3	AC,SN		;FIX PT NBR INCORRECT
  1646	031165	321 10 0 00 031160 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1647
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 4
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - CONVERSION OF FLT PT 1                                  SEQ 0049

  1648					SUBTTL	DIAGNOSTIC SECTION - FIX - CONVERSION OF FLT PT 1
  1649
  1650					;VERIFY THAT ALL FLT PT NBRS EQUAL TO "1" CONVERT CORRECTLY TO FIX PT
  1651
  1652			000500		SN=500
  1653			200000			XX=200000
  1654			001000			YY=1000
  1655
  1656					Q500:	REPEAT	^D9,<
  1657					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1658					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1659					;VERIFY THAT ALL FLT PT NBRS EQUAL TO "1" CONVERT CORRECTLY TO FIX PT
  1660					
  1661					SN=SN+1
  1662						XX=XX+1000
  1663						YY=YY/2
  1664						MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1665						TLO	AC-2,YY		;RESULT FOR COMPARISON
  1666						FIX	AC,AC-2		;*CONVERT FLT PT 1 IN 'E' TO FIX PT 1 AND PLACE IN AC
  1667						CAIE	AC,1		;IS RESULT IN AC = 1?
  1668						ER3	AC,SN		;FIX PT NBR NOT EQUAL TO 1
  1669						JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1670					>
  1671
  1672					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1673					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1674					;VERIFY THAT ALL FLT PT NBRS EQUAL TO "1" CONVERT CORRECTLY TO FIX PT
  1675
  1676			000501		SN=SN+1
  1677			201000			XX=XX+1000
  1678			000400			YY=YY/2
  1679	031166	205 02 0 00 201000 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1680	031167	661 02 0 00 000400 		TLO	AC-2,YY		;RESULT FOR COMPARISON
  1681	031170	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT 1 IN 'E' TO FIX PT 1 AND PLACE IN AC
  1682	031171	302 04 0 00 000001 		CAIE	AC,1		;IS RESULT IN AC = 1?
  1683	031172	003 04 0 00 000501 		ER3	AC,SN		;FIX PT NBR NOT EQUAL TO 1
  1684	031173	321 10 0 00 031166 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1685
  1686
  1687					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1688					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1689					;VERIFY THAT ALL FLT PT NBRS EQUAL TO "1" CONVERT CORRECTLY TO FIX PT
  1690
  1691			000502		SN=SN+1
  1692			202000			XX=XX+1000
  1693			000200			YY=YY/2
  1694	031174	205 02 0 00 202000 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1695	031175	661 02 0 00 000200 		TLO	AC-2,YY		;RESULT FOR COMPARISON
  1696	031176	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT 1 IN 'E' TO FIX PT 1 AND PLACE IN AC
  1697	031177	302 04 0 00 000001 		CAIE	AC,1		;IS RESULT IN AC = 1?
  1698	031200	003 04 0 00 000502 		ER3	AC,SN		;FIX PT NBR NOT EQUAL TO 1
  1699	031201	321 10 0 00 031174 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1700
  1701
  1702					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 4-1
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - CONVERSION OF FLT PT 1                                  SEQ 0050

  1703					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1704					;VERIFY THAT ALL FLT PT NBRS EQUAL TO "1" CONVERT CORRECTLY TO FIX PT
  1705
  1706			000503		SN=SN+1
  1707			203000			XX=XX+1000
  1708			000100			YY=YY/2
  1709	031202	205 02 0 00 203000 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1710	031203	661 02 0 00 000100 		TLO	AC-2,YY		;RESULT FOR COMPARISON
  1711	031204	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT 1 IN 'E' TO FIX PT 1 AND PLACE IN AC
  1712	031205	302 04 0 00 000001 		CAIE	AC,1		;IS RESULT IN AC = 1?
  1713	031206	003 04 0 00 000503 		ER3	AC,SN		;FIX PT NBR NOT EQUAL TO 1
  1714	031207	321 10 0 00 031202 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1715
  1716
  1717					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1718					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1719					;VERIFY THAT ALL FLT PT NBRS EQUAL TO "1" CONVERT CORRECTLY TO FIX PT
  1720
  1721			000504		SN=SN+1
  1722			204000			XX=XX+1000
  1723			000040			YY=YY/2
  1724	031210	205 02 0 00 204000 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1725	031211	661 02 0 00 000040 		TLO	AC-2,YY		;RESULT FOR COMPARISON
  1726	031212	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT 1 IN 'E' TO FIX PT 1 AND PLACE IN AC
  1727	031213	302 04 0 00 000001 		CAIE	AC,1		;IS RESULT IN AC = 1?
  1728	031214	003 04 0 00 000504 		ER3	AC,SN		;FIX PT NBR NOT EQUAL TO 1
  1729	031215	321 10 0 00 031210 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1730
  1731
  1732					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1733					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1734					;VERIFY THAT ALL FLT PT NBRS EQUAL TO "1" CONVERT CORRECTLY TO FIX PT
  1735
  1736			000505		SN=SN+1
  1737			205000			XX=XX+1000
  1738			000020			YY=YY/2
  1739	031216	205 02 0 00 205000 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1740	031217	661 02 0 00 000020 		TLO	AC-2,YY		;RESULT FOR COMPARISON
  1741	031220	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT 1 IN 'E' TO FIX PT 1 AND PLACE IN AC
  1742	031221	302 04 0 00 000001 		CAIE	AC,1		;IS RESULT IN AC = 1?
  1743	031222	003 04 0 00 000505 		ER3	AC,SN		;FIX PT NBR NOT EQUAL TO 1
  1744	031223	321 10 0 00 031216 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1745
  1746
  1747					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1748					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1749					;VERIFY THAT ALL FLT PT NBRS EQUAL TO "1" CONVERT CORRECTLY TO FIX PT
  1750
  1751			000506		SN=SN+1
  1752			206000			XX=XX+1000
  1753			000010			YY=YY/2
  1754	031224	205 02 0 00 206000 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1755	031225	661 02 0 00 000010 		TLO	AC-2,YY		;RESULT FOR COMPARISON
  1756	031226	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT 1 IN 'E' TO FIX PT 1 AND PLACE IN AC
  1757	031227	302 04 0 00 000001 		CAIE	AC,1		;IS RESULT IN AC = 1?
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 4-2
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - CONVERSION OF FLT PT 1                                  SEQ 0051

  1758	031230	003 04 0 00 000506 		ER3	AC,SN		;FIX PT NBR NOT EQUAL TO 1
  1759	031231	321 10 0 00 031224 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1760
  1761
  1762					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1763					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1764					;VERIFY THAT ALL FLT PT NBRS EQUAL TO "1" CONVERT CORRECTLY TO FIX PT
  1765
  1766			000507		SN=SN+1
  1767			207000			XX=XX+1000
  1768			000004			YY=YY/2
  1769	031232	205 02 0 00 207000 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1770	031233	661 02 0 00 000004 		TLO	AC-2,YY		;RESULT FOR COMPARISON
  1771	031234	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT 1 IN 'E' TO FIX PT 1 AND PLACE IN AC
  1772	031235	302 04 0 00 000001 		CAIE	AC,1		;IS RESULT IN AC = 1?
  1773	031236	003 04 0 00 000507 		ER3	AC,SN		;FIX PT NBR NOT EQUAL TO 1
  1774	031237	321 10 0 00 031232 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1775
  1776
  1777					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1778					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1779					;VERIFY THAT ALL FLT PT NBRS EQUAL TO "1" CONVERT CORRECTLY TO FIX PT
  1780
  1781			000510		SN=SN+1
  1782			210000			XX=XX+1000
  1783			000002			YY=YY/2
  1784	031240	205 02 0 00 210000 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1785	031241	661 02 0 00 000002 		TLO	AC-2,YY		;RESULT FOR COMPARISON
  1786	031242	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT 1 IN 'E' TO FIX PT 1 AND PLACE IN AC
  1787	031243	302 04 0 00 000001 		CAIE	AC,1		;IS RESULT IN AC = 1?
  1788	031244	003 04 0 00 000510 		ER3	AC,SN		;FIX PT NBR NOT EQUAL TO 1
  1789	031245	321 10 0 00 031240 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1790
  1791
  1792					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1793					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1794					;VERIFY THAT ALL FLT PT NBRS EQUAL TO "1" CONVERT CORRECTLY TO FIX PT
  1795
  1796			000511		SN=SN+1
  1797			211000			XX=XX+1000
  1798			000001			YY=YY/2
  1799	031246	205 02 0 00 211000 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1800	031247	661 02 0 00 000001 		TLO	AC-2,YY		;RESULT FOR COMPARISON
  1801	031250	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT 1 IN 'E' TO FIX PT 1 AND PLACE IN AC
  1802	031251	302 04 0 00 000001 		CAIE	AC,1		;IS RESULT IN AC = 1?
  1803	031252	003 04 0 00 000511 		ER3	AC,SN		;FIX PT NBR NOT EQUAL TO 1
  1804	031253	321 10 0 00 031246 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1805
  1806					PAGE
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 4-3
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - CONVERSION OF FLT PT 1                                  SEQ 0052

  1807			000600		SN=600
  1808			000000			YY=0
  1809
  1810					Q600:	REPEAT	^D18,<
  1811					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1812					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1813					;VERIFY THAT ALL FLT PT NBRS EQUAL TO "1" CONVERT CORRECTLY TO FIX PT
  1814					
  1815					SN=SN+1
  1816						XX=XX+1000
  1817						YY=YY/2
  1818						IFE	YY,<YY=400000>
  1819						MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1820						HRRI	AC-2,YY
  1821						FIX	AC,AC-2		;*CONVERT FLT PT 1 IN 'E' TO FIX PT 1 AND PLACE IN AC
  1822						CAIE	AC,1		;IS RESULT IN AC = 1?
  1823						ER3	AC,SN		;FIX PT NBR NOT EQUAL TO 1
  1824						JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1825					>
  1826
  1827					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1828					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1829					;VERIFY THAT ALL FLT PT NBRS EQUAL TO "1" CONVERT CORRECTLY TO FIX PT
  1830
  1831			000601		SN=SN+1
  1832			212000			XX=XX+1000
  1833			000000			YY=YY/2
  1834			400000			IFE	YY,<YY=400000>
  1835	031254	205 02 0 00 212000 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1836	031255	541 02 0 00 400000 		HRRI	AC-2,YY
  1837	031256	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT 1 IN 'E' TO FIX PT 1 AND PLACE IN AC
  1838	031257	302 04 0 00 000001 		CAIE	AC,1		;IS RESULT IN AC = 1?
  1839	031260	003 04 0 00 000601 		ER3	AC,SN		;FIX PT NBR NOT EQUAL TO 1
  1840	031261	321 10 0 00 031254 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1841
  1842
  1843					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1844					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1845					;VERIFY THAT ALL FLT PT NBRS EQUAL TO "1" CONVERT CORRECTLY TO FIX PT
  1846
  1847			000602		SN=SN+1
  1848			213000			XX=XX+1000
  1849			200000			YY=YY/2
  1850						IFE	YY,<YY=400000>
  1851	031262	205 02 0 00 213000 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1852	031263	541 02 0 00 200000 		HRRI	AC-2,YY
  1853	031264	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT 1 IN 'E' TO FIX PT 1 AND PLACE IN AC
  1854	031265	302 04 0 00 000001 		CAIE	AC,1		;IS RESULT IN AC = 1?
  1855	031266	003 04 0 00 000602 		ER3	AC,SN		;FIX PT NBR NOT EQUAL TO 1
  1856	031267	321 10 0 00 031262 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1857
  1858
  1859					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1860					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1861					;VERIFY THAT ALL FLT PT NBRS EQUAL TO "1" CONVERT CORRECTLY TO FIX PT
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 4-4
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - CONVERSION OF FLT PT 1                                  SEQ 0053

  1862
  1863			000603		SN=SN+1
  1864			214000			XX=XX+1000
  1865			100000			YY=YY/2
  1866						IFE	YY,<YY=400000>
  1867	031270	205 02 0 00 214000 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1868	031271	541 02 0 00 100000 		HRRI	AC-2,YY
  1869	031272	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT 1 IN 'E' TO FIX PT 1 AND PLACE IN AC
  1870	031273	302 04 0 00 000001 		CAIE	AC,1		;IS RESULT IN AC = 1?
  1871	031274	003 04 0 00 000603 		ER3	AC,SN		;FIX PT NBR NOT EQUAL TO 1
  1872	031275	321 10 0 00 031270 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1873
  1874
  1875					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1876					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1877					;VERIFY THAT ALL FLT PT NBRS EQUAL TO "1" CONVERT CORRECTLY TO FIX PT
  1878
  1879			000604		SN=SN+1
  1880			215000			XX=XX+1000
  1881			040000			YY=YY/2
  1882						IFE	YY,<YY=400000>
  1883	031276	205 02 0 00 215000 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1884	031277	541 02 0 00 040000 		HRRI	AC-2,YY
  1885	031300	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT 1 IN 'E' TO FIX PT 1 AND PLACE IN AC
  1886	031301	302 04 0 00 000001 		CAIE	AC,1		;IS RESULT IN AC = 1?
  1887	031302	003 04 0 00 000604 		ER3	AC,SN		;FIX PT NBR NOT EQUAL TO 1
  1888	031303	321 10 0 00 031276 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1889
  1890
  1891					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1892					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1893					;VERIFY THAT ALL FLT PT NBRS EQUAL TO "1" CONVERT CORRECTLY TO FIX PT
  1894
  1895			000605		SN=SN+1
  1896			216000			XX=XX+1000
  1897			020000			YY=YY/2
  1898						IFE	YY,<YY=400000>
  1899	031304	205 02 0 00 216000 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1900	031305	541 02 0 00 020000 		HRRI	AC-2,YY
  1901	031306	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT 1 IN 'E' TO FIX PT 1 AND PLACE IN AC
  1902	031307	302 04 0 00 000001 		CAIE	AC,1		;IS RESULT IN AC = 1?
  1903	031310	003 04 0 00 000605 		ER3	AC,SN		;FIX PT NBR NOT EQUAL TO 1
  1904	031311	321 10 0 00 031304 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1905
  1906
  1907					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1908					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1909					;VERIFY THAT ALL FLT PT NBRS EQUAL TO "1" CONVERT CORRECTLY TO FIX PT
  1910
  1911			000606		SN=SN+1
  1912			217000			XX=XX+1000
  1913			010000			YY=YY/2
  1914						IFE	YY,<YY=400000>
  1915	031312	205 02 0 00 217000 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1916	031313	541 02 0 00 010000 		HRRI	AC-2,YY
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 4-5
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - CONVERSION OF FLT PT 1                                  SEQ 0054

  1917	031314	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT 1 IN 'E' TO FIX PT 1 AND PLACE IN AC
  1918	031315	302 04 0 00 000001 		CAIE	AC,1		;IS RESULT IN AC = 1?
  1919	031316	003 04 0 00 000606 		ER3	AC,SN		;FIX PT NBR NOT EQUAL TO 1
  1920	031317	321 10 0 00 031312 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1921
  1922
  1923					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1924					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1925					;VERIFY THAT ALL FLT PT NBRS EQUAL TO "1" CONVERT CORRECTLY TO FIX PT
  1926
  1927			000607		SN=SN+1
  1928			220000			XX=XX+1000
  1929			004000			YY=YY/2
  1930						IFE	YY,<YY=400000>
  1931	031320	205 02 0 00 220000 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1932	031321	541 02 0 00 004000 		HRRI	AC-2,YY
  1933	031322	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT 1 IN 'E' TO FIX PT 1 AND PLACE IN AC
  1934	031323	302 04 0 00 000001 		CAIE	AC,1		;IS RESULT IN AC = 1?
  1935	031324	003 04 0 00 000607 		ER3	AC,SN		;FIX PT NBR NOT EQUAL TO 1
  1936	031325	321 10 0 00 031320 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1937
  1938
  1939					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1940					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1941					;VERIFY THAT ALL FLT PT NBRS EQUAL TO "1" CONVERT CORRECTLY TO FIX PT
  1942
  1943			000610		SN=SN+1
  1944			221000			XX=XX+1000
  1945			002000			YY=YY/2
  1946						IFE	YY,<YY=400000>
  1947	031326	205 02 0 00 221000 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1948	031327	541 02 0 00 002000 		HRRI	AC-2,YY
  1949	031330	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT 1 IN 'E' TO FIX PT 1 AND PLACE IN AC
  1950	031331	302 04 0 00 000001 		CAIE	AC,1		;IS RESULT IN AC = 1?
  1951	031332	003 04 0 00 000610 		ER3	AC,SN		;FIX PT NBR NOT EQUAL TO 1
  1952	031333	321 10 0 00 031326 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1953
  1954
  1955					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1956					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1957					;VERIFY THAT ALL FLT PT NBRS EQUAL TO "1" CONVERT CORRECTLY TO FIX PT
  1958
  1959			000611		SN=SN+1
  1960			222000			XX=XX+1000
  1961			001000			YY=YY/2
  1962						IFE	YY,<YY=400000>
  1963	031334	205 02 0 00 222000 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1964	031335	541 02 0 00 001000 		HRRI	AC-2,YY
  1965	031336	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT 1 IN 'E' TO FIX PT 1 AND PLACE IN AC
  1966	031337	302 04 0 00 000001 		CAIE	AC,1		;IS RESULT IN AC = 1?
  1967	031340	003 04 0 00 000611 		ER3	AC,SN		;FIX PT NBR NOT EQUAL TO 1
  1968	031341	321 10 0 00 031334 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1969
  1970
  1971					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 4-6
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - CONVERSION OF FLT PT 1                                  SEQ 0055

  1972					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1973					;VERIFY THAT ALL FLT PT NBRS EQUAL TO "1" CONVERT CORRECTLY TO FIX PT
  1974
  1975			000612		SN=SN+1
  1976			223000			XX=XX+1000
  1977			000400			YY=YY/2
  1978						IFE	YY,<YY=400000>
  1979	031342	205 02 0 00 223000 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1980	031343	541 02 0 00 000400 		HRRI	AC-2,YY
  1981	031344	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT 1 IN 'E' TO FIX PT 1 AND PLACE IN AC
  1982	031345	302 04 0 00 000001 		CAIE	AC,1		;IS RESULT IN AC = 1?
  1983	031346	003 04 0 00 000612 		ER3	AC,SN		;FIX PT NBR NOT EQUAL TO 1
  1984	031347	321 10 0 00 031342 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  1985
  1986
  1987					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  1988					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  1989					;VERIFY THAT ALL FLT PT NBRS EQUAL TO "1" CONVERT CORRECTLY TO FIX PT
  1990
  1991			000613		SN=SN+1
  1992			224000			XX=XX+1000
  1993			000200			YY=YY/2
  1994						IFE	YY,<YY=400000>
  1995	031350	205 02 0 00 224000 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  1996	031351	541 02 0 00 000200 		HRRI	AC-2,YY
  1997	031352	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT 1 IN 'E' TO FIX PT 1 AND PLACE IN AC
  1998	031353	302 04 0 00 000001 		CAIE	AC,1		;IS RESULT IN AC = 1?
  1999	031354	003 04 0 00 000613 		ER3	AC,SN		;FIX PT NBR NOT EQUAL TO 1
  2000	031355	321 10 0 00 031350 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  2001
  2002
  2003					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2004					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2005					;VERIFY THAT ALL FLT PT NBRS EQUAL TO "1" CONVERT CORRECTLY TO FIX PT
  2006
  2007			000614		SN=SN+1
  2008			225000			XX=XX+1000
  2009			000100			YY=YY/2
  2010						IFE	YY,<YY=400000>
  2011	031356	205 02 0 00 225000 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  2012	031357	541 02 0 00 000100 		HRRI	AC-2,YY
  2013	031360	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT 1 IN 'E' TO FIX PT 1 AND PLACE IN AC
  2014	031361	302 04 0 00 000001 		CAIE	AC,1		;IS RESULT IN AC = 1?
  2015	031362	003 04 0 00 000614 		ER3	AC,SN		;FIX PT NBR NOT EQUAL TO 1
  2016	031363	321 10 0 00 031356 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  2017
  2018
  2019					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2020					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2021					;VERIFY THAT ALL FLT PT NBRS EQUAL TO "1" CONVERT CORRECTLY TO FIX PT
  2022
  2023			000615		SN=SN+1
  2024			226000			XX=XX+1000
  2025			000040			YY=YY/2
  2026						IFE	YY,<YY=400000>
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 4-7
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - CONVERSION OF FLT PT 1                                  SEQ 0056

  2027	031364	205 02 0 00 226000 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  2028	031365	541 02 0 00 000040 		HRRI	AC-2,YY
  2029	031366	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT 1 IN 'E' TO FIX PT 1 AND PLACE IN AC
  2030	031367	302 04 0 00 000001 		CAIE	AC,1		;IS RESULT IN AC = 1?
  2031	031370	003 04 0 00 000615 		ER3	AC,SN		;FIX PT NBR NOT EQUAL TO 1
  2032	031371	321 10 0 00 031364 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  2033
  2034
  2035					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2036					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2037					;VERIFY THAT ALL FLT PT NBRS EQUAL TO "1" CONVERT CORRECTLY TO FIX PT
  2038
  2039			000616		SN=SN+1
  2040			227000			XX=XX+1000
  2041			000020			YY=YY/2
  2042						IFE	YY,<YY=400000>
  2043	031372	205 02 0 00 227000 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  2044	031373	541 02 0 00 000020 		HRRI	AC-2,YY
  2045	031374	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT 1 IN 'E' TO FIX PT 1 AND PLACE IN AC
  2046	031375	302 04 0 00 000001 		CAIE	AC,1		;IS RESULT IN AC = 1?
  2047	031376	003 04 0 00 000616 		ER3	AC,SN		;FIX PT NBR NOT EQUAL TO 1
  2048	031377	321 10 0 00 031372 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  2049
  2050
  2051					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2052					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2053					;VERIFY THAT ALL FLT PT NBRS EQUAL TO "1" CONVERT CORRECTLY TO FIX PT
  2054
  2055			000617		SN=SN+1
  2056			230000			XX=XX+1000
  2057			000010			YY=YY/2
  2058						IFE	YY,<YY=400000>
  2059	031400	205 02 0 00 230000 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  2060	031401	541 02 0 00 000010 		HRRI	AC-2,YY
  2061	031402	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT 1 IN 'E' TO FIX PT 1 AND PLACE IN AC
  2062	031403	302 04 0 00 000001 		CAIE	AC,1		;IS RESULT IN AC = 1?
  2063	031404	003 04 0 00 000617 		ER3	AC,SN		;FIX PT NBR NOT EQUAL TO 1
  2064	031405	321 10 0 00 031400 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  2065
  2066
  2067					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2068					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2069					;VERIFY THAT ALL FLT PT NBRS EQUAL TO "1" CONVERT CORRECTLY TO FIX PT
  2070
  2071			000620		SN=SN+1
  2072			231000			XX=XX+1000
  2073			000004			YY=YY/2
  2074						IFE	YY,<YY=400000>
  2075	031406	205 02 0 00 231000 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  2076	031407	541 02 0 00 000004 		HRRI	AC-2,YY
  2077	031410	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT 1 IN 'E' TO FIX PT 1 AND PLACE IN AC
  2078	031411	302 04 0 00 000001 		CAIE	AC,1		;IS RESULT IN AC = 1?
  2079	031412	003 04 0 00 000620 		ER3	AC,SN		;FIX PT NBR NOT EQUAL TO 1
  2080	031413	321 10 0 00 031406 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  2081
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 4-8
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - CONVERSION OF FLT PT 1                                  SEQ 0057

  2082
  2083					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2084					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2085					;VERIFY THAT ALL FLT PT NBRS EQUAL TO "1" CONVERT CORRECTLY TO FIX PT
  2086
  2087			000621		SN=SN+1
  2088			232000			XX=XX+1000
  2089			000002			YY=YY/2
  2090						IFE	YY,<YY=400000>
  2091	031414	205 02 0 00 232000 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  2092	031415	541 02 0 00 000002 		HRRI	AC-2,YY
  2093	031416	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT 1 IN 'E' TO FIX PT 1 AND PLACE IN AC
  2094	031417	302 04 0 00 000001 		CAIE	AC,1		;IS RESULT IN AC = 1?
  2095	031420	003 04 0 00 000621 		ER3	AC,SN		;FIX PT NBR NOT EQUAL TO 1
  2096	031421	321 10 0 00 031414 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  2097
  2098
  2099					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2100					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2101					;VERIFY THAT ALL FLT PT NBRS EQUAL TO "1" CONVERT CORRECTLY TO FIX PT
  2102
  2103			000622		SN=SN+1
  2104			233000			XX=XX+1000
  2105			000001			YY=YY/2
  2106						IFE	YY,<YY=400000>
  2107	031422	205 02 0 00 233000 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  2108	031423	541 02 0 00 000001 		HRRI	AC-2,YY
  2109	031424	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT 1 IN 'E' TO FIX PT 1 AND PLACE IN AC
  2110	031425	302 04 0 00 000001 		CAIE	AC,1		;IS RESULT IN AC = 1?
  2111	031426	003 04 0 00 000622 		ER3	AC,SN		;FIX PT NBR NOT EQUAL TO 1
  2112	031427	321 10 0 00 031422 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  2113
  2114
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 5
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - NEGATIVE INTEGERS-RIPPLE ZEROS                          SEQ 0058

  2115					SUBTTL	DIAGNOSTIC SECTION - FIX - NEGATIVE INTEGERS-RIPPLE ZEROS
  2116
  2117			000700		SN=700
  2118			577000			XX=577000
  2119			000000			ZZ=0
  2120
  2121					Q700:	REPEAT	^D2,<
  2122					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2123					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2124					;DATA:	RIPPLE A "0" THROUGH A FIELD OF "1'S" - NEGATIVE NUMBERS
  2125					
  2126					SN=SN+1
  2127						XX=XX-1000
  2128						ZZ=<ZZ+ZZ>&777777
  2129						IFE	ZZ,<ZZ=777777>
  2130						MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  2131						TLO	AC-2,400
  2132						HRROI	AC-1,ZZ		;RESULT FOR COMPARISON
  2133						FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT
  2134						CAME	AC,AC-1		;IS TESTED BIT CLEAR?
  2135						ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  2136						JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  2137					>
  2138
  2139					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2140					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2141					;DATA:	RIPPLE A "0" THROUGH A FIELD OF "1'S" - NEGATIVE NUMBERS
  2142
  2143			000701		SN=SN+1
  2144			576000			XX=XX-1000
  2145			000000			ZZ=<ZZ+ZZ>&777777
  2146			777777			IFE	ZZ,<ZZ=777777>
  2147	031430	205 02 0 00 576000 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  2148	031431	661 02 0 00 000400 		TLO	AC-2,400
  2149	031432	561 03 0 00 777777 		HRROI	AC-1,ZZ		;RESULT FOR COMPARISON
  2150	031433	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT
  2151	031434	312 04 0 00 000003 		CAME	AC,AC-1		;IS TESTED BIT CLEAR?
  2152	031435	003 04 0 00 000701 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  2153	031436	321 10 0 00 031430 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  2154
  2155
  2156					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2157					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2158					;DATA:	RIPPLE A "0" THROUGH A FIELD OF "1'S" - NEGATIVE NUMBERS
  2159
  2160			000702		SN=SN+1
  2161			575000			XX=XX-1000
  2162			777776			ZZ=<ZZ+ZZ>&777777
  2163						IFE	ZZ,<ZZ=777777>
  2164	031437	205 02 0 00 575000 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  2165	031440	661 02 0 00 000400 		TLO	AC-2,400
  2166	031441	561 03 0 00 777776 		HRROI	AC-1,ZZ		;RESULT FOR COMPARISON
  2167	031442	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT
  2168	031443	312 04 0 00 000003 		CAME	AC,AC-1		;IS TESTED BIT CLEAR?
  2169	031444	003 04 0 00 000702 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 5-1
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - NEGATIVE INTEGERS-RIPPLE ZEROS                          SEQ 0059

  2170	031445	321 10 0 00 031437 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  2171
  2172					PAGE
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 5-2
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - NEGATIVE INTEGERS-RIPPLE ZEROS                          SEQ 0060

  2173			001000		SN=1000
  2174			576000			XX=576000
  2175			000000			YY=0
  2176			777776			ZZ=777776
  2177
  2178					Q1000:	REPEAT	^D8,<
  2179					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2180					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2181					;DATA:	RIPPLE A "0" THROUGH A FIELD OF "1'S" - NEGATIVE NUMBERS
  2182					
  2183					SN=SN+1
  2184						XX=XX-1000
  2185						YY=YY!<YY/2>
  2186						ZZ=<ZZ+ZZ+1>&777777
  2187						IFE	YY,<YY=200>
  2188						MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  2189						TLO	AC-2,YY
  2190						HRROI	AC-1,ZZ		;RESULT FOR COMPARISON
  2191						FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT 
  2192						CAME	AC,AC-1		;IS TESTED BIT CLEAR?
  2193						ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  2194						JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  2195					>
  2196
  2197					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2198					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2199					;DATA:	RIPPLE A "0" THROUGH A FIELD OF "1'S" - NEGATIVE NUMBERS
  2200
  2201			001001		SN=SN+1
  2202			575000			XX=XX-1000
  2203			000000			YY=YY!<YY/2>
  2204			777775			ZZ=<ZZ+ZZ+1>&777777
  2205			000200			IFE	YY,<YY=200>
  2206	031446	205 02 0 00 575000 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  2207	031447	661 02 0 00 000200 		TLO	AC-2,YY
  2208	031450	561 03 0 00 777775 		HRROI	AC-1,ZZ		;RESULT FOR COMPARISON
  2209	031451	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT 
  2210	031452	312 04 0 00 000003 		CAME	AC,AC-1		;IS TESTED BIT CLEAR?
  2211	031453	003 04 0 00 001001 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  2212	031454	321 10 0 00 031446 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  2213
  2214
  2215					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2216					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2217					;DATA:	RIPPLE A "0" THROUGH A FIELD OF "1'S" - NEGATIVE NUMBERS
  2218
  2219			001002		SN=SN+1
  2220			574000			XX=XX-1000
  2221			000300			YY=YY!<YY/2>
  2222			777773			ZZ=<ZZ+ZZ+1>&777777
  2223						IFE	YY,<YY=200>
  2224	031455	205 02 0 00 574000 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  2225	031456	661 02 0 00 000300 		TLO	AC-2,YY
  2226	031457	561 03 0 00 777773 		HRROI	AC-1,ZZ		;RESULT FOR COMPARISON
  2227	031460	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT 
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 5-3
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - NEGATIVE INTEGERS-RIPPLE ZEROS                          SEQ 0061

  2228	031461	312 04 0 00 000003 		CAME	AC,AC-1		;IS TESTED BIT CLEAR?
  2229	031462	003 04 0 00 001002 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  2230	031463	321 10 0 00 031455 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  2231
  2232
  2233					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2234					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2235					;DATA:	RIPPLE A "0" THROUGH A FIELD OF "1'S" - NEGATIVE NUMBERS
  2236
  2237			001003		SN=SN+1
  2238			573000			XX=XX-1000
  2239			000340			YY=YY!<YY/2>
  2240			777767			ZZ=<ZZ+ZZ+1>&777777
  2241						IFE	YY,<YY=200>
  2242	031464	205 02 0 00 573000 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  2243	031465	661 02 0 00 000340 		TLO	AC-2,YY
  2244	031466	561 03 0 00 777767 		HRROI	AC-1,ZZ		;RESULT FOR COMPARISON
  2245	031467	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT 
  2246	031470	312 04 0 00 000003 		CAME	AC,AC-1		;IS TESTED BIT CLEAR?
  2247	031471	003 04 0 00 001003 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  2248	031472	321 10 0 00 031464 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  2249
  2250
  2251					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2252					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2253					;DATA:	RIPPLE A "0" THROUGH A FIELD OF "1'S" - NEGATIVE NUMBERS
  2254
  2255			001004		SN=SN+1
  2256			572000			XX=XX-1000
  2257			000360			YY=YY!<YY/2>
  2258			777757			ZZ=<ZZ+ZZ+1>&777777
  2259						IFE	YY,<YY=200>
  2260	031473	205 02 0 00 572000 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  2261	031474	661 02 0 00 000360 		TLO	AC-2,YY
  2262	031475	561 03 0 00 777757 		HRROI	AC-1,ZZ		;RESULT FOR COMPARISON
  2263	031476	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT 
  2264	031477	312 04 0 00 000003 		CAME	AC,AC-1		;IS TESTED BIT CLEAR?
  2265	031500	003 04 0 00 001004 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  2266	031501	321 10 0 00 031473 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  2267
  2268
  2269					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2270					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2271					;DATA:	RIPPLE A "0" THROUGH A FIELD OF "1'S" - NEGATIVE NUMBERS
  2272
  2273			001005		SN=SN+1
  2274			571000			XX=XX-1000
  2275			000370			YY=YY!<YY/2>
  2276			777737			ZZ=<ZZ+ZZ+1>&777777
  2277						IFE	YY,<YY=200>
  2278	031502	205 02 0 00 571000 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  2279	031503	661 02 0 00 000370 		TLO	AC-2,YY
  2280	031504	561 03 0 00 777737 		HRROI	AC-1,ZZ		;RESULT FOR COMPARISON
  2281	031505	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT 
  2282	031506	312 04 0 00 000003 		CAME	AC,AC-1		;IS TESTED BIT CLEAR?
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 5-4
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - NEGATIVE INTEGERS-RIPPLE ZEROS                          SEQ 0062

  2283	031507	003 04 0 00 001005 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  2284	031510	321 10 0 00 031502 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  2285
  2286
  2287					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2288					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2289					;DATA:	RIPPLE A "0" THROUGH A FIELD OF "1'S" - NEGATIVE NUMBERS
  2290
  2291			001006		SN=SN+1
  2292			570000			XX=XX-1000
  2293			000374			YY=YY!<YY/2>
  2294			777677			ZZ=<ZZ+ZZ+1>&777777
  2295						IFE	YY,<YY=200>
  2296	031511	205 02 0 00 570000 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  2297	031512	661 02 0 00 000374 		TLO	AC-2,YY
  2298	031513	561 03 0 00 777677 		HRROI	AC-1,ZZ		;RESULT FOR COMPARISON
  2299	031514	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT 
  2300	031515	312 04 0 00 000003 		CAME	AC,AC-1		;IS TESTED BIT CLEAR?
  2301	031516	003 04 0 00 001006 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  2302	031517	321 10 0 00 031511 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  2303
  2304
  2305					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2306					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2307					;DATA:	RIPPLE A "0" THROUGH A FIELD OF "1'S" - NEGATIVE NUMBERS
  2308
  2309			001007		SN=SN+1
  2310			567000			XX=XX-1000
  2311			000376			YY=YY!<YY/2>
  2312			777577			ZZ=<ZZ+ZZ+1>&777777
  2313						IFE	YY,<YY=200>
  2314	031520	205 02 0 00 567000 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  2315	031521	661 02 0 00 000376 		TLO	AC-2,YY
  2316	031522	561 03 0 00 777577 		HRROI	AC-1,ZZ		;RESULT FOR COMPARISON
  2317	031523	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT 
  2318	031524	312 04 0 00 000003 		CAME	AC,AC-1		;IS TESTED BIT CLEAR?
  2319	031525	003 04 0 00 001007 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  2320	031526	321 10 0 00 031520 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  2321
  2322
  2323					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2324					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2325					;DATA:	RIPPLE A "0" THROUGH A FIELD OF "1'S" - NEGATIVE NUMBERS
  2326
  2327			001010		SN=SN+1
  2328			566000			XX=XX-1000
  2329			000377			YY=YY!<YY/2>
  2330			777377			ZZ=<ZZ+ZZ+1>&777777
  2331						IFE	YY,<YY=200>
  2332	031527	205 02 0 00 566000 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  2333	031530	661 02 0 00 000377 		TLO	AC-2,YY
  2334	031531	561 03 0 00 777377 		HRROI	AC-1,ZZ		;RESULT FOR COMPARISON
  2335	031532	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT 
  2336	031533	312 04 0 00 000003 		CAME	AC,AC-1		;IS TESTED BIT CLEAR?
  2337	031534	003 04 0 00 001010 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 5-5
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - NEGATIVE INTEGERS-RIPPLE ZEROS                          SEQ 0063

  2338	031535	321 10 0 00 031527 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  2339
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 6
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - NEGATIVE INTEGERS-RIPPLE ZEROS                          SEQ 0064

  2340			001100		SN=1100
  2341			566377			XX=566377
  2342			000000			YY=0
  2343			777377			ZZ=777377
  2344
  2345					Q1100:	REPEAT	^D9,<
  2346					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2347					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2348					;DATA:	RIPPLE A "0" THROUGH A FIELD OF "1'S" - NEGATIVE NUMBERS
  2349					
  2350					SN=SN+1
  2351						XX=XX-1000
  2352						YY=YY!<YY/2>
  2353						ZZ=<ZZ+ZZ+1>&777777
  2354						IFE	YY,<YY=400000>
  2355						MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  2356						HRRI	AC-2,YY
  2357						HRROI	AC-1,ZZ		;RESULT FOR COMPARISON
  2358						FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' T0 FIX PT
  2359						CAME	AC,AC-1		;IS TESTED BIT CLEAR?
  2360						ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  2361						JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  2362					>
  2363
  2364					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2365					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2366					;DATA:	RIPPLE A "0" THROUGH A FIELD OF "1'S" - NEGATIVE NUMBERS
  2367
  2368			001101		SN=SN+1
  2369			565377			XX=XX-1000
  2370			000000			YY=YY!<YY/2>
  2371			776777			ZZ=<ZZ+ZZ+1>&777777
  2372			400000			IFE	YY,<YY=400000>
  2373	031536	205 02 0 00 565377 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  2374	031537	541 02 0 00 400000 		HRRI	AC-2,YY
  2375	031540	561 03 0 00 776777 		HRROI	AC-1,ZZ		;RESULT FOR COMPARISON
  2376	031541	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' T0 FIX PT
  2377	031542	312 04 0 00 000003 		CAME	AC,AC-1		;IS TESTED BIT CLEAR?
  2378	031543	003 04 0 00 001101 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  2379	031544	321 10 0 00 031536 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  2380
  2381
  2382					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2383					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2384					;DATA:	RIPPLE A "0" THROUGH A FIELD OF "1'S" - NEGATIVE NUMBERS
  2385
  2386			001102		SN=SN+1
  2387			564377			XX=XX-1000
  2388			600000			YY=YY!<YY/2>
  2389			775777			ZZ=<ZZ+ZZ+1>&777777
  2390						IFE	YY,<YY=400000>
  2391	031545	205 02 0 00 564377 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  2392	031546	541 02 0 00 600000 		HRRI	AC-2,YY
  2393	031547	561 03 0 00 775777 		HRROI	AC-1,ZZ		;RESULT FOR COMPARISON
  2394	031550	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' T0 FIX PT
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 6-1
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - NEGATIVE INTEGERS-RIPPLE ZEROS                          SEQ 0065

  2395	031551	312 04 0 00 000003 		CAME	AC,AC-1		;IS TESTED BIT CLEAR?
  2396	031552	003 04 0 00 001102 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  2397	031553	321 10 0 00 031545 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  2398
  2399
  2400					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2401					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2402					;DATA:	RIPPLE A "0" THROUGH A FIELD OF "1'S" - NEGATIVE NUMBERS
  2403
  2404			001103		SN=SN+1
  2405			563377			XX=XX-1000
  2406			700000			YY=YY!<YY/2>
  2407			773777			ZZ=<ZZ+ZZ+1>&777777
  2408						IFE	YY,<YY=400000>
  2409	031554	205 02 0 00 563377 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  2410	031555	541 02 0 00 700000 		HRRI	AC-2,YY
  2411	031556	561 03 0 00 773777 		HRROI	AC-1,ZZ		;RESULT FOR COMPARISON
  2412	031557	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' T0 FIX PT
  2413	031560	312 04 0 00 000003 		CAME	AC,AC-1		;IS TESTED BIT CLEAR?
  2414	031561	003 04 0 00 001103 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  2415	031562	321 10 0 00 031554 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  2416
  2417
  2418					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2419					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2420					;DATA:	RIPPLE A "0" THROUGH A FIELD OF "1'S" - NEGATIVE NUMBERS
  2421
  2422			001104		SN=SN+1
  2423			562377			XX=XX-1000
  2424			740000			YY=YY!<YY/2>
  2425			767777			ZZ=<ZZ+ZZ+1>&777777
  2426						IFE	YY,<YY=400000>
  2427	031563	205 02 0 00 562377 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  2428	031564	541 02 0 00 740000 		HRRI	AC-2,YY
  2429	031565	561 03 0 00 767777 		HRROI	AC-1,ZZ		;RESULT FOR COMPARISON
  2430	031566	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' T0 FIX PT
  2431	031567	312 04 0 00 000003 		CAME	AC,AC-1		;IS TESTED BIT CLEAR?
  2432	031570	003 04 0 00 001104 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  2433	031571	321 10 0 00 031563 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  2434
  2435
  2436					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2437					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2438					;DATA:	RIPPLE A "0" THROUGH A FIELD OF "1'S" - NEGATIVE NUMBERS
  2439
  2440			001105		SN=SN+1
  2441			561377			XX=XX-1000
  2442			760000			YY=YY!<YY/2>
  2443			757777			ZZ=<ZZ+ZZ+1>&777777
  2444						IFE	YY,<YY=400000>
  2445	031572	205 02 0 00 561377 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  2446	031573	541 02 0 00 760000 		HRRI	AC-2,YY
  2447	031574	561 03 0 00 757777 		HRROI	AC-1,ZZ		;RESULT FOR COMPARISON
  2448	031575	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' T0 FIX PT
  2449	031576	312 04 0 00 000003 		CAME	AC,AC-1		;IS TESTED BIT CLEAR?
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 6-2
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - NEGATIVE INTEGERS-RIPPLE ZEROS                          SEQ 0066

  2450	031577	003 04 0 00 001105 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  2451	031600	321 10 0 00 031572 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  2452
  2453
  2454					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2455					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2456					;DATA:	RIPPLE A "0" THROUGH A FIELD OF "1'S" - NEGATIVE NUMBERS
  2457
  2458			001106		SN=SN+1
  2459			560377			XX=XX-1000
  2460			770000			YY=YY!<YY/2>
  2461			737777			ZZ=<ZZ+ZZ+1>&777777
  2462						IFE	YY,<YY=400000>
  2463	031601	205 02 0 00 560377 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  2464	031602	541 02 0 00 770000 		HRRI	AC-2,YY
  2465	031603	561 03 0 00 737777 		HRROI	AC-1,ZZ		;RESULT FOR COMPARISON
  2466	031604	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' T0 FIX PT
  2467	031605	312 04 0 00 000003 		CAME	AC,AC-1		;IS TESTED BIT CLEAR?
  2468	031606	003 04 0 00 001106 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  2469	031607	321 10 0 00 031601 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  2470
  2471
  2472					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2473					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2474					;DATA:	RIPPLE A "0" THROUGH A FIELD OF "1'S" - NEGATIVE NUMBERS
  2475
  2476			001107		SN=SN+1
  2477			557377			XX=XX-1000
  2478			774000			YY=YY!<YY/2>
  2479			677777			ZZ=<ZZ+ZZ+1>&777777
  2480						IFE	YY,<YY=400000>
  2481	031610	205 02 0 00 557377 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  2482	031611	541 02 0 00 774000 		HRRI	AC-2,YY
  2483	031612	561 03 0 00 677777 		HRROI	AC-1,ZZ		;RESULT FOR COMPARISON
  2484	031613	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' T0 FIX PT
  2485	031614	312 04 0 00 000003 		CAME	AC,AC-1		;IS TESTED BIT CLEAR?
  2486	031615	003 04 0 00 001107 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  2487	031616	321 10 0 00 031610 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  2488
  2489
  2490					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2491					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2492					;DATA:	RIPPLE A "0" THROUGH A FIELD OF "1'S" - NEGATIVE NUMBERS
  2493
  2494			001110		SN=SN+1
  2495			556377			XX=XX-1000
  2496			776000			YY=YY!<YY/2>
  2497			577777			ZZ=<ZZ+ZZ+1>&777777
  2498						IFE	YY,<YY=400000>
  2499	031617	205 02 0 00 556377 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  2500	031620	541 02 0 00 776000 		HRRI	AC-2,YY
  2501	031621	561 03 0 00 577777 		HRROI	AC-1,ZZ		;RESULT FOR COMPARISON
  2502	031622	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' T0 FIX PT
  2503	031623	312 04 0 00 000003 		CAME	AC,AC-1		;IS TESTED BIT CLEAR?
  2504	031624	003 04 0 00 001110 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 6-3
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - NEGATIVE INTEGERS-RIPPLE ZEROS                          SEQ 0067

  2505	031625	321 10 0 00 031617 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  2506
  2507
  2508					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2509					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2510					;DATA:	RIPPLE A "0" THROUGH A FIELD OF "1'S" - NEGATIVE NUMBERS
  2511
  2512			001111		SN=SN+1
  2513			555377			XX=XX-1000
  2514			777000			YY=YY!<YY/2>
  2515			377777			ZZ=<ZZ+ZZ+1>&777777
  2516						IFE	YY,<YY=400000>
  2517	031626	205 02 0 00 555377 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  2518	031627	541 02 0 00 777000 		HRRI	AC-2,YY
  2519	031630	561 03 0 00 377777 		HRROI	AC-1,ZZ		;RESULT FOR COMPARISON
  2520	031631	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' T0 FIX PT
  2521	031632	312 04 0 00 000003 		CAME	AC,AC-1		;IS TESTED BIT CLEAR?
  2522	031633	003 04 0 00 001111 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  2523	031634	321 10 0 00 031626 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  2524
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 7
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - NEGATIVE INTEGERS-RIPPLE ZEROS                          SEQ 0068

  2525
  2526
  2527			001200		SN=1200
  2528			000000			ZZ=0
  2529
  2530					Q1200:	REPEAT	^D9,<
  2531					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2532					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2533					;DATA:	RIPPLE A "0" THROUGH A FIELD OF "1'S" - NEGATIVE NUMBERS
  2534					
  2535					SN=SN+1
  2536						XX=XX-1000
  2537						YY=YY!<YY/2>
  2538						ZZ=<ZZ+ZZ+1>&777777
  2539						IFE	<ZZ-1>,<ZZ=777776>
  2540						MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  2541						HRRI	AC-2,YY		;RESULT FOR COMPARISON
  2542						HRLOI	AC-1,ZZ
  2543						FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT
  2544						CAME	AC,AC-1		;IS TESTED BIT CLEAR?
  2545						ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  2546						JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  2547					>
  2548
  2549					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2550					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2551					;DATA:	RIPPLE A "0" THROUGH A FIELD OF "1'S" - NEGATIVE NUMBERS
  2552
  2553			001201		SN=SN+1
  2554			554377			XX=XX-1000
  2555			777400			YY=YY!<YY/2>
  2556			000001			ZZ=<ZZ+ZZ+1>&777777
  2557			777776			IFE	<ZZ-1>,<ZZ=777776>
  2558	031635	205 02 0 00 554377 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  2559	031636	541 02 0 00 777400 		HRRI	AC-2,YY		;RESULT FOR COMPARISON
  2560	031637	525 03 0 00 777776 		HRLOI	AC-1,ZZ
  2561	031640	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT
  2562	031641	312 04 0 00 000003 		CAME	AC,AC-1		;IS TESTED BIT CLEAR?
  2563	031642	003 04 0 00 001201 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  2564	031643	321 10 0 00 031635 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  2565
  2566
  2567					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2568					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2569					;DATA:	RIPPLE A "0" THROUGH A FIELD OF "1'S" - NEGATIVE NUMBERS
  2570
  2571			001202		SN=SN+1
  2572			553377			XX=XX-1000
  2573			777600			YY=YY!<YY/2>
  2574			777775			ZZ=<ZZ+ZZ+1>&777777
  2575						IFE	<ZZ-1>,<ZZ=777776>
  2576	031644	205 02 0 00 553377 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  2577	031645	541 02 0 00 777600 		HRRI	AC-2,YY		;RESULT FOR COMPARISON
  2578	031646	525 03 0 00 777775 		HRLOI	AC-1,ZZ
  2579	031647	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 7-1
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - NEGATIVE INTEGERS-RIPPLE ZEROS                          SEQ 0069

  2580	031650	312 04 0 00 000003 		CAME	AC,AC-1		;IS TESTED BIT CLEAR?
  2581	031651	003 04 0 00 001202 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  2582	031652	321 10 0 00 031644 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  2583
  2584
  2585					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2586					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2587					;DATA:	RIPPLE A "0" THROUGH A FIELD OF "1'S" - NEGATIVE NUMBERS
  2588
  2589			001203		SN=SN+1
  2590			552377			XX=XX-1000
  2591			777700			YY=YY!<YY/2>
  2592			777773			ZZ=<ZZ+ZZ+1>&777777
  2593						IFE	<ZZ-1>,<ZZ=777776>
  2594	031653	205 02 0 00 552377 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  2595	031654	541 02 0 00 777700 		HRRI	AC-2,YY		;RESULT FOR COMPARISON
  2596	031655	525 03 0 00 777773 		HRLOI	AC-1,ZZ
  2597	031656	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT
  2598	031657	312 04 0 00 000003 		CAME	AC,AC-1		;IS TESTED BIT CLEAR?
  2599	031660	003 04 0 00 001203 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  2600	031661	321 10 0 00 031653 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  2601
  2602
  2603					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2604					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2605					;DATA:	RIPPLE A "0" THROUGH A FIELD OF "1'S" - NEGATIVE NUMBERS
  2606
  2607			001204		SN=SN+1
  2608			551377			XX=XX-1000
  2609			777740			YY=YY!<YY/2>
  2610			777767			ZZ=<ZZ+ZZ+1>&777777
  2611						IFE	<ZZ-1>,<ZZ=777776>
  2612	031662	205 02 0 00 551377 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  2613	031663	541 02 0 00 777740 		HRRI	AC-2,YY		;RESULT FOR COMPARISON
  2614	031664	525 03 0 00 777767 		HRLOI	AC-1,ZZ
  2615	031665	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT
  2616	031666	312 04 0 00 000003 		CAME	AC,AC-1		;IS TESTED BIT CLEAR?
  2617	031667	003 04 0 00 001204 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  2618	031670	321 10 0 00 031662 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  2619
  2620
  2621					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2622					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2623					;DATA:	RIPPLE A "0" THROUGH A FIELD OF "1'S" - NEGATIVE NUMBERS
  2624
  2625			001205		SN=SN+1
  2626			550377			XX=XX-1000
  2627			777760			YY=YY!<YY/2>
  2628			777757			ZZ=<ZZ+ZZ+1>&777777
  2629						IFE	<ZZ-1>,<ZZ=777776>
  2630	031671	205 02 0 00 550377 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  2631	031672	541 02 0 00 777760 		HRRI	AC-2,YY		;RESULT FOR COMPARISON
  2632	031673	525 03 0 00 777757 		HRLOI	AC-1,ZZ
  2633	031674	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT
  2634	031675	312 04 0 00 000003 		CAME	AC,AC-1		;IS TESTED BIT CLEAR?
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 7-2
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - NEGATIVE INTEGERS-RIPPLE ZEROS                          SEQ 0070

  2635	031676	003 04 0 00 001205 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  2636	031677	321 10 0 00 031671 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  2637
  2638
  2639					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2640					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2641					;DATA:	RIPPLE A "0" THROUGH A FIELD OF "1'S" - NEGATIVE NUMBERS
  2642
  2643			001206		SN=SN+1
  2644			547377			XX=XX-1000
  2645			777770			YY=YY!<YY/2>
  2646			777737			ZZ=<ZZ+ZZ+1>&777777
  2647						IFE	<ZZ-1>,<ZZ=777776>
  2648	031700	205 02 0 00 547377 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  2649	031701	541 02 0 00 777770 		HRRI	AC-2,YY		;RESULT FOR COMPARISON
  2650	031702	525 03 0 00 777737 		HRLOI	AC-1,ZZ
  2651	031703	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT
  2652	031704	312 04 0 00 000003 		CAME	AC,AC-1		;IS TESTED BIT CLEAR?
  2653	031705	003 04 0 00 001206 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  2654	031706	321 10 0 00 031700 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  2655
  2656
  2657					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2658					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2659					;DATA:	RIPPLE A "0" THROUGH A FIELD OF "1'S" - NEGATIVE NUMBERS
  2660
  2661			001207		SN=SN+1
  2662			546377			XX=XX-1000
  2663			777774			YY=YY!<YY/2>
  2664			777677			ZZ=<ZZ+ZZ+1>&777777
  2665						IFE	<ZZ-1>,<ZZ=777776>
  2666	031707	205 02 0 00 546377 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  2667	031710	541 02 0 00 777774 		HRRI	AC-2,YY		;RESULT FOR COMPARISON
  2668	031711	525 03 0 00 777677 		HRLOI	AC-1,ZZ
  2669	031712	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT
  2670	031713	312 04 0 00 000003 		CAME	AC,AC-1		;IS TESTED BIT CLEAR?
  2671	031714	003 04 0 00 001207 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  2672	031715	321 10 0 00 031707 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  2673
  2674
  2675					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2676					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2677					;DATA:	RIPPLE A "0" THROUGH A FIELD OF "1'S" - NEGATIVE NUMBERS
  2678
  2679			001210		SN=SN+1
  2680			545377			XX=XX-1000
  2681			777776			YY=YY!<YY/2>
  2682			777577			ZZ=<ZZ+ZZ+1>&777777
  2683						IFE	<ZZ-1>,<ZZ=777776>
  2684	031716	205 02 0 00 545377 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  2685	031717	541 02 0 00 777776 		HRRI	AC-2,YY		;RESULT FOR COMPARISON
  2686	031720	525 03 0 00 777577 		HRLOI	AC-1,ZZ
  2687	031721	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT
  2688	031722	312 04 0 00 000003 		CAME	AC,AC-1		;IS TESTED BIT CLEAR?
  2689	031723	003 04 0 00 001210 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 7-3
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - NEGATIVE INTEGERS-RIPPLE ZEROS                          SEQ 0071

  2690	031724	321 10 0 00 031716 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  2691
  2692
  2693					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2694					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2695					;DATA:	RIPPLE A "0" THROUGH A FIELD OF "1'S" - NEGATIVE NUMBERS
  2696
  2697			001211		SN=SN+1
  2698			544377			XX=XX-1000
  2699			777777			YY=YY!<YY/2>
  2700			777377			ZZ=<ZZ+ZZ+1>&777777
  2701						IFE	<ZZ-1>,<ZZ=777776>
  2702	031725	205 02 0 00 544377 		MOVSI	AC-2,XX		;INITIALIZE FLT PT NBR
  2703	031726	541 02 0 00 777777 		HRRI	AC-2,YY		;RESULT FOR COMPARISON
  2704	031727	525 03 0 00 777377 		HRLOI	AC-1,ZZ
  2705	031730	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT
  2706	031731	312 04 0 00 000003 		CAME	AC,AC-1		;IS TESTED BIT CLEAR?
  2707	031732	003 04 0 00 001211 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  2708	031733	321 10 0 00 031725 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  2709
  2710					PAGE
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 7-4
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - NEGATIVE INTEGERS-RIPPLE ZEROS                          SEQ 0072

  2711			001300		SN=1300
  2712			544377			XX=544377
  2713			777377			ZZ=777377
  2714			777777			WW=777777
  2715
  2716					Q1300:	REPEAT	^D8,<
  2717					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2718					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2719					;DATA:	RIPPLE A "0" THROUGH A FIELD OF "1'S" - NEGATIVE NUMBERS
  2720					
  2721					SN=SN+1
  2722						XX=XX-1000
  2723						ZZ=<ZZ+ZZ+1>&777777
  2724						WW=<WW+WW>&777777
  2725						HRLOI	AC-2,XX		;INITIALIZE FLT PT NBR
  2726						HRLI	AC-1,ZZ		;RESULT FOR COMPARISON
  2727						HRRI	AC-1,WW
  2728						FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT
  2729						CAME	AC,AC-1		;IS TESTED BIT CLEAR?
  2730						ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  2731						JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  2732					>
  2733
  2734					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2735					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2736					;DATA:	RIPPLE A "0" THROUGH A FIELD OF "1'S" - NEGATIVE NUMBERS
  2737
  2738			001301		SN=SN+1
  2739			543377			XX=XX-1000
  2740			776777			ZZ=<ZZ+ZZ+1>&777777
  2741			777776			WW=<WW+WW>&777777
  2742	031734	525 02 0 00 543377 		HRLOI	AC-2,XX		;INITIALIZE FLT PT NBR
  2743	031735	505 03 0 00 776777 		HRLI	AC-1,ZZ		;RESULT FOR COMPARISON
  2744	031736	541 03 0 00 777776 		HRRI	AC-1,WW
  2745	031737	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT
  2746	031740	312 04 0 00 000003 		CAME	AC,AC-1		;IS TESTED BIT CLEAR?
  2747	031741	003 04 0 00 001301 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  2748	031742	321 10 0 00 031734 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  2749
  2750
  2751					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2752					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2753					;DATA:	RIPPLE A "0" THROUGH A FIELD OF "1'S" - NEGATIVE NUMBERS
  2754
  2755			001302		SN=SN+1
  2756			542377			XX=XX-1000
  2757			775777			ZZ=<ZZ+ZZ+1>&777777
  2758			777774			WW=<WW+WW>&777777
  2759	031743	525 02 0 00 542377 		HRLOI	AC-2,XX		;INITIALIZE FLT PT NBR
  2760	031744	505 03 0 00 775777 		HRLI	AC-1,ZZ		;RESULT FOR COMPARISON
  2761	031745	541 03 0 00 777774 		HRRI	AC-1,WW
  2762	031746	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT
  2763	031747	312 04 0 00 000003 		CAME	AC,AC-1		;IS TESTED BIT CLEAR?
  2764	031750	003 04 0 00 001302 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  2765	031751	321 10 0 00 031743 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 7-5
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - NEGATIVE INTEGERS-RIPPLE ZEROS                          SEQ 0073

  2766
  2767
  2768					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2769					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2770					;DATA:	RIPPLE A "0" THROUGH A FIELD OF "1'S" - NEGATIVE NUMBERS
  2771
  2772			001303		SN=SN+1
  2773			541377			XX=XX-1000
  2774			773777			ZZ=<ZZ+ZZ+1>&777777
  2775			777770			WW=<WW+WW>&777777
  2776	031752	525 02 0 00 541377 		HRLOI	AC-2,XX		;INITIALIZE FLT PT NBR
  2777	031753	505 03 0 00 773777 		HRLI	AC-1,ZZ		;RESULT FOR COMPARISON
  2778	031754	541 03 0 00 777770 		HRRI	AC-1,WW
  2779	031755	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT
  2780	031756	312 04 0 00 000003 		CAME	AC,AC-1		;IS TESTED BIT CLEAR?
  2781	031757	003 04 0 00 001303 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  2782	031760	321 10 0 00 031752 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  2783
  2784
  2785					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2786					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2787					;DATA:	RIPPLE A "0" THROUGH A FIELD OF "1'S" - NEGATIVE NUMBERS
  2788
  2789			001304		SN=SN+1
  2790			540377			XX=XX-1000
  2791			767777			ZZ=<ZZ+ZZ+1>&777777
  2792			777760			WW=<WW+WW>&777777
  2793	031761	525 02 0 00 540377 		HRLOI	AC-2,XX		;INITIALIZE FLT PT NBR
  2794	031762	505 03 0 00 767777 		HRLI	AC-1,ZZ		;RESULT FOR COMPARISON
  2795	031763	541 03 0 00 777760 		HRRI	AC-1,WW
  2796	031764	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT
  2797	031765	312 04 0 00 000003 		CAME	AC,AC-1		;IS TESTED BIT CLEAR?
  2798	031766	003 04 0 00 001304 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  2799	031767	321 10 0 00 031761 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  2800
  2801
  2802					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2803					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2804					;DATA:	RIPPLE A "0" THROUGH A FIELD OF "1'S" - NEGATIVE NUMBERS
  2805
  2806			001305		SN=SN+1
  2807			537377			XX=XX-1000
  2808			757777			ZZ=<ZZ+ZZ+1>&777777
  2809			777740			WW=<WW+WW>&777777
  2810	031770	525 02 0 00 537377 		HRLOI	AC-2,XX		;INITIALIZE FLT PT NBR
  2811	031771	505 03 0 00 757777 		HRLI	AC-1,ZZ		;RESULT FOR COMPARISON
  2812	031772	541 03 0 00 777740 		HRRI	AC-1,WW
  2813	031773	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT
  2814	031774	312 04 0 00 000003 		CAME	AC,AC-1		;IS TESTED BIT CLEAR?
  2815	031775	003 04 0 00 001305 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  2816	031776	321 10 0 00 031770 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  2817
  2818
  2819					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2820					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 7-6
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - NEGATIVE INTEGERS-RIPPLE ZEROS                          SEQ 0074

  2821					;DATA:	RIPPLE A "0" THROUGH A FIELD OF "1'S" - NEGATIVE NUMBERS
  2822
  2823			001306		SN=SN+1
  2824			536377			XX=XX-1000
  2825			737777			ZZ=<ZZ+ZZ+1>&777777
  2826			777700			WW=<WW+WW>&777777
  2827	031777	525 02 0 00 536377 		HRLOI	AC-2,XX		;INITIALIZE FLT PT NBR
  2828	032000	505 03 0 00 737777 		HRLI	AC-1,ZZ		;RESULT FOR COMPARISON
  2829	032001	541 03 0 00 777700 		HRRI	AC-1,WW
  2830	032002	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT
  2831	032003	312 04 0 00 000003 		CAME	AC,AC-1		;IS TESTED BIT CLEAR?
  2832	032004	003 04 0 00 001306 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  2833	032005	321 10 0 00 031777 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  2834
  2835
  2836					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2837					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2838					;DATA:	RIPPLE A "0" THROUGH A FIELD OF "1'S" - NEGATIVE NUMBERS
  2839
  2840			001307		SN=SN+1
  2841			535377			XX=XX-1000
  2842			677777			ZZ=<ZZ+ZZ+1>&777777
  2843			777600			WW=<WW+WW>&777777
  2844	032006	525 02 0 00 535377 		HRLOI	AC-2,XX		;INITIALIZE FLT PT NBR
  2845	032007	505 03 0 00 677777 		HRLI	AC-1,ZZ		;RESULT FOR COMPARISON
  2846	032010	541 03 0 00 777600 		HRRI	AC-1,WW
  2847	032011	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT
  2848	032012	312 04 0 00 000003 		CAME	AC,AC-1		;IS TESTED BIT CLEAR?
  2849	032013	003 04 0 00 001307 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  2850	032014	321 10 0 00 032006 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  2851
  2852
  2853					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2854					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2855					;DATA:	RIPPLE A "0" THROUGH A FIELD OF "1'S" - NEGATIVE NUMBERS
  2856
  2857			001310		SN=SN+1
  2858			534377			XX=XX-1000
  2859			577777			ZZ=<ZZ+ZZ+1>&777777
  2860			777400			WW=<WW+WW>&777777
  2861	032015	525 02 0 00 534377 		HRLOI	AC-2,XX		;INITIALIZE FLT PT NBR
  2862	032016	505 03 0 00 577777 		HRLI	AC-1,ZZ		;RESULT FOR COMPARISON
  2863	032017	541 03 0 00 777400 		HRRI	AC-1,WW
  2864	032020	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT
  2865	032021	312 04 0 00 000003 		CAME	AC,AC-1		;IS TESTED BIT CLEAR?
  2866	032022	003 04 0 00 001310 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  2867	032023	321 10 0 00 032015 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  2868
  2869					PAGE
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 7-7
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - NEGATIVE INTEGERS-RIPPLE ZEROS                          SEQ 0075

  2870					;THIS TEST VERIFIES THAT THE FIX INSTRUCTION CONVERTS THE FLT PT NO.
  2871					;IN MEMORY TO FIX PT AND PLACES THE RESULT IN THE AC
  2872					;DATA:	RIPPLE A "0" THROUGH A FIELD OF "1'S" - NEGATIVE NUMBERS
  2873
  2874	032024	525 02 0 00 243777 	Q1400:	HRLOI	AC-2,243777	;INITIALIZE FLT PT NBR
  2875	032025	505 03 0 00 377777 		HRLI	AC-1,377777	;RESULT FOR COMPARISON
  2876	032026	541 03 0 00 777400 		HRRI	AC-1,777400
  2877	032027	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT
  2878	032030	312 04 0 00 000003 		CAME	AC,AC-1		;IS TESTED BIT CLEAR?
  2879	032031	003 04 0 00 001401 		ER3	AC,1401		;FAILURE IF TESTED BIT IS NOT CLEAR
  2880	032032	321 10 0 00 032024 		JUMPL	SAC,Q1400	;LOOP ON ERROR SWITCH
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 8
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - TRUNCATION                                              SEQ 0076

  2881					SUBTTL	DIAGNOSTIC SECTION - FIX - TRUNCATION
  2882
  2883					;CHECK THAT "FIX" TRUNCATES THE RESULT SUCH THAT
  2884					;IF THE VALUE OF 'X' IS GREATER THAN 'N' BUT LESS THAN
  2885					;N+1, "FIX" CONVERTS 'X' TO 'N' IF X IS POSITIVE,
  2886					;AND "FIX" CONVERTS 'X' TO N+1 IF X IS NEGATIVE WHERE N IS AN
  2887					;INTEGER AND 'X' IS THE FLOATING POINT NUMBER BEING
  2888					;CONVERTED.
  2889
  2890	032033	205 02 0 00 576000 	Q1500:	MOVSI	AC-2,576000	;SET-UP FLT PT NBR
  2891	032034	541 02 0 00 000001 		HRRI	AC-2,1
  2892	032035	476 00 0 00 000003 		SETOM	AC-1		;SET-UP EXPECTED RESULT
  2893	032036	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT,
  2894									;TRUNCATE RESULT, AND PLACE IN AC
  2895	032037	312 04 0 00 000003 		CAME	AC,AC-1		;IS RESULT TRUNCATED?
  2896	032040	003 04 0 00 001501 		ER3	AC,1501		;TRUNCATION FAILED IN CONVERSION
  2897	032041	321 10 0 00 032033 		JUMPL	SAC,Q1500	;LOOP ON ERROR SWITCH
  2898
  2899					;CHECK THAT "FIX" TRUNCATES THE RESULT SUCH THAT
  2900					;IF THE VALUE OF 'X' IS GREATER THAN 'N' BUT LESS THAN
  2901					;N+1, "FIX" CONVERTS 'X' TO 'N' IF X IS POSITIVE,
  2902					;AND "FIX" CONVERTS 'X' TO N+1 IF X IS NEGATIVE WHERE N IS AN
  2903					;INTEGER AND 'X' IS THE FLOATING POINT NUMBER BEING
  2904					;CONVERTED.
  2905
  2906	032042	515 02 0 00 576200 	Q1600:	HRLZI	AC-2,576200	;SET-UP FLT PT NBR
  2907	032043	476 00 0 00 000003 		SETOM	AC-1		;SET-UP EXPECTED RESULT
  2908	032044	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT,
  2909									;TRUNCATE RESULT, AND PLACE IN AC
  2910	032045	312 04 0 00 000003 		CAME	AC,AC-1		;IS RESULT TRUNCATED?
  2911	032046	003 04 0 00 001601 		ER3	AC,1601		;TRUNCATION FAILED IN CONVERSION
  2912	032047	321 10 0 00 032042 		JUMPL	SAC,Q1600	;LOOP ON ERROR SWITCH
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 9
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - TRUNCATION                                              SEQ 0077

  2913					;CHECK THAT "FIX" TRUNCATES THE RESULT SUCH THAT
  2914					;IF THE VALUE OF 'X' IS GREATER THAN 'N' BUT LESS THAN
  2915					;N+1, "FIX" CONVERTS 'X' TO 'N' IF X IS POSITIVE,
  2916					;AND "FIX" CONVERTS 'X' TO N+1 IF X IS NEGATIVE WHERE N IS AN
  2917					;INTEGER AND 'X' IS THE FLOATING POINT NUMBER BEING
  2918					;CONVERTED.
  2919
  2920	032050	205 02 0 00 576200 	Q1700:	MOVSI	AC-2,576200	;SET-UP FLT PT NBR
  2921	032051	541 02 0 00 000001 		HRRI	AC-2,1
  2922	032052	476 00 0 00 000003 		SETOM	AC-1		;SET-UP EXPECTED RESULT
  2923	032053	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT,
  2924									;TRUNCATE RESULT, AND PLACE IN AC
  2925	032054	312 04 0 00 000003 		CAME	AC,AC-1		;IS RESULT TRUNCATED?
  2926	032055	003 04 0 00 001701 		ER3	AC,1701		;TRUNCATION FAILED IN CONVERSION
  2927	032056	321 10 0 00 032050 		JUMPL	SAC,Q1700	;LOOP ON ERROR SWITCH
  2928
  2929					;CHECK THAT "FIX" TRUNCATES THE RESULT SUCH THAT
  2930					;IF THE VALUE OF 'X' IS GREATER THAN 'N' BUT LESS THAN
  2931					;N+1, "FIX" CONVERTS 'X' TO 'N' IF X IS POSITIVE,
  2932					;AND "FIX" CONVERTS 'X' TO N+1 IF X IS NEGATIVE WHERE N IS AN
  2933					;INTEGER AND 'X' IS THE FLOATING POINT NUMBER BEING
  2934					;CONVERTED.
  2935
  2936	032057	205 02 0 00 577000 	Q2000:	MOVSI	AC-2,577000	;SET-UP FLT PT NBR
  2937	032060	541 02 0 00 000001 		HRRI	AC-2,1		;SET-UP EXPECTED RESULT
  2938	032061	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT,
  2939									;TRUNCATE RESULT, AND PLACE IN AC
  2940	032062	302 04 0 00 000000 		CAIE	AC,0		;IS RESULT TRUNCATED?
  2941	032063	003 04 0 00 002001 		ER3	AC,2001		;TRUNCATION FAILED IN CONVERSION
  2942	032064	321 10 0 00 032057 		JUMPL	SAC,Q2000	;LOOP ON ERROR SWITCH
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 10
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - TRUNCATION                                              SEQ 0078

  2943					;CHECK THAT "FIX" TRUNCATES THE RESULT SUCH THAT
  2944					;IF THE VALUE OF 'X' IS GREATER THAN 'N' BUT LESS THAN
  2945					;N+1, "FIX" CONVERTS 'X' TO 'N' IF X IS POSITIVE,
  2946					;AND "FIX" CONVERTS 'X' TO N+1 IF X IS NEGATIVE WHERE N IS AN
  2947					;INTEGER AND 'X' IS THE FLOATING POINT NUMBER BEING
  2948					;CONVERTED.
  2949
  2950	032065	205 02 0 00 577400 	Q2100:	MOVSI	AC-2,577400	;SET-UP FLT PT NBR
  2951	032066	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT,
  2952									;TRUNCATE RESULT, AND PLACE IN AC
  2953	032067	302 04 0 00 000000 		CAIE	AC,0		;IS RESULT TRUNCATED?
  2954	032070	003 04 0 00 002101 		ER3	AC,2101		;TRUNCATION FAILED IN CONVERSION
  2955	032071	321 10 0 00 032065 		JUMPL	SAC,Q2100	;LOOP ON ERROR SWITCH
  2956
  2957					;CHECK THAT "FIX" TRUNCATES THE RESULT SUCH THAT
  2958					;IF THE VALUE OF 'X' IS GREATER THAN 'N' BUT LESS THAN
  2959					;N+1, "FIX" CONVERTS 'X' TO 'N' IF X IS POSITIVE,
  2960					;AND "FIX" CONVERTS 'X' TO N+1 IF X IS NEGATIVE WHERE N IS AN
  2961					;INTEGER AND 'X' IS THE FLOATING POINT NUMBER BEING
  2962					;CONVERTED.
  2963
  2964	032072	205 02 0 00 600000 	Q2200:	MOVSI	AC-2,600000	;SET-UP FLT PT NBR
  2965	032073	541 02 0 00 000001 		HRRI	AC-2,1
  2966	032074	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT,
  2967									;TRUNCATE RESULT, AND PLACE IN AC
  2968	032075	302 04 0 00 000000 		CAIE	AC,0		;IS RESULT TRUNCATED?
  2969	032076	003 04 0 00 002201 		ER3	AC,2201		;TRUNCATION FAILED IN CONVERSION
  2970	032077	321 10 0 00 032072 		JUMPL	SAC,Q2200	;LOOP ON ERROR SWITCH
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 11
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - TRUNCATION                                              SEQ 0079

  2971					;CHECK THAT "FIX" TRUNCATES THE RESULT SUCH THAT
  2972					;IF THE VALUE OF 'X' IS GREATER THAN 'N' BUT LESS THAN
  2973					;N+1, "FIX" CONVERTS 'X' TO 'N' IF X IS POSITIVE,
  2974					;AND "FIX" CONVERTS 'X' TO N+1 IF X IS NEGATIVE WHERE N IS AN
  2975					;INTEGER AND 'X' IS THE FLOATING POINT NUMBER BEING
  2976					;CONVERTED.
  2977
  2978	032100	525 02 0 00 177777 	Q2300:	HRLOI	AC-2,177777	;SET-UP FLT PT NBR
  2979	032101	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT,
  2980									;TRUNCATE RESULT, AND PLACE IN AC
  2981	032102	302 04 0 00 000000 		CAIE	AC,0		;IS RESULT TRUNCATED?
  2982	032103	003 04 0 00 002301 		ER3	AC,2301		;TRUNCATION FAILED IN CONVERSION
  2983	032104	321 10 0 00 032100 		JUMPL	SAC,Q2300	;LOOP ON ERROR SWITCH
  2984
  2985					;CHECK THAT "FIX" TRUNCATES THE RESULT SUCH THAT
  2986					;IF THE VALUE OF 'X' IS GREATER THAN 'N' BUT LESS THAN
  2987					;N+1, "FIX" CONVERTS 'X' TO 'N' IF X IS POSITIVE,
  2988					;AND "FIX" CONVERTS 'X' TO N+1 IF X IS NEGATIVE WHERE N IS AN
  2989					;INTEGER AND 'X' IS THE FLOATING POINT NUMBER BEING
  2990					;CONVERTED.
  2991
  2992	032105	205 02 0 00 200400 	Q2400:	MOVSI	AC-2,200400	;SET-UP FLT PT NBR
  2993	032106	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT,
  2994									;TRUNCATE RESULT, AND PLACE IN AC
  2995	032107	302 04 0 00 000000 		CAIE	AC,0		;IS RESULT TRUNCATED?
  2996	032110	003 04 0 00 002401 		ER3	AC,2401		;TRUNCATION FAILED IN CONVERSION
  2997	032111	321 10 0 00 032105 		JUMPL	SAC,Q2400	;LOOP ON ERROR SWITCH
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 12
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - TRUNCATION                                              SEQ 0080

  2998					;CHECK THAT "FIX" TRUNCATES THE RESULT SUCH THAT
  2999					;IF THE VALUE OF 'X' IS GREATER THAN 'N' BUT LESS THAN
  3000					;N+1, "FIX" CONVERTS 'X' TO 'N' IF X IS POSITIVE,
  3001					;AND "FIX" CONVERTS 'X' TO N+1 IF X IS NEGATIVE WHERE N IS AN
  3002					;INTEGER AND 'X' IS THE FLOATING POINT NUMBER BEING
  3003					;CONVERTED.
  3004
  3005	032112	525 02 0 00 200777 	Q2500:	HRLOI	AC-2,200777	;SET-UP FLT PT NBR
  3006	032113	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT,
  3007									;TRUNCATE RESULT, AND PLACE IN AC
  3008	032114	302 04 0 00 000000 		CAIE	AC,0		;IS RESULT TRUNCATED?
  3009	032115	003 04 0 00 002501 		ER3	AC,2501		;TRUNCATION FAILED IN CONVERSION
  3010	032116	321 10 0 00 032112 		JUMPL	SAC,Q2500	;LOOP ON ERROR SWITCH
  3011
  3012					;CHECK THAT "FIX" TRUNCATES THE RESULT SUCH THAT
  3013					;IF THE VALUE OF 'X' IS GREATER THAN 'N' BUT LESS THAN
  3014					;N+1, "FIX" CONVERTS 'X' TO 'N' IF X IS POSITIVE,
  3015					;AND "FIX" CONVERTS 'X' TO N+1 IF X IS NEGATIVE WHERE N IS AN
  3016					;INTEGER AND 'X' IS THE FLOATING POINT NUMBER BEING
  3017					;CONVERTED.
  3018
  3019	032117	525 02 0 00 201577 	Q2600:	HRLOI	AC-2,201577	;SET-UP FLT PT NBR
  3020	032120	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT,
  3021									;TRUNCATE RESULT, AND PLACE IN AC
  3022	032121	302 04 0 00 000001 		CAIE	AC,1		;IS RESULT TRUNCATED?
  3023	032122	003 04 0 00 002601 		ER3	AC,2601		;TRUNCATION FAILED IN CONVERSION
  3024	032123	321 10 0 00 032117 		JUMPL	SAC,Q2600	;LOOP ON ERROR SWITCH
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 13
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - TRUNCATION                                              SEQ 0081

  3025					;CHECK THAT "FIX" TRUNCATES THE RESULT SUCH THAT
  3026					;IF THE VALUE OF 'X' IS GREATER THAN 'N' BUT LESS THAN
  3027					;N+1, "FIX" CONVERTS 'X' TO 'N' IF X IS POSITIVE,
  3028					;AND "FIX" CONVERTS 'X' TO N+1 IF X IS NEGATIVE WHERE N IS AN
  3029					;INTEGER AND 'X' IS THE FLOATING POINT NUMBER BEING
  3030					;CONVERTED.
  3031
  3032	032124	205 02 0 00 201600 	Q2700:	MOVSI	AC-2,201600	;SET-UP FLT PT NBR
  3033	032125	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT,
  3034									;TRUNCATE RESULT, AND PLACE IN AC
  3035	032126	302 04 0 00 000001 		CAIE	AC,1		;IS RESULT TRUNCATED?
  3036	032127	003 04 0 00 002701 		ER3	AC,2701		;TRUNCATION FAILED IN CONVERSION
  3037	032130	321 10 0 00 032124 		JUMPL	SAC,Q2700	;LOOP ON ERROR SWITCH
  3038
  3039					;CHECK THAT "FIX" TRUNCATES THE RESULT SUCH THAT
  3040					;IF THE VALUE OF 'X' IS GREATER THAN 'N' BUT LESS THAN
  3041					;N+1, "FIX" CONVERTS 'X' TO 'N' IF X IS POSITIVE,
  3042					;AND "FIX" CONVERTS 'X' TO N+1 IF X IS NEGATIVE WHERE N IS AN
  3043					;INTEGER AND 'X' IS THE FLOATING POINT NUMBER BEING
  3044					;CONVERTED.
  3045
  3046	032131	525 02 0 00 201777 	Q3000:	HRLOI	AC-2,201777	;SET-UP FLT PT NBR
  3047	032132	122 04 0 00 000002 		FIX	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT,
  3048									;TRUNCATE RESULT, AND PLACE IN AC
  3049	032133	302 04 0 00 000001 		CAIE	AC,1		;IS RESULT TRUNCATED?
  3050	032134	003 04 0 00 003001 		ER3	AC,3001		;TRUNCATION FAILED IN CONVERSION
  3051	032135	321 10 0 00 032131 		JUMPL	SAC,Q3000	;LOOP ON ERROR SWITCH
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 14
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - NON-AC RANGE ADDRESS                                    SEQ 0082

  3052					SUBTTL	DIAGNOSTIC SECTION - FIX - NON-AC RANGE ADDRESS
  3053
  3054					;VERIFY THAT 'FIX AC,E' OPERATES FOR 'E' BEYOND THE 'AC' RANGE
  3055
  3056						SAVEAC^
  3057	032136	201 10 0 00 032136 		MOVEI	SAC,.
  3058	032137	202 10 0 00 030051 		MOVEM	SAC,TESTPC	;SETUP SUBTEST PC
  3059	032140	201 10 0 00 000010 		MOVEI	SAC,SAC		;INFORM ERROR ROUTINE WHICH
  3060	032141	202 10 0 00 037213 		MOVEM	SAC,ERRLOP#	;AC IS USED FOR ITERATION^
  3061	032142	515 02 0 00 576200 	Q3010:	HRLZI	AC-2,576200
  3062	032143	202 02 0 00 036524 		MOVEM	AC-2,TSTWD	;LOAD 'E' WITH DATA
  3063	032144	476 00 0 00 000003 		SETOM	AC-1		;RESULT FOR COMPARISON
  3064	032145	122 04 0 00 036524 		FIX	AC,TSTWD	;*CONVERT FLT PT NO. IN 'E' TO FIX PT AND STORE IN AC
  3065	032146	312 04 0 00 000003 		CAME	AC,AC-1		;DID 'FIX' GET CORRECT C(E)?
  3066	032147	003 04 0 00 003011 		ER3	AC,3011		;FAILURE TO GET C(E)
  3067	032150	321 10 0 00 032142 		JUMPL	SAC,Q3010	;LOOP ON ERROR SWITCH
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 15
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIXR - ROUNDING                                               SEQ 0083

  3068					SUBTTL	DIAGNOSTIC SECTION - FIXR - ROUNDING
  3069
  3070					;CHECK THAT 'FIXR AC,E' DOES NOT MODIFY C(E)
  3071
  3072	032151	200 02 0 00 036735 	Q3050:	MOVE	AC-2,[233525,,252525]	;LOAD 'E' WITH DATA
  3073	032152	126 04 0 00 000002 		FIXR	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT AND STORE IN AC
  3074	032153	312 02 0 00 036735 		CAME	AC-2,[233525,,252525]	;WAS FLT PT NO. MODIFIED?
  3075	032154	005 02 0 00 003051 		ER5	AC-2,3051	;C(E) WAS CLOBBERED
  3076	032155	321 10 0 00 032151 		JUMPL	SAC,Q3050	;LOOP ON ERROR SWITCH
  3077
  3078					;CHECK THAT "FIXR" ROUNDS THE RESULT SUCH THAT
  3079					;IF 'X' IS GREATER THAN 'N' BUT LESS THAN 'N+0.5',
  3080					;THE RESULT IS ROUNDED DOWN TO 'N'
  3081					;AND IF 'X' IS GREATER THAN OR EQUAL TO 'N+.5' BUT LESS THAN 'N+1' ,
  3082					;THE RESULT IS ROUNDED UP TO "N+1"
  3083					;WHERE 'N' IS AN INTEGER AND 'X' IS THE FLOATING POINT NUMBER
  3084					;BEING CONVERTED
  3085
  3086	032156	205 02 0 00 576000 	Q3100:	MOVSI	AC-2,576000	;SET-UP FLT PT NBR
  3087	032157	541 02 0 00 000001 		HRRI	AC-2,1
  3088	032160	561 03 0 00 777776 		HRROI	AC-1,-2		;SET-UP EXPECTED RESULT
  3089	032161	126 04 0 00 000002 		FIXR	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT,
  3090									;ROUND RESULT, AND PLACE IN AC
  3091	032162	312 04 0 00 000003 		CAME	AC,AC-1		;IS RESULT ROUNDED?
  3092	032163	003 04 0 00 003101 		ER3	AC,3101		;ROUNDING FAILED IN CONVERSION
  3093	032164	321 10 0 00 032156 		JUMPL	SAC,Q3100	;LOOP ON ERROR SWITCH
  3094
  3095					;CHECK THAT "FIXR" ROUNDS THE RESULT SUCH THAT
  3096					;IF 'X' IS GREATER THAN 'N' BUT LESS THAN 'N+0.5',
  3097					;THE RESULT IS ROUNDED DOWN TO 'N'
  3098					;AND IF 'X' IS GREATER THAN OR EQUAL TO 'N+.5' BUT LESS THAN 'N+1' ,
  3099					;THE RESULT IS ROUNDED UP TO "N+1"
  3100					;WHERE 'N' IS AN INTEGER AND 'X' IS THE FLOATING POINT NUMBER
  3101					;BEING CONVERTED
  3102
  3103	032165	205 02 0 00 576200 	Q3200:	MOVSI	AC-2,576200	;SET-UP FLT PT NBR
  3104	032166	476 00 0 00 000003 		SETOM	AC-1		;SET-UP EXPECTED RESULT
  3105	032167	126 04 0 00 000002 		FIXR	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT,
  3106									;ROUND RESULT, AND PLACE IN AC
  3107	032170	312 04 0 00 000003 		CAME	AC,AC-1		;IS RESULT ROUNDED?
  3108	032171	003 04 0 00 003201 		ER3	AC,3201		;ROUNDING FAILED IN CONVERSION
  3109	032172	321 10 0 00 032165 		JUMPL	SAC,Q3200	;LOOP ON ERROR SWITCH
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 16
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIXR - ROUNDING                                               SEQ 0084

  3110					;CHECK THAT "FIXR" ROUNDS THE RESULT SUCH THAT
  3111					;IF 'X' IS GREATER THAN 'N' BUT LESS THAN 'N+0.5',
  3112					;THE RESULT IS ROUNDED DOWN TO 'N'
  3113					;AND IF 'X' IS GREATER THAN OR EQUAL TO 'N+.5' BUT LESS THAN 'N+1' ,
  3114					;THE RESULT IS ROUNDED UP TO "N+1"
  3115					;WHERE 'N' IS AN INTEGER AND 'X' IS THE FLOATING POINT NUMBER
  3116					;BEING CONVERTED
  3117
  3118	032173	205 02 0 00 576200 	Q3300:	MOVSI	AC-2,576200	;SET-UP FLT PT NBR
  3119	032174	541 02 0 00 000001 		HRRI	AC-2,1
  3120	032175	476 00 0 00 000003 		SETOM	AC-1		;SET-UP EXPECTED RESULT
  3121	032176	126 04 0 00 000002 		FIXR	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT,
  3122									;ROUND RESULT, AND PLACE IN AC
  3123	032177	312 04 0 00 000003 		CAME	AC,AC-1		;IS RESULT ROUNDED?
  3124	032200	003 04 0 00 003301 		ER3	AC,3301		;ROUNDING FAILED IN CONVERSION
  3125	032201	321 10 0 00 032173 		JUMPL	SAC,Q3300	;LOOP ON ERROR SWITCH
  3126
  3127					;CHECK THAT "FIXR" ROUNDS THE RESULT SUCH THAT
  3128					;IF 'X' IS GREATER THAN 'N' BUT LESS THAN 'N+0.5',
  3129					;THE RESULT IS ROUNDED DOWN TO 'N'
  3130					;AND IF 'X' IS GREATER THAN OR EQUAL TO 'N+.5' BUT LESS THAN 'N+1' ,
  3131					;THE RESULT IS ROUNDED UP TO "N+1"
  3132					;WHERE 'N' IS AN INTEGER AND 'X' IS THE FLOATING POINT NUMBER
  3133					;BEING CONVERTED
  3134
  3135	032202	205 02 0 00 577000 	Q3400:	MOVSI	AC-2,577000	;SET-UP FLT PT NBR
  3136	032203	541 02 0 00 000001 		HRRI	AC-2,1
  3137	032204	476 00 0 00 000003 		SETOM	AC-1		;SET-UP EXPECTED RESULT
  3138	032205	126 04 0 00 000002 		FIXR	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT,
  3139									;ROUND RESULT, AND PLACE IN AC
  3140	032206	312 04 0 00 000003 		CAME	AC,AC-1		;IS RESULT ROUNDED?
  3141	032207	003 04 0 00 003401 		ER3	AC,3401		;ROUNDING FAILED IN CONVERSION
  3142	032210	321 10 0 00 032202 		JUMPL	SAC,Q3400	;LOOP ON ERROR SWITCH
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 17
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIXR - ROUNDING                                               SEQ 0085

  3143					;CHECK THAT "FIXR" ROUNDS THE RESULT SUCH THAT
  3144					;IF 'X' IS GREATER THAN 'N' BUT LESS THAN 'N+0.5',
  3145					;THE RESULT IS ROUNDED DOWN TO 'N'
  3146					;AND IF 'X' IS GREATER THAN OR EQUAL TO 'N+.5' BUT LESS THAN 'N+1' ,
  3147					;THE RESULT IS ROUNDED UP TO "N+1"
  3148					;WHERE 'N' IS AN INTEGER AND 'X' IS THE FLOATING POINT NUMBER
  3149					;BEING CONVERTED
  3150
  3151	032211	205 02 0 00 577400 	Q3500:	MOVSI	AC-2,577400	;SET-UP FLT PT NBR
  3152	032212	126 04 0 00 000002 		FIXR	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT,
  3153									;ROUND RESULT, AND PLACE IN AC
  3154	032213	302 04 0 00 000000 		CAIE	AC,0		;IS RESULT ROUNDED?
  3155	032214	003 04 0 00 003501 		ER3	AC,3501		;ROUNDING FAILED IN CONVERSION
  3156	032215	321 10 0 00 032211 		JUMPL	SAC,Q3500	;LOOP ON ERROR SWITCH
  3157
  3158					;CHECK THAT "FIXR" ROUNDS THE RESULT SUCH THAT
  3159					;IF 'X' IS GREATER THAN 'N' BUT LESS THAN 'N+0.5',
  3160					;THE RESULT IS ROUNDED DOWN TO 'N'
  3161					;AND IF 'X' IS GREATER THAN OR EQUAL TO 'N+.5' BUT LESS THAN 'N+1' ,
  3162					;THE RESULT IS ROUNDED UP TO "N+1"
  3163					;WHERE 'N' IS AN INTEGER AND 'X' IS THE FLOATING POINT NUMBER
  3164					;BEING CONVERTED
  3165
  3166	032216	205 02 0 00 600000 	Q3600:	MOVSI	AC-2,600000	;SET-UP FLT PT NBR
  3167	032217	541 02 0 00 000001 		HRRI	AC-2,1
  3168	032220	126 04 0 00 000002 		FIXR	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT,
  3169									;ROUND RESULT, AND PLACE IN AC
  3170	032221	302 04 0 00 000000 		CAIE	AC,0		;IS RESULT ROUNDED?
  3171	032222	003 04 0 00 003601 		ER3	AC,3601		;ROUNDING FAILED IN CONVERSION
  3172	032223	321 10 0 00 032216 		JUMPL	SAC,Q3600	;LOOP ON ERROR SWITCH
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 18
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIXR - ROUNDING                                               SEQ 0086

  3173					;CHECK THAT "FIXR" ROUNDS THE RESULT SUCH THAT
  3174					;IF 'X' IS GREATER THAN 'N' BUT LESS THAN 'N+0.5',
  3175					;THE RESULT IS ROUNDED DOWN TO 'N'
  3176					;AND IF 'X' IS GREATER THAN OR EQUAL TO 'N+.5' BUT LESS THAN 'N+1' ,
  3177					;THE RESULT IS ROUNDED UP TO "N+1"
  3178					;WHERE 'N' IS AN INTEGER AND 'X' IS THE FLOATING POINT NUMBER
  3179					;BEING CONVERTED
  3180
  3181	032224	525 02 0 00 177777 	Q3700:	HRLOI	AC-2,177777	;SET-UP FLT PT NBR
  3182	032225	126 04 0 00 000002 		FIXR	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT,
  3183									;ROUND RESULT, AND PLACE IN AC
  3184	032226	302 04 0 00 000000 		CAIE	AC,0		;IS RESULT ROUNDED?
  3185	032227	003 04 0 00 003701 		ER3	AC,3701		;ROUNDING FAILED IN CONVERSION
  3186	032230	321 10 0 00 032224 		JUMPL	SAC,Q3700	;LOOP ON ERROR SWITCH
  3187
  3188					;CHECK THAT "FIXR" ROUNDS THE RESULT SUCH THAT
  3189					;IF 'X' IS GREATER THAN 'N' BUT LESS THAN 'N+0.5',
  3190					;THE RESULT IS ROUNDED DOWN TO 'N'
  3191					;AND IF 'X' IS GREATER THAN OR EQUAL TO 'N+.5' BUT LESS THAN 'N+1' ,
  3192					;THE RESULT IS ROUNDED UP TO "N+1"
  3193					;WHERE 'N' IS AN INTEGER AND 'X' IS THE FLOATING POINT NUMBER
  3194					;BEING CONVERTED
  3195
  3196	032231	205 02 0 00 200400 	Q4000:	MOVSI	AC-2,200400	;SET-UP FLT PT NBR
  3197	032232	126 04 0 00 000002 		FIXR	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT,
  3198									;ROUND RESULT, AND PLACE IN AC
  3199	032233	302 04 0 00 000001 		CAIE	AC,1		;IS RESULT ROUNDED?
  3200	032234	003 04 0 00 004001 		ER3	AC,4001		;ROUNDING FAILED IN CONVERSION
  3201	032235	321 10 0 00 032231 		JUMPL	SAC,Q4000	;LOOP ON ERROR SWITCH
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 19
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIXR - ROUNDING                                               SEQ 0087

  3202					;CHECK THAT "FIXR" ROUNDS THE RESULT SUCH THAT
  3203					;IF 'X' IS GREATER THAN 'N' BUT LESS THAN 'N+0.5',
  3204					;THE RESULT IS ROUNDED DOWN TO 'N'
  3205					;AND IF 'X' IS GREATER THAN OR EQUAL TO 'N+.5' BUT LESS THAN 'N+1' ,
  3206					;THE RESULT IS ROUNDED UP TO "N+1"
  3207					;WHERE 'N' IS AN INTEGER AND 'X' IS THE FLOATING POINT NUMBER
  3208					;BEING CONVERTED
  3209
  3210	032236	525 02 0 00 200777 	Q4100:	HRLOI	AC-2,200777	;SET-UP FLT PT NBR
  3211	032237	126 04 0 00 000002 		FIXR	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT,
  3212									;ROUND RESULT, AND PLACE IN AC
  3213	032240	302 04 0 00 000001 		CAIE	AC,1		;IS RESULT ROUNDED?
  3214	032241	003 04 0 00 004101 		ER3	AC,4101		;ROUNDING FAILED IN CONVERSION
  3215	032242	321 10 0 00 032236 		JUMPL	SAC,Q4100	;LOOP ON ERROR SWITCH
  3216
  3217					;CHECK THAT "FIXR" ROUNDS THE RESULT SUCH THAT
  3218					;IF 'X' IS GREATER THAN 'N' BUT LESS THAN 'N+0.5',
  3219					;THE RESULT IS ROUNDED DOWN TO 'N'
  3220					;AND IF 'X' IS GREATER THAN OR EQUAL TO 'N+.5' BUT LESS THAN 'N+1' ,
  3221					;THE RESULT IS ROUNDED UP TO "N+1"
  3222					;WHERE 'N' IS AN INTEGER AND 'X' IS THE FLOATING POINT NUMBER
  3223					;BEING CONVERTED
  3224
  3225	032243	525 02 0 00 201577 	Q4200:	HRLOI	AC-2,201577	;SET-UP FLT PT NBR
  3226	032244	126 04 0 00 000002 		FIXR	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT,
  3227									;ROUND RESULT, AND PLACE IN AC
  3228	032245	302 04 0 00 000001 		CAIE	AC,1		;IS RESULT ROUNDED?
  3229	032246	003 04 0 00 004201 		ER3	AC,4201		;ROUNDING FAILED IN CONVERSION
  3230	032247	321 10 0 00 032243 		JUMPL	SAC,Q4200	;LOOP ON ERROR SWITCH
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 20
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIXR - ROUNDING                                               SEQ 0088

  3231					;CHECK THAT "FIXR" ROUNDS THE RESULT SUCH THAT
  3232					;IF 'X' IS GREATER THAN 'N' BUT LESS THAN 'N+0.5',
  3233					;THE RESULT IS ROUNDED DOWN TO 'N'
  3234					;AND IF 'X' IS GREATER THAN OR EQUAL TO 'N+.5' BUT LESS THAN 'N+1' ,
  3235					;THE RESULT IS ROUNDED UP TO "N+1"
  3236					;WHERE 'N' IS AN INTEGER AND 'X' IS THE FLOATING POINT NUMBER
  3237					;BEING CONVERTED
  3238
  3239	032250	205 02 0 00 201600 	Q4300:	MOVSI	AC-2,201600	;SET-UP FLT PT NBR
  3240	032251	126 04 0 00 000002 		FIXR	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT,
  3241									;ROUND RESULT, AND PLACE IN AC
  3242	032252	302 04 0 00 000002 		CAIE	AC,2		;IS RESULT ROUNDED?
  3243	032253	003 04 0 00 004301 		ER3	AC,4301		;ROUNDING FAILED IN CONVERSION
  3244	032254	321 10 0 00 032250 		JUMPL	SAC,Q4300	;LOOP ON ERROR SWITCH
  3245
  3246					;CHECK THAT "FIXR" ROUNDS THE RESULT SUCH THAT
  3247					;IF 'X' IS GREATER THAN 'N' BUT LESS THAN 'N+0.5',
  3248					;THE RESULT IS ROUNDED DOWN TO 'N'
  3249					;AND IF 'X' IS GREATER THAN OR EQUAL TO 'N+.5' BUT LESS THAN 'N+1' ,
  3250					;THE RESULT IS ROUNDED UP TO "N+1"
  3251					;WHERE 'N' IS AN INTEGER AND 'X' IS THE FLOATING POINT NUMBER
  3252					;BEING CONVERTED
  3253
  3254	032255	525 02 0 00 201777 	Q4400:	HRLOI	AC-2,201777	;SET-UP FLT PT NBR
  3255	032256	126 04 0 00 000002 		FIXR	AC,AC-2		;*CONVERT FLT PT NO. IN 'E' TO FIX PT,
  3256									;ROUND RESULT, AND PLACE IN AC
  3257	032257	302 04 0 00 000002 		CAIE	AC,2		;IS RESULT ROUNDED?
  3258	032260	003 04 0 00 004401 		ER3	AC,4401		;ROUNDING FAILED IN CONVERSION
  3259	032261	321 10 0 00 032255 		JUMPL	SAC,Q4400	;LOOP ON ERROR SWITCH
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 21
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIXR - NON-AC RANGE ADDRESS                                   SEQ 0089

  3260					SUBTTL	DIAGNOSTIC SECTION - FIXR - NON-AC RANGE ADDRESS
  3261
  3262					;CHECK THAT 'FIXR AC,E' OPERATES FOR 'E' BEYOND AC RANGE
  3263
  3264	032262	205 02 0 00 576000 	Q4410:	MOVSI	AC-2,576000	;LOAD 'E' WITH DATA
  3265	032263	541 02 0 00 000001 		HRRI	AC-2,1
  3266	032264	202 02 0 00 036524 		MOVEM	AC-2,TSTWD
  3267	032265	561 03 0 00 777776 		HRROI	AC-1,-2		;RESULT FOR COMPARISON
  3268	032266	126 04 0 00 036524 		FIXR	AC,TSTWD	;*CONVERT FLT PT NO. IN 'E' TO FIX PT AND STORE IN AC
  3269	032267	312 04 0 00 000003 		CAME	AC,AC-1		;DID FIXR GET CORRECT C(E)?
  3270	032270	003 04 0 00 004411 		ER3	AC,4411		;FAILURE TO GET C(E)
  3271	032271	321 10 0 00 032262 		JUMPL	SAC,Q4410	;LOOP ON ERROR SWITCH
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 22
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - ARITHMETIC OVERFLOW                                     SEQ 0090

  3272					SUBTTL	DIAGNOSTIC SECTION - FIX - ARITHMETIC OVERFLOW
  3273
  3274					;CHECK THAT ARITH OVFL FLG REMAINS CLEAR WHEN THE ABSOLUTE VALUE
  3275					;OF 'N' IS LESS THAN 2 RAISED THE 35TH POWER.
  3276
  3277					;CHECK ABILITY TO CLEAR AROV BEFORE TESTING INTERACTION WITH 'FIX'
  3278
  3279	032272	255 10 0 00 032273 	Q4500:	JOV	.+1		;CLEAR ARITH OVFL FLG
  3280	032273	265 04 0 00 032274 		JSP	AC,.+1		;READ FLAGS
  3281	032274	255 10 0 00 032276 		JOV	.+2		;TEST AROV FLAG
  3282	032275	254 00 0 00 032277 		JRST	.+2		;SKIP ERROR CALL IF FLAG IS OK
  3283	032276	013 04 0 00 004501 		ER13	AC,4501		;ARITH OVFL FLG SET
  3284	032277	321 10 0 00 032272 		JUMPL	SAC,Q4500	;LOOP ON ERROR SWITCH
  3285
  3286					;CHECK THAT ARITH OVFL FLG REMAINS CLEAR WHEN THE ABSOLUTE VALUE
  3287					;OF 'N' IS LESS THAN 2 RAISED THE 35TH POWER.
  3288
  3289	032300	255 10 0 00 032301 	Q4600:	JOV	.+1		;CLEAR ARITH OVFL FLG
  3290	032301	205 02 0 00 244400 		MOVSI	AC-2,244400	;INITIALIZE FLOATING PT WORD
  3291	032302	477 04 0 00 000003 		SETOB	AC,AC-1		;SET-UP RESULT
  3292	032303	122 04 0 00 000002 		FIX	AC,AC-2		;*FIX SHOULD SET AROV
  3293	032304	312 04 0 00 000003 		CAME	AC,AC-1		;TEST AC
  3294	032305	003 04 0 00 004601 		ER3	AC,4601		;C(AC) WAS MODIFIED
  3295	032306	265 05 0 00 032307 		JSP	AC+1,.+1	;READ FLAGS
  3296	032307	255 10 0 00 032311 		JOV	.+2		;TEST ARITH OVFL FLG
  3297	032310	013 05 0 00 004601 		ER13	AC+1,4601	;ARITH OVFL FLAG CLEAR
  3298	032311	321 10 0 00 032300 		JUMPL	SAC,Q4600	;LOOP ON ERROR SWITCH
  3299
  3300					;CHECK THAT ARITH OVFL FLG REMAINS CLEAR WHEN THE ABSOLUTE VALUE
  3301					;OF 'N' IS LESS THAN 2 RAISED THE 35TH POWER.
  3302
  3303	032312	255 10 0 00 032313 	Q4700:	JOV	.+1		;CLEAR ARITH OVFL FLG
  3304	032313	525 02 0 00 243777 		HRLOI	AC-2,243777	;INITIALIZE FLT. PT. WORD
  3305	032314	561 03 0 00 777400 		HRROI	AC-1,777400	;SET UP RESULT
  3306	032315	621 03 0 00 400000 		TLZ	AC-1,AROV
  3307	032316	122 04 0 00 000002 		FIX	AC,AC-2		;*FIX SHOULD NOT SET AROV
  3308	032317	312 04 0 00 000003 		CAME	AC,AC-1		;TEST AC
  3309	032320	003 04 0 00 004701 		ER3	AC,4701		;C(AC) INCORRECT
  3310	032321	265 05 0 00 032322 		JSP	AC+1,.+1	;READ FLAGS
  3311	032322	255 10 0 00 032324 		JOV	.+2		;TEST ARITH OVFL FLG
  3312	032323	254 00 0 00 032325 		JRST	.+2		;SKIP ERROR CALL IF AROV IS CLEAR
  3313	032324	013 05 0 00 004701 		ER13	AC+1,4701	;ARITH OVFL FLAG SET
  3314	032325	321 10 0 00 032312 		JUMPL	SAC,Q4700	;LOOP ON ERROR SWITCH
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 23
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FIX - ARITHMETIC OVERFLOW                                     SEQ 0091

  3315					;CHECK THAT ARITH OVFL FLG REMAINS CLEAR WHEN THE ABSOLUTE VALUE
  3316					;OF 'N' IS LESS THAN 2 RAISED THE 35TH POWER.
  3317
  3318	032326	255 10 0 00 032327 	Q5000:	JOV	.+1		;CLEAR ARITH OVFL FLG
  3319	032327	205 02 0 00 533400 		MOVSI	AC-2,533400	;INIT FLT. PT. WORD
  3320	032330	477 04 0 00 000003 		SETOB	AC,AC-1		;SET-UP RESULT
  3321	032331	122 04 0 00 000002 		FIX	AC,AC-2		;*FIX SHOULD SET AROV
  3322	032332	312 04 0 00 000003 		CAME	AC,AC-1		;TEST AC
  3323	032333	003 04 0 00 005001 		ER3	AC,5001		;C(AC) WAS MODIFIED
  3324	032334	265 05 0 00 032335 		JSP	AC+1,.+1	;READ FLAGS
  3325	032335	255 10 0 00 032337 		JOV	.+2		;TEST ARITH OVFL FLG
  3326	032336	013 05 0 00 005001 		ER13	AC+1,5001	;ARITH OVFL FLG CLEAR
  3327	032337	321 10 0 00 032326 		JUMPL	SAC,Q5000	;LOOP ON ERROR SWITCH
  3328
  3329					;CHECK THAT ARITH OVFL FLG REMAINS CLEAR WHEN THE ABSOLUTE VALUE
  3330					;OF 'N' IS LESS THAN 2 RAISED THE 35TH POWER.
  3331
  3332	032340	255 10 0 00 032341 	Q5100:	JOV	.+1		;CLEAR ARITH OVFL FLG
  3333	032341	205 02 0 00 534000 		MOVSI	AC-2,534000	;INITIALIZE FLT. PT. WORD
  3334	032342	660 02 0 00 000001 		TRO	AC-2,1
  3335	032343	551 03 0 00 000400 		HRRZI	AC-1,400	;SET-UP RESULT
  3336	032344	661 03 0 00 400000 		TLO	AC-1,AROV
  3337	032345	122 04 0 00 000002 		FIX	AC,AC-2		;*FIX SHOULD NOT SET AROV
  3338	032346	312 04 0 00 000003 		CAME	AC,AC-1		;TEST AC
  3339	032347	003 04 0 00 005101 		ER3	AC,5101		;C(AC) INCORRECT
  3340	032350	265 05 0 00 032351 		JSP	AC+1,.+1	;READ FLAGS
  3341	032351	255 10 0 00 032353 		JOV	.+2		;TEST ARITH OVFL FLG
  3342	032352	254 00 0 00 032354 		JRST	.+2		;SKIP ERROR CALL IF AROV IS CLEAR
  3343	032353	013 05 0 00 005101 		ER13	AC+1,5101	;ARITH OVFL FLG SET
  3344	032354	321 10 0 00 032340 		JUMPL	SAC,Q5100	;LOOP ON ERROR SWITCH
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 24
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - EXPONENT CALCULATION - POSITIVE NUMBERS                SEQ 0092

  3345					SUBTTL	DIAGNOSTIC SECTION - FLTR - EXPONENT CALCULATION - POSITIVE NUMBERS
  3346
  3347					;CHECK THAT 'FLTR AC,E' DOES NOT MODIFY C(E)
  3348
  3349	032355	200 02 0 00 036736 	Q5150:	MOVE	AC-2,[252525,,252525]	;LOAD 'E' WITH DATA
  3350	032356	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  3351	032357	312 02 0 00 036736 		CAME	AC-2,[252525,,252525]	;WAS FIX PT NO. MODIFIED?
  3352	032360	005 02 0 00 005151 		ER5	AC-2,5151	;C(E) WAS CLOBBERED
  3353	032361	321 10 1 00 005150 		JUMPL	SAC,@5150	;LOOP ON ERROR SWITCH
  3354
  3355					;TEST EXPONENT CALCULATION FOR POSITIVE NUMBERS
  3356
  3357			005200		SN=5200
  3358			400000			XX=400000
  3359			244400			YY=244400
  3360
  3361					Q5200:	REPEAT	^D17,<
  3362					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  3363					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  3364					;TEST EXPONENT CALCULATION FOR POSITIVE NUMBERS
  3365					
  3366					SN=SN+1
  3367						XX=XX/2
  3368						YY=YY-1000
  3369						MOVSI	AC-2,XX		;INITIALIZE FIXED PT WORD
  3370						MOVSI	AC-1,YY		;SET-UP RESULT
  3371						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  3372						CAME	AC,AC-1		;TEST EXPONENT
  3373						ER3	AC,SN		;INCORRECT EXPONENT
  3374						JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  3375					>
  3376
  3377					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  3378					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  3379					;TEST EXPONENT CALCULATION FOR POSITIVE NUMBERS
  3380
  3381			005201		SN=SN+1
  3382			200000			XX=XX/2
  3383			243400			YY=YY-1000
  3384	032362	205 02 0 00 200000 		MOVSI	AC-2,XX		;INITIALIZE FIXED PT WORD
  3385	032363	205 03 0 00 243400 		MOVSI	AC-1,YY		;SET-UP RESULT
  3386	032364	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  3387	032365	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  3388	032366	003 04 0 00 005201 		ER3	AC,SN		;INCORRECT EXPONENT
  3389	032367	321 10 0 00 032362 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  3390
  3391
  3392					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  3393					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  3394					;TEST EXPONENT CALCULATION FOR POSITIVE NUMBERS
  3395
  3396			005202		SN=SN+1
  3397			100000			XX=XX/2
  3398			242400			YY=YY-1000
  3399	032370	205 02 0 00 100000 		MOVSI	AC-2,XX		;INITIALIZE FIXED PT WORD
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 24-1
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - EXPONENT CALCULATION - POSITIVE NUMBERS                SEQ 0093

  3400	032371	205 03 0 00 242400 		MOVSI	AC-1,YY		;SET-UP RESULT
  3401	032372	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  3402	032373	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  3403	032374	003 04 0 00 005202 		ER3	AC,SN		;INCORRECT EXPONENT
  3404	032375	321 10 0 00 032370 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  3405
  3406
  3407					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  3408					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  3409					;TEST EXPONENT CALCULATION FOR POSITIVE NUMBERS
  3410
  3411			005203		SN=SN+1
  3412			040000			XX=XX/2
  3413			241400			YY=YY-1000
  3414	032376	205 02 0 00 040000 		MOVSI	AC-2,XX		;INITIALIZE FIXED PT WORD
  3415	032377	205 03 0 00 241400 		MOVSI	AC-1,YY		;SET-UP RESULT
  3416	032400	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  3417	032401	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  3418	032402	003 04 0 00 005203 		ER3	AC,SN		;INCORRECT EXPONENT
  3419	032403	321 10 0 00 032376 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  3420
  3421
  3422					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  3423					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  3424					;TEST EXPONENT CALCULATION FOR POSITIVE NUMBERS
  3425
  3426			005204		SN=SN+1
  3427			020000			XX=XX/2
  3428			240400			YY=YY-1000
  3429	032404	205 02 0 00 020000 		MOVSI	AC-2,XX		;INITIALIZE FIXED PT WORD
  3430	032405	205 03 0 00 240400 		MOVSI	AC-1,YY		;SET-UP RESULT
  3431	032406	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  3432	032407	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  3433	032410	003 04 0 00 005204 		ER3	AC,SN		;INCORRECT EXPONENT
  3434	032411	321 10 0 00 032404 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  3435
  3436
  3437					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  3438					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  3439					;TEST EXPONENT CALCULATION FOR POSITIVE NUMBERS
  3440
  3441			005205		SN=SN+1
  3442			010000			XX=XX/2
  3443			237400			YY=YY-1000
  3444	032412	205 02 0 00 010000 		MOVSI	AC-2,XX		;INITIALIZE FIXED PT WORD
  3445	032413	205 03 0 00 237400 		MOVSI	AC-1,YY		;SET-UP RESULT
  3446	032414	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  3447	032415	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  3448	032416	003 04 0 00 005205 		ER3	AC,SN		;INCORRECT EXPONENT
  3449	032417	321 10 0 00 032412 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  3450
  3451
  3452					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  3453					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  3454					;TEST EXPONENT CALCULATION FOR POSITIVE NUMBERS
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 24-2
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - EXPONENT CALCULATION - POSITIVE NUMBERS                SEQ 0094

  3455
  3456			005206		SN=SN+1
  3457			004000			XX=XX/2
  3458			236400			YY=YY-1000
  3459	032420	205 02 0 00 004000 		MOVSI	AC-2,XX		;INITIALIZE FIXED PT WORD
  3460	032421	205 03 0 00 236400 		MOVSI	AC-1,YY		;SET-UP RESULT
  3461	032422	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  3462	032423	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  3463	032424	003 04 0 00 005206 		ER3	AC,SN		;INCORRECT EXPONENT
  3464	032425	321 10 0 00 032420 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  3465
  3466
  3467					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  3468					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  3469					;TEST EXPONENT CALCULATION FOR POSITIVE NUMBERS
  3470
  3471			005207		SN=SN+1
  3472			002000			XX=XX/2
  3473			235400			YY=YY-1000
  3474	032426	205 02 0 00 002000 		MOVSI	AC-2,XX		;INITIALIZE FIXED PT WORD
  3475	032427	205 03 0 00 235400 		MOVSI	AC-1,YY		;SET-UP RESULT
  3476	032430	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  3477	032431	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  3478	032432	003 04 0 00 005207 		ER3	AC,SN		;INCORRECT EXPONENT
  3479	032433	321 10 0 00 032426 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  3480
  3481
  3482					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  3483					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  3484					;TEST EXPONENT CALCULATION FOR POSITIVE NUMBERS
  3485
  3486			005210		SN=SN+1
  3487			001000			XX=XX/2
  3488			234400			YY=YY-1000
  3489	032434	205 02 0 00 001000 		MOVSI	AC-2,XX		;INITIALIZE FIXED PT WORD
  3490	032435	205 03 0 00 234400 		MOVSI	AC-1,YY		;SET-UP RESULT
  3491	032436	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  3492	032437	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  3493	032440	003 04 0 00 005210 		ER3	AC,SN		;INCORRECT EXPONENT
  3494	032441	321 10 0 00 032434 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  3495
  3496
  3497					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  3498					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  3499					;TEST EXPONENT CALCULATION FOR POSITIVE NUMBERS
  3500
  3501			005211		SN=SN+1
  3502			000400			XX=XX/2
  3503			233400			YY=YY-1000
  3504	032442	205 02 0 00 000400 		MOVSI	AC-2,XX		;INITIALIZE FIXED PT WORD
  3505	032443	205 03 0 00 233400 		MOVSI	AC-1,YY		;SET-UP RESULT
  3506	032444	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  3507	032445	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  3508	032446	003 04 0 00 005211 		ER3	AC,SN		;INCORRECT EXPONENT
  3509	032447	321 10 0 00 032442 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 24-3
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - EXPONENT CALCULATION - POSITIVE NUMBERS                SEQ 0095

  3510
  3511
  3512					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  3513					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  3514					;TEST EXPONENT CALCULATION FOR POSITIVE NUMBERS
  3515
  3516			005212		SN=SN+1
  3517			000200			XX=XX/2
  3518			232400			YY=YY-1000
  3519	032450	205 02 0 00 000200 		MOVSI	AC-2,XX		;INITIALIZE FIXED PT WORD
  3520	032451	205 03 0 00 232400 		MOVSI	AC-1,YY		;SET-UP RESULT
  3521	032452	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  3522	032453	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  3523	032454	003 04 0 00 005212 		ER3	AC,SN		;INCORRECT EXPONENT
  3524	032455	321 10 0 00 032450 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  3525
  3526
  3527					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  3528					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  3529					;TEST EXPONENT CALCULATION FOR POSITIVE NUMBERS
  3530
  3531			005213		SN=SN+1
  3532			000100			XX=XX/2
  3533			231400			YY=YY-1000
  3534	032456	205 02 0 00 000100 		MOVSI	AC-2,XX		;INITIALIZE FIXED PT WORD
  3535	032457	205 03 0 00 231400 		MOVSI	AC-1,YY		;SET-UP RESULT
  3536	032460	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  3537	032461	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  3538	032462	003 04 0 00 005213 		ER3	AC,SN		;INCORRECT EXPONENT
  3539	032463	321 10 0 00 032456 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  3540
  3541
  3542					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  3543					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  3544					;TEST EXPONENT CALCULATION FOR POSITIVE NUMBERS
  3545
  3546			005214		SN=SN+1
  3547			000040			XX=XX/2
  3548			230400			YY=YY-1000
  3549	032464	205 02 0 00 000040 		MOVSI	AC-2,XX		;INITIALIZE FIXED PT WORD
  3550	032465	205 03 0 00 230400 		MOVSI	AC-1,YY		;SET-UP RESULT
  3551	032466	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  3552	032467	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  3553	032470	003 04 0 00 005214 		ER3	AC,SN		;INCORRECT EXPONENT
  3554	032471	321 10 0 00 032464 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  3555
  3556
  3557					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  3558					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  3559					;TEST EXPONENT CALCULATION FOR POSITIVE NUMBERS
  3560
  3561			005215		SN=SN+1
  3562			000020			XX=XX/2
  3563			227400			YY=YY-1000
  3564	032472	205 02 0 00 000020 		MOVSI	AC-2,XX		;INITIALIZE FIXED PT WORD
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 24-4
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - EXPONENT CALCULATION - POSITIVE NUMBERS                SEQ 0096

  3565	032473	205 03 0 00 227400 		MOVSI	AC-1,YY		;SET-UP RESULT
  3566	032474	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  3567	032475	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  3568	032476	003 04 0 00 005215 		ER3	AC,SN		;INCORRECT EXPONENT
  3569	032477	321 10 0 00 032472 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  3570
  3571
  3572					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  3573					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  3574					;TEST EXPONENT CALCULATION FOR POSITIVE NUMBERS
  3575
  3576			005216		SN=SN+1
  3577			000010			XX=XX/2
  3578			226400			YY=YY-1000
  3579	032500	205 02 0 00 000010 		MOVSI	AC-2,XX		;INITIALIZE FIXED PT WORD
  3580	032501	205 03 0 00 226400 		MOVSI	AC-1,YY		;SET-UP RESULT
  3581	032502	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  3582	032503	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  3583	032504	003 04 0 00 005216 		ER3	AC,SN		;INCORRECT EXPONENT
  3584	032505	321 10 0 00 032500 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  3585
  3586
  3587					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  3588					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  3589					;TEST EXPONENT CALCULATION FOR POSITIVE NUMBERS
  3590
  3591			005217		SN=SN+1
  3592			000004			XX=XX/2
  3593			225400			YY=YY-1000
  3594	032506	205 02 0 00 000004 		MOVSI	AC-2,XX		;INITIALIZE FIXED PT WORD
  3595	032507	205 03 0 00 225400 		MOVSI	AC-1,YY		;SET-UP RESULT
  3596	032510	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  3597	032511	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  3598	032512	003 04 0 00 005217 		ER3	AC,SN		;INCORRECT EXPONENT
  3599	032513	321 10 0 00 032506 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  3600
  3601
  3602					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  3603					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  3604					;TEST EXPONENT CALCULATION FOR POSITIVE NUMBERS
  3605
  3606			005220		SN=SN+1
  3607			000002			XX=XX/2
  3608			224400			YY=YY-1000
  3609	032514	205 02 0 00 000002 		MOVSI	AC-2,XX		;INITIALIZE FIXED PT WORD
  3610	032515	205 03 0 00 224400 		MOVSI	AC-1,YY		;SET-UP RESULT
  3611	032516	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  3612	032517	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  3613	032520	003 04 0 00 005220 		ER3	AC,SN		;INCORRECT EXPONENT
  3614	032521	321 10 0 00 032514 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  3615
  3616
  3617					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  3618					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  3619					;TEST EXPONENT CALCULATION FOR POSITIVE NUMBERS
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 24-5
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - EXPONENT CALCULATION - POSITIVE NUMBERS                SEQ 0097

  3620
  3621			005221		SN=SN+1
  3622			000001			XX=XX/2
  3623			223400			YY=YY-1000
  3624	032522	205 02 0 00 000001 		MOVSI	AC-2,XX		;INITIALIZE FIXED PT WORD
  3625	032523	205 03 0 00 223400 		MOVSI	AC-1,YY		;SET-UP RESULT
  3626	032524	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  3627	032525	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  3628	032526	003 04 0 00 005221 		ER3	AC,SN		;INCORRECT EXPONENT
  3629	032527	321 10 0 00 032522 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  3630
  3631					PAGE
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 24-6
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - EXPONENT CALCULATION - POSITIVE NUMBERS                SEQ 0098

  3632			005300		SN=5300
  3633			000000			XX=0
  3634			223400			YY=223400
  3635
  3636					Q5300:	REPEAT	^D18,<
  3637					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  3638					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  3639					;TEST EXPONENT CALCULATION FOR POSITIVE NUMBERS
  3640					
  3641					SN=SN+1
  3642						XX=XX/2
  3643						YY=YY-1000
  3644						IFE	XX,<XX=400000>
  3645						HRRZI	AC-2,XX		;INITIALIZE FIXED PT WORD
  3646						MOVSI	AC-1,YY		;SET-UP RESULT
  3647						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  3648						CAME	AC,AC-1		;TEST EXPONENT
  3649						ER3	AC,SN		;INCORRECT EXPONENT
  3650						JUMPL	SAC,-5		;LOOP ON ERROR SWITCH
  3651					>
  3652
  3653					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  3654					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  3655					;TEST EXPONENT CALCULATION FOR POSITIVE NUMBERS
  3656
  3657			005301		SN=SN+1
  3658			000000			XX=XX/2
  3659			222400			YY=YY-1000
  3660			400000			IFE	XX,<XX=400000>
  3661	032530	551 02 0 00 400000 		HRRZI	AC-2,XX		;INITIALIZE FIXED PT WORD
  3662	032531	205 03 0 00 222400 		MOVSI	AC-1,YY		;SET-UP RESULT
  3663	032532	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  3664	032533	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  3665	032534	003 04 0 00 005301 		ER3	AC,SN		;INCORRECT EXPONENT
  3666	032535	321 10 0 00 777773 		JUMPL	SAC,-5		;LOOP ON ERROR SWITCH
  3667
  3668
  3669					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  3670					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  3671					;TEST EXPONENT CALCULATION FOR POSITIVE NUMBERS
  3672
  3673			005302		SN=SN+1
  3674			200000			XX=XX/2
  3675			221400			YY=YY-1000
  3676						IFE	XX,<XX=400000>
  3677	032536	551 02 0 00 200000 		HRRZI	AC-2,XX		;INITIALIZE FIXED PT WORD
  3678	032537	205 03 0 00 221400 		MOVSI	AC-1,YY		;SET-UP RESULT
  3679	032540	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  3680	032541	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  3681	032542	003 04 0 00 005302 		ER3	AC,SN		;INCORRECT EXPONENT
  3682	032543	321 10 0 00 777773 		JUMPL	SAC,-5		;LOOP ON ERROR SWITCH
  3683
  3684
  3685					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  3686					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 24-7
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - EXPONENT CALCULATION - POSITIVE NUMBERS                SEQ 0099

  3687					;TEST EXPONENT CALCULATION FOR POSITIVE NUMBERS
  3688
  3689			005303		SN=SN+1
  3690			100000			XX=XX/2
  3691			220400			YY=YY-1000
  3692						IFE	XX,<XX=400000>
  3693	032544	551 02 0 00 100000 		HRRZI	AC-2,XX		;INITIALIZE FIXED PT WORD
  3694	032545	205 03 0 00 220400 		MOVSI	AC-1,YY		;SET-UP RESULT
  3695	032546	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  3696	032547	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  3697	032550	003 04 0 00 005303 		ER3	AC,SN		;INCORRECT EXPONENT
  3698	032551	321 10 0 00 777773 		JUMPL	SAC,-5		;LOOP ON ERROR SWITCH
  3699
  3700
  3701					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  3702					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  3703					;TEST EXPONENT CALCULATION FOR POSITIVE NUMBERS
  3704
  3705			005304		SN=SN+1
  3706			040000			XX=XX/2
  3707			217400			YY=YY-1000
  3708						IFE	XX,<XX=400000>
  3709	032552	551 02 0 00 040000 		HRRZI	AC-2,XX		;INITIALIZE FIXED PT WORD
  3710	032553	205 03 0 00 217400 		MOVSI	AC-1,YY		;SET-UP RESULT
  3711	032554	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  3712	032555	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  3713	032556	003 04 0 00 005304 		ER3	AC,SN		;INCORRECT EXPONENT
  3714	032557	321 10 0 00 777773 		JUMPL	SAC,-5		;LOOP ON ERROR SWITCH
  3715
  3716
  3717					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  3718					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  3719					;TEST EXPONENT CALCULATION FOR POSITIVE NUMBERS
  3720
  3721			005305		SN=SN+1
  3722			020000			XX=XX/2
  3723			216400			YY=YY-1000
  3724						IFE	XX,<XX=400000>
  3725	032560	551 02 0 00 020000 		HRRZI	AC-2,XX		;INITIALIZE FIXED PT WORD
  3726	032561	205 03 0 00 216400 		MOVSI	AC-1,YY		;SET-UP RESULT
  3727	032562	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  3728	032563	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  3729	032564	003 04 0 00 005305 		ER3	AC,SN		;INCORRECT EXPONENT
  3730	032565	321 10 0 00 777773 		JUMPL	SAC,-5		;LOOP ON ERROR SWITCH
  3731
  3732
  3733					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  3734					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  3735					;TEST EXPONENT CALCULATION FOR POSITIVE NUMBERS
  3736
  3737			005306		SN=SN+1
  3738			010000			XX=XX/2
  3739			215400			YY=YY-1000
  3740						IFE	XX,<XX=400000>
  3741	032566	551 02 0 00 010000 		HRRZI	AC-2,XX		;INITIALIZE FIXED PT WORD
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 24-8
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - EXPONENT CALCULATION - POSITIVE NUMBERS                SEQ 0100

  3742	032567	205 03 0 00 215400 		MOVSI	AC-1,YY		;SET-UP RESULT
  3743	032570	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  3744	032571	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  3745	032572	003 04 0 00 005306 		ER3	AC,SN		;INCORRECT EXPONENT
  3746	032573	321 10 0 00 777773 		JUMPL	SAC,-5		;LOOP ON ERROR SWITCH
  3747
  3748
  3749					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  3750					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  3751					;TEST EXPONENT CALCULATION FOR POSITIVE NUMBERS
  3752
  3753			005307		SN=SN+1
  3754			004000			XX=XX/2
  3755			214400			YY=YY-1000
  3756						IFE	XX,<XX=400000>
  3757	032574	551 02 0 00 004000 		HRRZI	AC-2,XX		;INITIALIZE FIXED PT WORD
  3758	032575	205 03 0 00 214400 		MOVSI	AC-1,YY		;SET-UP RESULT
  3759	032576	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  3760	032577	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  3761	032600	003 04 0 00 005307 		ER3	AC,SN		;INCORRECT EXPONENT
  3762	032601	321 10 0 00 777773 		JUMPL	SAC,-5		;LOOP ON ERROR SWITCH
  3763
  3764
  3765					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  3766					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  3767					;TEST EXPONENT CALCULATION FOR POSITIVE NUMBERS
  3768
  3769			005310		SN=SN+1
  3770			002000			XX=XX/2
  3771			213400			YY=YY-1000
  3772						IFE	XX,<XX=400000>
  3773	032602	551 02 0 00 002000 		HRRZI	AC-2,XX		;INITIALIZE FIXED PT WORD
  3774	032603	205 03 0 00 213400 		MOVSI	AC-1,YY		;SET-UP RESULT
  3775	032604	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  3776	032605	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  3777	032606	003 04 0 00 005310 		ER3	AC,SN		;INCORRECT EXPONENT
  3778	032607	321 10 0 00 777773 		JUMPL	SAC,-5		;LOOP ON ERROR SWITCH
  3779
  3780
  3781					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  3782					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  3783					;TEST EXPONENT CALCULATION FOR POSITIVE NUMBERS
  3784
  3785			005311		SN=SN+1
  3786			001000			XX=XX/2
  3787			212400			YY=YY-1000
  3788						IFE	XX,<XX=400000>
  3789	032610	551 02 0 00 001000 		HRRZI	AC-2,XX		;INITIALIZE FIXED PT WORD
  3790	032611	205 03 0 00 212400 		MOVSI	AC-1,YY		;SET-UP RESULT
  3791	032612	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  3792	032613	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  3793	032614	003 04 0 00 005311 		ER3	AC,SN		;INCORRECT EXPONENT
  3794	032615	321 10 0 00 777773 		JUMPL	SAC,-5		;LOOP ON ERROR SWITCH
  3795
  3796
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 24-9
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - EXPONENT CALCULATION - POSITIVE NUMBERS                SEQ 0101

  3797					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  3798					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  3799					;TEST EXPONENT CALCULATION FOR POSITIVE NUMBERS
  3800
  3801			005312		SN=SN+1
  3802			000400			XX=XX/2
  3803			211400			YY=YY-1000
  3804						IFE	XX,<XX=400000>
  3805	032616	551 02 0 00 000400 		HRRZI	AC-2,XX		;INITIALIZE FIXED PT WORD
  3806	032617	205 03 0 00 211400 		MOVSI	AC-1,YY		;SET-UP RESULT
  3807	032620	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  3808	032621	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  3809	032622	003 04 0 00 005312 		ER3	AC,SN		;INCORRECT EXPONENT
  3810	032623	321 10 0 00 777773 		JUMPL	SAC,-5		;LOOP ON ERROR SWITCH
  3811
  3812
  3813					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  3814					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  3815					;TEST EXPONENT CALCULATION FOR POSITIVE NUMBERS
  3816
  3817			005313		SN=SN+1
  3818			000200			XX=XX/2
  3819			210400			YY=YY-1000
  3820						IFE	XX,<XX=400000>
  3821	032624	551 02 0 00 000200 		HRRZI	AC-2,XX		;INITIALIZE FIXED PT WORD
  3822	032625	205 03 0 00 210400 		MOVSI	AC-1,YY		;SET-UP RESULT
  3823	032626	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  3824	032627	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  3825	032630	003 04 0 00 005313 		ER3	AC,SN		;INCORRECT EXPONENT
  3826	032631	321 10 0 00 777773 		JUMPL	SAC,-5		;LOOP ON ERROR SWITCH
  3827
  3828
  3829					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  3830					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  3831					;TEST EXPONENT CALCULATION FOR POSITIVE NUMBERS
  3832
  3833			005314		SN=SN+1
  3834			000100			XX=XX/2
  3835			207400			YY=YY-1000
  3836						IFE	XX,<XX=400000>
  3837	032632	551 02 0 00 000100 		HRRZI	AC-2,XX		;INITIALIZE FIXED PT WORD
  3838	032633	205 03 0 00 207400 		MOVSI	AC-1,YY		;SET-UP RESULT
  3839	032634	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  3840	032635	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  3841	032636	003 04 0 00 005314 		ER3	AC,SN		;INCORRECT EXPONENT
  3842	032637	321 10 0 00 777773 		JUMPL	SAC,-5		;LOOP ON ERROR SWITCH
  3843
  3844
  3845					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  3846					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  3847					;TEST EXPONENT CALCULATION FOR POSITIVE NUMBERS
  3848
  3849			005315		SN=SN+1
  3850			000040			XX=XX/2
  3851			206400			YY=YY-1000
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 24-10
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - EXPONENT CALCULATION - POSITIVE NUMBERS                SEQ 0102

  3852						IFE	XX,<XX=400000>
  3853	032640	551 02 0 00 000040 		HRRZI	AC-2,XX		;INITIALIZE FIXED PT WORD
  3854	032641	205 03 0 00 206400 		MOVSI	AC-1,YY		;SET-UP RESULT
  3855	032642	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  3856	032643	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  3857	032644	003 04 0 00 005315 		ER3	AC,SN		;INCORRECT EXPONENT
  3858	032645	321 10 0 00 777773 		JUMPL	SAC,-5		;LOOP ON ERROR SWITCH
  3859
  3860
  3861					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  3862					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  3863					;TEST EXPONENT CALCULATION FOR POSITIVE NUMBERS
  3864
  3865			005316		SN=SN+1
  3866			000020			XX=XX/2
  3867			205400			YY=YY-1000
  3868						IFE	XX,<XX=400000>
  3869	032646	551 02 0 00 000020 		HRRZI	AC-2,XX		;INITIALIZE FIXED PT WORD
  3870	032647	205 03 0 00 205400 		MOVSI	AC-1,YY		;SET-UP RESULT
  3871	032650	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  3872	032651	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  3873	032652	003 04 0 00 005316 		ER3	AC,SN		;INCORRECT EXPONENT
  3874	032653	321 10 0 00 777773 		JUMPL	SAC,-5		;LOOP ON ERROR SWITCH
  3875
  3876
  3877					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  3878					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  3879					;TEST EXPONENT CALCULATION FOR POSITIVE NUMBERS
  3880
  3881			005317		SN=SN+1
  3882			000010			XX=XX/2
  3883			204400			YY=YY-1000
  3884						IFE	XX,<XX=400000>
  3885	032654	551 02 0 00 000010 		HRRZI	AC-2,XX		;INITIALIZE FIXED PT WORD
  3886	032655	205 03 0 00 204400 		MOVSI	AC-1,YY		;SET-UP RESULT
  3887	032656	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  3888	032657	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  3889	032660	003 04 0 00 005317 		ER3	AC,SN		;INCORRECT EXPONENT
  3890	032661	321 10 0 00 777773 		JUMPL	SAC,-5		;LOOP ON ERROR SWITCH
  3891
  3892
  3893					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  3894					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  3895					;TEST EXPONENT CALCULATION FOR POSITIVE NUMBERS
  3896
  3897			005320		SN=SN+1
  3898			000004			XX=XX/2
  3899			203400			YY=YY-1000
  3900						IFE	XX,<XX=400000>
  3901	032662	551 02 0 00 000004 		HRRZI	AC-2,XX		;INITIALIZE FIXED PT WORD
  3902	032663	205 03 0 00 203400 		MOVSI	AC-1,YY		;SET-UP RESULT
  3903	032664	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  3904	032665	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  3905	032666	003 04 0 00 005320 		ER3	AC,SN		;INCORRECT EXPONENT
  3906	032667	321 10 0 00 777773 		JUMPL	SAC,-5		;LOOP ON ERROR SWITCH
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 24-11
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - EXPONENT CALCULATION - POSITIVE NUMBERS                SEQ 0103

  3907
  3908
  3909					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  3910					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  3911					;TEST EXPONENT CALCULATION FOR POSITIVE NUMBERS
  3912
  3913			005321		SN=SN+1
  3914			000002			XX=XX/2
  3915			202400			YY=YY-1000
  3916						IFE	XX,<XX=400000>
  3917	032670	551 02 0 00 000002 		HRRZI	AC-2,XX		;INITIALIZE FIXED PT WORD
  3918	032671	205 03 0 00 202400 		MOVSI	AC-1,YY		;SET-UP RESULT
  3919	032672	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  3920	032673	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  3921	032674	003 04 0 00 005321 		ER3	AC,SN		;INCORRECT EXPONENT
  3922	032675	321 10 0 00 777773 		JUMPL	SAC,-5		;LOOP ON ERROR SWITCH
  3923
  3924
  3925					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  3926					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  3927					;TEST EXPONENT CALCULATION FOR POSITIVE NUMBERS
  3928
  3929			005322		SN=SN+1
  3930			000001			XX=XX/2
  3931			201400			YY=YY-1000
  3932						IFE	XX,<XX=400000>
  3933	032676	551 02 0 00 000001 		HRRZI	AC-2,XX		;INITIALIZE FIXED PT WORD
  3934	032677	205 03 0 00 201400 		MOVSI	AC-1,YY		;SET-UP RESULT
  3935	032700	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  3936	032701	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  3937	032702	003 04 0 00 005322 		ER3	AC,SN		;INCORRECT EXPONENT
  3938	032703	321 10 0 00 777773 		JUMPL	SAC,-5		;LOOP ON ERROR SWITCH
  3939
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 25
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - EXPONENT CALCULATION - NEGATIVE NUMBERS                SEQ 0104

  3940					SUBTTL	DIAGNOSTIC SECTION - FLTR - EXPONENT CALCULATION - NEGATIVE NUMBERS
  3941
  3942					;TEST EXPONENT CALCULATION FOR NEGATIVE NUMBERS
  3943
  3944			005400		SN=5400
  3945			000000			XX=0
  3946			532400			YY=532400
  3947
  3948					Q5400:	REPEAT	^D18,<
  3949					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  3950					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  3951					;TEST EXPONENT CALCULATION FOR NEGATIVE NUMBERS
  3952					
  3953					SN=SN+1
  3954						XX=XX!<XX/2>
  3955						YY=YY+1000
  3956						IFE	XX,<XX=400000>
  3957						MOVSI	AC-2,XX		;INITIALIZE FIXED POINT WORD
  3958						MOVSI	AC-1,YY		;SET-UP RESULT
  3959						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  3960						CAME	AC,AC-1		;TEST EXPONENT
  3961						ER3	AC,SN		;INCORRECT EXPONENT
  3962						JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  3963					>
  3964
  3965					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  3966					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  3967					;TEST EXPONENT CALCULATION FOR NEGATIVE NUMBERS
  3968
  3969			005401		SN=SN+1
  3970			000000			XX=XX!<XX/2>
  3971			533400			YY=YY+1000
  3972			400000			IFE	XX,<XX=400000>
  3973	032704	205 02 0 00 400000 		MOVSI	AC-2,XX		;INITIALIZE FIXED POINT WORD
  3974	032705	205 03 0 00 533400 		MOVSI	AC-1,YY		;SET-UP RESULT
  3975	032706	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  3976	032707	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  3977	032710	003 04 0 00 005401 		ER3	AC,SN		;INCORRECT EXPONENT
  3978	032711	321 10 0 00 032704 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  3979
  3980
  3981					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  3982					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  3983					;TEST EXPONENT CALCULATION FOR NEGATIVE NUMBERS
  3984
  3985			005402		SN=SN+1
  3986			600000			XX=XX!<XX/2>
  3987			534400			YY=YY+1000
  3988						IFE	XX,<XX=400000>
  3989	032712	205 02 0 00 600000 		MOVSI	AC-2,XX		;INITIALIZE FIXED POINT WORD
  3990	032713	205 03 0 00 534400 		MOVSI	AC-1,YY		;SET-UP RESULT
  3991	032714	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  3992	032715	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  3993	032716	003 04 0 00 005402 		ER3	AC,SN		;INCORRECT EXPONENT
  3994	032717	321 10 0 00 032712 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 25-1
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - EXPONENT CALCULATION - NEGATIVE NUMBERS                SEQ 0105

  3995
  3996
  3997					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  3998					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  3999					;TEST EXPONENT CALCULATION FOR NEGATIVE NUMBERS
  4000
  4001			005403		SN=SN+1
  4002			700000			XX=XX!<XX/2>
  4003			535400			YY=YY+1000
  4004						IFE	XX,<XX=400000>
  4005	032720	205 02 0 00 700000 		MOVSI	AC-2,XX		;INITIALIZE FIXED POINT WORD
  4006	032721	205 03 0 00 535400 		MOVSI	AC-1,YY		;SET-UP RESULT
  4007	032722	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4008	032723	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  4009	032724	003 04 0 00 005403 		ER3	AC,SN		;INCORRECT EXPONENT
  4010	032725	321 10 0 00 032720 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  4011
  4012
  4013					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4014					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4015					;TEST EXPONENT CALCULATION FOR NEGATIVE NUMBERS
  4016
  4017			005404		SN=SN+1
  4018			740000			XX=XX!<XX/2>
  4019			536400			YY=YY+1000
  4020						IFE	XX,<XX=400000>
  4021	032726	205 02 0 00 740000 		MOVSI	AC-2,XX		;INITIALIZE FIXED POINT WORD
  4022	032727	205 03 0 00 536400 		MOVSI	AC-1,YY		;SET-UP RESULT
  4023	032730	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4024	032731	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  4025	032732	003 04 0 00 005404 		ER3	AC,SN		;INCORRECT EXPONENT
  4026	032733	321 10 0 00 032726 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  4027
  4028
  4029					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4030					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4031					;TEST EXPONENT CALCULATION FOR NEGATIVE NUMBERS
  4032
  4033			005405		SN=SN+1
  4034			760000			XX=XX!<XX/2>
  4035			537400			YY=YY+1000
  4036						IFE	XX,<XX=400000>
  4037	032734	205 02 0 00 760000 		MOVSI	AC-2,XX		;INITIALIZE FIXED POINT WORD
  4038	032735	205 03 0 00 537400 		MOVSI	AC-1,YY		;SET-UP RESULT
  4039	032736	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4040	032737	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  4041	032740	003 04 0 00 005405 		ER3	AC,SN		;INCORRECT EXPONENT
  4042	032741	321 10 0 00 032734 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  4043
  4044
  4045					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4046					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4047					;TEST EXPONENT CALCULATION FOR NEGATIVE NUMBERS
  4048
  4049			005406		SN=SN+1
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 25-2
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - EXPONENT CALCULATION - NEGATIVE NUMBERS                SEQ 0106

  4050			770000			XX=XX!<XX/2>
  4051			540400			YY=YY+1000
  4052						IFE	XX,<XX=400000>
  4053	032742	205 02 0 00 770000 		MOVSI	AC-2,XX		;INITIALIZE FIXED POINT WORD
  4054	032743	205 03 0 00 540400 		MOVSI	AC-1,YY		;SET-UP RESULT
  4055	032744	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4056	032745	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  4057	032746	003 04 0 00 005406 		ER3	AC,SN		;INCORRECT EXPONENT
  4058	032747	321 10 0 00 032742 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  4059
  4060
  4061					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4062					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4063					;TEST EXPONENT CALCULATION FOR NEGATIVE NUMBERS
  4064
  4065			005407		SN=SN+1
  4066			774000			XX=XX!<XX/2>
  4067			541400			YY=YY+1000
  4068						IFE	XX,<XX=400000>
  4069	032750	205 02 0 00 774000 		MOVSI	AC-2,XX		;INITIALIZE FIXED POINT WORD
  4070	032751	205 03 0 00 541400 		MOVSI	AC-1,YY		;SET-UP RESULT
  4071	032752	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4072	032753	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  4073	032754	003 04 0 00 005407 		ER3	AC,SN		;INCORRECT EXPONENT
  4074	032755	321 10 0 00 032750 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  4075
  4076
  4077					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4078					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4079					;TEST EXPONENT CALCULATION FOR NEGATIVE NUMBERS
  4080
  4081			005410		SN=SN+1
  4082			776000			XX=XX!<XX/2>
  4083			542400			YY=YY+1000
  4084						IFE	XX,<XX=400000>
  4085	032756	205 02 0 00 776000 		MOVSI	AC-2,XX		;INITIALIZE FIXED POINT WORD
  4086	032757	205 03 0 00 542400 		MOVSI	AC-1,YY		;SET-UP RESULT
  4087	032760	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4088	032761	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  4089	032762	003 04 0 00 005410 		ER3	AC,SN		;INCORRECT EXPONENT
  4090	032763	321 10 0 00 032756 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  4091
  4092
  4093					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4094					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4095					;TEST EXPONENT CALCULATION FOR NEGATIVE NUMBERS
  4096
  4097			005411		SN=SN+1
  4098			777000			XX=XX!<XX/2>
  4099			543400			YY=YY+1000
  4100						IFE	XX,<XX=400000>
  4101	032764	205 02 0 00 777000 		MOVSI	AC-2,XX		;INITIALIZE FIXED POINT WORD
  4102	032765	205 03 0 00 543400 		MOVSI	AC-1,YY		;SET-UP RESULT
  4103	032766	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4104	032767	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 25-3
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - EXPONENT CALCULATION - NEGATIVE NUMBERS                SEQ 0107

  4105	032770	003 04 0 00 005411 		ER3	AC,SN		;INCORRECT EXPONENT
  4106	032771	321 10 0 00 032764 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  4107
  4108
  4109					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4110					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4111					;TEST EXPONENT CALCULATION FOR NEGATIVE NUMBERS
  4112
  4113			005412		SN=SN+1
  4114			777400			XX=XX!<XX/2>
  4115			544400			YY=YY+1000
  4116						IFE	XX,<XX=400000>
  4117	032772	205 02 0 00 777400 		MOVSI	AC-2,XX		;INITIALIZE FIXED POINT WORD
  4118	032773	205 03 0 00 544400 		MOVSI	AC-1,YY		;SET-UP RESULT
  4119	032774	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4120	032775	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  4121	032776	003 04 0 00 005412 		ER3	AC,SN		;INCORRECT EXPONENT
  4122	032777	321 10 0 00 032772 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  4123
  4124
  4125					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4126					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4127					;TEST EXPONENT CALCULATION FOR NEGATIVE NUMBERS
  4128
  4129			005413		SN=SN+1
  4130			777600			XX=XX!<XX/2>
  4131			545400			YY=YY+1000
  4132						IFE	XX,<XX=400000>
  4133	033000	205 02 0 00 777600 		MOVSI	AC-2,XX		;INITIALIZE FIXED POINT WORD
  4134	033001	205 03 0 00 545400 		MOVSI	AC-1,YY		;SET-UP RESULT
  4135	033002	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4136	033003	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  4137	033004	003 04 0 00 005413 		ER3	AC,SN		;INCORRECT EXPONENT
  4138	033005	321 10 0 00 033000 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  4139
  4140
  4141					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4142					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4143					;TEST EXPONENT CALCULATION FOR NEGATIVE NUMBERS
  4144
  4145			005414		SN=SN+1
  4146			777700			XX=XX!<XX/2>
  4147			546400			YY=YY+1000
  4148						IFE	XX,<XX=400000>
  4149	033006	205 02 0 00 777700 		MOVSI	AC-2,XX		;INITIALIZE FIXED POINT WORD
  4150	033007	205 03 0 00 546400 		MOVSI	AC-1,YY		;SET-UP RESULT
  4151	033010	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4152	033011	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  4153	033012	003 04 0 00 005414 		ER3	AC,SN		;INCORRECT EXPONENT
  4154	033013	321 10 0 00 033006 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  4155
  4156
  4157					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4158					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4159					;TEST EXPONENT CALCULATION FOR NEGATIVE NUMBERS
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 25-4
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - EXPONENT CALCULATION - NEGATIVE NUMBERS                SEQ 0108

  4160
  4161			005415		SN=SN+1
  4162			777740			XX=XX!<XX/2>
  4163			547400			YY=YY+1000
  4164						IFE	XX,<XX=400000>
  4165	033014	205 02 0 00 777740 		MOVSI	AC-2,XX		;INITIALIZE FIXED POINT WORD
  4166	033015	205 03 0 00 547400 		MOVSI	AC-1,YY		;SET-UP RESULT
  4167	033016	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4168	033017	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  4169	033020	003 04 0 00 005415 		ER3	AC,SN		;INCORRECT EXPONENT
  4170	033021	321 10 0 00 033014 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  4171
  4172
  4173					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4174					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4175					;TEST EXPONENT CALCULATION FOR NEGATIVE NUMBERS
  4176
  4177			005416		SN=SN+1
  4178			777760			XX=XX!<XX/2>
  4179			550400			YY=YY+1000
  4180						IFE	XX,<XX=400000>
  4181	033022	205 02 0 00 777760 		MOVSI	AC-2,XX		;INITIALIZE FIXED POINT WORD
  4182	033023	205 03 0 00 550400 		MOVSI	AC-1,YY		;SET-UP RESULT
  4183	033024	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4184	033025	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  4185	033026	003 04 0 00 005416 		ER3	AC,SN		;INCORRECT EXPONENT
  4186	033027	321 10 0 00 033022 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  4187
  4188
  4189					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4190					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4191					;TEST EXPONENT CALCULATION FOR NEGATIVE NUMBERS
  4192
  4193			005417		SN=SN+1
  4194			777770			XX=XX!<XX/2>
  4195			551400			YY=YY+1000
  4196						IFE	XX,<XX=400000>
  4197	033030	205 02 0 00 777770 		MOVSI	AC-2,XX		;INITIALIZE FIXED POINT WORD
  4198	033031	205 03 0 00 551400 		MOVSI	AC-1,YY		;SET-UP RESULT
  4199	033032	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4200	033033	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  4201	033034	003 04 0 00 005417 		ER3	AC,SN		;INCORRECT EXPONENT
  4202	033035	321 10 0 00 033030 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  4203
  4204
  4205					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4206					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4207					;TEST EXPONENT CALCULATION FOR NEGATIVE NUMBERS
  4208
  4209			005420		SN=SN+1
  4210			777774			XX=XX!<XX/2>
  4211			552400			YY=YY+1000
  4212						IFE	XX,<XX=400000>
  4213	033036	205 02 0 00 777774 		MOVSI	AC-2,XX		;INITIALIZE FIXED POINT WORD
  4214	033037	205 03 0 00 552400 		MOVSI	AC-1,YY		;SET-UP RESULT
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 25-5
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - EXPONENT CALCULATION - NEGATIVE NUMBERS                SEQ 0109

  4215	033040	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4216	033041	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  4217	033042	003 04 0 00 005420 		ER3	AC,SN		;INCORRECT EXPONENT
  4218	033043	321 10 0 00 033036 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  4219
  4220
  4221					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4222					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4223					;TEST EXPONENT CALCULATION FOR NEGATIVE NUMBERS
  4224
  4225			005421		SN=SN+1
  4226			777776			XX=XX!<XX/2>
  4227			553400			YY=YY+1000
  4228						IFE	XX,<XX=400000>
  4229	033044	205 02 0 00 777776 		MOVSI	AC-2,XX		;INITIALIZE FIXED POINT WORD
  4230	033045	205 03 0 00 553400 		MOVSI	AC-1,YY		;SET-UP RESULT
  4231	033046	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4232	033047	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  4233	033050	003 04 0 00 005421 		ER3	AC,SN		;INCORRECT EXPONENT
  4234	033051	321 10 0 00 033044 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  4235
  4236
  4237					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4238					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4239					;TEST EXPONENT CALCULATION FOR NEGATIVE NUMBERS
  4240
  4241			005422		SN=SN+1
  4242			777777			XX=XX!<XX/2>
  4243			554400			YY=YY+1000
  4244						IFE	XX,<XX=400000>
  4245	033052	205 02 0 00 777777 		MOVSI	AC-2,XX		;INITIALIZE FIXED POINT WORD
  4246	033053	205 03 0 00 554400 		MOVSI	AC-1,YY		;SET-UP RESULT
  4247	033054	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4248	033055	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  4249	033056	003 04 0 00 005422 		ER3	AC,SN		;INCORRECT EXPONENT
  4250	033057	321 10 0 00 033052 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  4251
  4252					PAGE
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 25-6
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - EXPONENT CALCULATION - NEGATIVE NUMBERS                SEQ 0110

  4253			005500		SN=5500
  4254			000000			XX=0
  4255			554000			YY=554000
  4256
  4257					Q5500:	REPEAT ^D18,<
  4258					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4259					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4260					;TEST EXPONENT CALCULATION FOR NEGATIVE NUMBERS
  4261					
  4262					SN=SN+1
  4263						XX=XX!<XX/2>
  4264						YY=YY+1000
  4265						IFE	XX,<XX=400000>
  4266						HRROI	AC-2,XX		;INITIALIZE FIXED POINT WORD
  4267						MOVSI	AC-1,YY+400	;SET-UP RESULT
  4268						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4269						CAME	AC,AC-1		;TEST EXPONENT
  4270						ER3	AC,SN		;INCORRECT EXPONENT
  4271						JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  4272					>
  4273
  4274					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4275					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4276					;TEST EXPONENT CALCULATION FOR NEGATIVE NUMBERS
  4277
  4278			005501		SN=SN+1
  4279			000000			XX=XX!<XX/2>
  4280			555000			YY=YY+1000
  4281			400000			IFE	XX,<XX=400000>
  4282	033060	561 02 0 00 400000 		HRROI	AC-2,XX		;INITIALIZE FIXED POINT WORD
  4283	033061	205 03 0 00 555400 		MOVSI	AC-1,YY+400	;SET-UP RESULT
  4284	033062	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4285	033063	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  4286	033064	003 04 0 00 005501 		ER3	AC,SN		;INCORRECT EXPONENT
  4287	033065	321 10 0 00 033060 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  4288
  4289
  4290					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4291					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4292					;TEST EXPONENT CALCULATION FOR NEGATIVE NUMBERS
  4293
  4294			005502		SN=SN+1
  4295			600000			XX=XX!<XX/2>
  4296			556000			YY=YY+1000
  4297						IFE	XX,<XX=400000>
  4298	033066	561 02 0 00 600000 		HRROI	AC-2,XX		;INITIALIZE FIXED POINT WORD
  4299	033067	205 03 0 00 556400 		MOVSI	AC-1,YY+400	;SET-UP RESULT
  4300	033070	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4301	033071	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  4302	033072	003 04 0 00 005502 		ER3	AC,SN		;INCORRECT EXPONENT
  4303	033073	321 10 0 00 033066 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  4304
  4305
  4306					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4307					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 25-7
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - EXPONENT CALCULATION - NEGATIVE NUMBERS                SEQ 0111

  4308					;TEST EXPONENT CALCULATION FOR NEGATIVE NUMBERS
  4309
  4310			005503		SN=SN+1
  4311			700000			XX=XX!<XX/2>
  4312			557000			YY=YY+1000
  4313						IFE	XX,<XX=400000>
  4314	033074	561 02 0 00 700000 		HRROI	AC-2,XX		;INITIALIZE FIXED POINT WORD
  4315	033075	205 03 0 00 557400 		MOVSI	AC-1,YY+400	;SET-UP RESULT
  4316	033076	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4317	033077	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  4318	033100	003 04 0 00 005503 		ER3	AC,SN		;INCORRECT EXPONENT
  4319	033101	321 10 0 00 033074 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  4320
  4321
  4322					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4323					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4324					;TEST EXPONENT CALCULATION FOR NEGATIVE NUMBERS
  4325
  4326			005504		SN=SN+1
  4327			740000			XX=XX!<XX/2>
  4328			560000			YY=YY+1000
  4329						IFE	XX,<XX=400000>
  4330	033102	561 02 0 00 740000 		HRROI	AC-2,XX		;INITIALIZE FIXED POINT WORD
  4331	033103	205 03 0 00 560400 		MOVSI	AC-1,YY+400	;SET-UP RESULT
  4332	033104	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4333	033105	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  4334	033106	003 04 0 00 005504 		ER3	AC,SN		;INCORRECT EXPONENT
  4335	033107	321 10 0 00 033102 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  4336
  4337
  4338					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4339					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4340					;TEST EXPONENT CALCULATION FOR NEGATIVE NUMBERS
  4341
  4342			005505		SN=SN+1
  4343			760000			XX=XX!<XX/2>
  4344			561000			YY=YY+1000
  4345						IFE	XX,<XX=400000>
  4346	033110	561 02 0 00 760000 		HRROI	AC-2,XX		;INITIALIZE FIXED POINT WORD
  4347	033111	205 03 0 00 561400 		MOVSI	AC-1,YY+400	;SET-UP RESULT
  4348	033112	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4349	033113	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  4350	033114	003 04 0 00 005505 		ER3	AC,SN		;INCORRECT EXPONENT
  4351	033115	321 10 0 00 033110 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  4352
  4353
  4354					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4355					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4356					;TEST EXPONENT CALCULATION FOR NEGATIVE NUMBERS
  4357
  4358			005506		SN=SN+1
  4359			770000			XX=XX!<XX/2>
  4360			562000			YY=YY+1000
  4361						IFE	XX,<XX=400000>
  4362	033116	561 02 0 00 770000 		HRROI	AC-2,XX		;INITIALIZE FIXED POINT WORD
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 25-8
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - EXPONENT CALCULATION - NEGATIVE NUMBERS                SEQ 0112

  4363	033117	205 03 0 00 562400 		MOVSI	AC-1,YY+400	;SET-UP RESULT
  4364	033120	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4365	033121	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  4366	033122	003 04 0 00 005506 		ER3	AC,SN		;INCORRECT EXPONENT
  4367	033123	321 10 0 00 033116 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  4368
  4369
  4370					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4371					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4372					;TEST EXPONENT CALCULATION FOR NEGATIVE NUMBERS
  4373
  4374			005507		SN=SN+1
  4375			774000			XX=XX!<XX/2>
  4376			563000			YY=YY+1000
  4377						IFE	XX,<XX=400000>
  4378	033124	561 02 0 00 774000 		HRROI	AC-2,XX		;INITIALIZE FIXED POINT WORD
  4379	033125	205 03 0 00 563400 		MOVSI	AC-1,YY+400	;SET-UP RESULT
  4380	033126	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4381	033127	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  4382	033130	003 04 0 00 005507 		ER3	AC,SN		;INCORRECT EXPONENT
  4383	033131	321 10 0 00 033124 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  4384
  4385
  4386					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4387					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4388					;TEST EXPONENT CALCULATION FOR NEGATIVE NUMBERS
  4389
  4390			005510		SN=SN+1
  4391			776000			XX=XX!<XX/2>
  4392			564000			YY=YY+1000
  4393						IFE	XX,<XX=400000>
  4394	033132	561 02 0 00 776000 		HRROI	AC-2,XX		;INITIALIZE FIXED POINT WORD
  4395	033133	205 03 0 00 564400 		MOVSI	AC-1,YY+400	;SET-UP RESULT
  4396	033134	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4397	033135	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  4398	033136	003 04 0 00 005510 		ER3	AC,SN		;INCORRECT EXPONENT
  4399	033137	321 10 0 00 033132 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  4400
  4401
  4402					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4403					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4404					;TEST EXPONENT CALCULATION FOR NEGATIVE NUMBERS
  4405
  4406			005511		SN=SN+1
  4407			777000			XX=XX!<XX/2>
  4408			565000			YY=YY+1000
  4409						IFE	XX,<XX=400000>
  4410	033140	561 02 0 00 777000 		HRROI	AC-2,XX		;INITIALIZE FIXED POINT WORD
  4411	033141	205 03 0 00 565400 		MOVSI	AC-1,YY+400	;SET-UP RESULT
  4412	033142	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4413	033143	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  4414	033144	003 04 0 00 005511 		ER3	AC,SN		;INCORRECT EXPONENT
  4415	033145	321 10 0 00 033140 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  4416
  4417
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 25-9
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - EXPONENT CALCULATION - NEGATIVE NUMBERS                SEQ 0113

  4418					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4419					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4420					;TEST EXPONENT CALCULATION FOR NEGATIVE NUMBERS
  4421
  4422			005512		SN=SN+1
  4423			777400			XX=XX!<XX/2>
  4424			566000			YY=YY+1000
  4425						IFE	XX,<XX=400000>
  4426	033146	561 02 0 00 777400 		HRROI	AC-2,XX		;INITIALIZE FIXED POINT WORD
  4427	033147	205 03 0 00 566400 		MOVSI	AC-1,YY+400	;SET-UP RESULT
  4428	033150	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4429	033151	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  4430	033152	003 04 0 00 005512 		ER3	AC,SN		;INCORRECT EXPONENT
  4431	033153	321 10 0 00 033146 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  4432
  4433
  4434					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4435					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4436					;TEST EXPONENT CALCULATION FOR NEGATIVE NUMBERS
  4437
  4438			005513		SN=SN+1
  4439			777600			XX=XX!<XX/2>
  4440			567000			YY=YY+1000
  4441						IFE	XX,<XX=400000>
  4442	033154	561 02 0 00 777600 		HRROI	AC-2,XX		;INITIALIZE FIXED POINT WORD
  4443	033155	205 03 0 00 567400 		MOVSI	AC-1,YY+400	;SET-UP RESULT
  4444	033156	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4445	033157	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  4446	033160	003 04 0 00 005513 		ER3	AC,SN		;INCORRECT EXPONENT
  4447	033161	321 10 0 00 033154 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  4448
  4449
  4450					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4451					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4452					;TEST EXPONENT CALCULATION FOR NEGATIVE NUMBERS
  4453
  4454			005514		SN=SN+1
  4455			777700			XX=XX!<XX/2>
  4456			570000			YY=YY+1000
  4457						IFE	XX,<XX=400000>
  4458	033162	561 02 0 00 777700 		HRROI	AC-2,XX		;INITIALIZE FIXED POINT WORD
  4459	033163	205 03 0 00 570400 		MOVSI	AC-1,YY+400	;SET-UP RESULT
  4460	033164	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4461	033165	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  4462	033166	003 04 0 00 005514 		ER3	AC,SN		;INCORRECT EXPONENT
  4463	033167	321 10 0 00 033162 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  4464
  4465
  4466					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4467					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4468					;TEST EXPONENT CALCULATION FOR NEGATIVE NUMBERS
  4469
  4470			005515		SN=SN+1
  4471			777740			XX=XX!<XX/2>
  4472			571000			YY=YY+1000
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 25-10
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - EXPONENT CALCULATION - NEGATIVE NUMBERS                SEQ 0114

  4473						IFE	XX,<XX=400000>
  4474	033170	561 02 0 00 777740 		HRROI	AC-2,XX		;INITIALIZE FIXED POINT WORD
  4475	033171	205 03 0 00 571400 		MOVSI	AC-1,YY+400	;SET-UP RESULT
  4476	033172	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4477	033173	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  4478	033174	003 04 0 00 005515 		ER3	AC,SN		;INCORRECT EXPONENT
  4479	033175	321 10 0 00 033170 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  4480
  4481
  4482					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4483					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4484					;TEST EXPONENT CALCULATION FOR NEGATIVE NUMBERS
  4485
  4486			005516		SN=SN+1
  4487			777760			XX=XX!<XX/2>
  4488			572000			YY=YY+1000
  4489						IFE	XX,<XX=400000>
  4490	033176	561 02 0 00 777760 		HRROI	AC-2,XX		;INITIALIZE FIXED POINT WORD
  4491	033177	205 03 0 00 572400 		MOVSI	AC-1,YY+400	;SET-UP RESULT
  4492	033200	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4493	033201	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  4494	033202	003 04 0 00 005516 		ER3	AC,SN		;INCORRECT EXPONENT
  4495	033203	321 10 0 00 033176 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  4496
  4497
  4498					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4499					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4500					;TEST EXPONENT CALCULATION FOR NEGATIVE NUMBERS
  4501
  4502			005517		SN=SN+1
  4503			777770			XX=XX!<XX/2>
  4504			573000			YY=YY+1000
  4505						IFE	XX,<XX=400000>
  4506	033204	561 02 0 00 777770 		HRROI	AC-2,XX		;INITIALIZE FIXED POINT WORD
  4507	033205	205 03 0 00 573400 		MOVSI	AC-1,YY+400	;SET-UP RESULT
  4508	033206	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4509	033207	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  4510	033210	003 04 0 00 005517 		ER3	AC,SN		;INCORRECT EXPONENT
  4511	033211	321 10 0 00 033204 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  4512
  4513
  4514					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4515					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4516					;TEST EXPONENT CALCULATION FOR NEGATIVE NUMBERS
  4517
  4518			005520		SN=SN+1
  4519			777774			XX=XX!<XX/2>
  4520			574000			YY=YY+1000
  4521						IFE	XX,<XX=400000>
  4522	033212	561 02 0 00 777774 		HRROI	AC-2,XX		;INITIALIZE FIXED POINT WORD
  4523	033213	205 03 0 00 574400 		MOVSI	AC-1,YY+400	;SET-UP RESULT
  4524	033214	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4525	033215	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  4526	033216	003 04 0 00 005520 		ER3	AC,SN		;INCORRECT EXPONENT
  4527	033217	321 10 0 00 033212 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 25-11
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - EXPONENT CALCULATION - NEGATIVE NUMBERS                SEQ 0115

  4528
  4529
  4530					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4531					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4532					;TEST EXPONENT CALCULATION FOR NEGATIVE NUMBERS
  4533
  4534			005521		SN=SN+1
  4535			777776			XX=XX!<XX/2>
  4536			575000			YY=YY+1000
  4537						IFE	XX,<XX=400000>
  4538	033220	561 02 0 00 777776 		HRROI	AC-2,XX		;INITIALIZE FIXED POINT WORD
  4539	033221	205 03 0 00 575400 		MOVSI	AC-1,YY+400	;SET-UP RESULT
  4540	033222	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4541	033223	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  4542	033224	003 04 0 00 005521 		ER3	AC,SN		;INCORRECT EXPONENT
  4543	033225	321 10 0 00 033220 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  4544
  4545
  4546					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4547					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4548					;TEST EXPONENT CALCULATION FOR NEGATIVE NUMBERS
  4549
  4550			005522		SN=SN+1
  4551			777777			XX=XX!<XX/2>
  4552			576000			YY=YY+1000
  4553						IFE	XX,<XX=400000>
  4554	033226	561 02 0 00 777777 		HRROI	AC-2,XX		;INITIALIZE FIXED POINT WORD
  4555	033227	205 03 0 00 576400 		MOVSI	AC-1,YY+400	;SET-UP RESULT
  4556	033230	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4557	033231	312 04 0 00 000003 		CAME	AC,AC-1		;TEST EXPONENT
  4558	033232	003 04 0 00 005522 		ER3	AC,SN		;INCORRECT EXPONENT
  4559	033233	321 10 0 00 033226 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  4560
  4561					PAGE
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 25-12
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - EXPONENT CALCULATION - NEGATIVE NUMBERS                SEQ 0116

  4562					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO. 0
  4563					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4564					;FLOAT A WORD OF ALL ZEROS
  4565
  4566	033234	403 02 0 00 000003 	Q5600:	SETZB	AC-2,AC-1	;INITIALIZE FIXED POINT WORD
  4567	033235	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. 0 IN 'E' TO FLT PT
  4568	033236	312 04 0 00 000003 		CAME	AC,AC-1		;EXAMINE RESULT FOR 0
  4569	033237	003 04 0 00 005601 		ER3	AC,5601		;CONVERSION FAILED
  4570	033240	321 10 0 00 033234 		JUMPL	SAC,Q5600	;LOOP ON ERROR SWITCH
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 26
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - POSITIVE NUMBERS - RIPPLE ZEROS                        SEQ 0117

  4571					SUBTTL	DIAGNOSTIC SECTION - FLTR - POSITIVE NUMBERS - RIPPLE ZEROS
  4572
  4573					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4574					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4575					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - POS NOS.
  4576
  4577	033241	201 02 0 00 777400 	Q5700:	MOVEI	AC-2,777400	;INITIALIZE FIX PT WORD
  4578	033242	505 02 0 00 377777 		HRLI	AC-2,377777
  4579	033243	525 03 0 00 243777 		HRLOI	AC-1,243777	;SET-UP RESULT
  4580	033244	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4581	033245	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  4582	033246	003 04 0 00 005701 		ER3	AC,5701		;FRACTION NOT ALL ONES
  4583	033247	321 10 0 00 033241 		JUMPL	SAC,Q5700	;LOOP ON ERROR SWITCH
  4584
  4585			006000		SN=6000
  4586			777200			XX=777200
  4587			000000			YY=0
  4588
  4589					Q6000:	REPEAT	^D10,<
  4590					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4591					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4592					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - POS NOS.
  4593					
  4594					SN=SN+1
  4595						XX=<XX+XX+400>&777777
  4596						YY=<YY+YY+1>&777777
  4597						IFE	<YY-1>,<YY=777776>
  4598						HRROI	AC-2,XX		;INITIALIZE FIX PT. NBR.
  4599						TLZ	AC-2,1B18
  4600						HRLOI	AC-1,243777	;SET-UP EXPECTED RESULT7
  4601						HRRI	AC-1,YY
  4602						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4603						CAME	AC,AC-1		;TEST FRACTION
  4604						ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  4605						JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  4606					>
  4607
  4608					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4609					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4610					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - POS NOS.
  4611
  4612			006001		SN=SN+1
  4613			777000			XX=<XX+XX+400>&777777
  4614			000001			YY=<YY+YY+1>&777777
  4615			777776			IFE	<YY-1>,<YY=777776>
  4616	033250	561 02 0 00 777000 		HRROI	AC-2,XX		;INITIALIZE FIX PT. NBR.
  4617	033251	621 02 0 00 400000 		TLZ	AC-2,1B18
  4618	033252	525 03 0 00 243777 		HRLOI	AC-1,243777	;SET-UP EXPECTED RESULT7
  4619	033253	541 03 0 00 777776 		HRRI	AC-1,YY
  4620	033254	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4621	033255	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  4622	033256	003 04 0 00 006001 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  4623	033257	321 10 0 00 033250 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  4624
  4625
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 26-1
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - POSITIVE NUMBERS - RIPPLE ZEROS                        SEQ 0118

  4626					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4627					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4628					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - POS NOS.
  4629
  4630			006002		SN=SN+1
  4631			776400			XX=<XX+XX+400>&777777
  4632			777775			YY=<YY+YY+1>&777777
  4633						IFE	<YY-1>,<YY=777776>
  4634	033260	561 02 0 00 776400 		HRROI	AC-2,XX		;INITIALIZE FIX PT. NBR.
  4635	033261	621 02 0 00 400000 		TLZ	AC-2,1B18
  4636	033262	525 03 0 00 243777 		HRLOI	AC-1,243777	;SET-UP EXPECTED RESULT7
  4637	033263	541 03 0 00 777775 		HRRI	AC-1,YY
  4638	033264	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4639	033265	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  4640	033266	003 04 0 00 006002 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  4641	033267	321 10 0 00 033260 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  4642
  4643
  4644					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4645					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4646					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - POS NOS.
  4647
  4648			006003		SN=SN+1
  4649			775400			XX=<XX+XX+400>&777777
  4650			777773			YY=<YY+YY+1>&777777
  4651						IFE	<YY-1>,<YY=777776>
  4652	033270	561 02 0 00 775400 		HRROI	AC-2,XX		;INITIALIZE FIX PT. NBR.
  4653	033271	621 02 0 00 400000 		TLZ	AC-2,1B18
  4654	033272	525 03 0 00 243777 		HRLOI	AC-1,243777	;SET-UP EXPECTED RESULT7
  4655	033273	541 03 0 00 777773 		HRRI	AC-1,YY
  4656	033274	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4657	033275	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  4658	033276	003 04 0 00 006003 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  4659	033277	321 10 0 00 033270 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  4660
  4661
  4662					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4663					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4664					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - POS NOS.
  4665
  4666			006004		SN=SN+1
  4667			773400			XX=<XX+XX+400>&777777
  4668			777767			YY=<YY+YY+1>&777777
  4669						IFE	<YY-1>,<YY=777776>
  4670	033300	561 02 0 00 773400 		HRROI	AC-2,XX		;INITIALIZE FIX PT. NBR.
  4671	033301	621 02 0 00 400000 		TLZ	AC-2,1B18
  4672	033302	525 03 0 00 243777 		HRLOI	AC-1,243777	;SET-UP EXPECTED RESULT7
  4673	033303	541 03 0 00 777767 		HRRI	AC-1,YY
  4674	033304	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4675	033305	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  4676	033306	003 04 0 00 006004 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  4677	033307	321 10 0 00 033300 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  4678
  4679
  4680					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 26-2
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - POSITIVE NUMBERS - RIPPLE ZEROS                        SEQ 0119

  4681					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4682					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - POS NOS.
  4683
  4684			006005		SN=SN+1
  4685			767400			XX=<XX+XX+400>&777777
  4686			777757			YY=<YY+YY+1>&777777
  4687						IFE	<YY-1>,<YY=777776>
  4688	033310	561 02 0 00 767400 		HRROI	AC-2,XX		;INITIALIZE FIX PT. NBR.
  4689	033311	621 02 0 00 400000 		TLZ	AC-2,1B18
  4690	033312	525 03 0 00 243777 		HRLOI	AC-1,243777	;SET-UP EXPECTED RESULT7
  4691	033313	541 03 0 00 777757 		HRRI	AC-1,YY
  4692	033314	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4693	033315	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  4694	033316	003 04 0 00 006005 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  4695	033317	321 10 0 00 033310 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  4696
  4697
  4698					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4699					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4700					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - POS NOS.
  4701
  4702			006006		SN=SN+1
  4703			757400			XX=<XX+XX+400>&777777
  4704			777737			YY=<YY+YY+1>&777777
  4705						IFE	<YY-1>,<YY=777776>
  4706	033320	561 02 0 00 757400 		HRROI	AC-2,XX		;INITIALIZE FIX PT. NBR.
  4707	033321	621 02 0 00 400000 		TLZ	AC-2,1B18
  4708	033322	525 03 0 00 243777 		HRLOI	AC-1,243777	;SET-UP EXPECTED RESULT7
  4709	033323	541 03 0 00 777737 		HRRI	AC-1,YY
  4710	033324	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4711	033325	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  4712	033326	003 04 0 00 006006 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  4713	033327	321 10 0 00 033320 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  4714
  4715
  4716					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4717					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4718					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - POS NOS.
  4719
  4720			006007		SN=SN+1
  4721			737400			XX=<XX+XX+400>&777777
  4722			777677			YY=<YY+YY+1>&777777
  4723						IFE	<YY-1>,<YY=777776>
  4724	033330	561 02 0 00 737400 		HRROI	AC-2,XX		;INITIALIZE FIX PT. NBR.
  4725	033331	621 02 0 00 400000 		TLZ	AC-2,1B18
  4726	033332	525 03 0 00 243777 		HRLOI	AC-1,243777	;SET-UP EXPECTED RESULT7
  4727	033333	541 03 0 00 777677 		HRRI	AC-1,YY
  4728	033334	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4729	033335	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  4730	033336	003 04 0 00 006007 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  4731	033337	321 10 0 00 033330 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  4732
  4733
  4734					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4735					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 26-3
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - POSITIVE NUMBERS - RIPPLE ZEROS                        SEQ 0120

  4736					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - POS NOS.
  4737
  4738			006010		SN=SN+1
  4739			677400			XX=<XX+XX+400>&777777
  4740			777577			YY=<YY+YY+1>&777777
  4741						IFE	<YY-1>,<YY=777776>
  4742	033340	561 02 0 00 677400 		HRROI	AC-2,XX		;INITIALIZE FIX PT. NBR.
  4743	033341	621 02 0 00 400000 		TLZ	AC-2,1B18
  4744	033342	525 03 0 00 243777 		HRLOI	AC-1,243777	;SET-UP EXPECTED RESULT7
  4745	033343	541 03 0 00 777577 		HRRI	AC-1,YY
  4746	033344	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4747	033345	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  4748	033346	003 04 0 00 006010 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  4749	033347	321 10 0 00 033340 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  4750
  4751
  4752					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4753					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4754					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - POS NOS.
  4755
  4756			006011		SN=SN+1
  4757			577400			XX=<XX+XX+400>&777777
  4758			777377			YY=<YY+YY+1>&777777
  4759						IFE	<YY-1>,<YY=777776>
  4760	033350	561 02 0 00 577400 		HRROI	AC-2,XX		;INITIALIZE FIX PT. NBR.
  4761	033351	621 02 0 00 400000 		TLZ	AC-2,1B18
  4762	033352	525 03 0 00 243777 		HRLOI	AC-1,243777	;SET-UP EXPECTED RESULT7
  4763	033353	541 03 0 00 777377 		HRRI	AC-1,YY
  4764	033354	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4765	033355	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  4766	033356	003 04 0 00 006011 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  4767	033357	321 10 0 00 033350 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  4768
  4769
  4770					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4771					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4772					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - POS NOS.
  4773
  4774			006012		SN=SN+1
  4775			377400			XX=<XX+XX+400>&777777
  4776			776777			YY=<YY+YY+1>&777777
  4777						IFE	<YY-1>,<YY=777776>
  4778	033360	561 02 0 00 377400 		HRROI	AC-2,XX		;INITIALIZE FIX PT. NBR.
  4779	033361	621 02 0 00 400000 		TLZ	AC-2,1B18
  4780	033362	525 03 0 00 243777 		HRLOI	AC-1,243777	;SET-UP EXPECTED RESULT7
  4781	033363	541 03 0 00 776777 		HRRI	AC-1,YY
  4782	033364	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4783	033365	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  4784	033366	003 04 0 00 006012 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  4785	033367	321 10 0 00 033360 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  4786
  4787					PAGE
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 26-4
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - POSITIVE NUMBERS - RIPPLE ZEROS                        SEQ 0121

  4788			006100		SN=6100
  4789			000000			XX=0
  4790			776777			YY=776777
  4791
  4792					Q6100:	REPEAT	^D8,<
  4793					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4794					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4795					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - POS NOS.
  4796					
  4797					SN=SN+1
  4798						XX=<XX+XX+1>&377777
  4799						YY=<YY+YY+1>&777777
  4800						IFE	<XX-1>,<XX=377776>
  4801						HRLOI	AC-2,XX		;INITIALIZE FIX PT. NBR.
  4802						HRRI	AC-2,777400
  4803						HRLOI	AC-1,243777	;SET-UP EXPECTED RESULT
  4804						HRRI	AC-1,YY
  4805						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4806						CAME	AC,AC-1		;TEST FRACTION
  4807						ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  4808						JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  4809					>
  4810
  4811					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4812					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4813					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - POS NOS.
  4814
  4815			006101		SN=SN+1
  4816			000001			XX=<XX+XX+1>&377777
  4817			775777			YY=<YY+YY+1>&777777
  4818			377776			IFE	<XX-1>,<XX=377776>
  4819	033370	525 02 0 00 377776 		HRLOI	AC-2,XX		;INITIALIZE FIX PT. NBR.
  4820	033371	541 02 0 00 777400 		HRRI	AC-2,777400
  4821	033372	525 03 0 00 243777 		HRLOI	AC-1,243777	;SET-UP EXPECTED RESULT
  4822	033373	541 03 0 00 775777 		HRRI	AC-1,YY
  4823	033374	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4824	033375	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  4825	033376	003 04 0 00 006101 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  4826	033377	321 10 0 00 033370 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  4827
  4828
  4829					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4830					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4831					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - POS NOS.
  4832
  4833			006102		SN=SN+1
  4834			377775			XX=<XX+XX+1>&377777
  4835			773777			YY=<YY+YY+1>&777777
  4836						IFE	<XX-1>,<XX=377776>
  4837	033400	525 02 0 00 377775 		HRLOI	AC-2,XX		;INITIALIZE FIX PT. NBR.
  4838	033401	541 02 0 00 777400 		HRRI	AC-2,777400
  4839	033402	525 03 0 00 243777 		HRLOI	AC-1,243777	;SET-UP EXPECTED RESULT
  4840	033403	541 03 0 00 773777 		HRRI	AC-1,YY
  4841	033404	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4842	033405	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 26-5
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - POSITIVE NUMBERS - RIPPLE ZEROS                        SEQ 0122

  4843	033406	003 04 0 00 006102 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  4844	033407	321 10 0 00 033400 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  4845
  4846
  4847					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4848					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4849					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - POS NOS.
  4850
  4851			006103		SN=SN+1
  4852			377773			XX=<XX+XX+1>&377777
  4853			767777			YY=<YY+YY+1>&777777
  4854						IFE	<XX-1>,<XX=377776>
  4855	033410	525 02 0 00 377773 		HRLOI	AC-2,XX		;INITIALIZE FIX PT. NBR.
  4856	033411	541 02 0 00 777400 		HRRI	AC-2,777400
  4857	033412	525 03 0 00 243777 		HRLOI	AC-1,243777	;SET-UP EXPECTED RESULT
  4858	033413	541 03 0 00 767777 		HRRI	AC-1,YY
  4859	033414	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4860	033415	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  4861	033416	003 04 0 00 006103 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  4862	033417	321 10 0 00 033410 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  4863
  4864
  4865					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4866					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4867					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - POS NOS.
  4868
  4869			006104		SN=SN+1
  4870			377767			XX=<XX+XX+1>&377777
  4871			757777			YY=<YY+YY+1>&777777
  4872						IFE	<XX-1>,<XX=377776>
  4873	033420	525 02 0 00 377767 		HRLOI	AC-2,XX		;INITIALIZE FIX PT. NBR.
  4874	033421	541 02 0 00 777400 		HRRI	AC-2,777400
  4875	033422	525 03 0 00 243777 		HRLOI	AC-1,243777	;SET-UP EXPECTED RESULT
  4876	033423	541 03 0 00 757777 		HRRI	AC-1,YY
  4877	033424	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4878	033425	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  4879	033426	003 04 0 00 006104 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  4880	033427	321 10 0 00 033420 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  4881
  4882
  4883					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4884					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4885					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - POS NOS.
  4886
  4887			006105		SN=SN+1
  4888			377757			XX=<XX+XX+1>&377777
  4889			737777			YY=<YY+YY+1>&777777
  4890						IFE	<XX-1>,<XX=377776>
  4891	033430	525 02 0 00 377757 		HRLOI	AC-2,XX		;INITIALIZE FIX PT. NBR.
  4892	033431	541 02 0 00 777400 		HRRI	AC-2,777400
  4893	033432	525 03 0 00 243777 		HRLOI	AC-1,243777	;SET-UP EXPECTED RESULT
  4894	033433	541 03 0 00 737777 		HRRI	AC-1,YY
  4895	033434	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4896	033435	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  4897	033436	003 04 0 00 006105 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 26-6
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - POSITIVE NUMBERS - RIPPLE ZEROS                        SEQ 0123

  4898	033437	321 10 0 00 033430 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  4899
  4900
  4901					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4902					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4903					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - POS NOS.
  4904
  4905			006106		SN=SN+1
  4906			377737			XX=<XX+XX+1>&377777
  4907			677777			YY=<YY+YY+1>&777777
  4908						IFE	<XX-1>,<XX=377776>
  4909	033440	525 02 0 00 377737 		HRLOI	AC-2,XX		;INITIALIZE FIX PT. NBR.
  4910	033441	541 02 0 00 777400 		HRRI	AC-2,777400
  4911	033442	525 03 0 00 243777 		HRLOI	AC-1,243777	;SET-UP EXPECTED RESULT
  4912	033443	541 03 0 00 677777 		HRRI	AC-1,YY
  4913	033444	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4914	033445	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  4915	033446	003 04 0 00 006106 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  4916	033447	321 10 0 00 033440 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  4917
  4918
  4919					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4920					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4921					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - POS NOS.
  4922
  4923			006107		SN=SN+1
  4924			377677			XX=<XX+XX+1>&377777
  4925			577777			YY=<YY+YY+1>&777777
  4926						IFE	<XX-1>,<XX=377776>
  4927	033450	525 02 0 00 377677 		HRLOI	AC-2,XX		;INITIALIZE FIX PT. NBR.
  4928	033451	541 02 0 00 777400 		HRRI	AC-2,777400
  4929	033452	525 03 0 00 243777 		HRLOI	AC-1,243777	;SET-UP EXPECTED RESULT
  4930	033453	541 03 0 00 577777 		HRRI	AC-1,YY
  4931	033454	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4932	033455	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  4933	033456	003 04 0 00 006107 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  4934	033457	321 10 0 00 033450 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  4935
  4936
  4937					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4938					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4939					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - POS NOS.
  4940
  4941			006110		SN=SN+1
  4942			377577			XX=<XX+XX+1>&377777
  4943			377777			YY=<YY+YY+1>&777777
  4944						IFE	<XX-1>,<XX=377776>
  4945	033460	525 02 0 00 377577 		HRLOI	AC-2,XX		;INITIALIZE FIX PT. NBR.
  4946	033461	541 02 0 00 777400 		HRRI	AC-2,777400
  4947	033462	525 03 0 00 243777 		HRLOI	AC-1,243777	;SET-UP EXPECTED RESULT
  4948	033463	541 03 0 00 377777 		HRRI	AC-1,YY
  4949	033464	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4950	033465	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  4951	033466	003 04 0 00 006110 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  4952	033467	321 10 0 00 033460 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 26-7
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - POSITIVE NUMBERS - RIPPLE ZEROS                        SEQ 0124

  4953
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 27
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - POSITIVE NUMBERS - RIPPLE ZEROS                        SEQ 0125

  4954			006200		SN=6200
  4955			377577			XX=377577
  4956			000000			YY=0
  4957
  4958					Q6200:	REPEAT	^D8,<
  4959					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4960					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4961					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - POS NOS.
  4962					
  4963					SN=SN+1
  4964						XX=<XX+XX+1>&377777
  4965						YY=<YY+YY+1>&777
  4966						IFE	<YY-1>,<YY=776>
  4967						HRLOI	AC-2,XX		;INITIALIZE FIX PT. NBR.
  4968						HRRI	AC-2,777400
  4969						HRLOI	AC-1,243000+YY	;SET-UP EXPECTED RESULT
  4970						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4971						CAME	AC,AC-1		;TEST FRACTION
  4972						ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  4973						JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  4974					>
  4975
  4976					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4977					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4978					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - POS NOS.
  4979
  4980			006201		SN=SN+1
  4981			377377			XX=<XX+XX+1>&377777
  4982			000001			YY=<YY+YY+1>&777
  4983			000776			IFE	<YY-1>,<YY=776>
  4984	033470	525 02 0 00 377377 		HRLOI	AC-2,XX		;INITIALIZE FIX PT. NBR.
  4985	033471	541 02 0 00 777400 		HRRI	AC-2,777400
  4986	033472	525 03 0 00 243776 		HRLOI	AC-1,243000+YY	;SET-UP EXPECTED RESULT
  4987	033473	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  4988	033474	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  4989	033475	003 04 0 00 006201 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  4990	033476	321 10 0 00 033470 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  4991
  4992
  4993					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  4994					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  4995					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - POS NOS.
  4996
  4997			006202		SN=SN+1
  4998			376777			XX=<XX+XX+1>&377777
  4999			000775			YY=<YY+YY+1>&777
  5000						IFE	<YY-1>,<YY=776>
  5001	033477	525 02 0 00 376777 		HRLOI	AC-2,XX		;INITIALIZE FIX PT. NBR.
  5002	033500	541 02 0 00 777400 		HRRI	AC-2,777400
  5003	033501	525 03 0 00 243775 		HRLOI	AC-1,243000+YY	;SET-UP EXPECTED RESULT
  5004	033502	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  5005	033503	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5006	033504	003 04 0 00 006202 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  5007	033505	321 10 0 00 033477 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  5008
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 27-1
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - POSITIVE NUMBERS - RIPPLE ZEROS                        SEQ 0126

  5009
  5010					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  5011					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5012					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - POS NOS.
  5013
  5014			006203		SN=SN+1
  5015			375777			XX=<XX+XX+1>&377777
  5016			000773			YY=<YY+YY+1>&777
  5017						IFE	<YY-1>,<YY=776>
  5018	033506	525 02 0 00 375777 		HRLOI	AC-2,XX		;INITIALIZE FIX PT. NBR.
  5019	033507	541 02 0 00 777400 		HRRI	AC-2,777400
  5020	033510	525 03 0 00 243773 		HRLOI	AC-1,243000+YY	;SET-UP EXPECTED RESULT
  5021	033511	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  5022	033512	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5023	033513	003 04 0 00 006203 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  5024	033514	321 10 0 00 033506 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  5025
  5026
  5027					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  5028					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5029					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - POS NOS.
  5030
  5031			006204		SN=SN+1
  5032			373777			XX=<XX+XX+1>&377777
  5033			000767			YY=<YY+YY+1>&777
  5034						IFE	<YY-1>,<YY=776>
  5035	033515	525 02 0 00 373777 		HRLOI	AC-2,XX		;INITIALIZE FIX PT. NBR.
  5036	033516	541 02 0 00 777400 		HRRI	AC-2,777400
  5037	033517	525 03 0 00 243767 		HRLOI	AC-1,243000+YY	;SET-UP EXPECTED RESULT
  5038	033520	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  5039	033521	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5040	033522	003 04 0 00 006204 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  5041	033523	321 10 0 00 033515 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  5042
  5043
  5044					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  5045					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5046					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - POS NOS.
  5047
  5048			006205		SN=SN+1
  5049			367777			XX=<XX+XX+1>&377777
  5050			000757			YY=<YY+YY+1>&777
  5051						IFE	<YY-1>,<YY=776>
  5052	033524	525 02 0 00 367777 		HRLOI	AC-2,XX		;INITIALIZE FIX PT. NBR.
  5053	033525	541 02 0 00 777400 		HRRI	AC-2,777400
  5054	033526	525 03 0 00 243757 		HRLOI	AC-1,243000+YY	;SET-UP EXPECTED RESULT
  5055	033527	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  5056	033530	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5057	033531	003 04 0 00 006205 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  5058	033532	321 10 0 00 033524 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  5059
  5060
  5061					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  5062					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5063					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - POS NOS.
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 27-2
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - POSITIVE NUMBERS - RIPPLE ZEROS                        SEQ 0127

  5064
  5065			006206		SN=SN+1
  5066			357777			XX=<XX+XX+1>&377777
  5067			000737			YY=<YY+YY+1>&777
  5068						IFE	<YY-1>,<YY=776>
  5069	033533	525 02 0 00 357777 		HRLOI	AC-2,XX		;INITIALIZE FIX PT. NBR.
  5070	033534	541 02 0 00 777400 		HRRI	AC-2,777400
  5071	033535	525 03 0 00 243737 		HRLOI	AC-1,243000+YY	;SET-UP EXPECTED RESULT
  5072	033536	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  5073	033537	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5074	033540	003 04 0 00 006206 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  5075	033541	321 10 0 00 033533 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  5076
  5077
  5078					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  5079					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5080					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - POS NOS.
  5081
  5082			006207		SN=SN+1
  5083			337777			XX=<XX+XX+1>&377777
  5084			000677			YY=<YY+YY+1>&777
  5085						IFE	<YY-1>,<YY=776>
  5086	033542	525 02 0 00 337777 		HRLOI	AC-2,XX		;INITIALIZE FIX PT. NBR.
  5087	033543	541 02 0 00 777400 		HRRI	AC-2,777400
  5088	033544	525 03 0 00 243677 		HRLOI	AC-1,243000+YY	;SET-UP EXPECTED RESULT
  5089	033545	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  5090	033546	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5091	033547	003 04 0 00 006207 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  5092	033550	321 10 0 00 033542 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  5093
  5094
  5095					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  5096					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5097					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - POS NOS.
  5098
  5099			006210		SN=SN+1
  5100			277777			XX=<XX+XX+1>&377777
  5101			000577			YY=<YY+YY+1>&777
  5102						IFE	<YY-1>,<YY=776>
  5103	033551	525 02 0 00 277777 		HRLOI	AC-2,XX		;INITIALIZE FIX PT. NBR.
  5104	033552	541 02 0 00 777400 		HRRI	AC-2,777400
  5105	033553	525 03 0 00 243577 		HRLOI	AC-1,243000+YY	;SET-UP EXPECTED RESULT
  5106	033554	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT
  5107	033555	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5108	033556	003 04 0 00 006210 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  5109	033557	321 10 0 00 033551 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  5110
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 28
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - POSITIVE NUMBERS - RIPPLE ONES                         SEQ 0128

  5111					SUBTTL	DIAGNOSTIC SECTION - FLTR - POSITIVE NUMBERS - RIPPLE ONES
  5112
  5113					;RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - POS NOS
  5114
  5115			006300		SN=6300
  5116			000200			XX=200
  5117			000000			YY=0
  5118
  5119					Q6300:	REPEAT	^D10,<
  5120					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  5121					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5122					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - POS NOS.
  5123					
  5124					SN=SN+1
  5125						XX=XX+XX
  5126						YY=YY+YY
  5127						IFE	YY,<YY=1>
  5128						MOVSI	AC-2,1B19	;INITIALIZE FIX PT NBR.
  5129						HRRI	AC-2,XX
  5130						MOVSI	AC-1,243400	;SETUP EXPECTED RESULT
  5131						HRRI	AC-1,YY
  5132						FLTR	AC,AC-2		;CONVERT TO FLT PT
  5133						CAME	AC,AC-1		;TEST FRACTION
  5134						ER3	AC,SN		;FAILURE
  5135						JUMPL	SAC,.-7		;LOOP ON ERROR
  5136					>
  5137
  5138					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  5139					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5140					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - POS NOS.
  5141
  5142			006301		SN=SN+1
  5143			000400			XX=XX+XX
  5144			000000			YY=YY+YY
  5145			000001			IFE	YY,<YY=1>
  5146	033560	205 02 0 00 200000 		MOVSI	AC-2,1B19	;INITIALIZE FIX PT NBR.
  5147	033561	541 02 0 00 000400 		HRRI	AC-2,XX
  5148	033562	205 03 0 00 243400 		MOVSI	AC-1,243400	;SETUP EXPECTED RESULT
  5149	033563	541 03 0 00 000001 		HRRI	AC-1,YY
  5150	033564	127 04 0 00 000002 		FLTR	AC,AC-2		;CONVERT TO FLT PT
  5151	033565	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5152	033566	003 04 0 00 006301 		ER3	AC,SN		;FAILURE
  5153	033567	321 10 0 00 033560 		JUMPL	SAC,.-7		;LOOP ON ERROR
  5154
  5155
  5156					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  5157					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5158					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - POS NOS.
  5159
  5160			006302		SN=SN+1
  5161			001000			XX=XX+XX
  5162			000002			YY=YY+YY
  5163						IFE	YY,<YY=1>
  5164	033570	205 02 0 00 200000 		MOVSI	AC-2,1B19	;INITIALIZE FIX PT NBR.
  5165	033571	541 02 0 00 001000 		HRRI	AC-2,XX
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 28-1
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - POSITIVE NUMBERS - RIPPLE ONES                         SEQ 0129

  5166	033572	205 03 0 00 243400 		MOVSI	AC-1,243400	;SETUP EXPECTED RESULT
  5167	033573	541 03 0 00 000002 		HRRI	AC-1,YY
  5168	033574	127 04 0 00 000002 		FLTR	AC,AC-2		;CONVERT TO FLT PT
  5169	033575	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5170	033576	003 04 0 00 006302 		ER3	AC,SN		;FAILURE
  5171	033577	321 10 0 00 033570 		JUMPL	SAC,.-7		;LOOP ON ERROR
  5172
  5173
  5174					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  5175					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5176					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - POS NOS.
  5177
  5178			006303		SN=SN+1
  5179			002000			XX=XX+XX
  5180			000004			YY=YY+YY
  5181						IFE	YY,<YY=1>
  5182	033600	205 02 0 00 200000 		MOVSI	AC-2,1B19	;INITIALIZE FIX PT NBR.
  5183	033601	541 02 0 00 002000 		HRRI	AC-2,XX
  5184	033602	205 03 0 00 243400 		MOVSI	AC-1,243400	;SETUP EXPECTED RESULT
  5185	033603	541 03 0 00 000004 		HRRI	AC-1,YY
  5186	033604	127 04 0 00 000002 		FLTR	AC,AC-2		;CONVERT TO FLT PT
  5187	033605	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5188	033606	003 04 0 00 006303 		ER3	AC,SN		;FAILURE
  5189	033607	321 10 0 00 033600 		JUMPL	SAC,.-7		;LOOP ON ERROR
  5190
  5191
  5192					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  5193					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5194					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - POS NOS.
  5195
  5196			006304		SN=SN+1
  5197			004000			XX=XX+XX
  5198			000010			YY=YY+YY
  5199						IFE	YY,<YY=1>
  5200	033610	205 02 0 00 200000 		MOVSI	AC-2,1B19	;INITIALIZE FIX PT NBR.
  5201	033611	541 02 0 00 004000 		HRRI	AC-2,XX
  5202	033612	205 03 0 00 243400 		MOVSI	AC-1,243400	;SETUP EXPECTED RESULT
  5203	033613	541 03 0 00 000010 		HRRI	AC-1,YY
  5204	033614	127 04 0 00 000002 		FLTR	AC,AC-2		;CONVERT TO FLT PT
  5205	033615	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5206	033616	003 04 0 00 006304 		ER3	AC,SN		;FAILURE
  5207	033617	321 10 0 00 033610 		JUMPL	SAC,.-7		;LOOP ON ERROR
  5208
  5209
  5210					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  5211					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5212					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - POS NOS.
  5213
  5214			006305		SN=SN+1
  5215			010000			XX=XX+XX
  5216			000020			YY=YY+YY
  5217						IFE	YY,<YY=1>
  5218	033620	205 02 0 00 200000 		MOVSI	AC-2,1B19	;INITIALIZE FIX PT NBR.
  5219	033621	541 02 0 00 010000 		HRRI	AC-2,XX
  5220	033622	205 03 0 00 243400 		MOVSI	AC-1,243400	;SETUP EXPECTED RESULT
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 28-2
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - POSITIVE NUMBERS - RIPPLE ONES                         SEQ 0130

  5221	033623	541 03 0 00 000020 		HRRI	AC-1,YY
  5222	033624	127 04 0 00 000002 		FLTR	AC,AC-2		;CONVERT TO FLT PT
  5223	033625	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5224	033626	003 04 0 00 006305 		ER3	AC,SN		;FAILURE
  5225	033627	321 10 0 00 033620 		JUMPL	SAC,.-7		;LOOP ON ERROR
  5226
  5227
  5228					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  5229					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5230					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - POS NOS.
  5231
  5232			006306		SN=SN+1
  5233			020000			XX=XX+XX
  5234			000040			YY=YY+YY
  5235						IFE	YY,<YY=1>
  5236	033630	205 02 0 00 200000 		MOVSI	AC-2,1B19	;INITIALIZE FIX PT NBR.
  5237	033631	541 02 0 00 020000 		HRRI	AC-2,XX
  5238	033632	205 03 0 00 243400 		MOVSI	AC-1,243400	;SETUP EXPECTED RESULT
  5239	033633	541 03 0 00 000040 		HRRI	AC-1,YY
  5240	033634	127 04 0 00 000002 		FLTR	AC,AC-2		;CONVERT TO FLT PT
  5241	033635	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5242	033636	003 04 0 00 006306 		ER3	AC,SN		;FAILURE
  5243	033637	321 10 0 00 033630 		JUMPL	SAC,.-7		;LOOP ON ERROR
  5244
  5245
  5246					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  5247					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5248					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - POS NOS.
  5249
  5250			006307		SN=SN+1
  5251			040000			XX=XX+XX
  5252			000100			YY=YY+YY
  5253						IFE	YY,<YY=1>
  5254	033640	205 02 0 00 200000 		MOVSI	AC-2,1B19	;INITIALIZE FIX PT NBR.
  5255	033641	541 02 0 00 040000 		HRRI	AC-2,XX
  5256	033642	205 03 0 00 243400 		MOVSI	AC-1,243400	;SETUP EXPECTED RESULT
  5257	033643	541 03 0 00 000100 		HRRI	AC-1,YY
  5258	033644	127 04 0 00 000002 		FLTR	AC,AC-2		;CONVERT TO FLT PT
  5259	033645	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5260	033646	003 04 0 00 006307 		ER3	AC,SN		;FAILURE
  5261	033647	321 10 0 00 033640 		JUMPL	SAC,.-7		;LOOP ON ERROR
  5262
  5263
  5264					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  5265					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5266					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - POS NOS.
  5267
  5268			006310		SN=SN+1
  5269			100000			XX=XX+XX
  5270			000200			YY=YY+YY
  5271						IFE	YY,<YY=1>
  5272	033650	205 02 0 00 200000 		MOVSI	AC-2,1B19	;INITIALIZE FIX PT NBR.
  5273	033651	541 02 0 00 100000 		HRRI	AC-2,XX
  5274	033652	205 03 0 00 243400 		MOVSI	AC-1,243400	;SETUP EXPECTED RESULT
  5275	033653	541 03 0 00 000200 		HRRI	AC-1,YY
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 28-3
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - POSITIVE NUMBERS - RIPPLE ONES                         SEQ 0131

  5276	033654	127 04 0 00 000002 		FLTR	AC,AC-2		;CONVERT TO FLT PT
  5277	033655	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5278	033656	003 04 0 00 006310 		ER3	AC,SN		;FAILURE
  5279	033657	321 10 0 00 033650 		JUMPL	SAC,.-7		;LOOP ON ERROR
  5280
  5281
  5282					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  5283					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5284					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - POS NOS.
  5285
  5286			006311		SN=SN+1
  5287			200000			XX=XX+XX
  5288			000400			YY=YY+YY
  5289						IFE	YY,<YY=1>
  5290	033660	205 02 0 00 200000 		MOVSI	AC-2,1B19	;INITIALIZE FIX PT NBR.
  5291	033661	541 02 0 00 200000 		HRRI	AC-2,XX
  5292	033662	205 03 0 00 243400 		MOVSI	AC-1,243400	;SETUP EXPECTED RESULT
  5293	033663	541 03 0 00 000400 		HRRI	AC-1,YY
  5294	033664	127 04 0 00 000002 		FLTR	AC,AC-2		;CONVERT TO FLT PT
  5295	033665	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5296	033666	003 04 0 00 006311 		ER3	AC,SN		;FAILURE
  5297	033667	321 10 0 00 033660 		JUMPL	SAC,.-7		;LOOP ON ERROR
  5298
  5299
  5300					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  5301					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5302					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - POS NOS.
  5303
  5304			006312		SN=SN+1
  5305			400000			XX=XX+XX
  5306			001000			YY=YY+YY
  5307						IFE	YY,<YY=1>
  5308	033670	205 02 0 00 200000 		MOVSI	AC-2,1B19	;INITIALIZE FIX PT NBR.
  5309	033671	541 02 0 00 400000 		HRRI	AC-2,XX
  5310	033672	205 03 0 00 243400 		MOVSI	AC-1,243400	;SETUP EXPECTED RESULT
  5311	033673	541 03 0 00 001000 		HRRI	AC-1,YY
  5312	033674	127 04 0 00 000002 		FLTR	AC,AC-2		;CONVERT TO FLT PT
  5313	033675	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5314	033676	003 04 0 00 006312 		ER3	AC,SN		;FAILURE
  5315	033677	321 10 0 00 033670 		JUMPL	SAC,.-7		;LOOP ON ERROR
  5316
  5317					PAGE
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 28-4
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - POSITIVE NUMBERS - RIPPLE ONES                         SEQ 0132

  5318			006400		SN=6400
  5319			000000			XX=0
  5320			001000			YY=1000
  5321
  5322					Q6400:	REPEAT	^D8,<
  5323					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIXED PT
  5324					;NO IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5325					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - POS NOS.
  5326					
  5327					SN=SN+1
  5328						XX=XX+XX
  5329						YY=YY+YY
  5330						IFE	XX,<XX=1>
  5331						MOVSI	AC-2,1B19+XX	;INITIALIZE FIX PT. NBR.
  5332						MOVSI	AC-1,243400	;SET-UP EXPECTED RESULT
  5333						HRRI	AC-1,YY
  5334						FLTR	AC,AC-2		;*FIXED TO FLOAT
  5335						CAME	AC,AC-1		;TEST FRACTION
  5336						ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT SET
  5337						JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  5338					>
  5339
  5340					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIXED PT
  5341					;NO IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5342					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - POS NOS.
  5343
  5344			006401		SN=SN+1
  5345			000000			XX=XX+XX
  5346			002000			YY=YY+YY
  5347			000001			IFE	XX,<XX=1>
  5348	033700	205 02 0 00 200001 		MOVSI	AC-2,1B19+XX	;INITIALIZE FIX PT. NBR.
  5349	033701	205 03 0 00 243400 		MOVSI	AC-1,243400	;SET-UP EXPECTED RESULT
  5350	033702	541 03 0 00 002000 		HRRI	AC-1,YY
  5351	033703	127 04 0 00 000002 		FLTR	AC,AC-2		;*FIXED TO FLOAT
  5352	033704	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5353	033705	003 04 0 00 006401 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT SET
  5354	033706	321 10 0 00 033700 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  5355
  5356
  5357					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIXED PT
  5358					;NO IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5359					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - POS NOS.
  5360
  5361			006402		SN=SN+1
  5362			000002			XX=XX+XX
  5363			004000			YY=YY+YY
  5364						IFE	XX,<XX=1>
  5365	033707	205 02 0 00 200002 		MOVSI	AC-2,1B19+XX	;INITIALIZE FIX PT. NBR.
  5366	033710	205 03 0 00 243400 		MOVSI	AC-1,243400	;SET-UP EXPECTED RESULT
  5367	033711	541 03 0 00 004000 		HRRI	AC-1,YY
  5368	033712	127 04 0 00 000002 		FLTR	AC,AC-2		;*FIXED TO FLOAT
  5369	033713	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5370	033714	003 04 0 00 006402 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT SET
  5371	033715	321 10 0 00 033707 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  5372
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 28-5
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - POSITIVE NUMBERS - RIPPLE ONES                         SEQ 0133

  5373
  5374					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIXED PT
  5375					;NO IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5376					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - POS NOS.
  5377
  5378			006403		SN=SN+1
  5379			000004			XX=XX+XX
  5380			010000			YY=YY+YY
  5381						IFE	XX,<XX=1>
  5382	033716	205 02 0 00 200004 		MOVSI	AC-2,1B19+XX	;INITIALIZE FIX PT. NBR.
  5383	033717	205 03 0 00 243400 		MOVSI	AC-1,243400	;SET-UP EXPECTED RESULT
  5384	033720	541 03 0 00 010000 		HRRI	AC-1,YY
  5385	033721	127 04 0 00 000002 		FLTR	AC,AC-2		;*FIXED TO FLOAT
  5386	033722	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5387	033723	003 04 0 00 006403 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT SET
  5388	033724	321 10 0 00 033716 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  5389
  5390
  5391					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIXED PT
  5392					;NO IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5393					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - POS NOS.
  5394
  5395			006404		SN=SN+1
  5396			000010			XX=XX+XX
  5397			020000			YY=YY+YY
  5398						IFE	XX,<XX=1>
  5399	033725	205 02 0 00 200010 		MOVSI	AC-2,1B19+XX	;INITIALIZE FIX PT. NBR.
  5400	033726	205 03 0 00 243400 		MOVSI	AC-1,243400	;SET-UP EXPECTED RESULT
  5401	033727	541 03 0 00 020000 		HRRI	AC-1,YY
  5402	033730	127 04 0 00 000002 		FLTR	AC,AC-2		;*FIXED TO FLOAT
  5403	033731	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5404	033732	003 04 0 00 006404 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT SET
  5405	033733	321 10 0 00 033725 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  5406
  5407
  5408					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIXED PT
  5409					;NO IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5410					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - POS NOS.
  5411
  5412			006405		SN=SN+1
  5413			000020			XX=XX+XX
  5414			040000			YY=YY+YY
  5415						IFE	XX,<XX=1>
  5416	033734	205 02 0 00 200020 		MOVSI	AC-2,1B19+XX	;INITIALIZE FIX PT. NBR.
  5417	033735	205 03 0 00 243400 		MOVSI	AC-1,243400	;SET-UP EXPECTED RESULT
  5418	033736	541 03 0 00 040000 		HRRI	AC-1,YY
  5419	033737	127 04 0 00 000002 		FLTR	AC,AC-2		;*FIXED TO FLOAT
  5420	033740	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5421	033741	003 04 0 00 006405 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT SET
  5422	033742	321 10 0 00 033734 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  5423
  5424
  5425					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIXED PT
  5426					;NO IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5427					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - POS NOS.
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 28-6
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - POSITIVE NUMBERS - RIPPLE ONES                         SEQ 0134

  5428
  5429			006406		SN=SN+1
  5430			000040			XX=XX+XX
  5431			100000			YY=YY+YY
  5432						IFE	XX,<XX=1>
  5433	033743	205 02 0 00 200040 		MOVSI	AC-2,1B19+XX	;INITIALIZE FIX PT. NBR.
  5434	033744	205 03 0 00 243400 		MOVSI	AC-1,243400	;SET-UP EXPECTED RESULT
  5435	033745	541 03 0 00 100000 		HRRI	AC-1,YY
  5436	033746	127 04 0 00 000002 		FLTR	AC,AC-2		;*FIXED TO FLOAT
  5437	033747	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5438	033750	003 04 0 00 006406 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT SET
  5439	033751	321 10 0 00 033743 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  5440
  5441
  5442					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIXED PT
  5443					;NO IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5444					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - POS NOS.
  5445
  5446			006407		SN=SN+1
  5447			000100			XX=XX+XX
  5448			200000			YY=YY+YY
  5449						IFE	XX,<XX=1>
  5450	033752	205 02 0 00 200100 		MOVSI	AC-2,1B19+XX	;INITIALIZE FIX PT. NBR.
  5451	033753	205 03 0 00 243400 		MOVSI	AC-1,243400	;SET-UP EXPECTED RESULT
  5452	033754	541 03 0 00 200000 		HRRI	AC-1,YY
  5453	033755	127 04 0 00 000002 		FLTR	AC,AC-2		;*FIXED TO FLOAT
  5454	033756	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5455	033757	003 04 0 00 006407 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT SET
  5456	033760	321 10 0 00 033752 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  5457
  5458
  5459					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIXED PT
  5460					;NO IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5461					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - POS NOS.
  5462
  5463			006410		SN=SN+1
  5464			000200			XX=XX+XX
  5465			400000			YY=YY+YY
  5466						IFE	XX,<XX=1>
  5467	033761	205 02 0 00 200200 		MOVSI	AC-2,1B19+XX	;INITIALIZE FIX PT. NBR.
  5468	033762	205 03 0 00 243400 		MOVSI	AC-1,243400	;SET-UP EXPECTED RESULT
  5469	033763	541 03 0 00 400000 		HRRI	AC-1,YY
  5470	033764	127 04 0 00 000002 		FLTR	AC,AC-2		;*FIXED TO FLOAT
  5471	033765	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5472	033766	003 04 0 00 006410 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT SET
  5473	033767	321 10 0 00 033761 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  5474
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 29
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - POSITIVE NUMBERS - RIPPLE ONES                         SEQ 0135

  5475			006500		SN=6500
  5476			000200			XX=200
  5477			000000			YY=0
  5478
  5479					Q6500:	REPEAT	^D8,<
  5480					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  5481					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5482					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - POS NOS.
  5483					
  5484					SN=SN+1
  5485						XX=XX+XX
  5486						YY=YY+YY
  5487						IFE	YY,<YY=1>
  5488						MOVSI	AC-2,1B19+XX	;INITIALIZE FIX PT. NBR.
  5489						MOVSI	AC-1,243400+YY	;SET-UP EXPECTED RESULT
  5490						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  5491					IN AC
  5492						CAME	AC,AC-1		;TEST FRACTION
  5493						ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT SET
  5494						JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  5495					>
  5496
  5497					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  5498					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5499					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - POS NOS.
  5500
  5501			006501		SN=SN+1
  5502			000400			XX=XX+XX
  5503			000000			YY=YY+YY
  5504			000001			IFE	YY,<YY=1>
  5505	033770	205 02 0 00 200400 		MOVSI	AC-2,1B19+XX	;INITIALIZE FIX PT. NBR.
  5506	033771	205 03 0 00 243401 		MOVSI	AC-1,243400+YY	;SET-UP EXPECTED RESULT
  5507						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  5508	033772	127 04 0 00 000002 	IN AC
  5509	033773	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5510	033774	003 04 0 00 006501 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT SET
  5511	033775	321 10 0 00 033770 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  5512
  5513
  5514					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  5515					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5516					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - POS NOS.
  5517
  5518			006502		SN=SN+1
  5519			001000			XX=XX+XX
  5520			000002			YY=YY+YY
  5521						IFE	YY,<YY=1>
  5522	033776	205 02 0 00 201000 		MOVSI	AC-2,1B19+XX	;INITIALIZE FIX PT. NBR.
  5523	033777	205 03 0 00 243402 		MOVSI	AC-1,243400+YY	;SET-UP EXPECTED RESULT
  5524						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  5525	034000	127 04 0 00 000002 	IN AC
  5526	034001	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5527	034002	003 04 0 00 006502 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT SET
  5528	034003	321 10 0 00 033776 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  5529
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 29-1
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - POSITIVE NUMBERS - RIPPLE ONES                         SEQ 0136

  5530
  5531					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  5532					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5533					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - POS NOS.
  5534
  5535			006503		SN=SN+1
  5536			002000			XX=XX+XX
  5537			000004			YY=YY+YY
  5538						IFE	YY,<YY=1>
  5539	034004	205 02 0 00 202000 		MOVSI	AC-2,1B19+XX	;INITIALIZE FIX PT. NBR.
  5540	034005	205 03 0 00 243404 		MOVSI	AC-1,243400+YY	;SET-UP EXPECTED RESULT
  5541						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  5542	034006	127 04 0 00 000002 	IN AC
  5543	034007	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5544	034010	003 04 0 00 006503 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT SET
  5545	034011	321 10 0 00 034004 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  5546
  5547
  5548					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  5549					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5550					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - POS NOS.
  5551
  5552			006504		SN=SN+1
  5553			004000			XX=XX+XX
  5554			000010			YY=YY+YY
  5555						IFE	YY,<YY=1>
  5556	034012	205 02 0 00 204000 		MOVSI	AC-2,1B19+XX	;INITIALIZE FIX PT. NBR.
  5557	034013	205 03 0 00 243410 		MOVSI	AC-1,243400+YY	;SET-UP EXPECTED RESULT
  5558						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  5559	034014	127 04 0 00 000002 	IN AC
  5560	034015	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5561	034016	003 04 0 00 006504 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT SET
  5562	034017	321 10 0 00 034012 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  5563
  5564
  5565					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  5566					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5567					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - POS NOS.
  5568
  5569			006505		SN=SN+1
  5570			010000			XX=XX+XX
  5571			000020			YY=YY+YY
  5572						IFE	YY,<YY=1>
  5573	034020	205 02 0 00 210000 		MOVSI	AC-2,1B19+XX	;INITIALIZE FIX PT. NBR.
  5574	034021	205 03 0 00 243420 		MOVSI	AC-1,243400+YY	;SET-UP EXPECTED RESULT
  5575						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  5576	034022	127 04 0 00 000002 	IN AC
  5577	034023	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5578	034024	003 04 0 00 006505 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT SET
  5579	034025	321 10 0 00 034020 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  5580
  5581
  5582					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  5583					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5584					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - POS NOS.
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 29-2
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - POSITIVE NUMBERS - RIPPLE ONES                         SEQ 0137

  5585
  5586			006506		SN=SN+1
  5587			020000			XX=XX+XX
  5588			000040			YY=YY+YY
  5589						IFE	YY,<YY=1>
  5590	034026	205 02 0 00 220000 		MOVSI	AC-2,1B19+XX	;INITIALIZE FIX PT. NBR.
  5591	034027	205 03 0 00 243440 		MOVSI	AC-1,243400+YY	;SET-UP EXPECTED RESULT
  5592						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  5593	034030	127 04 0 00 000002 	IN AC
  5594	034031	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5595	034032	003 04 0 00 006506 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT SET
  5596	034033	321 10 0 00 034026 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  5597
  5598
  5599					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  5600					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5601					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - POS NOS.
  5602
  5603			006507		SN=SN+1
  5604			040000			XX=XX+XX
  5605			000100			YY=YY+YY
  5606						IFE	YY,<YY=1>
  5607	034034	205 02 0 00 240000 		MOVSI	AC-2,1B19+XX	;INITIALIZE FIX PT. NBR.
  5608	034035	205 03 0 00 243500 		MOVSI	AC-1,243400+YY	;SET-UP EXPECTED RESULT
  5609						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  5610	034036	127 04 0 00 000002 	IN AC
  5611	034037	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5612	034040	003 04 0 00 006507 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT SET
  5613	034041	321 10 0 00 034034 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  5614
  5615
  5616					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  5617					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5618					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - POS NOS.
  5619
  5620			006510		SN=SN+1
  5621			100000			XX=XX+XX
  5622			000200			YY=YY+YY
  5623						IFE	YY,<YY=1>
  5624	034042	205 02 0 00 300000 		MOVSI	AC-2,1B19+XX	;INITIALIZE FIX PT. NBR.
  5625	034043	205 03 0 00 243600 		MOVSI	AC-1,243400+YY	;SET-UP EXPECTED RESULT
  5626						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  5627	034044	127 04 0 00 000002 	IN AC
  5628	034045	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5629	034046	003 04 0 00 006510 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT SET
  5630	034047	321 10 0 00 034042 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  5631
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 30
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - NEGATIVE NUMBERS - RIPPLE ONES                         SEQ 0138

  5632					SUBTTL	DIAGNOSTIC SECTION - FLTR - NEGATIVE NUMBERS - RIPPLE ONES
  5633
  5634					;RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - NEG NOS
  5635
  5636			006600		SN=6600
  5637			000200			XX=200
  5638			000000			YY=0
  5639
  5640					Q6600:	REPEAT	^D10,<
  5641					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  5642					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5643					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - NEG NOS.
  5644					
  5645					SN=SN+1
  5646						XX=XX+XX
  5647						YY=YY+YY
  5648						IFE	YY,<YY=1>
  5649						MOVSI	AC-2,1B18	;INITIALIZE FIX PT. NBR.
  5650						HRRI	AC-2,XX
  5651						MOVSI	AC-1,534000	;SET-UP EXPECTED RESULT
  5652						HRRI	AC-1,YY
  5653						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  5654					IN AC
  5655						CAME	AC,AC-1		;TEST FRACTION
  5656						ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT SET
  5657						JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  5658					>
  5659
  5660					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  5661					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5662					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - NEG NOS.
  5663
  5664			006601		SN=SN+1
  5665			000400			XX=XX+XX
  5666			000000			YY=YY+YY
  5667			000001			IFE	YY,<YY=1>
  5668	034050	205 02 0 00 400000 		MOVSI	AC-2,1B18	;INITIALIZE FIX PT. NBR.
  5669	034051	541 02 0 00 000400 		HRRI	AC-2,XX
  5670	034052	205 03 0 00 534000 		MOVSI	AC-1,534000	;SET-UP EXPECTED RESULT
  5671	034053	541 03 0 00 000001 		HRRI	AC-1,YY
  5672						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  5673	034054	127 04 0 00 000002 	IN AC
  5674	034055	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5675	034056	003 04 0 00 006601 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT SET
  5676	034057	321 10 0 00 034050 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  5677
  5678
  5679					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  5680					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5681					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - NEG NOS.
  5682
  5683			006602		SN=SN+1
  5684			001000			XX=XX+XX
  5685			000002			YY=YY+YY
  5686						IFE	YY,<YY=1>
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 30-1
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - NEGATIVE NUMBERS - RIPPLE ONES                         SEQ 0139

  5687	034060	205 02 0 00 400000 		MOVSI	AC-2,1B18	;INITIALIZE FIX PT. NBR.
  5688	034061	541 02 0 00 001000 		HRRI	AC-2,XX
  5689	034062	205 03 0 00 534000 		MOVSI	AC-1,534000	;SET-UP EXPECTED RESULT
  5690	034063	541 03 0 00 000002 		HRRI	AC-1,YY
  5691						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  5692	034064	127 04 0 00 000002 	IN AC
  5693	034065	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5694	034066	003 04 0 00 006602 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT SET
  5695	034067	321 10 0 00 034060 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  5696
  5697
  5698					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  5699					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5700					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - NEG NOS.
  5701
  5702			006603		SN=SN+1
  5703			002000			XX=XX+XX
  5704			000004			YY=YY+YY
  5705						IFE	YY,<YY=1>
  5706	034070	205 02 0 00 400000 		MOVSI	AC-2,1B18	;INITIALIZE FIX PT. NBR.
  5707	034071	541 02 0 00 002000 		HRRI	AC-2,XX
  5708	034072	205 03 0 00 534000 		MOVSI	AC-1,534000	;SET-UP EXPECTED RESULT
  5709	034073	541 03 0 00 000004 		HRRI	AC-1,YY
  5710						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  5711	034074	127 04 0 00 000002 	IN AC
  5712	034075	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5713	034076	003 04 0 00 006603 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT SET
  5714	034077	321 10 0 00 034070 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  5715
  5716
  5717					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  5718					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5719					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - NEG NOS.
  5720
  5721			006604		SN=SN+1
  5722			004000			XX=XX+XX
  5723			000010			YY=YY+YY
  5724						IFE	YY,<YY=1>
  5725	034100	205 02 0 00 400000 		MOVSI	AC-2,1B18	;INITIALIZE FIX PT. NBR.
  5726	034101	541 02 0 00 004000 		HRRI	AC-2,XX
  5727	034102	205 03 0 00 534000 		MOVSI	AC-1,534000	;SET-UP EXPECTED RESULT
  5728	034103	541 03 0 00 000010 		HRRI	AC-1,YY
  5729						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  5730	034104	127 04 0 00 000002 	IN AC
  5731	034105	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5732	034106	003 04 0 00 006604 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT SET
  5733	034107	321 10 0 00 034100 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  5734
  5735
  5736					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  5737					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5738					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - NEG NOS.
  5739
  5740			006605		SN=SN+1
  5741			010000			XX=XX+XX
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 30-2
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - NEGATIVE NUMBERS - RIPPLE ONES                         SEQ 0140

  5742			000020			YY=YY+YY
  5743						IFE	YY,<YY=1>
  5744	034110	205 02 0 00 400000 		MOVSI	AC-2,1B18	;INITIALIZE FIX PT. NBR.
  5745	034111	541 02 0 00 010000 		HRRI	AC-2,XX
  5746	034112	205 03 0 00 534000 		MOVSI	AC-1,534000	;SET-UP EXPECTED RESULT
  5747	034113	541 03 0 00 000020 		HRRI	AC-1,YY
  5748						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  5749	034114	127 04 0 00 000002 	IN AC
  5750	034115	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5751	034116	003 04 0 00 006605 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT SET
  5752	034117	321 10 0 00 034110 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  5753
  5754
  5755					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  5756					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5757					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - NEG NOS.
  5758
  5759			006606		SN=SN+1
  5760			020000			XX=XX+XX
  5761			000040			YY=YY+YY
  5762						IFE	YY,<YY=1>
  5763	034120	205 02 0 00 400000 		MOVSI	AC-2,1B18	;INITIALIZE FIX PT. NBR.
  5764	034121	541 02 0 00 020000 		HRRI	AC-2,XX
  5765	034122	205 03 0 00 534000 		MOVSI	AC-1,534000	;SET-UP EXPECTED RESULT
  5766	034123	541 03 0 00 000040 		HRRI	AC-1,YY
  5767						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  5768	034124	127 04 0 00 000002 	IN AC
  5769	034125	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5770	034126	003 04 0 00 006606 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT SET
  5771	034127	321 10 0 00 034120 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  5772
  5773
  5774					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  5775					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5776					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - NEG NOS.
  5777
  5778			006607		SN=SN+1
  5779			040000			XX=XX+XX
  5780			000100			YY=YY+YY
  5781						IFE	YY,<YY=1>
  5782	034130	205 02 0 00 400000 		MOVSI	AC-2,1B18	;INITIALIZE FIX PT. NBR.
  5783	034131	541 02 0 00 040000 		HRRI	AC-2,XX
  5784	034132	205 03 0 00 534000 		MOVSI	AC-1,534000	;SET-UP EXPECTED RESULT
  5785	034133	541 03 0 00 000100 		HRRI	AC-1,YY
  5786						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  5787	034134	127 04 0 00 000002 	IN AC
  5788	034135	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5789	034136	003 04 0 00 006607 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT SET
  5790	034137	321 10 0 00 034130 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  5791
  5792
  5793					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  5794					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5795					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - NEG NOS.
  5796
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 30-3
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - NEGATIVE NUMBERS - RIPPLE ONES                         SEQ 0141

  5797			006610		SN=SN+1
  5798			100000			XX=XX+XX
  5799			000200			YY=YY+YY
  5800						IFE	YY,<YY=1>
  5801	034140	205 02 0 00 400000 		MOVSI	AC-2,1B18	;INITIALIZE FIX PT. NBR.
  5802	034141	541 02 0 00 100000 		HRRI	AC-2,XX
  5803	034142	205 03 0 00 534000 		MOVSI	AC-1,534000	;SET-UP EXPECTED RESULT
  5804	034143	541 03 0 00 000200 		HRRI	AC-1,YY
  5805						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  5806	034144	127 04 0 00 000002 	IN AC
  5807	034145	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5808	034146	003 04 0 00 006610 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT SET
  5809	034147	321 10 0 00 034140 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  5810
  5811
  5812					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  5813					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5814					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - NEG NOS.
  5815
  5816			006611		SN=SN+1
  5817			200000			XX=XX+XX
  5818			000400			YY=YY+YY
  5819						IFE	YY,<YY=1>
  5820	034150	205 02 0 00 400000 		MOVSI	AC-2,1B18	;INITIALIZE FIX PT. NBR.
  5821	034151	541 02 0 00 200000 		HRRI	AC-2,XX
  5822	034152	205 03 0 00 534000 		MOVSI	AC-1,534000	;SET-UP EXPECTED RESULT
  5823	034153	541 03 0 00 000400 		HRRI	AC-1,YY
  5824						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  5825	034154	127 04 0 00 000002 	IN AC
  5826	034155	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5827	034156	003 04 0 00 006611 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT SET
  5828	034157	321 10 0 00 034150 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  5829
  5830
  5831					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  5832					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5833					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - NEG NOS.
  5834
  5835			006612		SN=SN+1
  5836			400000			XX=XX+XX
  5837			001000			YY=YY+YY
  5838						IFE	YY,<YY=1>
  5839	034160	205 02 0 00 400000 		MOVSI	AC-2,1B18	;INITIALIZE FIX PT. NBR.
  5840	034161	541 02 0 00 400000 		HRRI	AC-2,XX
  5841	034162	205 03 0 00 534000 		MOVSI	AC-1,534000	;SET-UP EXPECTED RESULT
  5842	034163	541 03 0 00 001000 		HRRI	AC-1,YY
  5843						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  5844	034164	127 04 0 00 000002 	IN AC
  5845	034165	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5846	034166	003 04 0 00 006612 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT SET
  5847	034167	321 10 0 00 034160 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  5848
  5849					PAGE
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 30-4
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - NEGATIVE NUMBERS - RIPPLE ONES                         SEQ 0142

  5850			006700		SN=6700
  5851			000000			XX=0
  5852			001000			YY=1000
  5853
  5854					Q6700:	REPEAT	^D8,<
  5855					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  5856					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5857					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - NEG NOS.
  5858					
  5859					SN=SN+1
  5860						XX=XX+XX
  5861						YY=YY+YY
  5862						IFE	XX,<XX=1>
  5863						MOVSI	AC-2,1B18+XX	;INITIALIZE FIX PT. NBR.
  5864						MOVSI	AC-1,534000	;SET-UP EXPECTED RESULT
  5865						HRRI	AC-1,YY
  5866						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  5867					IN AC
  5868						CAME	AC,AC-1		;TEST FRACTION
  5869						ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT SET
  5870						JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  5871					>
  5872
  5873					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  5874					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5875					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - NEG NOS.
  5876
  5877			006701		SN=SN+1
  5878			000000			XX=XX+XX
  5879			002000			YY=YY+YY
  5880			000001			IFE	XX,<XX=1>
  5881	034170	205 02 0 00 400001 		MOVSI	AC-2,1B18+XX	;INITIALIZE FIX PT. NBR.
  5882	034171	205 03 0 00 534000 		MOVSI	AC-1,534000	;SET-UP EXPECTED RESULT
  5883	034172	541 03 0 00 002000 		HRRI	AC-1,YY
  5884						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  5885	034173	127 04 0 00 000002 	IN AC
  5886	034174	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5887	034175	003 04 0 00 006701 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT SET
  5888	034176	321 10 0 00 034170 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  5889
  5890
  5891					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  5892					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5893					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - NEG NOS.
  5894
  5895			006702		SN=SN+1
  5896			000002			XX=XX+XX
  5897			004000			YY=YY+YY
  5898						IFE	XX,<XX=1>
  5899	034177	205 02 0 00 400002 		MOVSI	AC-2,1B18+XX	;INITIALIZE FIX PT. NBR.
  5900	034200	205 03 0 00 534000 		MOVSI	AC-1,534000	;SET-UP EXPECTED RESULT
  5901	034201	541 03 0 00 004000 		HRRI	AC-1,YY
  5902						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  5903	034202	127 04 0 00 000002 	IN AC
  5904	034203	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 30-5
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - NEGATIVE NUMBERS - RIPPLE ONES                         SEQ 0143

  5905	034204	003 04 0 00 006702 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT SET
  5906	034205	321 10 0 00 034177 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  5907
  5908
  5909					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  5910					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5911					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - NEG NOS.
  5912
  5913			006703		SN=SN+1
  5914			000004			XX=XX+XX
  5915			010000			YY=YY+YY
  5916						IFE	XX,<XX=1>
  5917	034206	205 02 0 00 400004 		MOVSI	AC-2,1B18+XX	;INITIALIZE FIX PT. NBR.
  5918	034207	205 03 0 00 534000 		MOVSI	AC-1,534000	;SET-UP EXPECTED RESULT
  5919	034210	541 03 0 00 010000 		HRRI	AC-1,YY
  5920						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  5921	034211	127 04 0 00 000002 	IN AC
  5922	034212	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5923	034213	003 04 0 00 006703 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT SET
  5924	034214	321 10 0 00 034206 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  5925
  5926
  5927					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  5928					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5929					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - NEG NOS.
  5930
  5931			006704		SN=SN+1
  5932			000010			XX=XX+XX
  5933			020000			YY=YY+YY
  5934						IFE	XX,<XX=1>
  5935	034215	205 02 0 00 400010 		MOVSI	AC-2,1B18+XX	;INITIALIZE FIX PT. NBR.
  5936	034216	205 03 0 00 534000 		MOVSI	AC-1,534000	;SET-UP EXPECTED RESULT
  5937	034217	541 03 0 00 020000 		HRRI	AC-1,YY
  5938						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  5939	034220	127 04 0 00 000002 	IN AC
  5940	034221	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5941	034222	003 04 0 00 006704 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT SET
  5942	034223	321 10 0 00 034215 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  5943
  5944
  5945					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  5946					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5947					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - NEG NOS.
  5948
  5949			006705		SN=SN+1
  5950			000020			XX=XX+XX
  5951			040000			YY=YY+YY
  5952						IFE	XX,<XX=1>
  5953	034224	205 02 0 00 400020 		MOVSI	AC-2,1B18+XX	;INITIALIZE FIX PT. NBR.
  5954	034225	205 03 0 00 534000 		MOVSI	AC-1,534000	;SET-UP EXPECTED RESULT
  5955	034226	541 03 0 00 040000 		HRRI	AC-1,YY
  5956						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  5957	034227	127 04 0 00 000002 	IN AC
  5958	034230	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5959	034231	003 04 0 00 006705 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT SET
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 30-6
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - NEGATIVE NUMBERS - RIPPLE ONES                         SEQ 0144

  5960	034232	321 10 0 00 034224 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  5961
  5962
  5963					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  5964					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5965					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - NEG NOS.
  5966
  5967			006706		SN=SN+1
  5968			000040			XX=XX+XX
  5969			100000			YY=YY+YY
  5970						IFE	XX,<XX=1>
  5971	034233	205 02 0 00 400040 		MOVSI	AC-2,1B18+XX	;INITIALIZE FIX PT. NBR.
  5972	034234	205 03 0 00 534000 		MOVSI	AC-1,534000	;SET-UP EXPECTED RESULT
  5973	034235	541 03 0 00 100000 		HRRI	AC-1,YY
  5974						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  5975	034236	127 04 0 00 000002 	IN AC
  5976	034237	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5977	034240	003 04 0 00 006706 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT SET
  5978	034241	321 10 0 00 034233 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  5979
  5980
  5981					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  5982					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  5983					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - NEG NOS.
  5984
  5985			006707		SN=SN+1
  5986			000100			XX=XX+XX
  5987			200000			YY=YY+YY
  5988						IFE	XX,<XX=1>
  5989	034242	205 02 0 00 400100 		MOVSI	AC-2,1B18+XX	;INITIALIZE FIX PT. NBR.
  5990	034243	205 03 0 00 534000 		MOVSI	AC-1,534000	;SET-UP EXPECTED RESULT
  5991	034244	541 03 0 00 200000 		HRRI	AC-1,YY
  5992						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  5993	034245	127 04 0 00 000002 	IN AC
  5994	034246	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  5995	034247	003 04 0 00 006707 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT SET
  5996	034250	321 10 0 00 034242 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  5997
  5998
  5999					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  6000					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  6001					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - NEG NOS.
  6002
  6003			006710		SN=SN+1
  6004			000200			XX=XX+XX
  6005			400000			YY=YY+YY
  6006						IFE	XX,<XX=1>
  6007	034251	205 02 0 00 400200 		MOVSI	AC-2,1B18+XX	;INITIALIZE FIX PT. NBR.
  6008	034252	205 03 0 00 534000 		MOVSI	AC-1,534000	;SET-UP EXPECTED RESULT
  6009	034253	541 03 0 00 400000 		HRRI	AC-1,YY
  6010						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  6011	034254	127 04 0 00 000002 	IN AC
  6012	034255	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  6013	034256	003 04 0 00 006710 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT SET
  6014	034257	321 10 0 00 034251 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 30-7
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - NEGATIVE NUMBERS - RIPPLE ONES                         SEQ 0145

  6015
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 31
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - NEGATIVE NUMBERS - RIPPLE ONES                         SEQ 0146

  6016			007000		SN=7000
  6017			000200			XX=200
  6018			000000			YY=0
  6019
  6020					Q7000:	REPEAT	^D8,<
  6021					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  6022					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  6023					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - NEG NOS.
  6024					
  6025					SN=SN+1
  6026						XX=XX+XX
  6027						YY=YY+YY
  6028						IFE	YY,<YY=1>
  6029						MOVSI	AC-2,1B18+XX	;INITIALIZE FIX PT. NBR.
  6030						MOVSI	AC-1,534000+YY	;SET-UP EXPECTED RESULT
  6031						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  6032					IN AC
  6033						CAME	AC,AC-1		;TEST FRACTION
  6034						ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT SET
  6035						JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  6036					>
  6037
  6038					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  6039					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  6040					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - NEG NOS.
  6041
  6042			007001		SN=SN+1
  6043			000400			XX=XX+XX
  6044			000000			YY=YY+YY
  6045			000001			IFE	YY,<YY=1>
  6046	034260	205 02 0 00 400400 		MOVSI	AC-2,1B18+XX	;INITIALIZE FIX PT. NBR.
  6047	034261	205 03 0 00 534001 		MOVSI	AC-1,534000+YY	;SET-UP EXPECTED RESULT
  6048						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  6049	034262	127 04 0 00 000002 	IN AC
  6050	034263	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  6051	034264	003 04 0 00 007001 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT SET
  6052	034265	321 10 0 00 034260 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  6053
  6054
  6055					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  6056					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  6057					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - NEG NOS.
  6058
  6059			007002		SN=SN+1
  6060			001000			XX=XX+XX
  6061			000002			YY=YY+YY
  6062						IFE	YY,<YY=1>
  6063	034266	205 02 0 00 401000 		MOVSI	AC-2,1B18+XX	;INITIALIZE FIX PT. NBR.
  6064	034267	205 03 0 00 534002 		MOVSI	AC-1,534000+YY	;SET-UP EXPECTED RESULT
  6065						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  6066	034270	127 04 0 00 000002 	IN AC
  6067	034271	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  6068	034272	003 04 0 00 007002 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT SET
  6069	034273	321 10 0 00 034266 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  6070
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 31-1
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - NEGATIVE NUMBERS - RIPPLE ONES                         SEQ 0147

  6071
  6072					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  6073					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  6074					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - NEG NOS.
  6075
  6076			007003		SN=SN+1
  6077			002000			XX=XX+XX
  6078			000004			YY=YY+YY
  6079						IFE	YY,<YY=1>
  6080	034274	205 02 0 00 402000 		MOVSI	AC-2,1B18+XX	;INITIALIZE FIX PT. NBR.
  6081	034275	205 03 0 00 534004 		MOVSI	AC-1,534000+YY	;SET-UP EXPECTED RESULT
  6082						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  6083	034276	127 04 0 00 000002 	IN AC
  6084	034277	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  6085	034300	003 04 0 00 007003 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT SET
  6086	034301	321 10 0 00 034274 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  6087
  6088
  6089					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  6090					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  6091					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - NEG NOS.
  6092
  6093			007004		SN=SN+1
  6094			004000			XX=XX+XX
  6095			000010			YY=YY+YY
  6096						IFE	YY,<YY=1>
  6097	034302	205 02 0 00 404000 		MOVSI	AC-2,1B18+XX	;INITIALIZE FIX PT. NBR.
  6098	034303	205 03 0 00 534010 		MOVSI	AC-1,534000+YY	;SET-UP EXPECTED RESULT
  6099						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  6100	034304	127 04 0 00 000002 	IN AC
  6101	034305	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  6102	034306	003 04 0 00 007004 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT SET
  6103	034307	321 10 0 00 034302 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  6104
  6105
  6106					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  6107					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  6108					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - NEG NOS.
  6109
  6110			007005		SN=SN+1
  6111			010000			XX=XX+XX
  6112			000020			YY=YY+YY
  6113						IFE	YY,<YY=1>
  6114	034310	205 02 0 00 410000 		MOVSI	AC-2,1B18+XX	;INITIALIZE FIX PT. NBR.
  6115	034311	205 03 0 00 534020 		MOVSI	AC-1,534000+YY	;SET-UP EXPECTED RESULT
  6116						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  6117	034312	127 04 0 00 000002 	IN AC
  6118	034313	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  6119	034314	003 04 0 00 007005 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT SET
  6120	034315	321 10 0 00 034310 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  6121
  6122
  6123					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  6124					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  6125					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - NEG NOS.
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 31-2
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - NEGATIVE NUMBERS - RIPPLE ONES                         SEQ 0148

  6126
  6127			007006		SN=SN+1
  6128			020000			XX=XX+XX
  6129			000040			YY=YY+YY
  6130						IFE	YY,<YY=1>
  6131	034316	205 02 0 00 420000 		MOVSI	AC-2,1B18+XX	;INITIALIZE FIX PT. NBR.
  6132	034317	205 03 0 00 534040 		MOVSI	AC-1,534000+YY	;SET-UP EXPECTED RESULT
  6133						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  6134	034320	127 04 0 00 000002 	IN AC
  6135	034321	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  6136	034322	003 04 0 00 007006 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT SET
  6137	034323	321 10 0 00 034316 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  6138
  6139
  6140					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  6141					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  6142					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - NEG NOS.
  6143
  6144			007007		SN=SN+1
  6145			040000			XX=XX+XX
  6146			000100			YY=YY+YY
  6147						IFE	YY,<YY=1>
  6148	034324	205 02 0 00 440000 		MOVSI	AC-2,1B18+XX	;INITIALIZE FIX PT. NBR.
  6149	034325	205 03 0 00 534100 		MOVSI	AC-1,534000+YY	;SET-UP EXPECTED RESULT
  6150						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  6151	034326	127 04 0 00 000002 	IN AC
  6152	034327	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  6153	034330	003 04 0 00 007007 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT SET
  6154	034331	321 10 0 00 034324 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  6155
  6156
  6157					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  6158					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  6159					;DATA: RIPPLE A ONE THROUGH A FRACTION FIELD OF ZEROS - NEG NOS.
  6160
  6161			007010		SN=SN+1
  6162			100000			XX=XX+XX
  6163			000200			YY=YY+YY
  6164						IFE	YY,<YY=1>
  6165	034332	205 02 0 00 500000 		MOVSI	AC-2,1B18+XX	;INITIALIZE FIX PT. NBR.
  6166	034333	205 03 0 00 534200 		MOVSI	AC-1,534000+YY	;SET-UP EXPECTED RESULT
  6167						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  6168	034334	127 04 0 00 000002 	IN AC
  6169	034335	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  6170	034336	003 04 0 00 007010 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT SET
  6171	034337	321 10 0 00 034332 		JUMPL	SAC,.-5		;LOOP ON ERROR SWITCH
  6172
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 32
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - NEGATIVE NUMBERS - RIPPLE ZEROS                        SEQ 0149

  6173					SUBTTL	DIAGNOSTIC SECTION - FLTR - NEGATIVE NUMBERS - RIPPLE ZEROS
  6174
  6175					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  6176					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  6177					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - NEG NOS.
  6178
  6179	034340	205 02 0 00 577777 	Q7100:	MOVSI	AC-2,577777	;INITIALIZE FIX PT. NBR.
  6180	034341	541 02 0 00 777400 		HRRI	AC-2,777400
  6181	034342	525 03 0 00 534377 		HRLOI	AC-1,534377	;SET-UP EXPECTED RESULT
  6182						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  6183	034343	127 04 0 00 000002 	IN AC
  6184	034344	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  6185	034345	003 04 0 00 007101 		ER3	AC,7101		;FAILURE IF TESTED BIT IS NOT CLEAR
  6186	034346	321 10 0 00 034340 		JUMPL	SAC,Q7100	;LOOP ON ERROR SWITCH
  6187
  6188			007200		SN=7200
  6189			777200			XX=777200
  6190			000000			YY=0
  6191
  6192					Q7200:	REPEAT	^D10,<
  6193					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  6194					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  6195					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - NEG NOS.
  6196					
  6197					SN=SN+1
  6198						XX=<XX+XX+400>&777777
  6199						YY=<YY+YY+1>&777777
  6200						IFE	<YY-1>,<YY=777776>
  6201						MOVSI	AC-2,577777	;INITIALIZE FIX PT. NBR.
  6202						HRRI	AC-2,XX
  6203						MOVSI	AC-1,534377	;SET-UP EXPECTED RESULT
  6204						HRRI	AC-1,YY
  6205						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  6206					IN AC
  6207						CAME	AC,AC-1		;TEST FRACTION
  6208						ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  6209						JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  6210					>
  6211
  6212					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  6213					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  6214					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - NEG NOS.
  6215
  6216			007201		SN=SN+1
  6217			777000			XX=<XX+XX+400>&777777
  6218			000001			YY=<YY+YY+1>&777777
  6219			777776			IFE	<YY-1>,<YY=777776>
  6220	034347	205 02 0 00 577777 		MOVSI	AC-2,577777	;INITIALIZE FIX PT. NBR.
  6221	034350	541 02 0 00 777000 		HRRI	AC-2,XX
  6222	034351	205 03 0 00 534377 		MOVSI	AC-1,534377	;SET-UP EXPECTED RESULT
  6223	034352	541 03 0 00 777776 		HRRI	AC-1,YY
  6224						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  6225	034353	127 04 0 00 000002 	IN AC
  6226	034354	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  6227	034355	003 04 0 00 007201 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 32-1
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - NEGATIVE NUMBERS - RIPPLE ZEROS                        SEQ 0150

  6228	034356	321 10 0 00 034347 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  6229
  6230
  6231					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  6232					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  6233					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - NEG NOS.
  6234
  6235			007202		SN=SN+1
  6236			776400			XX=<XX+XX+400>&777777
  6237			777775			YY=<YY+YY+1>&777777
  6238						IFE	<YY-1>,<YY=777776>
  6239	034357	205 02 0 00 577777 		MOVSI	AC-2,577777	;INITIALIZE FIX PT. NBR.
  6240	034360	541 02 0 00 776400 		HRRI	AC-2,XX
  6241	034361	205 03 0 00 534377 		MOVSI	AC-1,534377	;SET-UP EXPECTED RESULT
  6242	034362	541 03 0 00 777775 		HRRI	AC-1,YY
  6243						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  6244	034363	127 04 0 00 000002 	IN AC
  6245	034364	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  6246	034365	003 04 0 00 007202 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  6247	034366	321 10 0 00 034357 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  6248
  6249
  6250					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  6251					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  6252					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - NEG NOS.
  6253
  6254			007203		SN=SN+1
  6255			775400			XX=<XX+XX+400>&777777
  6256			777773			YY=<YY+YY+1>&777777
  6257						IFE	<YY-1>,<YY=777776>
  6258	034367	205 02 0 00 577777 		MOVSI	AC-2,577777	;INITIALIZE FIX PT. NBR.
  6259	034370	541 02 0 00 775400 		HRRI	AC-2,XX
  6260	034371	205 03 0 00 534377 		MOVSI	AC-1,534377	;SET-UP EXPECTED RESULT
  6261	034372	541 03 0 00 777773 		HRRI	AC-1,YY
  6262						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  6263	034373	127 04 0 00 000002 	IN AC
  6264	034374	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  6265	034375	003 04 0 00 007203 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  6266	034376	321 10 0 00 034367 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  6267
  6268
  6269					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  6270					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  6271					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - NEG NOS.
  6272
  6273			007204		SN=SN+1
  6274			773400			XX=<XX+XX+400>&777777
  6275			777767			YY=<YY+YY+1>&777777
  6276						IFE	<YY-1>,<YY=777776>
  6277	034377	205 02 0 00 577777 		MOVSI	AC-2,577777	;INITIALIZE FIX PT. NBR.
  6278	034400	541 02 0 00 773400 		HRRI	AC-2,XX
  6279	034401	205 03 0 00 534377 		MOVSI	AC-1,534377	;SET-UP EXPECTED RESULT
  6280	034402	541 03 0 00 777767 		HRRI	AC-1,YY
  6281						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  6282	034403	127 04 0 00 000002 	IN AC
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 32-2
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - NEGATIVE NUMBERS - RIPPLE ZEROS                        SEQ 0151

  6283	034404	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  6284	034405	003 04 0 00 007204 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  6285	034406	321 10 0 00 034377 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  6286
  6287
  6288					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  6289					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  6290					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - NEG NOS.
  6291
  6292			007205		SN=SN+1
  6293			767400			XX=<XX+XX+400>&777777
  6294			777757			YY=<YY+YY+1>&777777
  6295						IFE	<YY-1>,<YY=777776>
  6296	034407	205 02 0 00 577777 		MOVSI	AC-2,577777	;INITIALIZE FIX PT. NBR.
  6297	034410	541 02 0 00 767400 		HRRI	AC-2,XX
  6298	034411	205 03 0 00 534377 		MOVSI	AC-1,534377	;SET-UP EXPECTED RESULT
  6299	034412	541 03 0 00 777757 		HRRI	AC-1,YY
  6300						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  6301	034413	127 04 0 00 000002 	IN AC
  6302	034414	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  6303	034415	003 04 0 00 007205 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  6304	034416	321 10 0 00 034407 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  6305
  6306
  6307					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  6308					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  6309					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - NEG NOS.
  6310
  6311			007206		SN=SN+1
  6312			757400			XX=<XX+XX+400>&777777
  6313			777737			YY=<YY+YY+1>&777777
  6314						IFE	<YY-1>,<YY=777776>
  6315	034417	205 02 0 00 577777 		MOVSI	AC-2,577777	;INITIALIZE FIX PT. NBR.
  6316	034420	541 02 0 00 757400 		HRRI	AC-2,XX
  6317	034421	205 03 0 00 534377 		MOVSI	AC-1,534377	;SET-UP EXPECTED RESULT
  6318	034422	541 03 0 00 777737 		HRRI	AC-1,YY
  6319						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  6320	034423	127 04 0 00 000002 	IN AC
  6321	034424	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  6322	034425	003 04 0 00 007206 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  6323	034426	321 10 0 00 034417 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  6324
  6325
  6326					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  6327					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  6328					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - NEG NOS.
  6329
  6330			007207		SN=SN+1
  6331			737400			XX=<XX+XX+400>&777777
  6332			777677			YY=<YY+YY+1>&777777
  6333						IFE	<YY-1>,<YY=777776>
  6334	034427	205 02 0 00 577777 		MOVSI	AC-2,577777	;INITIALIZE FIX PT. NBR.
  6335	034430	541 02 0 00 737400 		HRRI	AC-2,XX
  6336	034431	205 03 0 00 534377 		MOVSI	AC-1,534377	;SET-UP EXPECTED RESULT
  6337	034432	541 03 0 00 777677 		HRRI	AC-1,YY
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 32-3
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - NEGATIVE NUMBERS - RIPPLE ZEROS                        SEQ 0152

  6338						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  6339	034433	127 04 0 00 000002 	IN AC
  6340	034434	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  6341	034435	003 04 0 00 007207 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  6342	034436	321 10 0 00 034427 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  6343
  6344
  6345					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  6346					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  6347					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - NEG NOS.
  6348
  6349			007210		SN=SN+1
  6350			677400			XX=<XX+XX+400>&777777
  6351			777577			YY=<YY+YY+1>&777777
  6352						IFE	<YY-1>,<YY=777776>
  6353	034437	205 02 0 00 577777 		MOVSI	AC-2,577777	;INITIALIZE FIX PT. NBR.
  6354	034440	541 02 0 00 677400 		HRRI	AC-2,XX
  6355	034441	205 03 0 00 534377 		MOVSI	AC-1,534377	;SET-UP EXPECTED RESULT
  6356	034442	541 03 0 00 777577 		HRRI	AC-1,YY
  6357						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  6358	034443	127 04 0 00 000002 	IN AC
  6359	034444	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  6360	034445	003 04 0 00 007210 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  6361	034446	321 10 0 00 034437 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  6362
  6363
  6364					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  6365					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  6366					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - NEG NOS.
  6367
  6368			007211		SN=SN+1
  6369			577400			XX=<XX+XX+400>&777777
  6370			777377			YY=<YY+YY+1>&777777
  6371						IFE	<YY-1>,<YY=777776>
  6372	034447	205 02 0 00 577777 		MOVSI	AC-2,577777	;INITIALIZE FIX PT. NBR.
  6373	034450	541 02 0 00 577400 		HRRI	AC-2,XX
  6374	034451	205 03 0 00 534377 		MOVSI	AC-1,534377	;SET-UP EXPECTED RESULT
  6375	034452	541 03 0 00 777377 		HRRI	AC-1,YY
  6376						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  6377	034453	127 04 0 00 000002 	IN AC
  6378	034454	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  6379	034455	003 04 0 00 007211 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  6380	034456	321 10 0 00 034447 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  6381
  6382
  6383					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  6384					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  6385					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - NEG NOS.
  6386
  6387			007212		SN=SN+1
  6388			377400			XX=<XX+XX+400>&777777
  6389			776777			YY=<YY+YY+1>&777777
  6390						IFE	<YY-1>,<YY=777776>
  6391	034457	205 02 0 00 577777 		MOVSI	AC-2,577777	;INITIALIZE FIX PT. NBR.
  6392	034460	541 02 0 00 377400 		HRRI	AC-2,XX
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 32-4
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - NEGATIVE NUMBERS - RIPPLE ZEROS                        SEQ 0153

  6393	034461	205 03 0 00 534377 		MOVSI	AC-1,534377	;SET-UP EXPECTED RESULT
  6394	034462	541 03 0 00 776777 		HRRI	AC-1,YY
  6395						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  6396	034463	127 04 0 00 000002 	IN AC
  6397	034464	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  6398	034465	003 04 0 00 007212 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  6399	034466	321 10 0 00 034457 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  6400
  6401					PAGE
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 32-5
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - NEGATIVE NUMBERS - RIPPLE ZEROS                        SEQ 0154

  6402			007300		SN=7300
  6403			000000			XX=0
  6404			776777			YY=776777
  6405
  6406					Q7300:	REPEAT	^D8,<
  6407					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  6408					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  6409					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - NEG NOS.
  6410					
  6411					SN=SN+1
  6412						XX=<XX+XX+1>&177777
  6413						YY=<YY+YY+1>&777777
  6414						IFE	<XX-1>,<XX=177776>
  6415						MOVSI	AC-2,1B18+XX	;INITIALIZE FIX PT. NBR.
  6416						HRRI	AC-2,777400
  6417						MOVSI	AC-1,534377	;SET-UP EXPECTED RESULT
  6418						HRRI	AC-1,YY
  6419						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  6420					IN AC
  6421						CAME	AC,AC-1		;TEST FRACTION
  6422						ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  6423						JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  6424					>
  6425
  6426					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  6427					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  6428					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - NEG NOS.
  6429
  6430			007301		SN=SN+1
  6431			000001			XX=<XX+XX+1>&177777
  6432			775777			YY=<YY+YY+1>&777777
  6433			177776			IFE	<XX-1>,<XX=177776>
  6434	034467	205 02 0 00 577776 		MOVSI	AC-2,1B18+XX	;INITIALIZE FIX PT. NBR.
  6435	034470	541 02 0 00 777400 		HRRI	AC-2,777400
  6436	034471	205 03 0 00 534377 		MOVSI	AC-1,534377	;SET-UP EXPECTED RESULT
  6437	034472	541 03 0 00 775777 		HRRI	AC-1,YY
  6438						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  6439	034473	127 04 0 00 000002 	IN AC
  6440	034474	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  6441	034475	003 04 0 00 007301 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  6442	034476	321 10 0 00 034467 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  6443
  6444
  6445					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  6446					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  6447					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - NEG NOS.
  6448
  6449			007302		SN=SN+1
  6450			177775			XX=<XX+XX+1>&177777
  6451			773777			YY=<YY+YY+1>&777777
  6452						IFE	<XX-1>,<XX=177776>
  6453	034477	205 02 0 00 577775 		MOVSI	AC-2,1B18+XX	;INITIALIZE FIX PT. NBR.
  6454	034500	541 02 0 00 777400 		HRRI	AC-2,777400
  6455	034501	205 03 0 00 534377 		MOVSI	AC-1,534377	;SET-UP EXPECTED RESULT
  6456	034502	541 03 0 00 773777 		HRRI	AC-1,YY
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 32-6
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - NEGATIVE NUMBERS - RIPPLE ZEROS                        SEQ 0155

  6457						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  6458	034503	127 04 0 00 000002 	IN AC
  6459	034504	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  6460	034505	003 04 0 00 007302 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  6461	034506	321 10 0 00 034477 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  6462
  6463
  6464					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  6465					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  6466					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - NEG NOS.
  6467
  6468			007303		SN=SN+1
  6469			177773			XX=<XX+XX+1>&177777
  6470			767777			YY=<YY+YY+1>&777777
  6471						IFE	<XX-1>,<XX=177776>
  6472	034507	205 02 0 00 577773 		MOVSI	AC-2,1B18+XX	;INITIALIZE FIX PT. NBR.
  6473	034510	541 02 0 00 777400 		HRRI	AC-2,777400
  6474	034511	205 03 0 00 534377 		MOVSI	AC-1,534377	;SET-UP EXPECTED RESULT
  6475	034512	541 03 0 00 767777 		HRRI	AC-1,YY
  6476						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  6477	034513	127 04 0 00 000002 	IN AC
  6478	034514	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  6479	034515	003 04 0 00 007303 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  6480	034516	321 10 0 00 034507 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  6481
  6482
  6483					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  6484					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  6485					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - NEG NOS.
  6486
  6487			007304		SN=SN+1
  6488			177767			XX=<XX+XX+1>&177777
  6489			757777			YY=<YY+YY+1>&777777
  6490						IFE	<XX-1>,<XX=177776>
  6491	034517	205 02 0 00 577767 		MOVSI	AC-2,1B18+XX	;INITIALIZE FIX PT. NBR.
  6492	034520	541 02 0 00 777400 		HRRI	AC-2,777400
  6493	034521	205 03 0 00 534377 		MOVSI	AC-1,534377	;SET-UP EXPECTED RESULT
  6494	034522	541 03 0 00 757777 		HRRI	AC-1,YY
  6495						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  6496	034523	127 04 0 00 000002 	IN AC
  6497	034524	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  6498	034525	003 04 0 00 007304 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  6499	034526	321 10 0 00 034517 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  6500
  6501
  6502					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  6503					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  6504					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - NEG NOS.
  6505
  6506			007305		SN=SN+1
  6507			177757			XX=<XX+XX+1>&177777
  6508			737777			YY=<YY+YY+1>&777777
  6509						IFE	<XX-1>,<XX=177776>
  6510	034527	205 02 0 00 577757 		MOVSI	AC-2,1B18+XX	;INITIALIZE FIX PT. NBR.
  6511	034530	541 02 0 00 777400 		HRRI	AC-2,777400
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 32-7
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - NEGATIVE NUMBERS - RIPPLE ZEROS                        SEQ 0156

  6512	034531	205 03 0 00 534377 		MOVSI	AC-1,534377	;SET-UP EXPECTED RESULT
  6513	034532	541 03 0 00 737777 		HRRI	AC-1,YY
  6514						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  6515	034533	127 04 0 00 000002 	IN AC
  6516	034534	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  6517	034535	003 04 0 00 007305 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  6518	034536	321 10 0 00 034527 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  6519
  6520
  6521					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  6522					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  6523					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - NEG NOS.
  6524
  6525			007306		SN=SN+1
  6526			177737			XX=<XX+XX+1>&177777
  6527			677777			YY=<YY+YY+1>&777777
  6528						IFE	<XX-1>,<XX=177776>
  6529	034537	205 02 0 00 577737 		MOVSI	AC-2,1B18+XX	;INITIALIZE FIX PT. NBR.
  6530	034540	541 02 0 00 777400 		HRRI	AC-2,777400
  6531	034541	205 03 0 00 534377 		MOVSI	AC-1,534377	;SET-UP EXPECTED RESULT
  6532	034542	541 03 0 00 677777 		HRRI	AC-1,YY
  6533						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  6534	034543	127 04 0 00 000002 	IN AC
  6535	034544	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  6536	034545	003 04 0 00 007306 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  6537	034546	321 10 0 00 034537 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  6538
  6539
  6540					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  6541					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  6542					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - NEG NOS.
  6543
  6544			007307		SN=SN+1
  6545			177677			XX=<XX+XX+1>&177777
  6546			577777			YY=<YY+YY+1>&777777
  6547						IFE	<XX-1>,<XX=177776>
  6548	034547	205 02 0 00 577677 		MOVSI	AC-2,1B18+XX	;INITIALIZE FIX PT. NBR.
  6549	034550	541 02 0 00 777400 		HRRI	AC-2,777400
  6550	034551	205 03 0 00 534377 		MOVSI	AC-1,534377	;SET-UP EXPECTED RESULT
  6551	034552	541 03 0 00 577777 		HRRI	AC-1,YY
  6552						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  6553	034553	127 04 0 00 000002 	IN AC
  6554	034554	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  6555	034555	003 04 0 00 007307 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  6556	034556	321 10 0 00 034547 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  6557
  6558
  6559					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  6560					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  6561					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - NEG NOS.
  6562
  6563			007310		SN=SN+1
  6564			177577			XX=<XX+XX+1>&177777
  6565			377777			YY=<YY+YY+1>&777777
  6566						IFE	<XX-1>,<XX=177776>
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 32-8
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - NEGATIVE NUMBERS - RIPPLE ZEROS                        SEQ 0157

  6567	034557	205 02 0 00 577577 		MOVSI	AC-2,1B18+XX	;INITIALIZE FIX PT. NBR.
  6568	034560	541 02 0 00 777400 		HRRI	AC-2,777400
  6569	034561	205 03 0 00 534377 		MOVSI	AC-1,534377	;SET-UP EXPECTED RESULT
  6570	034562	541 03 0 00 377777 		HRRI	AC-1,YY
  6571						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  6572	034563	127 04 0 00 000002 	IN AC
  6573	034564	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  6574	034565	003 04 0 00 007310 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  6575	034566	321 10 0 00 034557 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  6576
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 33
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - NEGATIVE NUMBERS - RIPPLE ZEROS                        SEQ 0158

  6577
  6578			007400		SN=7400
  6579			177577			XX=177577
  6580			000000			YY=0
  6581
  6582					Q7400:	REPEAT	^D8,<
  6583					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  6584					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  6585					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - NEG NOS.
  6586					
  6587					SN=SN+1
  6588						XX=<XX+XX+1>&177777
  6589						YY=<YY+YY+1>&377
  6590						IFE	<YY-1>,<YY=376>
  6591						MOVSI	AC-2,1B18+XX	;INITIALIZE FIX PT. NBR.
  6592						HRRI	AC-2,777400
  6593						HRLOI	AC-1,534000+YY	;SET-UP EXPECTED RESULT
  6594						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  6595					IN AC
  6596						CAME	AC,AC-1		;TEST FRACTION
  6597						ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  6598						JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  6599					>
  6600
  6601					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  6602					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  6603					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - NEG NOS.
  6604
  6605			007401		SN=SN+1
  6606			177377			XX=<XX+XX+1>&177777
  6607			000001			YY=<YY+YY+1>&377
  6608			000376			IFE	<YY-1>,<YY=376>
  6609	034567	205 02 0 00 577377 		MOVSI	AC-2,1B18+XX	;INITIALIZE FIX PT. NBR.
  6610	034570	541 02 0 00 777400 		HRRI	AC-2,777400
  6611	034571	525 03 0 00 534376 		HRLOI	AC-1,534000+YY	;SET-UP EXPECTED RESULT
  6612						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  6613	034572	127 04 0 00 000002 	IN AC
  6614	034573	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  6615	034574	003 04 0 00 007401 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  6616	034575	321 10 0 00 034567 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  6617
  6618
  6619					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  6620					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  6621					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - NEG NOS.
  6622
  6623			007402		SN=SN+1
  6624			176777			XX=<XX+XX+1>&177777
  6625			000375			YY=<YY+YY+1>&377
  6626						IFE	<YY-1>,<YY=376>
  6627	034576	205 02 0 00 576777 		MOVSI	AC-2,1B18+XX	;INITIALIZE FIX PT. NBR.
  6628	034577	541 02 0 00 777400 		HRRI	AC-2,777400
  6629	034600	525 03 0 00 534375 		HRLOI	AC-1,534000+YY	;SET-UP EXPECTED RESULT
  6630						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  6631	034601	127 04 0 00 000002 	IN AC
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 33-1
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - NEGATIVE NUMBERS - RIPPLE ZEROS                        SEQ 0159

  6632	034602	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  6633	034603	003 04 0 00 007402 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  6634	034604	321 10 0 00 034576 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  6635
  6636
  6637					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  6638					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  6639					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - NEG NOS.
  6640
  6641			007403		SN=SN+1
  6642			175777			XX=<XX+XX+1>&177777
  6643			000373			YY=<YY+YY+1>&377
  6644						IFE	<YY-1>,<YY=376>
  6645	034605	205 02 0 00 575777 		MOVSI	AC-2,1B18+XX	;INITIALIZE FIX PT. NBR.
  6646	034606	541 02 0 00 777400 		HRRI	AC-2,777400
  6647	034607	525 03 0 00 534373 		HRLOI	AC-1,534000+YY	;SET-UP EXPECTED RESULT
  6648						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  6649	034610	127 04 0 00 000002 	IN AC
  6650	034611	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  6651	034612	003 04 0 00 007403 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  6652	034613	321 10 0 00 034605 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  6653
  6654
  6655					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  6656					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  6657					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - NEG NOS.
  6658
  6659			007404		SN=SN+1
  6660			173777			XX=<XX+XX+1>&177777
  6661			000367			YY=<YY+YY+1>&377
  6662						IFE	<YY-1>,<YY=376>
  6663	034614	205 02 0 00 573777 		MOVSI	AC-2,1B18+XX	;INITIALIZE FIX PT. NBR.
  6664	034615	541 02 0 00 777400 		HRRI	AC-2,777400
  6665	034616	525 03 0 00 534367 		HRLOI	AC-1,534000+YY	;SET-UP EXPECTED RESULT
  6666						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  6667	034617	127 04 0 00 000002 	IN AC
  6668	034620	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  6669	034621	003 04 0 00 007404 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  6670	034622	321 10 0 00 034614 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  6671
  6672
  6673					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  6674					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  6675					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - NEG NOS.
  6676
  6677			007405		SN=SN+1
  6678			167777			XX=<XX+XX+1>&177777
  6679			000357			YY=<YY+YY+1>&377
  6680						IFE	<YY-1>,<YY=376>
  6681	034623	205 02 0 00 567777 		MOVSI	AC-2,1B18+XX	;INITIALIZE FIX PT. NBR.
  6682	034624	541 02 0 00 777400 		HRRI	AC-2,777400
  6683	034625	525 03 0 00 534357 		HRLOI	AC-1,534000+YY	;SET-UP EXPECTED RESULT
  6684						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  6685	034626	127 04 0 00 000002 	IN AC
  6686	034627	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 33-2
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - NEGATIVE NUMBERS - RIPPLE ZEROS                        SEQ 0160

  6687	034630	003 04 0 00 007405 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  6688	034631	321 10 0 00 034623 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  6689
  6690
  6691					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  6692					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  6693					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - NEG NOS.
  6694
  6695			007406		SN=SN+1
  6696			157777			XX=<XX+XX+1>&177777
  6697			000337			YY=<YY+YY+1>&377
  6698						IFE	<YY-1>,<YY=376>
  6699	034632	205 02 0 00 557777 		MOVSI	AC-2,1B18+XX	;INITIALIZE FIX PT. NBR.
  6700	034633	541 02 0 00 777400 		HRRI	AC-2,777400
  6701	034634	525 03 0 00 534337 		HRLOI	AC-1,534000+YY	;SET-UP EXPECTED RESULT
  6702						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  6703	034635	127 04 0 00 000002 	IN AC
  6704	034636	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  6705	034637	003 04 0 00 007406 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  6706	034640	321 10 0 00 034632 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  6707
  6708
  6709					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  6710					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  6711					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - NEG NOS.
  6712
  6713			007407		SN=SN+1
  6714			137777			XX=<XX+XX+1>&177777
  6715			000277			YY=<YY+YY+1>&377
  6716						IFE	<YY-1>,<YY=376>
  6717	034641	205 02 0 00 537777 		MOVSI	AC-2,1B18+XX	;INITIALIZE FIX PT. NBR.
  6718	034642	541 02 0 00 777400 		HRRI	AC-2,777400
  6719	034643	525 03 0 00 534277 		HRLOI	AC-1,534000+YY	;SET-UP EXPECTED RESULT
  6720						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  6721	034644	127 04 0 00 000002 	IN AC
  6722	034645	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  6723	034646	003 04 0 00 007407 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
  6724	034647	321 10 0 00 034641 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  6725
  6726
  6727					;THIS TEST VERIFIES THAT THE FLTR INSTRUCTION CONVERTS THE FIX PT NO.
  6728					;IN MEMORY TO FLT PT AND PLACES THE RESULT IN THE AC
  6729					;DATA: RIPPLE A ZERO THROUGH A FRACTION FIELD OF ONES - NEG NOS.
  6730
  6731			007410		SN=SN+1
  6732			077777			XX=<XX+XX+1>&177777
  6733			000177			YY=<YY+YY+1>&377
  6734						IFE	<YY-1>,<YY=376>
  6735	034650	205 02 0 00 477777 		MOVSI	AC-2,1B18+XX	;INITIALIZE FIX PT. NBR.
  6736	034651	541 02 0 00 777400 		HRRI	AC-2,777400
  6737	034652	525 03 0 00 534177 		HRLOI	AC-1,534000+YY	;SET-UP EXPECTED RESULT
  6738						FLTR	AC,AC-2		;*CONVERT THE FIX PT NO. IN 'E' TO FLT PT AND STORE RESULT 
  6739	034653	127 04 0 00 000002 	IN AC
  6740	034654	312 04 0 00 000003 		CAME	AC,AC-1		;TEST FRACTION
  6741	034655	003 04 0 00 007410 		ER3	AC,SN		;FAILURE IF TESTED BIT IS NOT CLEAR
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 33-3
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - NEGATIVE NUMBERS - RIPPLE ZEROS                        SEQ 0161

  6742	034656	321 10 0 00 034650 		JUMPL	SAC,.-6		;LOOP ON ERROR SWITCH
  6743
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 34
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - ROUNDING                                               SEQ 0162

  6744					SUBTTL	DIAGNOSTIC SECTION - FLTR - ROUNDING
  6745
  6746					;TEST FOR ROUNDING
  6747					;CHECK THAT FLTR ROUNDS THE RESULTING FRACTION AWAY FROM 0 SUCH THAT
  6748					;IF THE PART OF THE FRACTION BEING DROPPED IS GREATER THAN OR EQUAL TO
  6749					;1/2 LSB OF THE FRACTION RETAINED, THE FRACTION IS INCREASED BY ONE LSB;
  6750					;OTHERWISE, THE FRACTION IS DECREASED BY THE PART BEING DROPPED.
  6751
  6752
  6753	034657	205 02 0 00 200000 	Q7500:	MOVSI	AC-2,1B19	;INITIALIZE FIX PT. NBR.
  6754	034660	541 02 0 00 000177 		HRRI	AC-2,177
  6755	034661	205 03 0 00 243400 		MOVSI	AC-1,243400	;SET-UP EXPECTED RESULT
  6756	034662	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT FIX PT NO. IN 'E' TO FLT PT,
  6757									;ROUND RESULT, AND PLACE IN AC.
  6758	034663	312 04 0 00 000003 		CAME	AC,AC-1		;WAS FRACTION ROUNDED DOWN?
  6759	034664	003 04 0 00 007501 		ER3	AC,7501		;RESULT DID NOT ROUND DOWN
  6760	034665	321 10 0 00 034657 		JUMPL	SAC,Q7500	;LOOP ON ERROR SWITCH
  6761
  6762					;TEST FOR ROUNDING
  6763					;CHECK THAT FLTR ROUNDS THE RESULTING FRACTION AWAY FROM 0 SUCH THAT
  6764					;IF THE PART OF THE FRACTION BEING DROPPED IS GREATER THAN OR EQUAL TO
  6765					;1/2 LSB OF THE FRACTION RETAINED, THE FRACTION IS INCREASED BY ONE LSB;
  6766					;OTHERWISE, THE FRACTION IS DECREASED BY THE PART BEING DROPPED.
  6767	034666	205 02 0 00 200000 	Q7600:	MOVSI	AC-2,1B19	;INITIALIZE FIX PT. NBR.
  6768	034667	541 02 0 00 000200 		HRRI	AC-2,200
  6769	034670	205 03 0 00 243400 		MOVSI	AC-1,243400	;SET-UP EXPECTED RESULT
  6770	034671	541 03 0 00 000001 		HRRI	AC-1,1
  6771	034672	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT FIX PT NO. IN 'E' TO FLT PT,
  6772									;ROUND RESULT, AND PLACE IN AC.
  6773	034673	312 04 0 00 000003 		CAME	AC,AC-1		;WAS FRACTION ROUNDED UP?
  6774	034674	003 04 0 00 007601 		ER3	AC,7601		;RESULT DID NOT ROUND UP
  6775	034675	321 10 0 00 034666 		JUMPL	SAC,Q7600	;LOOP ON ERROR SWITCH
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 35
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - ROUNDING                                               SEQ 0163

  6776					;TEST FOR ROUNDING
  6777					;CHECK THAT FLTR ROUNDS THE RESULTING FRACTION AWAY FROM 0 SUCH THAT
  6778					;IF THE PART OF THE FRACTION BEING DROPPED IS GREATER THAN OR EQUAL TO
  6779					;1/2 LSB OF THE FRACTION RETAINED, THE FRACTION IS INCREASED BY ONE LSB;
  6780					;OTHERWISE, THE FRACTION IS DECREASED BY THE PART BEING DROPPED.
  6781	034676	561 02 0 00 777600 	Q7700:	HRROI	AC-2,777600	;INITIALIZE FIX PT. NBR.
  6782	034677	621 02 0 00 200000 		TLZ	AC-2,1B19
  6783	034700	525 03 0 00 534377 		HRLOI	AC-1,534377	;SET-UP EXPECTED RESULT
  6784	034701	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT FIX PT NO. IN 'E' TO FLT PT,
  6785									;ROUND RESULT, AND PLACE IN AC.
  6786	034702	312 04 0 00 000003 		CAME	AC,AC-1		;WAS FRACTION ROUNDED DOWN?
  6787	034703	003 04 0 00 007701 		ER3	AC,7701		;RESULT DID NOT ROUND DOWN
  6788	034704	321 10 0 00 034676 		JUMPL	SAC,Q7700	;LOOP ON ERROR SWITCH
  6789
  6790					;TEST FOR ROUNDING
  6791					;CHECK THAT FLTR ROUNDS THE RESULTING FRACTION AWAY FROM 0 SUCH THAT
  6792					;IF THE PART OF THE FRACTION BEING DROPPED IS GREATER THAN OR EQUAL TO
  6793					;1/2 LSB OF THE FRACTION RETAINED, THE FRACTION IS INCREASED BY ONE LSB;
  6794					;OTHERWISE, THE FRACTION IS DECREASED BY THE PART BEING DROPPED.
  6795	034705	561 02 0 00 777601 	Q10000:	HRROI	AC-2,777601	;INITIALIZE FIX PT. NBR.
  6796	034706	621 02 0 00 200000 		TLZ	AC-2,1B19
  6797	034707	515 03 0 00 534400 		HRLZI	AC-1,534400	;SET-UP EXPECTED RESULT
  6798	034710	127 04 0 00 000002 		FLTR	AC,AC-2		;*CONVERT FIX PT NO. IN 'E' TO FLT PT,
  6799									;ROUND RESULT, AND PLACE IN AC.
  6800	034711	312 04 0 00 000003 		CAME	AC,AC-1		;WAS FRACTION ROUNDED UP?
  6801	034712	003 04 0 00 010001 		ER3	AC,10001	;RESULT DID NOT ROUND UP
  6802	034713	321 10 0 00 034705 		JUMPL	SAC,Q10000	;LOOP ON ERROR SWITCH
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 36
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - FLTR - NON-AC RANGE ADDRESS                                   SEQ 0164

  6803					SUBTTL	DIAGNOSTIC SECTION - FLTR - NON-AC RANGE ADDRESS
  6804
  6805					;VERIFY THAT 'FLTR AC,E' OPERATES FOR 'E' BEYOND 'AC' RANGE
  6806
  6807	034714	205 02 0 00 200000 	Q10010:	MOVSI	AC-2,1B19	;INITIALIZE FIX PT NO.
  6808	034715	541 02 0 00 000177 		HRRI	AC-2,177
  6809	034716	202 02 0 00 036524 		MOVEM	AC-2,TSTWD
  6810	034717	205 03 0 00 243400 		MOVSI	AC-1,243400	;SET-UP EXPECTED RESULT
  6811	034720	127 04 0 00 036524 		FLTR	AC,TSTWD	;*CONVERT FIX PT NO. IN 'E' TO FLT PT AND STORE IN AC
  6812	034721	312 04 0 00 000003 		CAME	AC,AC-1		;DID FLTR GET CORRECT C(E)?
  6813	034722	003 04 0 00 010011 		ER3	AC,10011	;FAILURE TO GET C(E)
  6814	034723	321 10 0 00 034714 		JUMPL	SAC,Q10010	;LOOP ON ERROR SWITCH
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 37
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVE - GENERAL DATA PATTERNS                                 SEQ 0165

  6815					SUBTTL	DIAGNOSTIC SECTION - DMOVE - GENERAL DATA PATTERNS
  6816
  6817					;CHECK THAT 'DMOVE AC,E' DOES NOT CLOBBER C(E) OR C(E+1)
  6818
  6819	034724	200 02 0 00 036737 	Q10050:	MOVE	AC-2,[631463,,146314]	;INITIALIZE C(E), C(E+1)
  6820	034725	200 03 0 00 036740 		MOVE	AC-1,[424242,,131313]
  6821	034726	120 04 0 00 000002 		DMOVE	AC,AC-2		;*MOVE DOUBLE WORD FROM E, E+1 TO AC, AC+1
  6822	034727	312 02 0 00 036737 		CAME	AC-2,[631463,,146314]	;WAS C(E) MODIFIED?
  6823	034730	005 02 0 00 010051 		ER5	AC-2,10051	;C(E) WAS CLOBBERED
  6824	034731	312 03 0 00 036740 		CAME	AC-1,[424242,,131313]	;WAS C(E+1) MODIFIED?
  6825	034732	006 03 0 00 010051 		ER6	AC-1,10051	;C(E+1) WAS CLOBBERED
  6826	034733	321 10 0 00 034724 		JUMPL	SAC,Q10050
  6827					PAGE
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 37-1
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVE - GENERAL DATA PATTERNS                                 SEQ 0166

  6828						DMVE	1010,0,0,0,0^
  6829					;THIS MACRO TESTS THE DMOVE INSTRUCTION
  6830					;FIRST, AC, AC+1 ARE PRELOADED WITH DATA OTHER THAN THE TEST WORDS.
  6831					;THEN, THE DATA SPECIFIED BY [XWD 0,0] AND [XWD 0,0] IS MOVED
  6832					;FROM MEMORY TO AC, AC+1 VIA THE DMOVE INSTRUCTION.
  6833					;0(AC) AND 0(AC+1) ARE THEN COMPARED WITH THE TEST WORDS
  6834					;[XWD 0,0] AND [XWD 0,0], RESPECTIVELY.  THE TEST PASSES IF THESE
  6835					;COMPARISONS AGREE.
  6836
  6837	034734	200 11 0 00 036741 	Q10100:	MOVE	AC+5,[XWD 0,0]	;INITIALIZE TEST WORDS
  6838	034735	200 12 0 00 036741 		MOVE	AC+6,[XWD 0,0]	;FOR COMPARISON
  6839	034736	200 04 0 00 036742 		MOVE	AC,[XWD 707070,707070]
  6840	034737	200 05 0 00 036743 		MOVE	AC+1,[XWD 070707,070707]  ;INITIALIZE AC,AC+1
  6841						DMOVE	AC,[XWD 0,0	;*MOVE DOUBLE WORD 0,0 ; 0,0
  6842	034740	120 04 0 00 036744 			    XWD 0,0]	;FROM MEMORY TO AC, AC+1
  6843	034741	312 04 0 00 000011 		CAME	AC,<AC+5>&17	;WAS AC LOADED CORRECTLY?
  6844	034742	003 04 0 00 010101 		ER3	AC,10101	;FAIL IF CONTENTS(AC) NOT = 0,0
  6845	034743	312 05 0 00 000012 		CAME	AC+1,<AC+6>&17	;WAS AC+1 LOADED CORRECTLY?
  6846	034744	004 05 0 00 010102 		ER4	AC+1,10102	;FAIL IF CONTENTS(AC+1) NOT = 0,0
  6847	034745	321 10 0 00 034734 		JUMPL	SAC,Q10100	;LOOP ON ERROR SWITCH^
  6848
  6849						DMVE	1020,-1,-1,-1,-1^
  6850					;THIS MACRO TESTS THE DMOVE INSTRUCTION
  6851					;FIRST, AC, AC+1 ARE PRELOADED WITH DATA OTHER THAN THE TEST WORDS.
  6852					;THEN, THE DATA SPECIFIED BY [XWD -1,-1] AND [XWD -1,-1] IS MOVED
  6853					;FROM MEMORY TO AC, AC+1 VIA THE DMOVE INSTRUCTION.
  6854					;-1(AC) AND -1(AC+1) ARE THEN COMPARED WITH THE TEST WORDS
  6855					;[XWD -1,-1] AND [XWD -1,-1], RESPECTIVELY.  THE TEST PASSES IF THESE
  6856					;COMPARISONS AGREE.
  6857
  6858	034746	200 11 0 00 036746 	Q10200:	MOVE	AC+5,[XWD -1,-1]	;INITIALIZE TEST WORDS
  6859	034747	200 12 0 00 036746 		MOVE	AC+6,[XWD -1,-1]	;FOR COMPARISON
  6860	034750	200 04 0 00 036742 		MOVE	AC,[XWD 707070,707070]
  6861	034751	200 05 0 00 036743 		MOVE	AC+1,[XWD 070707,070707]  ;INITIALIZE AC,AC+1
  6862						DMOVE	AC,[XWD -1,-1	;*MOVE DOUBLE WORD -1,-1 ; -1,-1
  6863	034752	120 04 0 00 036746 			    XWD -1,-1]	;FROM MEMORY TO AC, AC+1
  6864	034753	312 04 0 00 000011 		CAME	AC,<AC+5>&17	;WAS AC LOADED CORRECTLY?
  6865	034754	003 04 0 00 010201 		ER3	AC,10201	;FAIL IF CONTENTS(AC) NOT = -1,-1
  6866	034755	312 05 0 00 000012 		CAME	AC+1,<AC+6>&17	;WAS AC+1 LOADED CORRECTLY?
  6867	034756	004 05 0 00 010202 		ER4	AC+1,10202	;FAIL IF CONTENTS(AC+1) NOT = -1,-1
  6868	034757	321 10 0 00 034746 		JUMPL	SAC,Q10200	;LOOP ON ERROR SWITCH^
  6869					PAGE
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 37-2
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVE - GENERAL DATA PATTERNS                                 SEQ 0167

  6870						DMVE	1030,0,0,-1,-1^
  6871					;THIS MACRO TESTS THE DMOVE INSTRUCTION
  6872					;FIRST, AC, AC+1 ARE PRELOADED WITH DATA OTHER THAN THE TEST WORDS.
  6873					;THEN, THE DATA SPECIFIED BY [XWD 0,0] AND [XWD -1,-1] IS MOVED
  6874					;FROM MEMORY TO AC, AC+1 VIA THE DMOVE INSTRUCTION.
  6875					;-1(AC) AND -1(AC+1) ARE THEN COMPARED WITH THE TEST WORDS
  6876					;[XWD 0,0] AND [XWD -1,-1], RESPECTIVELY.  THE TEST PASSES IF THESE
  6877					;COMPARISONS AGREE.
  6878
  6879	034760	200 11 0 00 036741 	Q10300:	MOVE	AC+5,[XWD 0,0]	;INITIALIZE TEST WORDS
  6880	034761	200 12 0 00 036746 		MOVE	AC+6,[XWD -1,-1]	;FOR COMPARISON
  6881	034762	200 04 0 00 036742 		MOVE	AC,[XWD 707070,707070]
  6882	034763	200 05 0 00 036743 		MOVE	AC+1,[XWD 070707,070707]  ;INITIALIZE AC,AC+1
  6883						DMOVE	AC,[XWD 0,0	;*MOVE DOUBLE WORD 0,0 ; -1,-1
  6884	034764	120 04 0 00 036745 			    XWD -1,-1]	;FROM MEMORY TO AC, AC+1
  6885	034765	312 04 0 00 000011 		CAME	AC,<AC+5>&17	;WAS AC LOADED CORRECTLY?
  6886	034766	003 04 0 00 010301 		ER3	AC,10301	;FAIL IF CONTENTS(AC) NOT = 0,0
  6887	034767	312 05 0 00 000012 		CAME	AC+1,<AC+6>&17	;WAS AC+1 LOADED CORRECTLY?
  6888	034770	004 05 0 00 010302 		ER4	AC+1,10302	;FAIL IF CONTENTS(AC+1) NOT = -1,-1
  6889	034771	321 10 0 00 034760 		JUMPL	SAC,Q10300	;LOOP ON ERROR SWITCH^
  6890
  6891						DMVE	1040,-1,-1,0,0^
  6892					;THIS MACRO TESTS THE DMOVE INSTRUCTION
  6893					;FIRST, AC, AC+1 ARE PRELOADED WITH DATA OTHER THAN THE TEST WORDS.
  6894					;THEN, THE DATA SPECIFIED BY [XWD -1,-1] AND [XWD 0,0] IS MOVED
  6895					;FROM MEMORY TO AC, AC+1 VIA THE DMOVE INSTRUCTION.
  6896					;0(AC) AND 0(AC+1) ARE THEN COMPARED WITH THE TEST WORDS
  6897					;[XWD -1,-1] AND [XWD 0,0], RESPECTIVELY.  THE TEST PASSES IF THESE
  6898					;COMPARISONS AGREE.
  6899
  6900	034772	200 11 0 00 036746 	Q10400:	MOVE	AC+5,[XWD -1,-1]	;INITIALIZE TEST WORDS
  6901	034773	200 12 0 00 036741 		MOVE	AC+6,[XWD 0,0]	;FOR COMPARISON
  6902	034774	200 04 0 00 036742 		MOVE	AC,[XWD 707070,707070]
  6903	034775	200 05 0 00 036743 		MOVE	AC+1,[XWD 070707,070707]  ;INITIALIZE AC,AC+1
  6904						DMOVE	AC,[XWD -1,-1	;*MOVE DOUBLE WORD -1,-1 ; 0,0
  6905	034776	120 04 0 00 036747 			    XWD 0,0]	;FROM MEMORY TO AC, AC+1
  6906	034777	312 04 0 00 000011 		CAME	AC,<AC+5>&17	;WAS AC LOADED CORRECTLY?
  6907	035000	003 04 0 00 010401 		ER3	AC,10401	;FAIL IF CONTENTS(AC) NOT = -1,-1
  6908	035001	312 05 0 00 000012 		CAME	AC+1,<AC+6>&17	;WAS AC+1 LOADED CORRECTLY?
  6909	035002	004 05 0 00 010402 		ER4	AC+1,10402	;FAIL IF CONTENTS(AC+1) NOT = 0,0
  6910	035003	321 10 0 00 034772 		JUMPL	SAC,Q10400	;LOOP ON ERROR SWITCH^
  6911					PAGE
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 37-3
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVE - GENERAL DATA PATTERNS                                 SEQ 0168

  6912						DMVE	1050,252525,252525,525252,525252^
  6913					;THIS MACRO TESTS THE DMOVE INSTRUCTION
  6914					;FIRST, AC, AC+1 ARE PRELOADED WITH DATA OTHER THAN THE TEST WORDS.
  6915					;THEN, THE DATA SPECIFIED BY [XWD 252525,252525] AND [XWD 525252,525252] IS MOVED
  6916					;FROM MEMORY TO AC, AC+1 VIA THE DMOVE INSTRUCTION.
  6917					;525252(AC) AND 525252(AC+1) ARE THEN COMPARED WITH THE TEST WORDS
  6918					;[XWD 252525,252525] AND [XWD 525252,525252], RESPECTIVELY.  THE TEST PASSES IF THESE
  6919					;COMPARISONS AGREE.
  6920
  6921	035004	200 11 0 00 036736 	Q10500:	MOVE	AC+5,[XWD 252525,252525]	;INITIALIZE TEST WORDS
  6922	035005	200 12 0 00 036751 		MOVE	AC+6,[XWD 525252,525252]	;FOR COMPARISON
  6923	035006	200 04 0 00 036742 		MOVE	AC,[XWD 707070,707070]
  6924	035007	200 05 0 00 036743 		MOVE	AC+1,[XWD 070707,070707]  ;INITIALIZE AC,AC+1
  6925						DMOVE	AC,[XWD 252525,252525	;*MOVE DOUBLE WORD 252525,252525 ; 525252,525252
  6926	035010	120 04 0 00 036752 			    XWD 525252,525252]	;FROM MEMORY TO AC, AC+1
  6927	035011	312 04 0 00 000011 		CAME	AC,<AC+5>&17	;WAS AC LOADED CORRECTLY?
  6928	035012	003 04 0 00 010501 		ER3	AC,10501	;FAIL IF CONTENTS(AC) NOT = 252525,252525
  6929	035013	312 05 0 00 000012 		CAME	AC+1,<AC+6>&17	;WAS AC+1 LOADED CORRECTLY?
  6930	035014	004 05 0 00 010502 		ER4	AC+1,10502	;FAIL IF CONTENTS(AC+1) NOT = 525252,525252
  6931	035015	321 10 0 00 035004 		JUMPL	SAC,Q10500	;LOOP ON ERROR SWITCH^
  6932
  6933						DMVE	1060,525252,525252,252525,252525^
  6934					;THIS MACRO TESTS THE DMOVE INSTRUCTION
  6935					;FIRST, AC, AC+1 ARE PRELOADED WITH DATA OTHER THAN THE TEST WORDS.
  6936					;THEN, THE DATA SPECIFIED BY [XWD 525252,525252] AND [XWD 252525,252525] IS MOVED
  6937					;FROM MEMORY TO AC, AC+1 VIA THE DMOVE INSTRUCTION.
  6938					;252525(AC) AND 252525(AC+1) ARE THEN COMPARED WITH THE TEST WORDS
  6939					;[XWD 525252,525252] AND [XWD 252525,252525], RESPECTIVELY.  THE TEST PASSES IF THESE
  6940					;COMPARISONS AGREE.
  6941
  6942	035016	200 11 0 00 036751 	Q10600:	MOVE	AC+5,[XWD 525252,525252]	;INITIALIZE TEST WORDS
  6943	035017	200 12 0 00 036736 		MOVE	AC+6,[XWD 252525,252525]	;FOR COMPARISON
  6944	035020	200 04 0 00 036742 		MOVE	AC,[XWD 707070,707070]
  6945	035021	200 05 0 00 036743 		MOVE	AC+1,[XWD 070707,070707]  ;INITIALIZE AC,AC+1
  6946						DMOVE	AC,[XWD 525252,525252	;*MOVE DOUBLE WORD 525252,525252 ; 252525,252525
  6947	035022	120 04 0 00 036751 			    XWD 252525,252525]	;FROM MEMORY TO AC, AC+1
  6948	035023	312 04 0 00 000011 		CAME	AC,<AC+5>&17	;WAS AC LOADED CORRECTLY?
  6949	035024	003 04 0 00 010601 		ER3	AC,10601	;FAIL IF CONTENTS(AC) NOT = 525252,525252
  6950	035025	312 05 0 00 000012 		CAME	AC+1,<AC+6>&17	;WAS AC+1 LOADED CORRECTLY?
  6951	035026	004 05 0 00 010602 		ER4	AC+1,10602	;FAIL IF CONTENTS(AC+1) NOT = 252525,252525
  6952	035027	321 10 0 00 035016 		JUMPL	SAC,Q10600	;LOOP ON ERROR SWITCH^
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 38
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVE - AC=17, AC+1=0                                         SEQ 0169

  6953					SUBTTL	DIAGNOSTIC SECTION - DMOVE - AC=17, AC+1=0
  6954
  6955					;CHECK DMOVE FOR AC=17 AND AC+1=0
  6956
  6957			000017			AC=17
  6958			000003			SAC=<AC+4>&17
  6959						SAVEAC (1,1)^
  6960	035030	201 03 0 00 035030 		MOVEI	SAC,.
  6961	035031	202 03 0 00 030051 		MOVEM	SAC,TESTPC	;SETUP SUBTEST PC
  6962	035032	201 03 0 00 000003 		MOVEI	SAC,SAC		;INFORM ERROR ROUTINE WHICH
  6963	035033	202 03 0 00 037213 		MOVEM	SAC,ERRLOP#	;AC IS USED FOR ITERATION^
  6964
  6965						DMVE17	1070,1071,-1,-1,-1,-1^
  6966					;THIS MACRO TESTS THE DMOVE INSTRUCTION
  6967					;FIRST, AC, AC+1 ARE PRELOADED WITH DATA OTHER THAN THE TEST WORDS.
  6968					;THEN, THE DATA SPECIFIED BY [XWD -1,-1] AND [XWD -1,-1] IS MOVED
  6969					;FROM MEMORY TO AC, AC+1 VIA THE DMOVE INSTRUCTION.
  6970					;-1(AC) AND -1(AC+1) ARE THEN COMPARED WITH THE TEST
  6971					;WORDS [XWD -1,-1] AND [XWD -1,-1], RESPECTIVELY.
  6972					;THE TEST PASSES IF THESE COMPARISONS AGREE.
  6973
  6974	035034	202 17 0 00 037223 	Q10710:	MOVEM	AC,%SV17#	;SAVE AC17
  6975	035035	200 04 0 00 036746 	Q10700:	MOVE	AC+5,[XWD -1,-1]	;INITIALIZE TEST WORDS
  6976	035036	200 05 0 00 036746 		MOVE	AC+6,[XWD -1,-1]	;FOR COMPARISON
  6977	035037	200 17 0 00 036742 		MOVE	AC,[XWD 707070,707070]
  6978	035040	200 00 0 00 036743 		MOVE	AC+1,[XWD 070707,070707]  ;INITIALIZE AC,AC+1
  6979						DMOVE	AC,[XWD -1,-1	;*MOVE DOUBLE WORD -1,-1 ; -1,-1
  6980	035041	120 17 0 00 036746 			    XWD -1,-1]	;FROM MEMORY TO AC, AC+1
  6981	035042	316 17 0 00 000004 	Q10713:	CAMN	AC,<AC+5>&17	;WAS AC LOADED CORRECTLY?
  6982	035043	254 00 0 00 035047 		JRST	.+4		;HERE IF NO ERROR
  6983	035044	202 17 0 00 000016 		MOVEM	AC,AC-1		;STORE INCORRECT RESLUTS
  6984	035045	200 17 0 00 037223 		MOVE	AC,%SV17	;RESTORE P
  6985	035046	003 16 0 00 010701 		ER3	AC-1,10701	;FAIL IF CONTENTS(AC) NOT = -1,-1
  6986	035047	316 00 0 00 000005 		CAMN	AC+1,<AC+6>&17	;WAS AC+1 LOADED CORRECTLY?
  6987	035050	254 00 0 00 035054 		JRST	.+4		;HERE IF NO ERROR
  6988	035051	202 00 0 00 000016 		MOVEM	AC+1,AC-1	;STORE INCORRECT WORD
  6989	035052	200 17 0 00 037223 		MOVE	AC,%SV17	;RESTORE P
  6990	035053	004 16 0 00 010702 		ER4	AC-1,10702
  6991	035054	200 17 0 00 037223 		MOVE	AC,%SV17	;RESTORE AC UNCONDITIONALLY
  6992	035055	321 03 0 00 035034 		JUMPL	SAC,Q10710	;LOOP ON ERROR SWITCH^
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 39
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVE - AC RANGE ADDRESS                                      SEQ 0170

  6993					SUBTTL	DIAGNOSTIC SECTION - DMOVE - AC RANGE ADDRESS
  6994
  6995					;CHECK DMOVE WHERE 'E' IS WITHIN THE 'AC' RANGE
  6996
  6997			000004			AC=4
  6998			000010			SAC=<AC+4>&17
  6999						SAVEAC(1,1)^
  7000	035056	201 10 0 00 035056 		MOVEI	SAC,.
  7001	035057	202 10 0 00 030051 		MOVEM	SAC,TESTPC	;SETUP SUBTEST PC
  7002	035060	201 10 0 00 000010 		MOVEI	SAC,SAC		;INFORM ERROR ROUTINE WHICH
  7003	035061	202 10 0 00 037213 		MOVEM	SAC,ERRLOP#	;AC IS USED FOR ITERATION^
  7004			000002			E=AC-2
  7005
  7006			011000		SN=11000
  7007			000001			E=<E-1>&17
  7008
  7009					Q11000:	REPEAT	^D5,
  7010					<SN=SN+1
  7011						E=<E+1>&17
  7012						SETZB	AC,AC+1		;INITIALIZE AC,AC+1
  7013						SETOB	E,E+1		;INITIALIZE E,E+1
  7014						HRRZI	E+1,-1
  7015						SETOB	AC+5,<AC+6>&17	;INITIALIZE TEST WORDS FOR COMPARISON
  7016						HRRZI	AC+6,-1
  7017						DMOVE	AC,E		;*MOVE DOUBLE WORD FROM E, E+1 TO AC, AC+1
  7018						CAME	AC,<AC+5>&17	;DID DMOVE GET CORRECT C(E)?
  7019						ER3	AC,SN		;FAIL IF C(AC) NOT = -1,-1
  7020						CAME	AC+1,<AC+6>&17	;DID DMOVE GET CORRECT C(E+1)?
  7021						ER4	AC+1,SN		;FAIL IF C(AC+1) NOT = 0,-1
  7022						JUMPL	SAC,.-^D8	;LOOP ON ERROR SWITCH
  7023					>
  7024			011001		SN=SN+1
  7025			000002			E=<E+1>&17
  7026	035062	403 04 0 00 000005 		SETZB	AC,AC+1		;INITIALIZE AC,AC+1
  7027	035063	477 02 0 00 000003 		SETOB	E,E+1		;INITIALIZE E,E+1
  7028	035064	551 03 0 00 777777 		HRRZI	E+1,-1
  7029	035065	477 11 0 00 000012 		SETOB	AC+5,<AC+6>&17	;INITIALIZE TEST WORDS FOR COMPARISON
  7030	035066	551 12 0 00 777777 		HRRZI	AC+6,-1
  7031	035067	120 04 0 00 000002 		DMOVE	AC,E		;*MOVE DOUBLE WORD FROM E, E+1 TO AC, AC+1
  7032	035070	312 04 0 00 000011 		CAME	AC,<AC+5>&17	;DID DMOVE GET CORRECT C(E)?
  7033	035071	003 04 0 00 011001 		ER3	AC,SN		;FAIL IF C(AC) NOT = -1,-1
  7034	035072	312 05 0 00 000012 		CAME	AC+1,<AC+6>&17	;DID DMOVE GET CORRECT C(E+1)?
  7035	035073	004 05 0 00 011001 		ER4	AC+1,SN		;FAIL IF C(AC+1) NOT = 0,-1
  7036	035074	321 10 0 00 035064 		JUMPL	SAC,.-^D8	;LOOP ON ERROR SWITCH
  7037
  7038			011002		SN=SN+1
  7039			000003			E=<E+1>&17
  7040	035075	403 04 0 00 000005 		SETZB	AC,AC+1		;INITIALIZE AC,AC+1
  7041	035076	477 03 0 00 000004 		SETOB	E,E+1		;INITIALIZE E,E+1
  7042	035077	551 04 0 00 777777 		HRRZI	E+1,-1
  7043	035100	477 11 0 00 000012 		SETOB	AC+5,<AC+6>&17	;INITIALIZE TEST WORDS FOR COMPARISON
  7044	035101	551 12 0 00 777777 		HRRZI	AC+6,-1
  7045	035102	120 04 0 00 000003 		DMOVE	AC,E		;*MOVE DOUBLE WORD FROM E, E+1 TO AC, AC+1
  7046	035103	312 04 0 00 000011 		CAME	AC,<AC+5>&17	;DID DMOVE GET CORRECT C(E)?
  7047	035104	003 04 0 00 011002 		ER3	AC,SN		;FAIL IF C(AC) NOT = -1,-1
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 39-1
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVE - AC RANGE ADDRESS                                      SEQ 0171

  7048	035105	312 05 0 00 000012 		CAME	AC+1,<AC+6>&17	;DID DMOVE GET CORRECT C(E+1)?
  7049	035106	004 05 0 00 011002 		ER4	AC+1,SN		;FAIL IF C(AC+1) NOT = 0,-1
  7050	035107	321 10 0 00 035077 		JUMPL	SAC,.-^D8	;LOOP ON ERROR SWITCH
  7051
  7052			011003		SN=SN+1
  7053			000004			E=<E+1>&17
  7054	035110	403 04 0 00 000005 		SETZB	AC,AC+1		;INITIALIZE AC,AC+1
  7055	035111	477 04 0 00 000005 		SETOB	E,E+1		;INITIALIZE E,E+1
  7056	035112	551 05 0 00 777777 		HRRZI	E+1,-1
  7057	035113	477 11 0 00 000012 		SETOB	AC+5,<AC+6>&17	;INITIALIZE TEST WORDS FOR COMPARISON
  7058	035114	551 12 0 00 777777 		HRRZI	AC+6,-1
  7059	035115	120 04 0 00 000004 		DMOVE	AC,E		;*MOVE DOUBLE WORD FROM E, E+1 TO AC, AC+1
  7060	035116	312 04 0 00 000011 		CAME	AC,<AC+5>&17	;DID DMOVE GET CORRECT C(E)?
  7061	035117	003 04 0 00 011003 		ER3	AC,SN		;FAIL IF C(AC) NOT = -1,-1
  7062	035120	312 05 0 00 000012 		CAME	AC+1,<AC+6>&17	;DID DMOVE GET CORRECT C(E+1)?
  7063	035121	004 05 0 00 011003 		ER4	AC+1,SN		;FAIL IF C(AC+1) NOT = 0,-1
  7064	035122	321 10 0 00 035112 		JUMPL	SAC,.-^D8	;LOOP ON ERROR SWITCH
  7065
  7066			011004		SN=SN+1
  7067			000005			E=<E+1>&17
  7068	035123	403 04 0 00 000005 		SETZB	AC,AC+1		;INITIALIZE AC,AC+1
  7069	035124	477 05 0 00 000006 		SETOB	E,E+1		;INITIALIZE E,E+1
  7070	035125	551 06 0 00 777777 		HRRZI	E+1,-1
  7071	035126	477 11 0 00 000012 		SETOB	AC+5,<AC+6>&17	;INITIALIZE TEST WORDS FOR COMPARISON
  7072	035127	551 12 0 00 777777 		HRRZI	AC+6,-1
  7073	035130	120 04 0 00 000005 		DMOVE	AC,E		;*MOVE DOUBLE WORD FROM E, E+1 TO AC, AC+1
  7074	035131	312 04 0 00 000011 		CAME	AC,<AC+5>&17	;DID DMOVE GET CORRECT C(E)?
  7075	035132	003 04 0 00 011004 		ER3	AC,SN		;FAIL IF C(AC) NOT = -1,-1
  7076	035133	312 05 0 00 000012 		CAME	AC+1,<AC+6>&17	;DID DMOVE GET CORRECT C(E+1)?
  7077	035134	004 05 0 00 011004 		ER4	AC+1,SN		;FAIL IF C(AC+1) NOT = 0,-1
  7078	035135	321 10 0 00 035125 		JUMPL	SAC,.-^D8	;LOOP ON ERROR SWITCH
  7079
  7080			011005		SN=SN+1
  7081			000006			E=<E+1>&17
  7082	035136	403 04 0 00 000005 		SETZB	AC,AC+1		;INITIALIZE AC,AC+1
  7083	035137	477 06 0 00 000007 		SETOB	E,E+1		;INITIALIZE E,E+1
  7084	035140	551 07 0 00 777777 		HRRZI	E+1,-1
  7085	035141	477 11 0 00 000012 		SETOB	AC+5,<AC+6>&17	;INITIALIZE TEST WORDS FOR COMPARISON
  7086	035142	551 12 0 00 777777 		HRRZI	AC+6,-1
  7087	035143	120 04 0 00 000006 		DMOVE	AC,E		;*MOVE DOUBLE WORD FROM E, E+1 TO AC, AC+1
  7088	035144	312 04 0 00 000011 		CAME	AC,<AC+5>&17	;DID DMOVE GET CORRECT C(E)?
  7089	035145	003 04 0 00 011005 		ER3	AC,SN		;FAIL IF C(AC) NOT = -1,-1
  7090	035146	312 05 0 00 000012 		CAME	AC+1,<AC+6>&17	;DID DMOVE GET CORRECT C(E+1)?
  7091	035147	004 05 0 00 011005 		ER4	AC+1,SN		;FAIL IF C(AC+1) NOT = 0,-1
  7092	035150	321 10 0 00 035140 		JUMPL	SAC,.-^D8	;LOOP ON ERROR SWITCH
  7093
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 40
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVN - GENERAL DATA PATTERNS                                 SEQ 0172

  7094					SUBTTL	DIAGNOSTIC SECTION - DMOVN - GENERAL DATA PATTERNS
  7095
  7096					;CHECK THAT 'DMOVN AC,E' DOES NOT CLOBBER C(E) OR C(E+1)
  7097
  7098					Q11050:	DMOVE	AC-2,[631463,,146314	;INITIALIZE C(E), C(E+1)
  7099	035151	120 02 0 00 036737 			      424242,,131313]
  7100	035152	121 04 0 00 000002 		DMOVN	AC,AC-2		;*MOVE NEGATIVE OF DOUBLE WORD FROM E, E+1 TO AC, AC+1
  7101	035153	312 02 0 00 036737 		CAME	AC-2,[631463,,146314]	;WAS C(E) MODIFIED?
  7102	035154	005 02 0 00 011051 		ER5	AC-2,11051	;C(E) WAS CLOBBERED
  7103	035155	312 03 0 00 036740 		CAME	AC-1,[424242,,131313]	;WAS C(E+1) MODIFIED?
  7104	035156	006 03 0 00 011052 		ER6	AC-1,11052	;C(E+1) WAS CLOBBERED
  7105	035157	321 10 0 00 035151 		JUMPL	SAC,Q11050	;LOOP ON ERROR SWITCH
  7106					PAGE
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 40-1
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVN - GENERAL DATA PATTERNS                                 SEQ 0173

  7107						DMVN	1110,0,0,0,0^
  7108					;THIS MACRO TESTS THE DMOVN INSTRUCTION
  7109					;FIRST, AC, AC+1 ARE PRELOADED WITH DATA OTHER THAN THE TEST WORDS.
  7110					;THEN, THE NEGATIVE (TWOS COMPLEMENT) OF THE DATA SPECIFIED BY
  7111					;[XWD 0,0] AND [XWD 0,0] IS MOVED FROM MEMORY TO AC, AC+1 VIA
  7112					;THE DMOVN INSTRUCTION.  0(AC) AND 0(AC+1) ARE THEN COMPARED
  7113					;WITH THE NEGATIVE (TWOS COMPLEMENT) OF THE TEST
  7114					;WORDS [XWD 0,0] AND [XWD 0,0], RESPECTIVELY.
  7115					;THE TEST PASSES IF THESE COMPARISONS AGREE.
  7116
  7117					Q11100:	DMOVE	AC,[XWD 707070,707070
  7118	035160	120 04 0 00 036742 			    XWD 070707,070707]  ;INITIALIZE AC,AC+1
  7119	035161	460 11 0 00 036741 		SETCM	AC+5,[XWD 0,0]	;INITIALIZE TEST WORDS FOR COMPARISON
  7120						IFIDN	<0,0><0,0>,<
  7121	035162	400 12 0 00 000000 		SETZ	AC+6,
  7122	035163	271 11 0 00 000001 		ADDI	AC+5,1	>
  7123						IFIDN	<0,0><400000,0>,<
  7124						SETZ	AC+6,
  7125						ADDI	AC+5,1	>
  7126						IFDIF	<0,0><0,0>,<
  7127						IFDIF	<0,0><400000,0>,<
  7128						MOVN	AC+6,[XWD 0,0]
  7129						TLZ	AC+6,1B18	;CLEAR SIGN BIT OF LOW ORDER WORD >>
  7130						DMOVN	AC,[XWD 0,0	;*MOVE NEGATIVE OF DOUBLE WORD 0,0 ;
  7131	035164	121 04 0 00 036744 			    XWD 0,0]	;0,0 FROM MEMORY TO AC, AC+1
  7132	035165	312 04 0 00 000011 		CAME	AC,<AC+5>&17	;WAS AC LOADED CORRECTLY?
  7133	035166	003 04 0 00 011101 		ER3	AC,11101	;FAIL IF CONTENTS(AC) NOT = COMPLEMENT OF 0,0
  7134	035167	312 05 0 00 000012 		CAME	AC+1,<AC+6>&17	;WAS AC+1 LOADED CORRECTLY?
  7135	035170	004 05 0 00 011102 		ER4	AC+1,11102	;FAIL IF CONTENTS(AC+1) NOT = MINUS 0,0
  7136	035171	321 10 0 00 035160 		JUMPL	SAC,Q11100	;LOOP ON ERROR SWITCH^
  7137					PAGE
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 40-2
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVN - GENERAL DATA PATTERNS                                 SEQ 0174

  7138						DMVN	1120,0,0,0,1^
  7139					;THIS MACRO TESTS THE DMOVN INSTRUCTION
  7140					;FIRST, AC, AC+1 ARE PRELOADED WITH DATA OTHER THAN THE TEST WORDS.
  7141					;THEN, THE NEGATIVE (TWOS COMPLEMENT) OF THE DATA SPECIFIED BY
  7142					;[XWD 0,0] AND [XWD 0,1] IS MOVED FROM MEMORY TO AC, AC+1 VIA
  7143					;THE DMOVN INSTRUCTION.  0(AC) AND 0(AC+1) ARE THEN COMPARED
  7144					;WITH THE NEGATIVE (TWOS COMPLEMENT) OF THE TEST
  7145					;WORDS [XWD 0,0] AND [XWD 0,1], RESPECTIVELY.
  7146					;THE TEST PASSES IF THESE COMPARISONS AGREE.
  7147
  7148					Q11200:	DMOVE	AC,[XWD 707070,707070
  7149	035172	120 04 0 00 036742 			    XWD 070707,070707]  ;INITIALIZE AC,AC+1
  7150	035173	460 11 0 00 036741 		SETCM	AC+5,[XWD 0,0]	;INITIALIZE TEST WORDS FOR COMPARISON
  7151						IFIDN	<0,1><0,0>,<
  7152						SETZ	AC+6,
  7153						ADDI	AC+5,1	>
  7154						IFIDN	<0,1><400000,0>,<
  7155						SETZ	AC+6,
  7156						ADDI	AC+5,1	>
  7157						IFDIF	<0,1><0,0>,<
  7158						IFDIF	<0,1><400000,0>,<
  7159	035174	210 12 0 00 036754 		MOVN	AC+6,[XWD 0,1]
  7160	035175	621 12 0 00 400000 		TLZ	AC+6,1B18	;CLEAR SIGN BIT OF LOW ORDER WORD >>
  7161						DMOVN	AC,[XWD 0,0	;*MOVE NEGATIVE OF DOUBLE WORD 0,0 ;
  7162	035176	121 04 0 00 036755 			    XWD 0,1]	;0,1 FROM MEMORY TO AC, AC+1
  7163	035177	312 04 0 00 000011 		CAME	AC,<AC+5>&17	;WAS AC LOADED CORRECTLY?
  7164	035200	003 04 0 00 011201 		ER3	AC,11201	;FAIL IF CONTENTS(AC) NOT = COMPLEMENT OF 0,0
  7165	035201	312 05 0 00 000012 		CAME	AC+1,<AC+6>&17	;WAS AC+1 LOADED CORRECTLY?
  7166	035202	004 05 0 00 011202 		ER4	AC+1,11202	;FAIL IF CONTENTS(AC+1) NOT = MINUS 0,1
  7167	035203	321 10 0 00 035172 		JUMPL	SAC,Q11200	;LOOP ON ERROR SWITCH^
  7168					PAGE
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 40-3
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVN - GENERAL DATA PATTERNS                                 SEQ 0175

  7169						DMVN	1130,-1,-1,0,1^
  7170					;THIS MACRO TESTS THE DMOVN INSTRUCTION
  7171					;FIRST, AC, AC+1 ARE PRELOADED WITH DATA OTHER THAN THE TEST WORDS.
  7172					;THEN, THE NEGATIVE (TWOS COMPLEMENT) OF THE DATA SPECIFIED BY
  7173					;[XWD -1,-1] AND [XWD 0,1] IS MOVED FROM MEMORY TO AC, AC+1 VIA
  7174					;THE DMOVN INSTRUCTION.  0(AC) AND 0(AC+1) ARE THEN COMPARED
  7175					;WITH THE NEGATIVE (TWOS COMPLEMENT) OF THE TEST
  7176					;WORDS [XWD -1,-1] AND [XWD 0,1], RESPECTIVELY.
  7177					;THE TEST PASSES IF THESE COMPARISONS AGREE.
  7178
  7179					Q11300:	DMOVE	AC,[XWD 707070,707070
  7180	035204	120 04 0 00 036742 			    XWD 070707,070707]  ;INITIALIZE AC,AC+1
  7181	035205	460 11 0 00 036746 		SETCM	AC+5,[XWD -1,-1]	;INITIALIZE TEST WORDS FOR COMPARISON
  7182						IFIDN	<0,1><0,0>,<
  7183						SETZ	AC+6,
  7184						ADDI	AC+5,1	>
  7185						IFIDN	<0,1><400000,0>,<
  7186						SETZ	AC+6,
  7187						ADDI	AC+5,1	>
  7188						IFDIF	<0,1><0,0>,<
  7189						IFDIF	<0,1><400000,0>,<
  7190	035206	210 12 0 00 036754 		MOVN	AC+6,[XWD 0,1]
  7191	035207	621 12 0 00 400000 		TLZ	AC+6,1B18	;CLEAR SIGN BIT OF LOW ORDER WORD >>
  7192						DMOVN	AC,[XWD -1,-1	;*MOVE NEGATIVE OF DOUBLE WORD -1,-1 ;
  7193	035210	121 04 0 00 036757 			    XWD 0,1]	;0,1 FROM MEMORY TO AC, AC+1
  7194	035211	312 04 0 00 000011 		CAME	AC,<AC+5>&17	;WAS AC LOADED CORRECTLY?
  7195	035212	003 04 0 00 011301 		ER3	AC,11301	;FAIL IF CONTENTS(AC) NOT = COMPLEMENT OF -1,-1
  7196	035213	312 05 0 00 000012 		CAME	AC+1,<AC+6>&17	;WAS AC+1 LOADED CORRECTLY?
  7197	035214	004 05 0 00 011302 		ER4	AC+1,11302	;FAIL IF CONTENTS(AC+1) NOT = MINUS 0,1
  7198	035215	321 10 0 00 035204 		JUMPL	SAC,Q11300	;LOOP ON ERROR SWITCH^
  7199					PAGE
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 40-4
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVN - GENERAL DATA PATTERNS                                 SEQ 0176

  7200						DMVN	1140,0,1,0,0^
  7201					;THIS MACRO TESTS THE DMOVN INSTRUCTION
  7202					;FIRST, AC, AC+1 ARE PRELOADED WITH DATA OTHER THAN THE TEST WORDS.
  7203					;THEN, THE NEGATIVE (TWOS COMPLEMENT) OF THE DATA SPECIFIED BY
  7204					;[XWD 0,1] AND [XWD 0,0] IS MOVED FROM MEMORY TO AC, AC+1 VIA
  7205					;THE DMOVN INSTRUCTION.  0(AC) AND 0(AC+1) ARE THEN COMPARED
  7206					;WITH THE NEGATIVE (TWOS COMPLEMENT) OF THE TEST
  7207					;WORDS [XWD 0,1] AND [XWD 0,0], RESPECTIVELY.
  7208					;THE TEST PASSES IF THESE COMPARISONS AGREE.
  7209
  7210					Q11400:	DMOVE	AC,[XWD 707070,707070
  7211	035216	120 04 0 00 036742 			    XWD 070707,070707]  ;INITIALIZE AC,AC+1
  7212	035217	460 11 0 00 036754 		SETCM	AC+5,[XWD 0,1]	;INITIALIZE TEST WORDS FOR COMPARISON
  7213						IFIDN	<0,0><0,0>,<
  7214	035220	400 12 0 00 000000 		SETZ	AC+6,
  7215	035221	271 11 0 00 000001 		ADDI	AC+5,1	>
  7216						IFIDN	<0,0><400000,0>,<
  7217						SETZ	AC+6,
  7218						ADDI	AC+5,1	>
  7219						IFDIF	<0,0><0,0>,<
  7220						IFDIF	<0,0><400000,0>,<
  7221						MOVN	AC+6,[XWD 0,0]
  7222						TLZ	AC+6,1B18	;CLEAR SIGN BIT OF LOW ORDER WORD >>
  7223						DMOVN	AC,[XWD 0,1	;*MOVE NEGATIVE OF DOUBLE WORD 0,1 ;
  7224	035222	121 04 0 00 036754 			    XWD 0,0]	;0,0 FROM MEMORY TO AC, AC+1
  7225	035223	312 04 0 00 000011 		CAME	AC,<AC+5>&17	;WAS AC LOADED CORRECTLY?
  7226	035224	003 04 0 00 011401 		ER3	AC,11401	;FAIL IF CONTENTS(AC) NOT = COMPLEMENT OF 0,1
  7227	035225	312 05 0 00 000012 		CAME	AC+1,<AC+6>&17	;WAS AC+1 LOADED CORRECTLY?
  7228	035226	004 05 0 00 011402 		ER4	AC+1,11402	;FAIL IF CONTENTS(AC+1) NOT = MINUS 0,0
  7229	035227	321 10 0 00 035216 		JUMPL	SAC,Q11400	;LOOP ON ERROR SWITCH^
  7230					PAGE
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 40-5
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVN - GENERAL DATA PATTERNS                                 SEQ 0177

  7231						DMVN	1150,525252,525252,252525,252526^
  7232					;THIS MACRO TESTS THE DMOVN INSTRUCTION
  7233					;FIRST, AC, AC+1 ARE PRELOADED WITH DATA OTHER THAN THE TEST WORDS.
  7234					;THEN, THE NEGATIVE (TWOS COMPLEMENT) OF THE DATA SPECIFIED BY
  7235					;[XWD 525252,525252] AND [XWD 252525,252526] IS MOVED FROM MEMORY TO AC, AC+1 VIA
  7236					;THE DMOVN INSTRUCTION.  252525(AC) AND 252525(AC+1) ARE THEN COMPARED
  7237					;WITH THE NEGATIVE (TWOS COMPLEMENT) OF THE TEST
  7238					;WORDS [XWD 525252,525252] AND [XWD 252525,252526], RESPECTIVELY.
  7239					;THE TEST PASSES IF THESE COMPARISONS AGREE.
  7240
  7241					Q11500:	DMOVE	AC,[XWD 707070,707070
  7242	035230	120 04 0 00 036742 			    XWD 070707,070707]  ;INITIALIZE AC,AC+1
  7243	035231	460 11 0 00 036751 		SETCM	AC+5,[XWD 525252,525252]	;INITIALIZE TEST WORDS FOR COMPARISON
  7244						IFIDN	<252525,252526><0,0>,<
  7245						SETZ	AC+6,
  7246						ADDI	AC+5,1	>
  7247						IFIDN	<252525,252526><400000,0>,<
  7248						SETZ	AC+6,
  7249						ADDI	AC+5,1	>
  7250						IFDIF	<252525,252526><0,0>,<
  7251						IFDIF	<252525,252526><400000,0>,<
  7252	035232	210 12 0 00 036761 		MOVN	AC+6,[XWD 252525,252526]
  7253	035233	621 12 0 00 400000 		TLZ	AC+6,1B18	;CLEAR SIGN BIT OF LOW ORDER WORD >>
  7254						DMOVN	AC,[XWD 525252,525252	;*MOVE NEGATIVE OF DOUBLE WORD 525252,525252 ;
  7255	035234	121 04 0 00 036762 			    XWD 252525,252526]	;252525,252526 FROM MEMORY TO AC, AC+1
  7256	035235	312 04 0 00 000011 		CAME	AC,<AC+5>&17	;WAS AC LOADED CORRECTLY?
  7257	035236	003 04 0 00 011501 		ER3	AC,11501	;FAIL IF CONTENTS(AC) NOT = COMPLEMENT OF 525252,525252
  7258	035237	312 05 0 00 000012 		CAME	AC+1,<AC+6>&17	;WAS AC+1 LOADED CORRECTLY?
  7259	035240	004 05 0 00 011502 		ER4	AC+1,11502	;FAIL IF CONTENTS(AC+1) NOT = MINUS 252525,252526
  7260	035241	321 10 0 00 035230 		JUMPL	SAC,Q11500	;LOOP ON ERROR SWITCH^
  7261					PAGE
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 40-6
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVN - GENERAL DATA PATTERNS                                 SEQ 0178

  7262						DMVN	1160,252525,252525,525252,525253^
  7263					;THIS MACRO TESTS THE DMOVN INSTRUCTION
  7264					;FIRST, AC, AC+1 ARE PRELOADED WITH DATA OTHER THAN THE TEST WORDS.
  7265					;THEN, THE NEGATIVE (TWOS COMPLEMENT) OF THE DATA SPECIFIED BY
  7266					;[XWD 252525,252525] AND [XWD 525252,525253] IS MOVED FROM MEMORY TO AC, AC+1 VIA
  7267					;THE DMOVN INSTRUCTION.  525252(AC) AND 525252(AC+1) ARE THEN COMPARED
  7268					;WITH THE NEGATIVE (TWOS COMPLEMENT) OF THE TEST
  7269					;WORDS [XWD 252525,252525] AND [XWD 525252,525253], RESPECTIVELY.
  7270					;THE TEST PASSES IF THESE COMPARISONS AGREE.
  7271
  7272					Q11600:	DMOVE	AC,[XWD 707070,707070
  7273	035242	120 04 0 00 036742 			    XWD 070707,070707]  ;INITIALIZE AC,AC+1
  7274	035243	460 11 0 00 036736 		SETCM	AC+5,[XWD 252525,252525]	;INITIALIZE TEST WORDS FOR COMPARISON
  7275						IFIDN	<525252,525253><0,0>,<
  7276						SETZ	AC+6,
  7277						ADDI	AC+5,1	>
  7278						IFIDN	<525252,525253><400000,0>,<
  7279						SETZ	AC+6,
  7280						ADDI	AC+5,1	>
  7281						IFDIF	<525252,525253><0,0>,<
  7282						IFDIF	<525252,525253><400000,0>,<
  7283	035244	210 12 0 00 036764 		MOVN	AC+6,[XWD 525252,525253]
  7284	035245	621 12 0 00 400000 		TLZ	AC+6,1B18	;CLEAR SIGN BIT OF LOW ORDER WORD >>
  7285						DMOVN	AC,[XWD 252525,252525	;*MOVE NEGATIVE OF DOUBLE WORD 252525,252525 ;
  7286	035246	121 04 0 00 036765 			    XWD 525252,525253]	;525252,525253 FROM MEMORY TO AC, AC+1
  7287	035247	312 04 0 00 000011 		CAME	AC,<AC+5>&17	;WAS AC LOADED CORRECTLY?
  7288	035250	003 04 0 00 011601 		ER3	AC,11601	;FAIL IF CONTENTS(AC) NOT = COMPLEMENT OF 252525,252525
  7289	035251	312 05 0 00 000012 		CAME	AC+1,<AC+6>&17	;WAS AC+1 LOADED CORRECTLY?
  7290	035252	004 05 0 00 011602 		ER4	AC+1,11602	;FAIL IF CONTENTS(AC+1) NOT = MINUS 525252,525253
  7291	035253	321 10 0 00 035242 		JUMPL	SAC,Q11600	;LOOP ON ERROR SWITCH^
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 41
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVN - AC=17, AC+1=0                                         SEQ 0179

  7292					SUBTTL	DIAGNOSTIC SECTION - DMOVN - AC=17, AC+1=0
  7293
  7294					;CHECK DMOVN FOR AC=17 AND AC+1=0
  7295
  7296			000017			AC=17
  7297			000003			SAC=<AC+4>&17
  7298						SAVEAC	(1,1)^
  7299	035254	201 03 0 00 035254 		MOVEI	SAC,.
  7300	035255	202 03 0 00 030051 		MOVEM	SAC,TESTPC	;SETUP SUBTEST PC
  7301	035256	201 03 0 00 000003 		MOVEI	SAC,SAC		;INFORM ERROR ROUTINE WHICH
  7302	035257	202 03 0 00 037213 		MOVEM	SAC,ERRLOP#	;AC IS USED FOR ITERATION^
  7303
  7304						DMVN17	1170,0,0,0,1^
  7305					;THIS MACRO TESTS THE DMOVN INSTRUCTION
  7306					;FIRST, AC, AC+1 ARE PRELOADED WITH DATA OTHER THAN THE TEST WORDS.
  7307					;THEN, THE NEGATIVE (TWOS COMPLEMENT) OF THE DATA SPECIFIED BY
  7308					;[XWD 0,0] AND [XWD 0,1] IS MOVED FROM MEMORY TO AC, AC+1 VIA
  7309					;THE DMOVN INSTRUCTION.  0(AC) AND 0(AC+1) ARE THEN COMPARED
  7310					;WITH THE NEGATIVE (TWOS COMPLEMENT) OF THE TEST
  7311					;WORDS [XWD 0,0] AND [XWD 0,1], RESPECTIVELY.
  7312					;THE TEST PASSES IF THESE COMPARISONS AGREE.
  7313
  7314	035260	202 17 0 00 037223 	Q11700:	MOVEM	AC,%SV17	;SAVE P
  7315						DMOVE	AC,[XWD 707070,707070
  7316	035261	120 17 0 00 036742 			    XWD 070707,070707]  ;INITIALIZE AC,AC+1
  7317	035262	460 04 0 00 036741 		SETCM	AC+5,[XWD 0,0]	;INITIALIZE TEST WORDS FOR COMPARISON
  7318						IFIDN	<0,1><0,0>,<
  7319						SETZ	AC+6,
  7320						ADDI	AC+5,1	>
  7321						IFIDN	<0,1><400000,0>,<
  7322						SETZ	AC+6,
  7323						ADDI	AC+5,1	>
  7324						IFDIF	<0,1><0,0>,<
  7325						IFDIF	<0,1><400000,0>,<
  7326	035263	210 05 0 00 036754 		MOVN	AC+6,[XWD 0,1]
  7327	035264	621 05 0 00 400000 		TLZ	AC+6,1B18	;CLEAR SIGN BIT OF LOW ORDER WORD >>
  7328						DMOVN	AC,[XWD 0,0	;*MOVE NEGATIVE OF DOUBLE WORD 0,0 ;
  7329	035265	121 17 0 00 036755 			    XWD 0,1]	;0,1 FROM MEMORY TO AC, AC+1
  7330	035266	316 17 0 00 000004 		CAMN	AC,<AC+5>&17	;WAS AC LOADED CORRECTLY?
  7331	035267	254 00 0 00 035273 		JRST	.+4		;HERE IF TESTS OK
  7332	035270	202 17 0 00 000016 		MOVEM	AC,AC-1		;SAVE BAD WORD
  7333	035271	200 17 0 00 037223 		MOVE	AC,%SV17	;RESTORE P
  7334	035272	003 16 0 00 011701 		ER3	AC-1,11701	;FAIL IF CONTENTS(AC) NOT = COMPLEMENT OF 0,0
  7335	035273	316 00 0 00 000005 		CAMN	AC+1,<AC+6>&17	;WAS AC+1 LOADED CORRECTLY?
  7336	035274	254 00 0 00 035300 		JRST	.+4		;HERE IF TESTS OK
  7337	035275	202 17 0 00 000016 		MOVEM	AC,AC-1
  7338	035276	200 17 0 00 037223 		MOVE	AC,%SV17	;RESTORE P
  7339	035277	004 00 0 00 011702 		ER4	AC+1,11702	;FAIL IF CONTENTS(AC+1) NOT = MINUS 0,1
  7340	035300	200 17 0 00 037223 		MOVE	AC,%SV17	;RESTORE P UNCODITIONALLY
  7341	035301	321 03 0 00 035260 		JUMPL	SAC,Q11700	;LOOP ON ERROR SWITCH^
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 42
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVN - AC RANGE ADDRESS                                      SEQ 0180

  7342					SUBTTL	DIAGNOSTIC SECTION - DMOVN - AC RANGE ADDRESS
  7343
  7344					;CHECK DMOVN WHERE 'E' IS WITHIN THE 'AC' RANGE
  7345
  7346			000004			AC=4
  7347			000010			SAC=<AC+4>&17
  7348						SAVEAC	(1,1)^
  7349	035302	201 10 0 00 035302 		MOVEI	SAC,.
  7350	035303	202 10 0 00 030051 		MOVEM	SAC,TESTPC	;SETUP SUBTEST PC
  7351	035304	201 10 0 00 000010 		MOVEI	SAC,SAC		;INFORM ERROR ROUTINE WHICH
  7352	035305	202 10 0 00 037213 		MOVEM	SAC,ERRLOP#	;AC IS USED FOR ITERATION^
  7353			000002			E=AC-2
  7354
  7355			012000		SN=12000
  7356			000001			E=<E-1>&17
  7357
  7358					Q12000:	REPEAT	^D5,
  7359					<SN=SN+1
  7360						E=<E+1>&17
  7361						DMOVE	AC,[XWD 707070,707070
  7362							    XWD 070707,070707]	;INITIALIZE AC,AC+1
  7363						SETCM	AC+5,[XWD 0,0]	;INITIALIZE TEST WORDS
  7364						MOVN	AC+6,[XWD 0,-1]	;FOR COMPARISON
  7365						TLZ	AC+6,1B18	;CLEAR SIGN BIT OF LOW ORDER WORD
  7366						DMOVE	E,[XWD 0,0
  7367							   XWD 0,-1]	;INITIALIZE E,E+1
  7368						DMOVN	AC,E		;*MOVE NEGATIVE OF DOUBLE WORD FROM E, E+1 TO AC, AC+1
  7369						CAME	AC,<AC+5>&17	;DID DMOVN GET CORRECT C(E)?
  7370						ER3	AC,SN		;FAIL IF C(AC) NOT = 2'S COMPL OF C(E)
  7371						CAME	AC+1,<AC+6>&17	;DID DMOVN GET CORRECT C(E+1)?
  7372						ER4	AC+1,SN		;FAIL IF C(AC+1) NOT = 2'S COMPL OF C(E+1)
  7373						JUMPL	SAC,.-^D8	;LOOP ON ERROR SWITCH
  7374					>
  7375			012001		SN=SN+1
  7376			000002			E=<E+1>&17
  7377						DMOVE	AC,[XWD 707070,707070
  7378	035306	120 04 0 00 036742 			    XWD 070707,070707]	;INITIALIZE AC,AC+1
  7379	035307	460 11 0 00 036741 		SETCM	AC+5,[XWD 0,0]	;INITIALIZE TEST WORDS
  7380	035310	210 12 0 00 036767 		MOVN	AC+6,[XWD 0,-1]	;FOR COMPARISON
  7381	035311	621 12 0 00 400000 		TLZ	AC+6,1B18	;CLEAR SIGN BIT OF LOW ORDER WORD
  7382						DMOVE	E,[XWD 0,0
  7383	035312	120 02 0 00 036770 			   XWD 0,-1]	;INITIALIZE E,E+1
  7384	035313	121 04 0 00 000002 		DMOVN	AC,E		;*MOVE NEGATIVE OF DOUBLE WORD FROM E, E+1 TO AC, AC+1
  7385	035314	312 04 0 00 000011 		CAME	AC,<AC+5>&17	;DID DMOVN GET CORRECT C(E)?
  7386	035315	003 04 0 00 012001 		ER3	AC,SN		;FAIL IF C(AC) NOT = 2'S COMPL OF C(E)
  7387	035316	312 05 0 00 000012 		CAME	AC+1,<AC+6>&17	;DID DMOVN GET CORRECT C(E+1)?
  7388	035317	004 05 0 00 012001 		ER4	AC+1,SN		;FAIL IF C(AC+1) NOT = 2'S COMPL OF C(E+1)
  7389	035320	321 10 0 00 035310 		JUMPL	SAC,.-^D8	;LOOP ON ERROR SWITCH
  7390
  7391			012002		SN=SN+1
  7392			000003			E=<E+1>&17
  7393						DMOVE	AC,[XWD 707070,707070
  7394	035321	120 04 0 00 036742 			    XWD 070707,070707]	;INITIALIZE AC,AC+1
  7395	035322	460 11 0 00 036741 		SETCM	AC+5,[XWD 0,0]	;INITIALIZE TEST WORDS
  7396	035323	210 12 0 00 036767 		MOVN	AC+6,[XWD 0,-1]	;FOR COMPARISON
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 42-1
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVN - AC RANGE ADDRESS                                      SEQ 0181

  7397	035324	621 12 0 00 400000 		TLZ	AC+6,1B18	;CLEAR SIGN BIT OF LOW ORDER WORD
  7398						DMOVE	E,[XWD 0,0
  7399	035325	120 03 0 00 036770 			   XWD 0,-1]	;INITIALIZE E,E+1
  7400	035326	121 04 0 00 000003 		DMOVN	AC,E		;*MOVE NEGATIVE OF DOUBLE WORD FROM E, E+1 TO AC, AC+1
  7401	035327	312 04 0 00 000011 		CAME	AC,<AC+5>&17	;DID DMOVN GET CORRECT C(E)?
  7402	035330	003 04 0 00 012002 		ER3	AC,SN		;FAIL IF C(AC) NOT = 2'S COMPL OF C(E)
  7403	035331	312 05 0 00 000012 		CAME	AC+1,<AC+6>&17	;DID DMOVN GET CORRECT C(E+1)?
  7404	035332	004 05 0 00 012002 		ER4	AC+1,SN		;FAIL IF C(AC+1) NOT = 2'S COMPL OF C(E+1)
  7405	035333	321 10 0 00 035323 		JUMPL	SAC,.-^D8	;LOOP ON ERROR SWITCH
  7406
  7407			012003		SN=SN+1
  7408			000004			E=<E+1>&17
  7409						DMOVE	AC,[XWD 707070,707070
  7410	035334	120 04 0 00 036742 			    XWD 070707,070707]	;INITIALIZE AC,AC+1
  7411	035335	460 11 0 00 036741 		SETCM	AC+5,[XWD 0,0]	;INITIALIZE TEST WORDS
  7412	035336	210 12 0 00 036767 		MOVN	AC+6,[XWD 0,-1]	;FOR COMPARISON
  7413	035337	621 12 0 00 400000 		TLZ	AC+6,1B18	;CLEAR SIGN BIT OF LOW ORDER WORD
  7414						DMOVE	E,[XWD 0,0
  7415	035340	120 04 0 00 036770 			   XWD 0,-1]	;INITIALIZE E,E+1
  7416	035341	121 04 0 00 000004 		DMOVN	AC,E		;*MOVE NEGATIVE OF DOUBLE WORD FROM E, E+1 TO AC, AC+1
  7417	035342	312 04 0 00 000011 		CAME	AC,<AC+5>&17	;DID DMOVN GET CORRECT C(E)?
  7418	035343	003 04 0 00 012003 		ER3	AC,SN		;FAIL IF C(AC) NOT = 2'S COMPL OF C(E)
  7419	035344	312 05 0 00 000012 		CAME	AC+1,<AC+6>&17	;DID DMOVN GET CORRECT C(E+1)?
  7420	035345	004 05 0 00 012003 		ER4	AC+1,SN		;FAIL IF C(AC+1) NOT = 2'S COMPL OF C(E+1)
  7421	035346	321 10 0 00 035336 		JUMPL	SAC,.-^D8	;LOOP ON ERROR SWITCH
  7422
  7423			012004		SN=SN+1
  7424			000005			E=<E+1>&17
  7425						DMOVE	AC,[XWD 707070,707070
  7426	035347	120 04 0 00 036742 			    XWD 070707,070707]	;INITIALIZE AC,AC+1
  7427	035350	460 11 0 00 036741 		SETCM	AC+5,[XWD 0,0]	;INITIALIZE TEST WORDS
  7428	035351	210 12 0 00 036767 		MOVN	AC+6,[XWD 0,-1]	;FOR COMPARISON
  7429	035352	621 12 0 00 400000 		TLZ	AC+6,1B18	;CLEAR SIGN BIT OF LOW ORDER WORD
  7430						DMOVE	E,[XWD 0,0
  7431	035353	120 05 0 00 036770 			   XWD 0,-1]	;INITIALIZE E,E+1
  7432	035354	121 04 0 00 000005 		DMOVN	AC,E		;*MOVE NEGATIVE OF DOUBLE WORD FROM E, E+1 TO AC, AC+1
  7433	035355	312 04 0 00 000011 		CAME	AC,<AC+5>&17	;DID DMOVN GET CORRECT C(E)?
  7434	035356	003 04 0 00 012004 		ER3	AC,SN		;FAIL IF C(AC) NOT = 2'S COMPL OF C(E)
  7435	035357	312 05 0 00 000012 		CAME	AC+1,<AC+6>&17	;DID DMOVN GET CORRECT C(E+1)?
  7436	035360	004 05 0 00 012004 		ER4	AC+1,SN		;FAIL IF C(AC+1) NOT = 2'S COMPL OF C(E+1)
  7437	035361	321 10 0 00 035351 		JUMPL	SAC,.-^D8	;LOOP ON ERROR SWITCH
  7438
  7439			012005		SN=SN+1
  7440			000006			E=<E+1>&17
  7441						DMOVE	AC,[XWD 707070,707070
  7442	035362	120 04 0 00 036742 			    XWD 070707,070707]	;INITIALIZE AC,AC+1
  7443	035363	460 11 0 00 036741 		SETCM	AC+5,[XWD 0,0]	;INITIALIZE TEST WORDS
  7444	035364	210 12 0 00 036767 		MOVN	AC+6,[XWD 0,-1]	;FOR COMPARISON
  7445	035365	621 12 0 00 400000 		TLZ	AC+6,1B18	;CLEAR SIGN BIT OF LOW ORDER WORD
  7446						DMOVE	E,[XWD 0,0
  7447	035366	120 06 0 00 036770 			   XWD 0,-1]	;INITIALIZE E,E+1
  7448	035367	121 04 0 00 000006 		DMOVN	AC,E		;*MOVE NEGATIVE OF DOUBLE WORD FROM E, E+1 TO AC, AC+1
  7449	035370	312 04 0 00 000011 		CAME	AC,<AC+5>&17	;DID DMOVN GET CORRECT C(E)?
  7450	035371	003 04 0 00 012005 		ER3	AC,SN		;FAIL IF C(AC) NOT = 2'S COMPL OF C(E)
  7451	035372	312 05 0 00 000012 		CAME	AC+1,<AC+6>&17	;DID DMOVN GET CORRECT C(E+1)?
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 42-2
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVN - AC RANGE ADDRESS                                      SEQ 0182

  7452	035373	004 05 0 00 012005 		ER4	AC+1,SN		;FAIL IF C(AC+1) NOT = 2'S COMPL OF C(E+1)
  7453	035374	321 10 0 00 035364 		JUMPL	SAC,.-^D8	;LOOP ON ERROR SWITCH
  7454
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 43
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVN - GENERAL DATA PATTERNS                                 SEQ 0183

  7455					SUBTTL	DIAGNOSTIC SECTION - DMOVN - GENERAL DATA PATTERNS
  7456
  7457						DMVN	1210,400000,0,0,0^
  7458					;THIS MACRO TESTS THE DMOVN INSTRUCTION
  7459					;FIRST, AC, AC+1 ARE PRELOADED WITH DATA OTHER THAN THE TEST WORDS.
  7460					;THEN, THE NEGATIVE (TWOS COMPLEMENT) OF THE DATA SPECIFIED BY
  7461					;[XWD 400000,0] AND [XWD 0,0] IS MOVED FROM MEMORY TO AC, AC+1 VIA
  7462					;THE DMOVN INSTRUCTION.  0(AC) AND 0(AC+1) ARE THEN COMPARED
  7463					;WITH THE NEGATIVE (TWOS COMPLEMENT) OF THE TEST
  7464					;WORDS [XWD 400000,0] AND [XWD 0,0], RESPECTIVELY.
  7465					;THE TEST PASSES IF THESE COMPARISONS AGREE.
  7466
  7467					Q12100:	DMOVE	AC,[XWD 707070,707070
  7468	035375	120 04 0 00 036742 			    XWD 070707,070707]  ;INITIALIZE AC,AC+1
  7469	035376	460 11 0 00 036772 		SETCM	AC+5,[XWD 400000,0]	;INITIALIZE TEST WORDS FOR COMPARISON
  7470						IFIDN	<0,0><0,0>,<
  7471	035377	400 12 0 00 000000 		SETZ	AC+6,
  7472	035400	271 11 0 00 000001 		ADDI	AC+5,1	>
  7473						IFIDN	<0,0><400000,0>,<
  7474						SETZ	AC+6,
  7475						ADDI	AC+5,1	>
  7476						IFDIF	<0,0><0,0>,<
  7477						IFDIF	<0,0><400000,0>,<
  7478						MOVN	AC+6,[XWD 0,0]
  7479						TLZ	AC+6,1B18	;CLEAR SIGN BIT OF LOW ORDER WORD >>
  7480						DMOVN	AC,[XWD 400000,0	;*MOVE NEGATIVE OF DOUBLE WORD 400000,0 ;
  7481	035401	121 04 0 00 036772 			    XWD 0,0]	;0,0 FROM MEMORY TO AC, AC+1
  7482	035402	312 04 0 00 000011 		CAME	AC,<AC+5>&17	;WAS AC LOADED CORRECTLY?
  7483	035403	003 04 0 00 012101 		ER3	AC,12101	;FAIL IF CONTENTS(AC) NOT = COMPLEMENT OF 400000,0
  7484	035404	312 05 0 00 000012 		CAME	AC+1,<AC+6>&17	;WAS AC+1 LOADED CORRECTLY?
  7485	035405	004 05 0 00 012102 		ER4	AC+1,12102	;FAIL IF CONTENTS(AC+1) NOT = MINUS 0,0
  7486	035406	321 10 0 00 035375 		JUMPL	SAC,Q12100	;LOOP ON ERROR SWITCH^
  7487					PAGE
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 43-1
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVN - GENERAL DATA PATTERNS                                 SEQ 0184

  7488						DMVN	1220,0,0,400000,0^
  7489					;THIS MACRO TESTS THE DMOVN INSTRUCTION
  7490					;FIRST, AC, AC+1 ARE PRELOADED WITH DATA OTHER THAN THE TEST WORDS.
  7491					;THEN, THE NEGATIVE (TWOS COMPLEMENT) OF THE DATA SPECIFIED BY
  7492					;[XWD 0,0] AND [XWD 400000,0] IS MOVED FROM MEMORY TO AC, AC+1 VIA
  7493					;THE DMOVN INSTRUCTION.  400000(AC) AND 400000(AC+1) ARE THEN COMPARED
  7494					;WITH THE NEGATIVE (TWOS COMPLEMENT) OF THE TEST
  7495					;WORDS [XWD 0,0] AND [XWD 400000,0], RESPECTIVELY.
  7496					;THE TEST PASSES IF THESE COMPARISONS AGREE.
  7497
  7498					Q12200:	DMOVE	AC,[XWD 707070,707070
  7499	035407	120 04 0 00 036742 			    XWD 070707,070707]  ;INITIALIZE AC,AC+1
  7500	035410	460 11 0 00 036741 		SETCM	AC+5,[XWD 0,0]	;INITIALIZE TEST WORDS FOR COMPARISON
  7501						IFIDN	<400000,0><0,0>,<
  7502						SETZ	AC+6,
  7503						ADDI	AC+5,1	>
  7504						IFIDN	<400000,0><400000,0>,<
  7505	035411	400 12 0 00 000000 		SETZ	AC+6,
  7506	035412	271 11 0 00 000001 		ADDI	AC+5,1	>
  7507						IFDIF	<400000,0><0,0>,<
  7508						IFDIF	<400000,0><400000,0>,<
  7509						MOVN	AC+6,[XWD 400000,0]
  7510						TLZ	AC+6,1B18	;CLEAR SIGN BIT OF LOW ORDER WORD >>
  7511						DMOVN	AC,[XWD 0,0	;*MOVE NEGATIVE OF DOUBLE WORD 0,0 ;
  7512	035413	121 04 0 00 036773 			    XWD 400000,0]	;400000,0 FROM MEMORY TO AC, AC+1
  7513	035414	312 04 0 00 000011 		CAME	AC,<AC+5>&17	;WAS AC LOADED CORRECTLY?
  7514	035415	003 04 0 00 012201 		ER3	AC,12201	;FAIL IF CONTENTS(AC) NOT = COMPLEMENT OF 0,0
  7515	035416	312 05 0 00 000012 		CAME	AC+1,<AC+6>&17	;WAS AC+1 LOADED CORRECTLY?
  7516	035417	004 05 0 00 012202 		ER4	AC+1,12202	;FAIL IF CONTENTS(AC+1) NOT = MINUS 400000,0
  7517	035420	321 10 0 00 035407 		JUMPL	SAC,Q12200	;LOOP ON ERROR SWITCH^
  7518					PAGE
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 43-2
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVN - GENERAL DATA PATTERNS                                 SEQ 0185

  7519						DMVN	1230,400000,0,400000,0^
  7520					;THIS MACRO TESTS THE DMOVN INSTRUCTION
  7521					;FIRST, AC, AC+1 ARE PRELOADED WITH DATA OTHER THAN THE TEST WORDS.
  7522					;THEN, THE NEGATIVE (TWOS COMPLEMENT) OF THE DATA SPECIFIED BY
  7523					;[XWD 400000,0] AND [XWD 400000,0] IS MOVED FROM MEMORY TO AC, AC+1 VIA
  7524					;THE DMOVN INSTRUCTION.  400000(AC) AND 400000(AC+1) ARE THEN COMPARED
  7525					;WITH THE NEGATIVE (TWOS COMPLEMENT) OF THE TEST
  7526					;WORDS [XWD 400000,0] AND [XWD 400000,0], RESPECTIVELY.
  7527					;THE TEST PASSES IF THESE COMPARISONS AGREE.
  7528
  7529					Q12300:	DMOVE	AC,[XWD 707070,707070
  7530	035421	120 04 0 00 036742 			    XWD 070707,070707]  ;INITIALIZE AC,AC+1
  7531	035422	460 11 0 00 036772 		SETCM	AC+5,[XWD 400000,0]	;INITIALIZE TEST WORDS FOR COMPARISON
  7532						IFIDN	<400000,0><0,0>,<
  7533						SETZ	AC+6,
  7534						ADDI	AC+5,1	>
  7535						IFIDN	<400000,0><400000,0>,<
  7536	035423	400 12 0 00 000000 		SETZ	AC+6,
  7537	035424	271 11 0 00 000001 		ADDI	AC+5,1	>
  7538						IFDIF	<400000,0><0,0>,<
  7539						IFDIF	<400000,0><400000,0>,<
  7540						MOVN	AC+6,[XWD 400000,0]
  7541						TLZ	AC+6,1B18	;CLEAR SIGN BIT OF LOW ORDER WORD >>
  7542						DMOVN	AC,[XWD 400000,0	;*MOVE NEGATIVE OF DOUBLE WORD 400000,0 ;
  7543	035425	121 04 0 00 036774 			    XWD 400000,0]	;400000,0 FROM MEMORY TO AC, AC+1
  7544	035426	312 04 0 00 000011 		CAME	AC,<AC+5>&17	;WAS AC LOADED CORRECTLY?
  7545	035427	003 04 0 00 012301 		ER3	AC,12301	;FAIL IF CONTENTS(AC) NOT = COMPLEMENT OF 400000,0
  7546	035430	312 05 0 00 000012 		CAME	AC+1,<AC+6>&17	;WAS AC+1 LOADED CORRECTLY?
  7547	035431	004 05 0 00 012302 		ER4	AC+1,12302	;FAIL IF CONTENTS(AC+1) NOT = MINUS 400000,0
  7548	035432	321 10 0 00 035421 		JUMPL	SAC,Q12300	;LOOP ON ERROR SWITCH^
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 44
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVN - OVERFLOW AND CARRY FLAGS                              SEQ 0186

  7549					SUBTTL	DIAGNOSTIC SECTION - DMOVN - OVERFLOW AND CARRY FLAGS
  7550
  7551					;CHECK ABILITY TO CLEAR OVFL AND CRY FLAGS BEFORE TESTING INTERACTION WITH DMOVN
  7552
  7553	035433	255 17 0 00 035434 	Q12400:	JFCL	17,.+1		;CLEAR OVFL AND CRY FLAGS
  7554	035434	265 04 0 00 035435 		JSP	AC,.+1		;READ FLAGS
  7555	035435	603 04 0 00 700000 		TLNE	AC,7B20		;TEST OVFL AND CRY FLAGS
  7556	035436	013 04 0 00 012401 		ER13	AC,12401	;FAIL IF OVFL OR CRY FLG SET
  7557	035437	321 10 0 00 035433 		JUMPL	SAC,Q12400	;LOOP ON ERROR SWITCH
  7558
  7559						DMVNF	1250,0,0,0,0,0,010000,300000,310000^
  7560					;**KI10**
  7561					;THIS MACRO VERIFIES THAT THE DMOVN INSTRUCTION DOES NOT SET OVERFLOW
  7562					;OR CARRY FLAGS ON THE KI10.  FIRST, OVFL AND CRY0,1 FLAGS ARE CLEARED;
  7563					;THEN,DMOVN IS EXECUTED.  NEXT, OVFL AND CRY0,1 FLAGS ARE EXAMINED.
  7564					;IF ANY OF THESE FLAGS ARE SET, THE TEST FAILS.
  7565
  7566					;**KL10**
  7567					;THIS MACRO VERIFIES THAT THE DMOVN INSTRUCTION DOES SET OVERFLOW
  7568					;OR CARRY FLAGS ON THE KL10.  FIRST, OVFL AND CRY0,1 FLAGS ARE CLEARED;
  7569					;THEN,DMOVN IS EXECUTED.  NEXT, OVFL AND CRY0,1 FLAGS ARE EXAMINED.
  7570					;IF THE PROPER FLAGS ARE NOT SET, THE TEST FAILS.
  7571
  7572	035440	255 17 0 00 035441 	Q12500:	JFCL	17,.+1		;CLEAR OVFL AND CRY0,1 FLAGS
  7573						DMOVN	AC+1,[XWD 0,0	;*DMOVN TEST
  7574	035441	121 05 0 00 036744 			      XWD 0,0]
  7575	035442	265 04 0 00 035443 		JSP	AC,.+1		;READ FLAGS
  7576	035443	621 04 0 00 027777 	Q12501:	TLZ	AC,027777	;CLEAR EXTRA JUNK
  7577	035444	603 04 0 00 010000 		TLNE	AC,USERF	;IN USER MODE ?
  7578	035445	254 00 0 00 035457 		JRST	Q12504		;YES
  7579	035446	332 00 0 00 030041 		SKIPE	KLFLG		;KL10 ?
  7580	035447	254 00 0 00 035454 		JRST	Q12503		;YES
  7581					;KI10 EXEC MODE
  7582	035450	312 04 0 00 036776 		CAME	AC,[0,,Q12501]
  7583	035451	013 04 0 00 012501 		ER13	AC,12501		;FAIL IF OVFL OR CRY0,1 FLG SET
  7584	035452	321 10 0 00 035440 	Q12502:	JUMPL	SAC,Q12500	;LOOP ON ERROR SWITCH
  7585	035453	254 00 0 00 035467 		JRST	Q12506
  7586					;KL10 EXEC MODE
  7587	035454	312 04 0 00 036777 	Q12503:	CAME	AC,[300000,,Q12501]
  7588	035455	013 04 0 00 012501 		ER13	AC,12501		;FAIL IF FLAGS NOT SET
  7589	035456	254 00 0 00 035452 		JRST	Q12502
  7590					;KL10/KI10 USER MODE
  7591	035457	332 00 0 00 030041 	Q12504:	SKIPE	KLFLG		;KL10 ?
  7592	035460	254 00 0 00 035464 		JRST	Q12505		;YES
  7593					;KI10 USER MODE
  7594	035461	312 04 0 00 037000 		CAME	AC,[010000,,Q12501]
  7595	035462	013 04 0 00 012501 		ER13	AC,12501		;FAIL IF ANY FLAGS SET
  7596	035463	254 00 0 00 035452 		JRST	Q12502
  7597					;KL10 USER MODE
  7598	035464	312 04 0 00 037001 	Q12505:	CAME	AC,[310000,,Q12501]
  7599	035465	013 04 0 00 012501 		ER13	AC,12501		;FAIL IF FLAGS NOT SET
  7600	035466	254 00 0 00 035452 		JRST	Q12502
  7601
  7602	035467	254 00 0 00 035470 	Q12506:	JRST	.+1^
  7603					PAGE
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 44-1
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVN - OVERFLOW AND CARRY FLAGS                              SEQ 0187

  7604						DMVNF	1260,400000,0,0,0,0,010000,100000,510000^
  7605					;**KI10**
  7606					;THIS MACRO VERIFIES THAT THE DMOVN INSTRUCTION DOES NOT SET OVERFLOW
  7607					;OR CARRY FLAGS ON THE KI10.  FIRST, OVFL AND CRY0,1 FLAGS ARE CLEARED;
  7608					;THEN,DMOVN IS EXECUTED.  NEXT, OVFL AND CRY0,1 FLAGS ARE EXAMINED.
  7609					;IF ANY OF THESE FLAGS ARE SET, THE TEST FAILS.
  7610
  7611					;**KL10**
  7612					;THIS MACRO VERIFIES THAT THE DMOVN INSTRUCTION DOES SET OVERFLOW
  7613					;OR CARRY FLAGS ON THE KL10.  FIRST, OVFL AND CRY0,1 FLAGS ARE CLEARED;
  7614					;THEN,DMOVN IS EXECUTED.  NEXT, OVFL AND CRY0,1 FLAGS ARE EXAMINED.
  7615					;IF THE PROPER FLAGS ARE NOT SET, THE TEST FAILS.
  7616
  7617	035470	255 17 0 00 035471 	Q12600:	JFCL	17,.+1		;CLEAR OVFL AND CRY0,1 FLAGS
  7618						DMOVN	AC+1,[XWD 400000,0	;*DMOVN TEST
  7619	035471	121 05 0 00 036772 			      XWD 0,0]
  7620	035472	265 04 0 00 035473 		JSP	AC,.+1		;READ FLAGS
  7621	035473	621 04 0 00 027777 	Q12601:	TLZ	AC,027777	;CLEAR EXTRA JUNK
  7622	035474	603 04 0 00 010000 		TLNE	AC,USERF	;IN USER MODE ?
  7623	035475	254 00 0 00 035507 		JRST	Q12604		;YES
  7624	035476	332 00 0 00 030041 		SKIPE	KLFLG		;KL10 ?
  7625	035477	254 00 0 00 035504 		JRST	Q12603		;YES
  7626					;KI10 EXEC MODE
  7627	035500	312 04 0 00 037002 		CAME	AC,[0,,Q12601]
  7628	035501	013 04 0 00 012601 		ER13	AC,12601		;FAIL IF OVFL OR CRY0,1 FLG SET
  7629	035502	321 10 0 00 035470 	Q12602:	JUMPL	SAC,Q12600	;LOOP ON ERROR SWITCH
  7630	035503	254 00 0 00 035517 		JRST	Q12606
  7631					;KL10 EXEC MODE
  7632	035504	312 04 0 00 037003 	Q12603:	CAME	AC,[100000,,Q12601]
  7633	035505	013 04 0 00 012601 		ER13	AC,12601		;FAIL IF FLAGS NOT SET
  7634	035506	254 00 0 00 035502 		JRST	Q12602
  7635					;KL10/KI10 USER MODE
  7636	035507	332 00 0 00 030041 	Q12604:	SKIPE	KLFLG		;KL10 ?
  7637	035510	254 00 0 00 035514 		JRST	Q12605		;YES
  7638					;KI10 USER MODE
  7639	035511	312 04 0 00 037004 		CAME	AC,[010000,,Q12601]
  7640	035512	013 04 0 00 012601 		ER13	AC,12601		;FAIL IF ANY FLAGS SET
  7641	035513	254 00 0 00 035502 		JRST	Q12602
  7642					;KL10 USER MODE
  7643	035514	312 04 0 00 037005 	Q12605:	CAME	AC,[510000,,Q12601]
  7644	035515	013 04 0 00 012601 		ER13	AC,12601		;FAIL IF FLAGS NOT SET
  7645	035516	254 00 0 00 035502 		JRST	Q12602
  7646
  7647	035517	254 00 0 00 035520 	Q12606:	JRST	.+1^
  7648					PAGE
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 44-2
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVN - OVERFLOW AND CARRY FLAGS                              SEQ 0188

  7649						DMVNF	1270,0,0,400000,0,0,010000,300000,310000^
  7650					;**KI10**
  7651					;THIS MACRO VERIFIES THAT THE DMOVN INSTRUCTION DOES NOT SET OVERFLOW
  7652					;OR CARRY FLAGS ON THE KI10.  FIRST, OVFL AND CRY0,1 FLAGS ARE CLEARED;
  7653					;THEN,DMOVN IS EXECUTED.  NEXT, OVFL AND CRY0,1 FLAGS ARE EXAMINED.
  7654					;IF ANY OF THESE FLAGS ARE SET, THE TEST FAILS.
  7655
  7656					;**KL10**
  7657					;THIS MACRO VERIFIES THAT THE DMOVN INSTRUCTION DOES SET OVERFLOW
  7658					;OR CARRY FLAGS ON THE KL10.  FIRST, OVFL AND CRY0,1 FLAGS ARE CLEARED;
  7659					;THEN,DMOVN IS EXECUTED.  NEXT, OVFL AND CRY0,1 FLAGS ARE EXAMINED.
  7660					;IF THE PROPER FLAGS ARE NOT SET, THE TEST FAILS.
  7661
  7662	035520	255 17 0 00 035521 	Q12700:	JFCL	17,.+1		;CLEAR OVFL AND CRY0,1 FLAGS
  7663						DMOVN	AC+1,[XWD 0,0	;*DMOVN TEST
  7664	035521	121 05 0 00 036773 			      XWD 400000,0]
  7665	035522	265 04 0 00 035523 		JSP	AC,.+1		;READ FLAGS
  7666	035523	621 04 0 00 027777 	Q12701:	TLZ	AC,027777	;CLEAR EXTRA JUNK
  7667	035524	603 04 0 00 010000 		TLNE	AC,USERF	;IN USER MODE ?
  7668	035525	254 00 0 00 035537 		JRST	Q12704		;YES
  7669	035526	332 00 0 00 030041 		SKIPE	KLFLG		;KL10 ?
  7670	035527	254 00 0 00 035534 		JRST	Q12703		;YES
  7671					;KI10 EXEC MODE
  7672	035530	312 04 0 00 037006 		CAME	AC,[0,,Q12701]
  7673	035531	013 04 0 00 012701 		ER13	AC,12701		;FAIL IF OVFL OR CRY0,1 FLG SET
  7674	035532	321 10 0 00 035520 	Q12702:	JUMPL	SAC,Q12700	;LOOP ON ERROR SWITCH
  7675	035533	254 00 0 00 035547 		JRST	Q12706
  7676					;KL10 EXEC MODE
  7677	035534	312 04 0 00 037007 	Q12703:	CAME	AC,[300000,,Q12701]
  7678	035535	013 04 0 00 012701 		ER13	AC,12701		;FAIL IF FLAGS NOT SET
  7679	035536	254 00 0 00 035532 		JRST	Q12702
  7680					;KL10/KI10 USER MODE
  7681	035537	332 00 0 00 030041 	Q12704:	SKIPE	KLFLG		;KL10 ?
  7682	035540	254 00 0 00 035544 		JRST	Q12705		;YES
  7683					;KI10 USER MODE
  7684	035541	312 04 0 00 037010 		CAME	AC,[010000,,Q12701]
  7685	035542	013 04 0 00 012701 		ER13	AC,12701		;FAIL IF ANY FLAGS SET
  7686	035543	254 00 0 00 035532 		JRST	Q12702
  7687					;KL10 USER MODE
  7688	035544	312 04 0 00 037011 	Q12705:	CAME	AC,[310000,,Q12701]
  7689	035545	013 04 0 00 012701 		ER13	AC,12701		;FAIL IF FLAGS NOT SET
  7690	035546	254 00 0 00 035532 		JRST	Q12702
  7691
  7692	035547	254 00 0 00 035550 	Q12706:	JRST	.+1^
  7693					PAGE
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 44-3
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVN - OVERFLOW AND CARRY FLAGS                              SEQ 0189

  7694						DMVNF	1300,400000,0,400000,0,0,010000,100000,510000^
  7695					;**KI10**
  7696					;THIS MACRO VERIFIES THAT THE DMOVN INSTRUCTION DOES NOT SET OVERFLOW
  7697					;OR CARRY FLAGS ON THE KI10.  FIRST, OVFL AND CRY0,1 FLAGS ARE CLEARED;
  7698					;THEN,DMOVN IS EXECUTED.  NEXT, OVFL AND CRY0,1 FLAGS ARE EXAMINED.
  7699					;IF ANY OF THESE FLAGS ARE SET, THE TEST FAILS.
  7700
  7701					;**KL10**
  7702					;THIS MACRO VERIFIES THAT THE DMOVN INSTRUCTION DOES SET OVERFLOW
  7703					;OR CARRY FLAGS ON THE KL10.  FIRST, OVFL AND CRY0,1 FLAGS ARE CLEARED;
  7704					;THEN,DMOVN IS EXECUTED.  NEXT, OVFL AND CRY0,1 FLAGS ARE EXAMINED.
  7705					;IF THE PROPER FLAGS ARE NOT SET, THE TEST FAILS.
  7706
  7707	035550	255 17 0 00 035551 	Q13000:	JFCL	17,.+1		;CLEAR OVFL AND CRY0,1 FLAGS
  7708						DMOVN	AC+1,[XWD 400000,0	;*DMOVN TEST
  7709	035551	121 05 0 00 036774 			      XWD 400000,0]
  7710	035552	265 04 0 00 035553 		JSP	AC,.+1		;READ FLAGS
  7711	035553	621 04 0 00 027777 	Q13001:	TLZ	AC,027777	;CLEAR EXTRA JUNK
  7712	035554	603 04 0 00 010000 		TLNE	AC,USERF	;IN USER MODE ?
  7713	035555	254 00 0 00 035567 		JRST	Q13004		;YES
  7714	035556	332 00 0 00 030041 		SKIPE	KLFLG		;KL10 ?
  7715	035557	254 00 0 00 035564 		JRST	Q13003		;YES
  7716					;KI10 EXEC MODE
  7717	035560	312 04 0 00 037012 		CAME	AC,[0,,Q13001]
  7718	035561	013 04 0 00 013001 		ER13	AC,13001		;FAIL IF OVFL OR CRY0,1 FLG SET
  7719	035562	321 10 0 00 035550 	Q13002:	JUMPL	SAC,Q13000	;LOOP ON ERROR SWITCH
  7720	035563	254 00 0 00 035577 		JRST	Q13006
  7721					;KL10 EXEC MODE
  7722	035564	312 04 0 00 037013 	Q13003:	CAME	AC,[100000,,Q13001]
  7723	035565	013 04 0 00 013001 		ER13	AC,13001		;FAIL IF FLAGS NOT SET
  7724	035566	254 00 0 00 035562 		JRST	Q13002
  7725					;KL10/KI10 USER MODE
  7726	035567	332 00 0 00 030041 	Q13004:	SKIPE	KLFLG		;KL10 ?
  7727	035570	254 00 0 00 035574 		JRST	Q13005		;YES
  7728					;KI10 USER MODE
  7729	035571	312 04 0 00 037014 		CAME	AC,[010000,,Q13001]
  7730	035572	013 04 0 00 013001 		ER13	AC,13001		;FAIL IF ANY FLAGS SET
  7731	035573	254 00 0 00 035562 		JRST	Q13002
  7732					;KL10 USER MODE
  7733	035574	312 04 0 00 037015 	Q13005:	CAME	AC,[510000,,Q13001]
  7734	035575	013 04 0 00 013001 		ER13	AC,13001		;FAIL IF FLAGS NOT SET
  7735	035576	254 00 0 00 035562 		JRST	Q13002
  7736
  7737	035577	254 00 0 00 035600 	Q13006:	JRST	.+1^
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 45
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVEM - GENERAL DATA PATTERNS                                SEQ 0190

  7738					SUBTTL	DIAGNOSTIC SECTION - DMOVEM - GENERAL DATA PATTERNS
  7739
  7740					;CHECK THAT 'DMOVEM AC,E' DOES NOT CLOBBER C(AC) OR C(AC+1)
  7741
  7742					Q13050:	DMOVE	AC,[631463,,146314	;INITIALIZE C(AC), C(AC+1)
  7743	035600	120 04 0 00 036737 			    424242,,131313]
  7744	035601	124 04 0 00 000002 		DMOVEM	AC,AC-2		;*MOVE DOUBLE WORD FROM AC, AC+1 TO MEMORY
  7745	035602	312 04 0 00 036737 		CAME	AC,[631463,,146314]	;WAS C(AC) MODIFIED?
  7746	035603	003 04 0 00 013051 		ER3	AC,13051	;C(AC) WAS CLOBBERED
  7747	035604	312 05 0 00 036740 		CAME	AC+1,[424242,,131313]	;WAS C(AC+1) MODIFIED?
  7748	035605	004 05 0 00 013051 		ER4	AC+1,13051	;C(AC+1) WAS CLOBBERED
  7749	035606	321 10 0 00 035600 		JUMPL	SAC,Q13050	;LOOP ON ERROR SWITCH
  7750					PAGE
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 45-1
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVEM - GENERAL DATA PATTERNS                                SEQ 0191

  7751						DMVM	1310,0,0,0,0^
  7752					;THIS MACRO TESTS THE DMOVEM INSTRUCTION
  7753					;FIRST, TSTWD, TSTWD+1 ARE PRELOADED WITH DATA OTHER THAN THE
  7754					;TEST WORDS AND AC,AC+1 ARE LOADED WITH THE TEST WORDS.
  7755					;THEN, THE DATA SPECIFIED BY [XWD 0,0] AND [XWD 0,0] IS MOVED
  7756					;FROM AC, AC+1 TO MEMORY (TSTWD, TSTWD+1) VIA
  7757					;THE DMOVEM INSTRUCTION.  0(TSTWD) AND 0(TSTWD+1) ARE THEN
  7758					;COMPARED WITH THE TEST WORDS [XWD 0,0] AND [XWD 0,0], RESPECTIVELY.
  7759					;THE TEST PASSES IF THESE COMPARISONS AGREE.
  7760
  7761					Q13100:	DMOVE	AC,[XWD 707070,707070
  7762	035607	120 04 0 00 036742 			    XWD 070707,070707]	;INITIALIZE TEST WORDS
  7763	035610	202 04 0 00 036524 		MOVEM	AC,TSTWD	;TSTWD, TSTWD+1 ARE IN MEMORY JUST
  7764	035611	202 05 0 00 036525 		MOVEM	AC+1,TSTWD+1	;AFTER THE FINAL TEST OF THIS PROGRAM
  7765						DMOVE	AC,[XWD 0,0
  7766	035612	120 04 0 00 036744 			    XWD 0,0]	;INITIALIZE AC,AC+1
  7767	035613	124 04 0 00 036524 		DMOVEM	AC,TSTWD	;*MOVE DOUBLE WORD FROM AC, AC+1
  7768									;TO MEMORY (TSTWD, TSTWD+1)
  7769	035614	120 04 0 00 036524 		DMOVE	AC,TSTWD	;PUT RESULTS OF TEST IN AC,AC+1 FOR COMPARISON
  7770	035615	312 04 0 00 036741 		CAME	AC,[XWD 0,0]	;WAS TSTWD LOADED CORRECTLY?
  7771	035616	005 04 0 00 013101 		ER5	AC,13101	;FAIL IF CONTENTS(TSTWD) NOT = 0,0
  7772	035617	312 05 0 00 036741 		CAME	AC+1,[XWD 0,0]	;WAS TSTWD+1 LOADED CORRECTLY?
  7773	035620	006 05 0 00 013102 		ER6	AC+1,13102	;FAIL IF CONTENTS(TSTWD+1) NOT = 0,0
  7774	035621	321 10 0 00 035607 		JUMPL	SAC,Q13100	;LOOP ON ERROR SWITCH^
  7775
  7776						DMVM	1320,-1,-1,-1,-1^
  7777					;THIS MACRO TESTS THE DMOVEM INSTRUCTION
  7778					;FIRST, TSTWD, TSTWD+1 ARE PRELOADED WITH DATA OTHER THAN THE
  7779					;TEST WORDS AND AC,AC+1 ARE LOADED WITH THE TEST WORDS.
  7780					;THEN, THE DATA SPECIFIED BY [XWD -1,-1] AND [XWD -1,-1] IS MOVED
  7781					;FROM AC, AC+1 TO MEMORY (TSTWD, TSTWD+1) VIA
  7782					;THE DMOVEM INSTRUCTION.  -1(TSTWD) AND -1(TSTWD+1) ARE THEN
  7783					;COMPARED WITH THE TEST WORDS [XWD -1,-1] AND [XWD -1,-1], RESPECTIVELY.
  7784					;THE TEST PASSES IF THESE COMPARISONS AGREE.
  7785
  7786					Q13200:	DMOVE	AC,[XWD 707070,707070
  7787	035622	120 04 0 00 036742 			    XWD 070707,070707]	;INITIALIZE TEST WORDS
  7788	035623	202 04 0 00 036524 		MOVEM	AC,TSTWD	;TSTWD, TSTWD+1 ARE IN MEMORY JUST
  7789	035624	202 05 0 00 036525 		MOVEM	AC+1,TSTWD+1	;AFTER THE FINAL TEST OF THIS PROGRAM
  7790						DMOVE	AC,[XWD -1,-1
  7791	035625	120 04 0 00 036746 			    XWD -1,-1]	;INITIALIZE AC,AC+1
  7792	035626	124 04 0 00 036524 		DMOVEM	AC,TSTWD	;*MOVE DOUBLE WORD FROM AC, AC+1
  7793									;TO MEMORY (TSTWD, TSTWD+1)
  7794	035627	120 04 0 00 036524 		DMOVE	AC,TSTWD	;PUT RESULTS OF TEST IN AC,AC+1 FOR COMPARISON
  7795	035630	312 04 0 00 036746 		CAME	AC,[XWD -1,-1]	;WAS TSTWD LOADED CORRECTLY?
  7796	035631	005 04 0 00 013201 		ER5	AC,13201	;FAIL IF CONTENTS(TSTWD) NOT = -1,-1
  7797	035632	312 05 0 00 036746 		CAME	AC+1,[XWD -1,-1]	;WAS TSTWD+1 LOADED CORRECTLY?
  7798	035633	006 05 0 00 013202 		ER6	AC+1,13202	;FAIL IF CONTENTS(TSTWD+1) NOT = -1,-1
  7799	035634	321 10 0 00 035622 		JUMPL	SAC,Q13200	;LOOP ON ERROR SWITCH^
  7800					PAGE
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 45-2
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVEM - GENERAL DATA PATTERNS                                SEQ 0192

  7801						DMVM	1330,0,0,-1,-1^
  7802					;THIS MACRO TESTS THE DMOVEM INSTRUCTION
  7803					;FIRST, TSTWD, TSTWD+1 ARE PRELOADED WITH DATA OTHER THAN THE
  7804					;TEST WORDS AND AC,AC+1 ARE LOADED WITH THE TEST WORDS.
  7805					;THEN, THE DATA SPECIFIED BY [XWD 0,0] AND [XWD -1,-1] IS MOVED
  7806					;FROM AC, AC+1 TO MEMORY (TSTWD, TSTWD+1) VIA
  7807					;THE DMOVEM INSTRUCTION.  -1(TSTWD) AND -1(TSTWD+1) ARE THEN
  7808					;COMPARED WITH THE TEST WORDS [XWD 0,0] AND [XWD -1,-1], RESPECTIVELY.
  7809					;THE TEST PASSES IF THESE COMPARISONS AGREE.
  7810
  7811					Q13300:	DMOVE	AC,[XWD 707070,707070
  7812	035635	120 04 0 00 036742 			    XWD 070707,070707]	;INITIALIZE TEST WORDS
  7813	035636	202 04 0 00 036524 		MOVEM	AC,TSTWD	;TSTWD, TSTWD+1 ARE IN MEMORY JUST
  7814	035637	202 05 0 00 036525 		MOVEM	AC+1,TSTWD+1	;AFTER THE FINAL TEST OF THIS PROGRAM
  7815						DMOVE	AC,[XWD 0,0
  7816	035640	120 04 0 00 036745 			    XWD -1,-1]	;INITIALIZE AC,AC+1
  7817	035641	124 04 0 00 036524 		DMOVEM	AC,TSTWD	;*MOVE DOUBLE WORD FROM AC, AC+1
  7818									;TO MEMORY (TSTWD, TSTWD+1)
  7819	035642	120 04 0 00 036524 		DMOVE	AC,TSTWD	;PUT RESULTS OF TEST IN AC,AC+1 FOR COMPARISON
  7820	035643	312 04 0 00 036741 		CAME	AC,[XWD 0,0]	;WAS TSTWD LOADED CORRECTLY?
  7821	035644	005 04 0 00 013301 		ER5	AC,13301	;FAIL IF CONTENTS(TSTWD) NOT = 0,0
  7822	035645	312 05 0 00 036746 		CAME	AC+1,[XWD -1,-1]	;WAS TSTWD+1 LOADED CORRECTLY?
  7823	035646	006 05 0 00 013302 		ER6	AC+1,13302	;FAIL IF CONTENTS(TSTWD+1) NOT = -1,-1
  7824	035647	321 10 0 00 035635 		JUMPL	SAC,Q13300	;LOOP ON ERROR SWITCH^
  7825
  7826						DMVM	1340,-1,-1,0,0^
  7827					;THIS MACRO TESTS THE DMOVEM INSTRUCTION
  7828					;FIRST, TSTWD, TSTWD+1 ARE PRELOADED WITH DATA OTHER THAN THE
  7829					;TEST WORDS AND AC,AC+1 ARE LOADED WITH THE TEST WORDS.
  7830					;THEN, THE DATA SPECIFIED BY [XWD -1,-1] AND [XWD 0,0] IS MOVED
  7831					;FROM AC, AC+1 TO MEMORY (TSTWD, TSTWD+1) VIA
  7832					;THE DMOVEM INSTRUCTION.  0(TSTWD) AND 0(TSTWD+1) ARE THEN
  7833					;COMPARED WITH THE TEST WORDS [XWD -1,-1] AND [XWD 0,0], RESPECTIVELY.
  7834					;THE TEST PASSES IF THESE COMPARISONS AGREE.
  7835
  7836					Q13400:	DMOVE	AC,[XWD 707070,707070
  7837	035650	120 04 0 00 036742 			    XWD 070707,070707]	;INITIALIZE TEST WORDS
  7838	035651	202 04 0 00 036524 		MOVEM	AC,TSTWD	;TSTWD, TSTWD+1 ARE IN MEMORY JUST
  7839	035652	202 05 0 00 036525 		MOVEM	AC+1,TSTWD+1	;AFTER THE FINAL TEST OF THIS PROGRAM
  7840						DMOVE	AC,[XWD -1,-1
  7841	035653	120 04 0 00 036747 			    XWD 0,0]	;INITIALIZE AC,AC+1
  7842	035654	124 04 0 00 036524 		DMOVEM	AC,TSTWD	;*MOVE DOUBLE WORD FROM AC, AC+1
  7843									;TO MEMORY (TSTWD, TSTWD+1)
  7844	035655	120 04 0 00 036524 		DMOVE	AC,TSTWD	;PUT RESULTS OF TEST IN AC,AC+1 FOR COMPARISON
  7845	035656	312 04 0 00 036746 		CAME	AC,[XWD -1,-1]	;WAS TSTWD LOADED CORRECTLY?
  7846	035657	005 04 0 00 013401 		ER5	AC,13401	;FAIL IF CONTENTS(TSTWD) NOT = -1,-1
  7847	035660	312 05 0 00 036741 		CAME	AC+1,[XWD 0,0]	;WAS TSTWD+1 LOADED CORRECTLY?
  7848	035661	006 05 0 00 013402 		ER6	AC+1,13402	;FAIL IF CONTENTS(TSTWD+1) NOT = 0,0
  7849	035662	321 10 0 00 035650 		JUMPL	SAC,Q13400	;LOOP ON ERROR SWITCH^
  7850					PAGE
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 45-3
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVEM - GENERAL DATA PATTERNS                                SEQ 0193

  7851						DMVM	1350,252525,252525,525252,525252^
  7852					;THIS MACRO TESTS THE DMOVEM INSTRUCTION
  7853					;FIRST, TSTWD, TSTWD+1 ARE PRELOADED WITH DATA OTHER THAN THE
  7854					;TEST WORDS AND AC,AC+1 ARE LOADED WITH THE TEST WORDS.
  7855					;THEN, THE DATA SPECIFIED BY [XWD 252525,252525] AND [XWD 525252,525252] IS MOVED
  7856					;FROM AC, AC+1 TO MEMORY (TSTWD, TSTWD+1) VIA
  7857					;THE DMOVEM INSTRUCTION.  525252(TSTWD) AND 525252(TSTWD+1) ARE THEN
  7858					;COMPARED WITH THE TEST WORDS [XWD 252525,252525] AND [XWD 525252,525252], RESPECTIVELY.
  7859					;THE TEST PASSES IF THESE COMPARISONS AGREE.
  7860
  7861					Q13500:	DMOVE	AC,[XWD 707070,707070
  7862	035663	120 04 0 00 036742 			    XWD 070707,070707]	;INITIALIZE TEST WORDS
  7863	035664	202 04 0 00 036524 		MOVEM	AC,TSTWD	;TSTWD, TSTWD+1 ARE IN MEMORY JUST
  7864	035665	202 05 0 00 036525 		MOVEM	AC+1,TSTWD+1	;AFTER THE FINAL TEST OF THIS PROGRAM
  7865						DMOVE	AC,[XWD 252525,252525
  7866	035666	120 04 0 00 036752 			    XWD 525252,525252]	;INITIALIZE AC,AC+1
  7867	035667	124 04 0 00 036524 		DMOVEM	AC,TSTWD	;*MOVE DOUBLE WORD FROM AC, AC+1
  7868									;TO MEMORY (TSTWD, TSTWD+1)
  7869	035670	120 04 0 00 036524 		DMOVE	AC,TSTWD	;PUT RESULTS OF TEST IN AC,AC+1 FOR COMPARISON
  7870	035671	312 04 0 00 036736 		CAME	AC,[XWD 252525,252525]	;WAS TSTWD LOADED CORRECTLY?
  7871	035672	005 04 0 00 013501 		ER5	AC,13501	;FAIL IF CONTENTS(TSTWD) NOT = 252525,252525
  7872	035673	312 05 0 00 036751 		CAME	AC+1,[XWD 525252,525252]	;WAS TSTWD+1 LOADED CORRECTLY?
  7873	035674	006 05 0 00 013502 		ER6	AC+1,13502	;FAIL IF CONTENTS(TSTWD+1) NOT = 525252,525252
  7874	035675	321 10 0 00 035663 		JUMPL	SAC,Q13500	;LOOP ON ERROR SWITCH^
  7875
  7876						DMVM	1360,525252,525252,252525,252525^
  7877					;THIS MACRO TESTS THE DMOVEM INSTRUCTION
  7878					;FIRST, TSTWD, TSTWD+1 ARE PRELOADED WITH DATA OTHER THAN THE
  7879					;TEST WORDS AND AC,AC+1 ARE LOADED WITH THE TEST WORDS.
  7880					;THEN, THE DATA SPECIFIED BY [XWD 525252,525252] AND [XWD 252525,252525] IS MOVED
  7881					;FROM AC, AC+1 TO MEMORY (TSTWD, TSTWD+1) VIA
  7882					;THE DMOVEM INSTRUCTION.  252525(TSTWD) AND 252525(TSTWD+1) ARE THEN
  7883					;COMPARED WITH THE TEST WORDS [XWD 525252,525252] AND [XWD 252525,252525], RESPECTIVELY.
  7884					;THE TEST PASSES IF THESE COMPARISONS AGREE.
  7885
  7886					Q13600:	DMOVE	AC,[XWD 707070,707070
  7887	035676	120 04 0 00 036742 			    XWD 070707,070707]	;INITIALIZE TEST WORDS
  7888	035677	202 04 0 00 036524 		MOVEM	AC,TSTWD	;TSTWD, TSTWD+1 ARE IN MEMORY JUST
  7889	035700	202 05 0 00 036525 		MOVEM	AC+1,TSTWD+1	;AFTER THE FINAL TEST OF THIS PROGRAM
  7890						DMOVE	AC,[XWD 525252,525252
  7891	035701	120 04 0 00 036751 			    XWD 252525,252525]	;INITIALIZE AC,AC+1
  7892	035702	124 04 0 00 036524 		DMOVEM	AC,TSTWD	;*MOVE DOUBLE WORD FROM AC, AC+1
  7893									;TO MEMORY (TSTWD, TSTWD+1)
  7894	035703	120 04 0 00 036524 		DMOVE	AC,TSTWD	;PUT RESULTS OF TEST IN AC,AC+1 FOR COMPARISON
  7895	035704	312 04 0 00 036751 		CAME	AC,[XWD 525252,525252]	;WAS TSTWD LOADED CORRECTLY?
  7896	035705	005 04 0 00 013601 		ER5	AC,13601	;FAIL IF CONTENTS(TSTWD) NOT = 525252,525252
  7897	035706	312 05 0 00 036736 		CAME	AC+1,[XWD 252525,252525]	;WAS TSTWD+1 LOADED CORRECTLY?
  7898	035707	006 05 0 00 013602 		ER6	AC+1,13602	;FAIL IF CONTENTS(TSTWD+1) NOT = 252525,252525
  7899	035710	321 10 0 00 035676 		JUMPL	SAC,Q13600	;LOOP ON ERROR SWITCH^
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 46
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVEM - AC=17, AC+1=0                                        SEQ 0194

  7900					SUBTTL	DIAGNOSTIC SECTION - DMOVEM - AC=17, AC+1=0
  7901
  7902					;CHECK DMOVEM FOR AC=17 AND AC+1=0
  7903
  7904			000017			AC=17
  7905			000003			SAC=<AC+4>&17
  7906						SAVEAC	(1,1)^
  7907	035711	201 03 0 00 035711 		MOVEI	SAC,.
  7908	035712	202 03 0 00 030051 		MOVEM	SAC,TESTPC	;SETUP SUBTEST PC
  7909	035713	201 03 0 00 000003 		MOVEI	SAC,SAC		;INFORM ERROR ROUTINE WHICH
  7910	035714	202 03 0 00 037213 		MOVEM	SAC,ERRLOP#	;AC IS USED FOR ITERATION^
  7911
  7912						DMVM17	1370,-1,-1,-1,-1^
  7913					;THIS MACRO TESTS THE DMOVEM INSTRUCTION
  7914					;FIRST, TSTWD, TSTWD+1 ARE PRELOADED WITH DATA OTHER THAN THE
  7915					;TEST WORDS AND AC,AC+1 ARE LOADED WITH THE TEST WORDS.
  7916					;THEN, THE DATA SPECIFIED BY [XWD -1,-1] AND [XWD -1,-1] IS MOVED
  7917					;FROM AC, AC+1 TO MEMORY (TSTWD, TSTWD+1) VIA THE DMOVEM INSTRUCTION.
  7918					;-1(TSTWD) AND -1(TSTWD+1) ARE THEN COMPARED WITH THE TEST
  7919					;WORDS [XWD -1,-1] AND [XWD -1,-1], RESPECTIVELY.
  7920					;THE TEST PASSES IF THESE COMPARISONS AGREE.
  7921
  7922	035715	202 17 0 00 037223 	Q13700:	MOVEM	AC,%SV17	;SAVE AC17 CAUSE IT HAS PDP
  7923						DMOVE	AC,[XWD 707070,707070
  7924	035716	120 17 0 00 036742 			    XWD 070707,070707]	;INITIALIZE TEST WORDS
  7925	035717	202 17 0 00 036524 		MOVEM	AC,TSTWD	;TSTWD, TSTWD+1 ARE IN MEMORY JUST
  7926	035720	202 00 0 00 036525 		MOVEM	AC+1,TSTWD+1	;AFTER THE FINAL TEST OF THIS PROGRAM
  7927						DMOVE	AC,[XWD -1,-1
  7928	035721	120 17 0 00 036746 			    XWD -1,-1]	;INITIALIZE AC,AC+1
  7929	035722	124 17 0 00 036524 		DMOVEM	AC,TSTWD	;*MOVE DOUBLE WORD FROM AC, AC+1
  7930									;TO MEMORY (TSTWD, TSTWD+1)
  7931	035723	120 17 0 00 036524 		DMOVE	AC,TSTWD	;PUT RESULTS OF TEST IN AC,AC+1 FOR COMPARISON
  7932	035724	316 17 0 00 036746 		CAMN	AC,[XWD -1,-1]	;WAS TSTWD LOADED CORRECTLY?
  7933	035725	254 00 0 00 035731 		JRST	.+4		;HERE IF TESTS OK
  7934	035726	202 17 0 00 000016 		MOVEM	AC,AC-1		;SAVE BAD WORD
  7935	035727	200 17 0 00 037223 		MOVE	AC,%SV17	;RESTORE P
  7936	035730	005 16 0 00 013701 		ER5	AC-1,13701	;FAIL IF CONTENTS(TSTWD) NOT = -1,-1
  7937	035731	316 00 0 00 036746 		CAMN	AC+1,[XWD -1,-1]	;WAS TSTWD+1 LOADED CORRECTLY?
  7938	035732	254 00 0 00 035736 		JRST	.+4		;HERE IF TESTS OK
  7939	035733	202 17 0 00 000016 		MOVEM	AC,AC-1		;SAVE BAD WORD
  7940	035734	200 17 0 00 037223 		MOVE	AC,%SV17	;RESTORE P
  7941	035735	006 00 0 00 013702 		ER6	AC+1,13702	;FAIL IF CONTENTS(TSTWD+1) NOT = -1,-1
  7942	035736	200 17 0 00 037223 		MOVE	AC,%SV17	;RESTORE AC UNCONDITIONALLY
  7943	035737	321 03 0 00 035715 		JUMPL	SAC,Q13700	;LOOP ON ERROR SWITCH^
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 47
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVEM - AC RANGE ADDRESS                                     SEQ 0195

  7944					SUBTTL	DIAGNOSTIC SECTION - DMOVEM - AC RANGE ADDRESS
  7945
  7946					;CHECK DMOVEM WHERE 'E' IS WITHIN THE 'AC' RANGE
  7947
  7948			000004			AC=4
  7949			000010			SAC=<AC+4>&17
  7950						SAVEAC	(1,1)^
  7951	035740	201 10 0 00 035740 		MOVEI	SAC,.
  7952	035741	202 10 0 00 030051 		MOVEM	SAC,TESTPC	;SETUP SUBTEST PC
  7953	035742	201 10 0 00 000010 		MOVEI	SAC,SAC		;INFORM ERROR ROUTINE WHICH
  7954	035743	202 10 0 00 037213 		MOVEM	SAC,ERRLOP#	;AC IS USED FOR ITERATION^
  7955			000002			E=<AC-2>&17
  7956
  7957			014000		SN=14000
  7958			000001			E=<E-1>&17
  7959
  7960					Q14000:	REPEAT	^D5,<
  7961					;CHECK DMOVEM WHERE 'E' IS WITHIN THE AC RANGE
  7962					
  7963					SN=SN+1
  7964						E=<E+1>&17
  7965						DMOVE	E,[XWD 707070,707070
  7966							   XWD 070707,070707]	;INITIALIZE E,E+1
  7967						DMOVE	AC,[XWD	-1,-1	;INITIALIZE AC, AC+1
  7968							    XWD 0,-1]
  7969						DMOVEM	AC,E		;*MOVE DOUBLE WORD FROM AC, AC+1 TO MEMORY
  7970						CAME	E,[XWD -1,-1]	;WAS 'E' UPDATED CORRECTLY?
  7971						ER5	E,SN		;FAIL IF C(E) IS NOT = TO -1,-1
  7972						IFN	<E-<AC+1>>,<
  7973						CAME	E+1,[XWD 0,-1]	;FAIL IF C(E+1) IS NOT = 0,-1>
  7974						IFE	<E-<AC+1>>,<
  7975						GO	Q14001		;THIS CASE DIFFERENT KI/KL>
  7976						ER6	E+1,SN		;'E+1' WAS NOT UPDATED CORRECTLY
  7977						JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  7978					>
  7979
  7980					;CHECK DMOVEM WHERE 'E' IS WITHIN THE AC RANGE
  7981
  7982			014001		SN=SN+1
  7983			000002			E=<E+1>&17
  7984						DMOVE	E,[XWD 707070,707070
  7985	035744	120 02 0 00 036742 			   XWD 070707,070707]	;INITIALIZE E,E+1
  7986						DMOVE	AC,[XWD	-1,-1	;INITIALIZE AC, AC+1
  7987	035745	120 04 0 00 037016 			    XWD 0,-1]
  7988	035746	124 04 0 00 000002 		DMOVEM	AC,E		;*MOVE DOUBLE WORD FROM AC, AC+1 TO MEMORY
  7989	035747	312 02 0 00 036746 		CAME	E,[XWD -1,-1]	;WAS 'E' UPDATED CORRECTLY?
  7990	035750	005 02 0 00 014001 		ER5	E,SN		;FAIL IF C(E) IS NOT = TO -1,-1
  7991						IFN	<E-<AC+1>>,<
  7992	035751	312 03 0 00 036767 		CAME	E+1,[XWD 0,-1]	;FAIL IF C(E+1) IS NOT = 0,-1>
  7993						IFE	<E-<AC+1>>,<
  7994						GO	Q14001		;THIS CASE DIFFERENT KI/KL>
  7995	035752	006 03 0 00 014001 		ER6	E+1,SN		;'E+1' WAS NOT UPDATED CORRECTLY
  7996	035753	321 10 0 00 035744 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  7997
  7998
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 47-1
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVEM - AC RANGE ADDRESS                                     SEQ 0196

  7999					;CHECK DMOVEM WHERE 'E' IS WITHIN THE AC RANGE
  8000
  8001			014002		SN=SN+1
  8002			000003			E=<E+1>&17
  8003						DMOVE	E,[XWD 707070,707070
  8004	035754	120 03 0 00 036742 			   XWD 070707,070707]	;INITIALIZE E,E+1
  8005						DMOVE	AC,[XWD	-1,-1	;INITIALIZE AC, AC+1
  8006	035755	120 04 0 00 037016 			    XWD 0,-1]
  8007	035756	124 04 0 00 000003 		DMOVEM	AC,E		;*MOVE DOUBLE WORD FROM AC, AC+1 TO MEMORY
  8008	035757	312 03 0 00 036746 		CAME	E,[XWD -1,-1]	;WAS 'E' UPDATED CORRECTLY?
  8009	035760	005 03 0 00 014002 		ER5	E,SN		;FAIL IF C(E) IS NOT = TO -1,-1
  8010						IFN	<E-<AC+1>>,<
  8011	035761	312 04 0 00 036767 		CAME	E+1,[XWD 0,-1]	;FAIL IF C(E+1) IS NOT = 0,-1>
  8012						IFE	<E-<AC+1>>,<
  8013						GO	Q14001		;THIS CASE DIFFERENT KI/KL>
  8014	035762	006 04 0 00 014002 		ER6	E+1,SN		;'E+1' WAS NOT UPDATED CORRECTLY
  8015	035763	321 10 0 00 035754 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  8016
  8017
  8018					;CHECK DMOVEM WHERE 'E' IS WITHIN THE AC RANGE
  8019
  8020			014003		SN=SN+1
  8021			000004			E=<E+1>&17
  8022						DMOVE	E,[XWD 707070,707070
  8023	035764	120 04 0 00 036742 			   XWD 070707,070707]	;INITIALIZE E,E+1
  8024						DMOVE	AC,[XWD	-1,-1	;INITIALIZE AC, AC+1
  8025	035765	120 04 0 00 037016 			    XWD 0,-1]
  8026	035766	124 04 0 00 000004 		DMOVEM	AC,E		;*MOVE DOUBLE WORD FROM AC, AC+1 TO MEMORY
  8027	035767	312 04 0 00 036746 		CAME	E,[XWD -1,-1]	;WAS 'E' UPDATED CORRECTLY?
  8028	035770	005 04 0 00 014003 		ER5	E,SN		;FAIL IF C(E) IS NOT = TO -1,-1
  8029						IFN	<E-<AC+1>>,<
  8030	035771	312 05 0 00 036767 		CAME	E+1,[XWD 0,-1]	;FAIL IF C(E+1) IS NOT = 0,-1>
  8031						IFE	<E-<AC+1>>,<
  8032						GO	Q14001		;THIS CASE DIFFERENT KI/KL>
  8033	035772	006 05 0 00 014003 		ER6	E+1,SN		;'E+1' WAS NOT UPDATED CORRECTLY
  8034	035773	321 10 0 00 035764 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  8035
  8036
  8037					;CHECK DMOVEM WHERE 'E' IS WITHIN THE AC RANGE
  8038
  8039			014004		SN=SN+1
  8040			000005			E=<E+1>&17
  8041						DMOVE	E,[XWD 707070,707070
  8042	035774	120 05 0 00 036742 			   XWD 070707,070707]	;INITIALIZE E,E+1
  8043						DMOVE	AC,[XWD	-1,-1	;INITIALIZE AC, AC+1
  8044	035775	120 04 0 00 037016 			    XWD 0,-1]
  8045	035776	124 04 0 00 000005 		DMOVEM	AC,E		;*MOVE DOUBLE WORD FROM AC, AC+1 TO MEMORY
  8046	035777	312 05 0 00 036746 		CAME	E,[XWD -1,-1]	;WAS 'E' UPDATED CORRECTLY?
  8047	036000	005 05 0 00 014004 		ER5	E,SN		;FAIL IF C(E) IS NOT = TO -1,-1
  8048						IFN	<E-<AC+1>>,<
  8049						CAME	E+1,[XWD 0,-1]	;FAIL IF C(E+1) IS NOT = 0,-1>
  8050						IFE	<E-<AC+1>>,<
  8051	036001	260 17 0 00 036015 		GO	Q14001		;THIS CASE DIFFERENT KI/KL>
  8052	036002	006 06 0 00 014004 		ER6	E+1,SN		;'E+1' WAS NOT UPDATED CORRECTLY
  8053	036003	321 10 0 00 035774 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 47-2
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVEM - AC RANGE ADDRESS                                     SEQ 0197

  8054
  8055
  8056					;CHECK DMOVEM WHERE 'E' IS WITHIN THE AC RANGE
  8057
  8058			014005		SN=SN+1
  8059			000006			E=<E+1>&17
  8060						DMOVE	E,[XWD 707070,707070
  8061	036004	120 06 0 00 036742 			   XWD 070707,070707]	;INITIALIZE E,E+1
  8062						DMOVE	AC,[XWD	-1,-1	;INITIALIZE AC, AC+1
  8063	036005	120 04 0 00 037016 			    XWD 0,-1]
  8064	036006	124 04 0 00 000006 		DMOVEM	AC,E		;*MOVE DOUBLE WORD FROM AC, AC+1 TO MEMORY
  8065	036007	312 06 0 00 036746 		CAME	E,[XWD -1,-1]	;WAS 'E' UPDATED CORRECTLY?
  8066	036010	005 06 0 00 014005 		ER5	E,SN		;FAIL IF C(E) IS NOT = TO -1,-1
  8067						IFN	<E-<AC+1>>,<
  8068	036011	312 07 0 00 036767 		CAME	E+1,[XWD 0,-1]	;FAIL IF C(E+1) IS NOT = 0,-1>
  8069						IFE	<E-<AC+1>>,<
  8070						GO	Q14001		;THIS CASE DIFFERENT KI/KL>
  8071	036012	006 07 0 00 014005 		ER6	E+1,SN		;'E+1' WAS NOT UPDATED CORRECTLY
  8072	036013	321 10 0 00 036004 		JUMPL	SAC,.-7		;LOOP ON ERROR SWITCH
  8073
  8074	036014	254 00 0 00 036025 		JRST	Q14021
  8075
  8076	036015	332 00 0 00 030041 	Q14001:	SKIPE	KLFLG		;KL10 ?
  8077	036016	254 00 0 00 036022 		JRST	Q14003		;YES
  8078
  8079	036017	316 06 0 00 036746 	Q14002:	CAMN	6,[-1,,-1]	;KI10
  8080	036020	350 00 0 17 000000 		AOS	(P)		;PASSED, SKIP RETURN OVER ERROR
  8081	036021	263 17 0 00 000000 		RTN
  8082
  8083	036022	316 06 0 00 036767 	Q14003:	CAMN	6,[0,,-1]	;KL10
  8084	036023	350 00 0 17 000000 		AOS	(P)		;PASSED, SKIP RETURN OVER ERROR
  8085	036024	263 17 0 00 000000 		RTN
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 48
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVEM - BIS FLAG                                             SEQ 0198

  8086					SUBTTL	DIAGNOSTIC SECTION - DMOVEM - BIS FLAG
  8087
  8088	036025	332 00 0 00 030041 	Q14021:	SKIPE	KLFLG		;KL10 ?
  8089	036026	254 00 0 00 036050 		JRST	Q14050		;YES
  8090
  8091					;**KI10 ONLY TEST**
  8092					;VERIFY THAT C(E) IS NOT MODIFIED BY "DMOVEM AC,E" IF 'BIS'
  8093					;FLAG IS SET; AND THAT THE SECOND PART OF "DMOVEM" CLEARS 'BIS'.
  8094
  8095			000004			AC=4
  8096			000010			SAC=<AC+4>&17
  8097						SAVEAC	(1,1)^
  8098	036027	201 10 0 00 036027 		MOVEI	SAC,.
  8099	036030	202 10 0 00 030051 		MOVEM	SAC,TESTPC	;SETUP SUBTEST PC
  8100	036031	201 10 0 00 000010 		MOVEI	SAC,SAC		;INFORM ERROR ROUTINE WHICH
  8101	036032	202 10 0 00 037213 		MOVEM	SAC,ERRLOP#	;AC IS USED FOR ITERATION^
  8102			000002			E=<AC-2>&17
  8103
  8104					Q14020:	DMOVE	AC,[631463,,146314
  8105	036033	120 04 0 00 036737 			    424242,,131313]	;INITIALIZE AC,AC+1
  8106	036034	477 02 0 00 000003 		SETOB	E,<E+1>&17	;INITIALIZE E,E+1
  8107	036035	254 02 1 00 036036 		JRSTF	@.+1		;SET 'BIS' FLAG
  8108	036036	020000	036037			XWD	BIS,.+1
  8109	036037	124 04 0 00 000002 		DMOVEM	AC,E		;*DMOVEM SHOULD MODIFY ONLY 'E+1' AND CLEAR BIS FLAG
  8110	036040	312 02 0 00 036746 		CAME	E,[-1,,-1]	;WAS C(E) MODIFIED?
  8111	036041	005 02 0 00 014021 		ER5	E,14021		;YES, C(E) WAS MODIFIED
  8112	036042	312 03 0 00 000005 		CAME	E+1,<AC+1>&17	;WAS C(E+1) MODIFIED?
  8113	036043	006 03 0 00 014021 		ER6	E+1,14021	;NO, C(E+1) WAS NOT MODIFIED
  8114	036044	265 06 0 00 036045 		JSP	AC+2,.+1	;READ FLAGS
  8115	036045	603 06 0 00 020000 		TLNE	AC+2,BIS	;IS 'BIS' FLAG CLEAR
  8116	036046	013 06 0 00 014021 		ER13	AC+2,14021	;NO
  8117	036047	321 10 0 00 036033 		JUMPL	SAC,Q14020	;LOOP ON ERROR SWITCH
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 49
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVNM - GENERAL DATA PATTERNS                                SEQ 0199

  8118					SUBTTL	DIAGNOSTIC SECTION - DMOVNM - GENERAL DATA PATTERNS
  8119
  8120					;CHECK THAT 'DMOVNM AC,E' DOES NOT CLOBBER C(AC) OR C(AC+1)
  8121
  8122					Q14050:	DMOVE	AC,[631463,,146314	;INITIALIZE AC, AC+1
  8123	036050	120 04 0 00 036737 			    424242,,131313]
  8124	036051	125 04 0 00 000002 		DMOVNM	AC,AC-2		;*MOVE NEGATIVE OF DOUBLE WORD FROM AC, AC+1 TO MEMORY
  8125	036052	312 04 0 00 036737 		CAME	AC,[631463,,146314]	;WAS C(AC) MODIFIED?
  8126	036053	003 04 0 00 014051 		ER3	AC,14051	;C(AC) WAS CLOBBERED
  8127	036054	312 05 0 00 036740 		CAME	AC+1,[424242,,131313]	;WAS C(AC+1) MODIFIED?
  8128	036055	004 05 0 00 014051 		ER4	AC+1,14051	;C(AC+1) WAS CLOBBERED
  8129	036056	321 10 0 00 036050 		JUMPL	SAC,Q14050	;LOOP ON ERROR
  8130					PAGE
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 49-1
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVNM - GENERAL DATA PATTERNS                                SEQ 0200

  8131						DMVNM	1410,0,0,0,0^
  8132					;THIS MACRO TESTS THE DMOVNM INSTRUCTION
  8133					;FIRST, TSTWD, TSTWD+1 ARE PRELOADED WITH DATA OTHER THAN THE
  8134					;TEST WORDS AND AC, AC+1 ARE LOADED WITH THE TEST WORDS.
  8135					;THEN, THE NEGATIVE (TWOS COMPLEMENT) OF THE DATA SPECIFIED BY
  8136					;[XWD 0,0] AND [XWD 0,0] IS MOVED FROM AC, AC+1 TO MEMORY
  8137					;(TSTWD, TSTWD+1) VIA THE DMOVNM INSTRUCTION.
  8138					;0(TSTWD) AND 0(TSTWD+1) ARE THEN COMPARED WITH THE
  8139					;NEGATIVE (TWOS COMPLEMENT) OF THE TEST
  8140					;WORDS [XWD 0,0] AND [XWD 0,0], RESPECTIVELY.
  8141					;THE TEST PASSES IF THESE COMPARISONS AGREE.
  8142
  8143					Q14100:	DMOVE	AC,[XWD 707070,707070
  8144	036057	120 04 0 00 036742 			    XWD 070707,070707]
  8145	036060	124 04 0 00 036524 		DMOVEM	AC,TSTWD	;INITIALIZE TEST WORDS
  8146						DMOVE	AC,[XWD 0,0
  8147	036061	120 04 0 00 036744 			    XWD 0,0]	;INITIALIZE AC,AC+1
  8148						DMOVN	AC+5,[XWD 0,0
  8149	036062	121 11 0 00 036744 			      XWD 0,0]	;SET-UP TO CHECK RESULTS
  8150	036063	125 04 0 00 036524 		DMOVNM	AC,TSTWD	;*MOVE NEGATIVE OF DOUBLE WORD FROM AC, AC+1
  8151									;TO MEMORY (TSTWD, TSTWD+1)
  8152	036064	120 04 0 00 036524 		DMOVE	AC,TSTWD	;PUT TEST RESULTS IN AC,AC+1
  8153	036065	312 04 0 00 000011 		CAME	AC,<AC+5>&17	;WAS TSTWD LOADED CORRECTLY?
  8154	036066	005 04 0 00 014101 		ER5	AC,14101	;FAIL IF CONTENTS(TSTWD) NOT = COMPLEMENT OF 0,0
  8155	036067	312 05 0 00 000012 		CAME	AC+1,<AC+6>&17	;WAS TSTWD+1 LOADED CORRECTLY?
  8156	036070	006 05 0 00 014102 		ER6	AC+1,14102	;FAIL IF CONTENTS(TSTWD) NOT = MINUS 0,0
  8157	036071	321 10 0 00 036057 		JUMPL	SAC,Q14100	;LOOP ON ERROR SWITCH^
  8158					PAGE
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 49-2
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVNM - GENERAL DATA PATTERNS                                SEQ 0201

  8159						DMVNM	1420,0,0,0,1^
  8160					;THIS MACRO TESTS THE DMOVNM INSTRUCTION
  8161					;FIRST, TSTWD, TSTWD+1 ARE PRELOADED WITH DATA OTHER THAN THE
  8162					;TEST WORDS AND AC, AC+1 ARE LOADED WITH THE TEST WORDS.
  8163					;THEN, THE NEGATIVE (TWOS COMPLEMENT) OF THE DATA SPECIFIED BY
  8164					;[XWD 0,0] AND [XWD 0,1] IS MOVED FROM AC, AC+1 TO MEMORY
  8165					;(TSTWD, TSTWD+1) VIA THE DMOVNM INSTRUCTION.
  8166					;0(TSTWD) AND 0(TSTWD+1) ARE THEN COMPARED WITH THE
  8167					;NEGATIVE (TWOS COMPLEMENT) OF THE TEST
  8168					;WORDS [XWD 0,0] AND [XWD 0,1], RESPECTIVELY.
  8169					;THE TEST PASSES IF THESE COMPARISONS AGREE.
  8170
  8171					Q14200:	DMOVE	AC,[XWD 707070,707070
  8172	036072	120 04 0 00 036742 			    XWD 070707,070707]
  8173	036073	124 04 0 00 036524 		DMOVEM	AC,TSTWD	;INITIALIZE TEST WORDS
  8174						DMOVE	AC,[XWD 0,0
  8175	036074	120 04 0 00 036755 			    XWD 0,1]	;INITIALIZE AC,AC+1
  8176						DMOVN	AC+5,[XWD 0,0
  8177	036075	121 11 0 00 036755 			      XWD 0,1]	;SET-UP TO CHECK RESULTS
  8178	036076	125 04 0 00 036524 		DMOVNM	AC,TSTWD	;*MOVE NEGATIVE OF DOUBLE WORD FROM AC, AC+1
  8179									;TO MEMORY (TSTWD, TSTWD+1)
  8180	036077	120 04 0 00 036524 		DMOVE	AC,TSTWD	;PUT TEST RESULTS IN AC,AC+1
  8181	036100	312 04 0 00 000011 		CAME	AC,<AC+5>&17	;WAS TSTWD LOADED CORRECTLY?
  8182	036101	005 04 0 00 014201 		ER5	AC,14201	;FAIL IF CONTENTS(TSTWD) NOT = COMPLEMENT OF 0,0
  8183	036102	312 05 0 00 000012 		CAME	AC+1,<AC+6>&17	;WAS TSTWD+1 LOADED CORRECTLY?
  8184	036103	006 05 0 00 014202 		ER6	AC+1,14202	;FAIL IF CONTENTS(TSTWD) NOT = MINUS 0,1
  8185	036104	321 10 0 00 036072 		JUMPL	SAC,Q14200	;LOOP ON ERROR SWITCH^
  8186					PAGE
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 49-3
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVNM - GENERAL DATA PATTERNS                                SEQ 0202

  8187						DMVNM	1430,-1,-1,0,1^
  8188					;THIS MACRO TESTS THE DMOVNM INSTRUCTION
  8189					;FIRST, TSTWD, TSTWD+1 ARE PRELOADED WITH DATA OTHER THAN THE
  8190					;TEST WORDS AND AC, AC+1 ARE LOADED WITH THE TEST WORDS.
  8191					;THEN, THE NEGATIVE (TWOS COMPLEMENT) OF THE DATA SPECIFIED BY
  8192					;[XWD -1,-1] AND [XWD 0,1] IS MOVED FROM AC, AC+1 TO MEMORY
  8193					;(TSTWD, TSTWD+1) VIA THE DMOVNM INSTRUCTION.
  8194					;0(TSTWD) AND 0(TSTWD+1) ARE THEN COMPARED WITH THE
  8195					;NEGATIVE (TWOS COMPLEMENT) OF THE TEST
  8196					;WORDS [XWD -1,-1] AND [XWD 0,1], RESPECTIVELY.
  8197					;THE TEST PASSES IF THESE COMPARISONS AGREE.
  8198
  8199					Q14300:	DMOVE	AC,[XWD 707070,707070
  8200	036105	120 04 0 00 036742 			    XWD 070707,070707]
  8201	036106	124 04 0 00 036524 		DMOVEM	AC,TSTWD	;INITIALIZE TEST WORDS
  8202						DMOVE	AC,[XWD -1,-1
  8203	036107	120 04 0 00 036757 			    XWD 0,1]	;INITIALIZE AC,AC+1
  8204						DMOVN	AC+5,[XWD -1,-1
  8205	036110	121 11 0 00 036757 			      XWD 0,1]	;SET-UP TO CHECK RESULTS
  8206	036111	125 04 0 00 036524 		DMOVNM	AC,TSTWD	;*MOVE NEGATIVE OF DOUBLE WORD FROM AC, AC+1
  8207									;TO MEMORY (TSTWD, TSTWD+1)
  8208	036112	120 04 0 00 036524 		DMOVE	AC,TSTWD	;PUT TEST RESULTS IN AC,AC+1
  8209	036113	312 04 0 00 000011 		CAME	AC,<AC+5>&17	;WAS TSTWD LOADED CORRECTLY?
  8210	036114	005 04 0 00 014301 		ER5	AC,14301	;FAIL IF CONTENTS(TSTWD) NOT = COMPLEMENT OF -1,-1
  8211	036115	312 05 0 00 000012 		CAME	AC+1,<AC+6>&17	;WAS TSTWD+1 LOADED CORRECTLY?
  8212	036116	006 05 0 00 014302 		ER6	AC+1,14302	;FAIL IF CONTENTS(TSTWD) NOT = MINUS 0,1
  8213	036117	321 10 0 00 036105 		JUMPL	SAC,Q14300	;LOOP ON ERROR SWITCH^
  8214					PAGE
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 49-4
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVNM - GENERAL DATA PATTERNS                                SEQ 0203

  8215						DMVNM	1440,0,1,0,0^
  8216					;THIS MACRO TESTS THE DMOVNM INSTRUCTION
  8217					;FIRST, TSTWD, TSTWD+1 ARE PRELOADED WITH DATA OTHER THAN THE
  8218					;TEST WORDS AND AC, AC+1 ARE LOADED WITH THE TEST WORDS.
  8219					;THEN, THE NEGATIVE (TWOS COMPLEMENT) OF THE DATA SPECIFIED BY
  8220					;[XWD 0,1] AND [XWD 0,0] IS MOVED FROM AC, AC+1 TO MEMORY
  8221					;(TSTWD, TSTWD+1) VIA THE DMOVNM INSTRUCTION.
  8222					;0(TSTWD) AND 0(TSTWD+1) ARE THEN COMPARED WITH THE
  8223					;NEGATIVE (TWOS COMPLEMENT) OF THE TEST
  8224					;WORDS [XWD 0,1] AND [XWD 0,0], RESPECTIVELY.
  8225					;THE TEST PASSES IF THESE COMPARISONS AGREE.
  8226
  8227					Q14400:	DMOVE	AC,[XWD 707070,707070
  8228	036120	120 04 0 00 036742 			    XWD 070707,070707]
  8229	036121	124 04 0 00 036524 		DMOVEM	AC,TSTWD	;INITIALIZE TEST WORDS
  8230						DMOVE	AC,[XWD 0,1
  8231	036122	120 04 0 00 036754 			    XWD 0,0]	;INITIALIZE AC,AC+1
  8232						DMOVN	AC+5,[XWD 0,1
  8233	036123	121 11 0 00 036754 			      XWD 0,0]	;SET-UP TO CHECK RESULTS
  8234	036124	125 04 0 00 036524 		DMOVNM	AC,TSTWD	;*MOVE NEGATIVE OF DOUBLE WORD FROM AC, AC+1
  8235									;TO MEMORY (TSTWD, TSTWD+1)
  8236	036125	120 04 0 00 036524 		DMOVE	AC,TSTWD	;PUT TEST RESULTS IN AC,AC+1
  8237	036126	312 04 0 00 000011 		CAME	AC,<AC+5>&17	;WAS TSTWD LOADED CORRECTLY?
  8238	036127	005 04 0 00 014401 		ER5	AC,14401	;FAIL IF CONTENTS(TSTWD) NOT = COMPLEMENT OF 0,1
  8239	036130	312 05 0 00 000012 		CAME	AC+1,<AC+6>&17	;WAS TSTWD+1 LOADED CORRECTLY?
  8240	036131	006 05 0 00 014402 		ER6	AC+1,14402	;FAIL IF CONTENTS(TSTWD) NOT = MINUS 0,0
  8241	036132	321 10 0 00 036120 		JUMPL	SAC,Q14400	;LOOP ON ERROR SWITCH^
  8242					PAGE
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 49-5
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVNM - GENERAL DATA PATTERNS                                SEQ 0204

  8243						DMVNM	1450,525252,525252,252525,252526^
  8244					;THIS MACRO TESTS THE DMOVNM INSTRUCTION
  8245					;FIRST, TSTWD, TSTWD+1 ARE PRELOADED WITH DATA OTHER THAN THE
  8246					;TEST WORDS AND AC, AC+1 ARE LOADED WITH THE TEST WORDS.
  8247					;THEN, THE NEGATIVE (TWOS COMPLEMENT) OF THE DATA SPECIFIED BY
  8248					;[XWD 525252,525252] AND [XWD 252525,252526] IS MOVED FROM AC, AC+1 TO MEMORY
  8249					;(TSTWD, TSTWD+1) VIA THE DMOVNM INSTRUCTION.
  8250					;252525(TSTWD) AND 252525(TSTWD+1) ARE THEN COMPARED WITH THE
  8251					;NEGATIVE (TWOS COMPLEMENT) OF THE TEST
  8252					;WORDS [XWD 525252,525252] AND [XWD 252525,252526], RESPECTIVELY.
  8253					;THE TEST PASSES IF THESE COMPARISONS AGREE.
  8254
  8255					Q14500:	DMOVE	AC,[XWD 707070,707070
  8256	036133	120 04 0 00 036742 			    XWD 070707,070707]
  8257	036134	124 04 0 00 036524 		DMOVEM	AC,TSTWD	;INITIALIZE TEST WORDS
  8258						DMOVE	AC,[XWD 525252,525252
  8259	036135	120 04 0 00 036762 			    XWD 252525,252526]	;INITIALIZE AC,AC+1
  8260						DMOVN	AC+5,[XWD 525252,525252
  8261	036136	121 11 0 00 036762 			      XWD 252525,252526]	;SET-UP TO CHECK RESULTS
  8262	036137	125 04 0 00 036524 		DMOVNM	AC,TSTWD	;*MOVE NEGATIVE OF DOUBLE WORD FROM AC, AC+1
  8263									;TO MEMORY (TSTWD, TSTWD+1)
  8264	036140	120 04 0 00 036524 		DMOVE	AC,TSTWD	;PUT TEST RESULTS IN AC,AC+1
  8265	036141	312 04 0 00 000011 		CAME	AC,<AC+5>&17	;WAS TSTWD LOADED CORRECTLY?
  8266	036142	005 04 0 00 014501 		ER5	AC,14501	;FAIL IF CONTENTS(TSTWD) NOT = COMPLEMENT OF 525252,525252
  8267	036143	312 05 0 00 000012 		CAME	AC+1,<AC+6>&17	;WAS TSTWD+1 LOADED CORRECTLY?
  8268	036144	006 05 0 00 014502 		ER6	AC+1,14502	;FAIL IF CONTENTS(TSTWD) NOT = MINUS 252525,252526
  8269	036145	321 10 0 00 036133 		JUMPL	SAC,Q14500	;LOOP ON ERROR SWITCH^
  8270					PAGE
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 49-6
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVNM - GENERAL DATA PATTERNS                                SEQ 0205

  8271						DMVNM	1460,252525,252525,525252,525253^
  8272					;THIS MACRO TESTS THE DMOVNM INSTRUCTION
  8273					;FIRST, TSTWD, TSTWD+1 ARE PRELOADED WITH DATA OTHER THAN THE
  8274					;TEST WORDS AND AC, AC+1 ARE LOADED WITH THE TEST WORDS.
  8275					;THEN, THE NEGATIVE (TWOS COMPLEMENT) OF THE DATA SPECIFIED BY
  8276					;[XWD 252525,252525] AND [XWD 525252,525253] IS MOVED FROM AC, AC+1 TO MEMORY
  8277					;(TSTWD, TSTWD+1) VIA THE DMOVNM INSTRUCTION.
  8278					;525252(TSTWD) AND 525252(TSTWD+1) ARE THEN COMPARED WITH THE
  8279					;NEGATIVE (TWOS COMPLEMENT) OF THE TEST
  8280					;WORDS [XWD 252525,252525] AND [XWD 525252,525253], RESPECTIVELY.
  8281					;THE TEST PASSES IF THESE COMPARISONS AGREE.
  8282
  8283					Q14600:	DMOVE	AC,[XWD 707070,707070
  8284	036146	120 04 0 00 036742 			    XWD 070707,070707]
  8285	036147	124 04 0 00 036524 		DMOVEM	AC,TSTWD	;INITIALIZE TEST WORDS
  8286						DMOVE	AC,[XWD 252525,252525
  8287	036150	120 04 0 00 036765 			    XWD 525252,525253]	;INITIALIZE AC,AC+1
  8288						DMOVN	AC+5,[XWD 252525,252525
  8289	036151	121 11 0 00 036765 			      XWD 525252,525253]	;SET-UP TO CHECK RESULTS
  8290	036152	125 04 0 00 036524 		DMOVNM	AC,TSTWD	;*MOVE NEGATIVE OF DOUBLE WORD FROM AC, AC+1
  8291									;TO MEMORY (TSTWD, TSTWD+1)
  8292	036153	120 04 0 00 036524 		DMOVE	AC,TSTWD	;PUT TEST RESULTS IN AC,AC+1
  8293	036154	312 04 0 00 000011 		CAME	AC,<AC+5>&17	;WAS TSTWD LOADED CORRECTLY?
  8294	036155	005 04 0 00 014601 		ER5	AC,14601	;FAIL IF CONTENTS(TSTWD) NOT = COMPLEMENT OF 252525,252525
  8295	036156	312 05 0 00 000012 		CAME	AC+1,<AC+6>&17	;WAS TSTWD+1 LOADED CORRECTLY?
  8296	036157	006 05 0 00 014602 		ER6	AC+1,14602	;FAIL IF CONTENTS(TSTWD) NOT = MINUS 525252,525253
  8297	036160	321 10 0 00 036146 		JUMPL	SAC,Q14600	;LOOP ON ERROR SWITCH^
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 50
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVNM - AC=17, AC+1=0                                        SEQ 0206

  8298					SUBTTL	DIAGNOSTIC SECTION - DMOVNM - AC=17, AC+1=0
  8299
  8300					;CHECK DMOVNM FOR AC=17 AND AC+1=0
  8301
  8302			000017			AC=17
  8303			000003			SAC=<AC+4>&17
  8304						SAVEAC	(1,1)^
  8305	036161	201 03 0 00 036161 		MOVEI	SAC,.
  8306	036162	202 03 0 00 030051 		MOVEM	SAC,TESTPC	;SETUP SUBTEST PC
  8307	036163	201 03 0 00 000003 		MOVEI	SAC,SAC		;INFORM ERROR ROUTINE WHICH
  8308	036164	202 03 0 00 037213 		MOVEM	SAC,ERRLOP#	;AC IS USED FOR ITERATION^
  8309
  8310						DMVNM17	1470,0,0,0,1^
  8311					;THIS MACRO TESTS THE DMOVNM INSTRUCTION
  8312					;FIRST, TSTWD, TSTWD+1 ARE PRELOADED WITH DATA OTHER THAN THE
  8313					;TEST WORDS AND AC, AC+1 ARE LOADED WITH THE TEST WORDS.
  8314					;THEN, THE NEGATIVE (TWOS COMPLEMENT) OF THE DATA SPECIFIED BY
  8315					;[XWD 0,0] AND [XWD 0,1] IS MOVED FROM AC, AC+1 TO MEMORY
  8316					;(TSTWD, TSTWD+1) VIA THE DMOVNM INSTRUCTION.
  8317					;0(TSTWD) AND 0(TSTWD+1) ARE THEN COMPARED WITH THE
  8318					;NEGATIVE (TWOS COMPLEMENT) OF THE TEST
  8319					;WORDS [XWD 0,0] AND [XWD 0,1], RESPECTIVELY.
  8320					;THE TEST PASSES IF THESE COMPARISONS AGREE.
  8321
  8322					Q14700:	DMOVE	AC,[XWD 707070,707070
  8323	036165	120 17 0 00 036742 			    XWD 070707,070707]
  8324	036166	124 17 0 00 036524 		DMOVEM	AC,TSTWD	;INITIALIZE TEST WORDS
  8325						DMOVE	AC,[XWD 0,0
  8326	036167	120 17 0 00 036755 			    XWD 0,1]	;INITIALIZE AC,AC+1
  8327						DMOVN	AC+5,[XWD 0,0
  8328	036170	121 04 0 00 036755 			      XWD 0,1]	;SET-UP TO CHECK RESULTS
  8329	036171	125 17 0 00 036524 		DMOVNM	AC,TSTWD	;*MOVE NEGATIVE OF DOUBLE WORD FROM AC, AC+1
  8330									;TO MEMORY (TSTWD, TSTWD+1)
  8331
  8332	036172	120 17 0 00 036524 		DMOVE	AC,TSTWD	;PUT TEST RESULTS IN AC,AC+1
  8333	036173	316 17 0 00 000004 		CAMN	AC,<AC+5>&17	;WAS TSTWD LOADED CORRECTLY?
  8334	036174	254 00 0 00 036200 		JRST	.+4
  8335	036175	202 17 0 00 000016 		MOVEM	AC,AC-1		;SAVE BAD WORD
  8336	036176	200 17 0 00 037223 		MOVE	AC,%SV17	;RESTORE P
  8337	036177	005 16 0 00 014701 		ER5	AC-1,14701	;FAIL IF CONTENTS(TSTWD) NOT = COMPLEMENT OF 0,0
  8338	036200	316 00 0 00 000005 		CAMN	AC+1,<AC+6>&17	;WAS TSTWD+1 LOADED CORRECTLY?
  8339	036201	254 00 0 00 036205 		JRST	.+4		;HERE IF TESTS OK
  8340	036202	202 17 0 00 000016 		MOVEM	AC,AC-1		;SAVE BAD WORD
  8341	036203	200 17 0 00 037223 		MOVE	AC,%SV17
  8342	036204	006 00 0 00 014702 		ER6	AC+1,14702	;FAIL IF CONTENTS(TSTWD) NOT = MINUS 0,1
  8343	036205	200 17 0 00 037223 		MOVE	AC,%SV17
  8344	036206	321 03 0 00 036165 		JUMPL	SAC,Q14700	;LOOP ON ERROR SWITCH^
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 51
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVNM - AC RANGE ADDRESS                                     SEQ 0207

  8345					SUBTTL	DIAGNOSTIC SECTION - DMOVNM - AC RANGE ADDRESS
  8346
  8347					;CHECK DMOVNM WHERE 'E' IS WITHIN THE 'AC' RANGE
  8348
  8349			000004			AC=4
  8350			000010			SAC=<AC+4>&17
  8351						SAVEAC	(1,1)^
  8352	036207	201 10 0 00 036207 		MOVEI	SAC,.
  8353	036210	202 10 0 00 030051 		MOVEM	SAC,TESTPC	;SETUP SUBTEST PC
  8354	036211	201 10 0 00 000010 		MOVEI	SAC,SAC		;INFORM ERROR ROUTINE WHICH
  8355	036212	202 10 0 00 037213 		MOVEM	SAC,ERRLOP#	;AC IS USED FOR ITERATION^
  8356			000002			E=AC-2
  8357
  8358			015000		SN=15000
  8359			000001			E=<E-1>&17
  8360
  8361					Q15000:	REPEAT	^D5,<
  8362					;CHECK DMOVNM WHERE 'E' IS WITHIN THE 'AC' RANGE
  8363					
  8364					SN=SN+1
  8365						E=<E+1>&17
  8366						DMOVE	E,[XWD 707070,707070
  8367							  XWD 070707,070707]	;INITIALIZE E,E+1
  8368						DMOVE	AC,[XWD 0,0
  8369							  XWD 0,-1]	;INITIALIZE AC,AC+1
  8370						DMOVN	AC+5,AC		;INITIALIZE TEST RESULTS
  8371						IFE	<E-<AC+1>>,<
  8372						SKIPN	KLFLG		;DON'T DO NEXT INST IF KL10
  8373						MOVNM	AC+5,<AC+6>&17>
  8374						DMOVNM	AC,E		;*MOVE NEGATIVE OF DOUBLE WORD FROM AC, AC+1 TO MEMORY
  8375						CAME	E,AC+5		;WAS 'E' UPDATED CORRECTLY?
  8376						ER5	E,SN		;FAIL IF C(E) IS NOT = TO COMPLEMENT C(AC)
  8377						CAME	E+1,AC+6	;WAS 'E+1' UPDATED CORRECTLY?
  8378						ER6	E+1,SN		;FAIL IF C(E+1) IS NOT = NEGATIVE C(AC+1)
  8379						IFN	<E-<AC+1>>,<
  8380						JUMPL	SAC,.-^D8	;LOOP ON ERROR SWITCH>
  8381						IFE	<E-<AC+1>>,<
  8382						JUMPL	SAC,.-^D10	;LOOP ON ERROR SWITCH>
  8383					>
  8384
  8385					;CHECK DMOVNM WHERE 'E' IS WITHIN THE 'AC' RANGE
  8386
  8387			015001		SN=SN+1
  8388			000002			E=<E+1>&17
  8389						DMOVE	E,[XWD 707070,707070
  8390	036213	120 02 0 00 036742 			  XWD 070707,070707]	;INITIALIZE E,E+1
  8391						DMOVE	AC,[XWD 0,0
  8392	036214	120 04 0 00 036770 			  XWD 0,-1]	;INITIALIZE AC,AC+1
  8393	036215	121 11 0 00 000004 		DMOVN	AC+5,AC		;INITIALIZE TEST RESULTS
  8394						IFE	<E-<AC+1>>,<
  8395						SKIPN	KLFLG		;DON'T DO NEXT INST IF KL10
  8396						MOVNM	AC+5,<AC+6>&17>
  8397	036216	125 04 0 00 000002 		DMOVNM	AC,E		;*MOVE NEGATIVE OF DOUBLE WORD FROM AC, AC+1 TO MEMORY
  8398	036217	312 02 0 00 000011 		CAME	E,AC+5		;WAS 'E' UPDATED CORRECTLY?
  8399	036220	005 02 0 00 015001 		ER5	E,SN		;FAIL IF C(E) IS NOT = TO COMPLEMENT C(AC)
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 51-1
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVNM - AC RANGE ADDRESS                                     SEQ 0208

  8400	036221	312 03 0 00 000012 		CAME	E+1,AC+6	;WAS 'E+1' UPDATED CORRECTLY?
  8401	036222	006 03 0 00 015001 		ER6	E+1,SN		;FAIL IF C(E+1) IS NOT = NEGATIVE C(AC+1)
  8402						IFN	<E-<AC+1>>,<
  8403	036223	321 10 0 00 036213 		JUMPL	SAC,.-^D8	;LOOP ON ERROR SWITCH>
  8404						IFE	<E-<AC+1>>,<
  8405						JUMPL	SAC,.-^D10	;LOOP ON ERROR SWITCH>
  8406
  8407
  8408					;CHECK DMOVNM WHERE 'E' IS WITHIN THE 'AC' RANGE
  8409
  8410			015002		SN=SN+1
  8411			000003			E=<E+1>&17
  8412						DMOVE	E,[XWD 707070,707070
  8413	036224	120 03 0 00 036742 			  XWD 070707,070707]	;INITIALIZE E,E+1
  8414						DMOVE	AC,[XWD 0,0
  8415	036225	120 04 0 00 036770 			  XWD 0,-1]	;INITIALIZE AC,AC+1
  8416	036226	121 11 0 00 000004 		DMOVN	AC+5,AC		;INITIALIZE TEST RESULTS
  8417						IFE	<E-<AC+1>>,<
  8418						SKIPN	KLFLG		;DON'T DO NEXT INST IF KL10
  8419						MOVNM	AC+5,<AC+6>&17>
  8420	036227	125 04 0 00 000003 		DMOVNM	AC,E		;*MOVE NEGATIVE OF DOUBLE WORD FROM AC, AC+1 TO MEMORY
  8421	036230	312 03 0 00 000011 		CAME	E,AC+5		;WAS 'E' UPDATED CORRECTLY?
  8422	036231	005 03 0 00 015002 		ER5	E,SN		;FAIL IF C(E) IS NOT = TO COMPLEMENT C(AC)
  8423	036232	312 04 0 00 000012 		CAME	E+1,AC+6	;WAS 'E+1' UPDATED CORRECTLY?
  8424	036233	006 04 0 00 015002 		ER6	E+1,SN		;FAIL IF C(E+1) IS NOT = NEGATIVE C(AC+1)
  8425						IFN	<E-<AC+1>>,<
  8426	036234	321 10 0 00 036224 		JUMPL	SAC,.-^D8	;LOOP ON ERROR SWITCH>
  8427						IFE	<E-<AC+1>>,<
  8428						JUMPL	SAC,.-^D10	;LOOP ON ERROR SWITCH>
  8429
  8430
  8431					;CHECK DMOVNM WHERE 'E' IS WITHIN THE 'AC' RANGE
  8432
  8433			015003		SN=SN+1
  8434			000004			E=<E+1>&17
  8435						DMOVE	E,[XWD 707070,707070
  8436	036235	120 04 0 00 036742 			  XWD 070707,070707]	;INITIALIZE E,E+1
  8437						DMOVE	AC,[XWD 0,0
  8438	036236	120 04 0 00 036770 			  XWD 0,-1]	;INITIALIZE AC,AC+1
  8439	036237	121 11 0 00 000004 		DMOVN	AC+5,AC		;INITIALIZE TEST RESULTS
  8440						IFE	<E-<AC+1>>,<
  8441						SKIPN	KLFLG		;DON'T DO NEXT INST IF KL10
  8442						MOVNM	AC+5,<AC+6>&17>
  8443	036240	125 04 0 00 000004 		DMOVNM	AC,E		;*MOVE NEGATIVE OF DOUBLE WORD FROM AC, AC+1 TO MEMORY
  8444	036241	312 04 0 00 000011 		CAME	E,AC+5		;WAS 'E' UPDATED CORRECTLY?
  8445	036242	005 04 0 00 015003 		ER5	E,SN		;FAIL IF C(E) IS NOT = TO COMPLEMENT C(AC)
  8446	036243	312 05 0 00 000012 		CAME	E+1,AC+6	;WAS 'E+1' UPDATED CORRECTLY?
  8447	036244	006 05 0 00 015003 		ER6	E+1,SN		;FAIL IF C(E+1) IS NOT = NEGATIVE C(AC+1)
  8448						IFN	<E-<AC+1>>,<
  8449	036245	321 10 0 00 036235 		JUMPL	SAC,.-^D8	;LOOP ON ERROR SWITCH>
  8450						IFE	<E-<AC+1>>,<
  8451						JUMPL	SAC,.-^D10	;LOOP ON ERROR SWITCH>
  8452
  8453
  8454					;CHECK DMOVNM WHERE 'E' IS WITHIN THE 'AC' RANGE
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 51-2
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVNM - AC RANGE ADDRESS                                     SEQ 0209

  8455
  8456			015004		SN=SN+1
  8457			000005			E=<E+1>&17
  8458						DMOVE	E,[XWD 707070,707070
  8459	036246	120 05 0 00 036742 			  XWD 070707,070707]	;INITIALIZE E,E+1
  8460						DMOVE	AC,[XWD 0,0
  8461	036247	120 04 0 00 036770 			  XWD 0,-1]	;INITIALIZE AC,AC+1
  8462	036250	121 11 0 00 000004 		DMOVN	AC+5,AC		;INITIALIZE TEST RESULTS
  8463						IFE	<E-<AC+1>>,<
  8464	036251	336 00 0 00 030041 		SKIPN	KLFLG		;DON'T DO NEXT INST IF KL10
  8465	036252	212 11 0 00 000012 		MOVNM	AC+5,<AC+6>&17>
  8466	036253	125 04 0 00 000005 		DMOVNM	AC,E		;*MOVE NEGATIVE OF DOUBLE WORD FROM AC, AC+1 TO MEMORY
  8467	036254	312 05 0 00 000011 		CAME	E,AC+5		;WAS 'E' UPDATED CORRECTLY?
  8468	036255	005 05 0 00 015004 		ER5	E,SN		;FAIL IF C(E) IS NOT = TO COMPLEMENT C(AC)
  8469	036256	312 06 0 00 000012 		CAME	E+1,AC+6	;WAS 'E+1' UPDATED CORRECTLY?
  8470	036257	006 06 0 00 015004 		ER6	E+1,SN		;FAIL IF C(E+1) IS NOT = NEGATIVE C(AC+1)
  8471						IFN	<E-<AC+1>>,<
  8472						JUMPL	SAC,.-^D8	;LOOP ON ERROR SWITCH>
  8473						IFE	<E-<AC+1>>,<
  8474	036260	321 10 0 00 036246 		JUMPL	SAC,.-^D10	;LOOP ON ERROR SWITCH>
  8475
  8476
  8477					;CHECK DMOVNM WHERE 'E' IS WITHIN THE 'AC' RANGE
  8478
  8479			015005		SN=SN+1
  8480			000006			E=<E+1>&17
  8481						DMOVE	E,[XWD 707070,707070
  8482	036261	120 06 0 00 036742 			  XWD 070707,070707]	;INITIALIZE E,E+1
  8483						DMOVE	AC,[XWD 0,0
  8484	036262	120 04 0 00 036770 			  XWD 0,-1]	;INITIALIZE AC,AC+1
  8485	036263	121 11 0 00 000004 		DMOVN	AC+5,AC		;INITIALIZE TEST RESULTS
  8486						IFE	<E-<AC+1>>,<
  8487						SKIPN	KLFLG		;DON'T DO NEXT INST IF KL10
  8488						MOVNM	AC+5,<AC+6>&17>
  8489	036264	125 04 0 00 000006 		DMOVNM	AC,E		;*MOVE NEGATIVE OF DOUBLE WORD FROM AC, AC+1 TO MEMORY
  8490	036265	312 06 0 00 000011 		CAME	E,AC+5		;WAS 'E' UPDATED CORRECTLY?
  8491	036266	005 06 0 00 015005 		ER5	E,SN		;FAIL IF C(E) IS NOT = TO COMPLEMENT C(AC)
  8492	036267	312 07 0 00 000012 		CAME	E+1,AC+6	;WAS 'E+1' UPDATED CORRECTLY?
  8493	036270	006 07 0 00 015005 		ER6	E+1,SN		;FAIL IF C(E+1) IS NOT = NEGATIVE C(AC+1)
  8494						IFN	<E-<AC+1>>,<
  8495	036271	321 10 0 00 036261 		JUMPL	SAC,.-^D8	;LOOP ON ERROR SWITCH>
  8496						IFE	<E-<AC+1>>,<
  8497						JUMPL	SAC,.-^D10	;LOOP ON ERROR SWITCH>
  8498
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 52
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVNM - GENERAL DATA PATTERNS                                SEQ 0210

  8499					SUBTTL	DIAGNOSTIC SECTION - DMOVNM - GENERAL DATA PATTERNS
  8500
  8501						DMVNM	1510,400000,0,0,0^
  8502					;THIS MACRO TESTS THE DMOVNM INSTRUCTION
  8503					;FIRST, TSTWD, TSTWD+1 ARE PRELOADED WITH DATA OTHER THAN THE
  8504					;TEST WORDS AND AC, AC+1 ARE LOADED WITH THE TEST WORDS.
  8505					;THEN, THE NEGATIVE (TWOS COMPLEMENT) OF THE DATA SPECIFIED BY
  8506					;[XWD 400000,0] AND [XWD 0,0] IS MOVED FROM AC, AC+1 TO MEMORY
  8507					;(TSTWD, TSTWD+1) VIA THE DMOVNM INSTRUCTION.
  8508					;0(TSTWD) AND 0(TSTWD+1) ARE THEN COMPARED WITH THE
  8509					;NEGATIVE (TWOS COMPLEMENT) OF THE TEST
  8510					;WORDS [XWD 400000,0] AND [XWD 0,0], RESPECTIVELY.
  8511					;THE TEST PASSES IF THESE COMPARISONS AGREE.
  8512
  8513					Q15100:	DMOVE	AC,[XWD 707070,707070
  8514	036272	120 04 0 00 036742 			    XWD 070707,070707]
  8515	036273	124 04 0 00 036524 		DMOVEM	AC,TSTWD	;INITIALIZE TEST WORDS
  8516						DMOVE	AC,[XWD 400000,0
  8517	036274	120 04 0 00 036772 			    XWD 0,0]	;INITIALIZE AC,AC+1
  8518						DMOVN	AC+5,[XWD 400000,0
  8519	036275	121 11 0 00 036772 			      XWD 0,0]	;SET-UP TO CHECK RESULTS
  8520	036276	125 04 0 00 036524 		DMOVNM	AC,TSTWD	;*MOVE NEGATIVE OF DOUBLE WORD FROM AC, AC+1
  8521									;TO MEMORY (TSTWD, TSTWD+1)
  8522	036277	120 04 0 00 036524 		DMOVE	AC,TSTWD	;PUT TEST RESULTS IN AC,AC+1
  8523	036300	312 04 0 00 000011 		CAME	AC,<AC+5>&17	;WAS TSTWD LOADED CORRECTLY?
  8524	036301	005 04 0 00 015101 		ER5	AC,15101	;FAIL IF CONTENTS(TSTWD) NOT = COMPLEMENT OF 400000,0
  8525	036302	312 05 0 00 000012 		CAME	AC+1,<AC+6>&17	;WAS TSTWD+1 LOADED CORRECTLY?
  8526	036303	006 05 0 00 015102 		ER6	AC+1,15102	;FAIL IF CONTENTS(TSTWD) NOT = MINUS 0,0
  8527	036304	321 10 0 00 036272 		JUMPL	SAC,Q15100	;LOOP ON ERROR SWITCH^
  8528					PAGE
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 52-1
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVNM - GENERAL DATA PATTERNS                                SEQ 0211

  8529						DMVNM	1520,0,0,400000,0^
  8530					;THIS MACRO TESTS THE DMOVNM INSTRUCTION
  8531					;FIRST, TSTWD, TSTWD+1 ARE PRELOADED WITH DATA OTHER THAN THE
  8532					;TEST WORDS AND AC, AC+1 ARE LOADED WITH THE TEST WORDS.
  8533					;THEN, THE NEGATIVE (TWOS COMPLEMENT) OF THE DATA SPECIFIED BY
  8534					;[XWD 0,0] AND [XWD 400000,0] IS MOVED FROM AC, AC+1 TO MEMORY
  8535					;(TSTWD, TSTWD+1) VIA THE DMOVNM INSTRUCTION.
  8536					;400000(TSTWD) AND 400000(TSTWD+1) ARE THEN COMPARED WITH THE
  8537					;NEGATIVE (TWOS COMPLEMENT) OF THE TEST
  8538					;WORDS [XWD 0,0] AND [XWD 400000,0], RESPECTIVELY.
  8539					;THE TEST PASSES IF THESE COMPARISONS AGREE.
  8540
  8541					Q15200:	DMOVE	AC,[XWD 707070,707070
  8542	036305	120 04 0 00 036742 			    XWD 070707,070707]
  8543	036306	124 04 0 00 036524 		DMOVEM	AC,TSTWD	;INITIALIZE TEST WORDS
  8544						DMOVE	AC,[XWD 0,0
  8545	036307	120 04 0 00 036773 			    XWD 400000,0]	;INITIALIZE AC,AC+1
  8546						DMOVN	AC+5,[XWD 0,0
  8547	036310	121 11 0 00 036773 			      XWD 400000,0]	;SET-UP TO CHECK RESULTS
  8548	036311	125 04 0 00 036524 		DMOVNM	AC,TSTWD	;*MOVE NEGATIVE OF DOUBLE WORD FROM AC, AC+1
  8549									;TO MEMORY (TSTWD, TSTWD+1)
  8550	036312	120 04 0 00 036524 		DMOVE	AC,TSTWD	;PUT TEST RESULTS IN AC,AC+1
  8551	036313	312 04 0 00 000011 		CAME	AC,<AC+5>&17	;WAS TSTWD LOADED CORRECTLY?
  8552	036314	005 04 0 00 015201 		ER5	AC,15201	;FAIL IF CONTENTS(TSTWD) NOT = COMPLEMENT OF 0,0
  8553	036315	312 05 0 00 000012 		CAME	AC+1,<AC+6>&17	;WAS TSTWD+1 LOADED CORRECTLY?
  8554	036316	006 05 0 00 015202 		ER6	AC+1,15202	;FAIL IF CONTENTS(TSTWD) NOT = MINUS 400000,0
  8555	036317	321 10 0 00 036305 		JUMPL	SAC,Q15200	;LOOP ON ERROR SWITCH^
  8556					PAGE
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 52-2
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVNM - GENERAL DATA PATTERNS                                SEQ 0212

  8557						DMVNM	1530,400000,0,400000,0^
  8558					;THIS MACRO TESTS THE DMOVNM INSTRUCTION
  8559					;FIRST, TSTWD, TSTWD+1 ARE PRELOADED WITH DATA OTHER THAN THE
  8560					;TEST WORDS AND AC, AC+1 ARE LOADED WITH THE TEST WORDS.
  8561					;THEN, THE NEGATIVE (TWOS COMPLEMENT) OF THE DATA SPECIFIED BY
  8562					;[XWD 400000,0] AND [XWD 400000,0] IS MOVED FROM AC, AC+1 TO MEMORY
  8563					;(TSTWD, TSTWD+1) VIA THE DMOVNM INSTRUCTION.
  8564					;400000(TSTWD) AND 400000(TSTWD+1) ARE THEN COMPARED WITH THE
  8565					;NEGATIVE (TWOS COMPLEMENT) OF THE TEST
  8566					;WORDS [XWD 400000,0] AND [XWD 400000,0], RESPECTIVELY.
  8567					;THE TEST PASSES IF THESE COMPARISONS AGREE.
  8568
  8569					Q15300:	DMOVE	AC,[XWD 707070,707070
  8570	036320	120 04 0 00 036742 			    XWD 070707,070707]
  8571	036321	124 04 0 00 036524 		DMOVEM	AC,TSTWD	;INITIALIZE TEST WORDS
  8572						DMOVE	AC,[XWD 400000,0
  8573	036322	120 04 0 00 036774 			    XWD 400000,0]	;INITIALIZE AC,AC+1
  8574						DMOVN	AC+5,[XWD 400000,0
  8575	036323	121 11 0 00 036774 			      XWD 400000,0]	;SET-UP TO CHECK RESULTS
  8576	036324	125 04 0 00 036524 		DMOVNM	AC,TSTWD	;*MOVE NEGATIVE OF DOUBLE WORD FROM AC, AC+1
  8577									;TO MEMORY (TSTWD, TSTWD+1)
  8578	036325	120 04 0 00 036524 		DMOVE	AC,TSTWD	;PUT TEST RESULTS IN AC,AC+1
  8579	036326	312 04 0 00 000011 		CAME	AC,<AC+5>&17	;WAS TSTWD LOADED CORRECTLY?
  8580	036327	005 04 0 00 015301 		ER5	AC,15301	;FAIL IF CONTENTS(TSTWD) NOT = COMPLEMENT OF 400000,0
  8581	036330	312 05 0 00 000012 		CAME	AC+1,<AC+6>&17	;WAS TSTWD+1 LOADED CORRECTLY?
  8582	036331	006 05 0 00 015302 		ER6	AC+1,15302	;FAIL IF CONTENTS(TSTWD) NOT = MINUS 400000,0
  8583	036332	321 10 0 00 036320 		JUMPL	SAC,Q15300	;LOOP ON ERROR SWITCH^
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 53
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVNM - OVERFLOW AND CARRY FLAGS                             SEQ 0213

  8584					SUBTTL	DIAGNOSTIC SECTION - DMOVNM - OVERFLOW AND CARRY FLAGS
  8585
  8586						DMVNMF	1540,0,0,0,0,0,010000,300000,310000^
  8587					;**KI10**
  8588					;THIS MACRO VERIFIES THAT THE DMOVN INSTRUCTION DOES NOT SET OVERFLOW
  8589					;OR CARRY FLAGS ON THE KI10.  FIRST, OVFL AND CRY0,1 FLAGS ARE CLEARED;
  8590					;THEN,DMOVN IS EXECUTED.  NEXT, OVFL AND CRY0,1 FLAGS ARE EXAMINED.
  8591					;IF ANY OF THESE FLAGS ARE SET, THE TEST FAILS.
  8592
  8593					;**KL10**
  8594					;THIS MACRO VERIFIES THAT THE DMOVN INSTRUCTION DOES SET OVERFLOW
  8595					;OR CARRY FLAGS ON THE KL10.  FIRST, OVFL AND CRY0,1 FLAGS ARE CLEARED;
  8596					;THEN,DMOVN IS EXECUTED.  NEXT, OVFL AND CRY0,1 FLAGS ARE EXAMINED.
  8597					;IF THE PROPER FLAGS ARE NOT SET, THE TEST FAILS.
  8598
  8599	036333	255 17 0 00 036334 	Q15400:	JFCL	17,.+1		;CLEAR OVFL AND CRY0,1 FLAGS
  8600						DMOVE	AC,[XWD 0,0
  8601	036334	120 04 0 00 036744 			    XWD 0,0]	;SETUP INITIAL
  8602	036335	125 04 0 00 036524 		DMOVNM	AC,TSTWD	;*DMOVNM TEST
  8603	036336	265 04 0 00 036337 		JSP	AC,.+1		;READ FLAGS
  8604	036337	621 04 0 00 027777 	Q15401:	TLZ	AC,027777	;CLEAR EXTRA JUNK
  8605	036340	603 04 0 00 010000 		TLNE	AC,USERF	;IN USER MODE ?
  8606	036341	254 00 0 00 036353 		JRST	Q15404		;YES
  8607	036342	332 00 0 00 030041 		SKIPE	KLFLG		;KL10 ?
  8608	036343	254 00 0 00 036350 		JRST	Q15403		;YES
  8609					;KI10 EXEC MODE
  8610	036344	312 04 0 00 037020 		CAME	AC,[0,,Q15401]
  8611	036345	013 04 0 00 015401 		ER13	AC,15401		;FAIL IF OVFL OR CRY0,1 FLG SET
  8612	036346	321 10 0 00 036333 	Q15402:	JUMPL	SAC,Q15400	;LOOP ON ERROR SWITCH
  8613	036347	254 00 0 00 036363 		JRST	Q15406
  8614					;KL10 EXEC MODE
  8615	036350	312 04 0 00 037021 	Q15403:	CAME	AC,[300000,,Q15401]
  8616	036351	013 04 0 00 015401 		ER13	AC,15401		;FAIL IF FLAGS NOT SET
  8617	036352	254 00 0 00 036346 		JRST	Q15402
  8618					;KL10/KI10 USER MODE
  8619	036353	332 00 0 00 030041 	Q15404:	SKIPE	KLFLG		;KL10 ?
  8620	036354	254 00 0 00 036360 		JRST	Q15405		;YES
  8621					;KI10 USER MODE
  8622	036355	312 04 0 00 037022 		CAME	AC,[010000,,Q15401]
  8623	036356	013 04 0 00 015401 		ER13	AC,15401		;FAIL IF ANY FLAGS SET
  8624	036357	254 00 0 00 036346 		JRST	Q15402
  8625					;KL10 USER MODE
  8626	036360	312 04 0 00 037023 	Q15405:	CAME	AC,[310000,,Q15401]
  8627	036361	013 04 0 00 015401 		ER13	AC,15401		;FAIL IF FLAGS NOT SET
  8628	036362	254 00 0 00 036346 		JRST	Q15402
  8629
  8630	036363	254 00 0 00 036364 	Q15406:	JRST	.+1^
  8631					PAGE
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 53-1
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVNM - OVERFLOW AND CARRY FLAGS                             SEQ 0214

  8632						DMVNMF	1550,400000,0,0,0,0,010000,100000,510000^
  8633					;**KI10**
  8634					;THIS MACRO VERIFIES THAT THE DMOVN INSTRUCTION DOES NOT SET OVERFLOW
  8635					;OR CARRY FLAGS ON THE KI10.  FIRST, OVFL AND CRY0,1 FLAGS ARE CLEARED;
  8636					;THEN,DMOVN IS EXECUTED.  NEXT, OVFL AND CRY0,1 FLAGS ARE EXAMINED.
  8637					;IF ANY OF THESE FLAGS ARE SET, THE TEST FAILS.
  8638
  8639					;**KL10**
  8640					;THIS MACRO VERIFIES THAT THE DMOVN INSTRUCTION DOES SET OVERFLOW
  8641					;OR CARRY FLAGS ON THE KL10.  FIRST, OVFL AND CRY0,1 FLAGS ARE CLEARED;
  8642					;THEN,DMOVN IS EXECUTED.  NEXT, OVFL AND CRY0,1 FLAGS ARE EXAMINED.
  8643					;IF THE PROPER FLAGS ARE NOT SET, THE TEST FAILS.
  8644
  8645	036364	255 17 0 00 036365 	Q15500:	JFCL	17,.+1		;CLEAR OVFL AND CRY0,1 FLAGS
  8646						DMOVE	AC,[XWD 400000,0
  8647	036365	120 04 0 00 036772 			    XWD 0,0]	;SETUP INITIAL
  8648	036366	125 04 0 00 036524 		DMOVNM	AC,TSTWD	;*DMOVNM TEST
  8649	036367	265 04 0 00 036370 		JSP	AC,.+1		;READ FLAGS
  8650	036370	621 04 0 00 027777 	Q15501:	TLZ	AC,027777	;CLEAR EXTRA JUNK
  8651	036371	603 04 0 00 010000 		TLNE	AC,USERF	;IN USER MODE ?
  8652	036372	254 00 0 00 036404 		JRST	Q15504		;YES
  8653	036373	332 00 0 00 030041 		SKIPE	KLFLG		;KL10 ?
  8654	036374	254 00 0 00 036401 		JRST	Q15503		;YES
  8655					;KI10 EXEC MODE
  8656	036375	312 04 0 00 037024 		CAME	AC,[0,,Q15501]
  8657	036376	013 04 0 00 015501 		ER13	AC,15501		;FAIL IF OVFL OR CRY0,1 FLG SET
  8658	036377	321 10 0 00 036364 	Q15502:	JUMPL	SAC,Q15500	;LOOP ON ERROR SWITCH
  8659	036400	254 00 0 00 036414 		JRST	Q15506
  8660					;KL10 EXEC MODE
  8661	036401	312 04 0 00 037025 	Q15503:	CAME	AC,[100000,,Q15501]
  8662	036402	013 04 0 00 015501 		ER13	AC,15501		;FAIL IF FLAGS NOT SET
  8663	036403	254 00 0 00 036377 		JRST	Q15502
  8664					;KL10/KI10 USER MODE
  8665	036404	332 00 0 00 030041 	Q15504:	SKIPE	KLFLG		;KL10 ?
  8666	036405	254 00 0 00 036411 		JRST	Q15505		;YES
  8667					;KI10 USER MODE
  8668	036406	312 04 0 00 037026 		CAME	AC,[010000,,Q15501]
  8669	036407	013 04 0 00 015501 		ER13	AC,15501		;FAIL IF ANY FLAGS SET
  8670	036410	254 00 0 00 036377 		JRST	Q15502
  8671					;KL10 USER MODE
  8672	036411	312 04 0 00 037027 	Q15505:	CAME	AC,[510000,,Q15501]
  8673	036412	013 04 0 00 015501 		ER13	AC,15501		;FAIL IF FLAGS NOT SET
  8674	036413	254 00 0 00 036377 		JRST	Q15502
  8675
  8676	036414	254 00 0 00 036415 	Q15506:	JRST	.+1^
  8677					PAGE
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 53-2
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVNM - OVERFLOW AND CARRY FLAGS                             SEQ 0215

  8678						DMVNMF	1560,0,0,400000,0,0,010000,300000,310000^
  8679					;**KI10**
  8680					;THIS MACRO VERIFIES THAT THE DMOVN INSTRUCTION DOES NOT SET OVERFLOW
  8681					;OR CARRY FLAGS ON THE KI10.  FIRST, OVFL AND CRY0,1 FLAGS ARE CLEARED;
  8682					;THEN,DMOVN IS EXECUTED.  NEXT, OVFL AND CRY0,1 FLAGS ARE EXAMINED.
  8683					;IF ANY OF THESE FLAGS ARE SET, THE TEST FAILS.
  8684
  8685					;**KL10**
  8686					;THIS MACRO VERIFIES THAT THE DMOVN INSTRUCTION DOES SET OVERFLOW
  8687					;OR CARRY FLAGS ON THE KL10.  FIRST, OVFL AND CRY0,1 FLAGS ARE CLEARED;
  8688					;THEN,DMOVN IS EXECUTED.  NEXT, OVFL AND CRY0,1 FLAGS ARE EXAMINED.
  8689					;IF THE PROPER FLAGS ARE NOT SET, THE TEST FAILS.
  8690
  8691	036415	255 17 0 00 036416 	Q15600:	JFCL	17,.+1		;CLEAR OVFL AND CRY0,1 FLAGS
  8692						DMOVE	AC,[XWD 0,0
  8693	036416	120 04 0 00 036773 			    XWD 400000,0]	;SETUP INITIAL
  8694	036417	125 04 0 00 036524 		DMOVNM	AC,TSTWD	;*DMOVNM TEST
  8695	036420	265 04 0 00 036421 		JSP	AC,.+1		;READ FLAGS
  8696	036421	621 04 0 00 027777 	Q15601:	TLZ	AC,027777	;CLEAR EXTRA JUNK
  8697	036422	603 04 0 00 010000 		TLNE	AC,USERF	;IN USER MODE ?
  8698	036423	254 00 0 00 036435 		JRST	Q15604		;YES
  8699	036424	332 00 0 00 030041 		SKIPE	KLFLG		;KL10 ?
  8700	036425	254 00 0 00 036432 		JRST	Q15603		;YES
  8701					;KI10 EXEC MODE
  8702	036426	312 04 0 00 037030 		CAME	AC,[0,,Q15601]
  8703	036427	013 04 0 00 015601 		ER13	AC,15601		;FAIL IF OVFL OR CRY0,1 FLG SET
  8704	036430	321 10 0 00 036415 	Q15602:	JUMPL	SAC,Q15600	;LOOP ON ERROR SWITCH
  8705	036431	254 00 0 00 036445 		JRST	Q15606
  8706					;KL10 EXEC MODE
  8707	036432	312 04 0 00 037031 	Q15603:	CAME	AC,[300000,,Q15601]
  8708	036433	013 04 0 00 015601 		ER13	AC,15601		;FAIL IF FLAGS NOT SET
  8709	036434	254 00 0 00 036430 		JRST	Q15602
  8710					;KL10/KI10 USER MODE
  8711	036435	332 00 0 00 030041 	Q15604:	SKIPE	KLFLG		;KL10 ?
  8712	036436	254 00 0 00 036442 		JRST	Q15605		;YES
  8713					;KI10 USER MODE
  8714	036437	312 04 0 00 037032 		CAME	AC,[010000,,Q15601]
  8715	036440	013 04 0 00 015601 		ER13	AC,15601		;FAIL IF ANY FLAGS SET
  8716	036441	254 00 0 00 036430 		JRST	Q15602
  8717					;KL10 USER MODE
  8718	036442	312 04 0 00 037033 	Q15605:	CAME	AC,[310000,,Q15601]
  8719	036443	013 04 0 00 015601 		ER13	AC,15601		;FAIL IF FLAGS NOT SET
  8720	036444	254 00 0 00 036430 		JRST	Q15602
  8721
  8722	036445	254 00 0 00 036446 	Q15606:	JRST	.+1^
  8723					PAGE
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 53-3
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVNM - OVERFLOW AND CARRY FLAGS                             SEQ 0216

  8724						DMVNMF	1570,400000,0,400000,0,0,010000,100000,510000^
  8725					;**KI10**
  8726					;THIS MACRO VERIFIES THAT THE DMOVN INSTRUCTION DOES NOT SET OVERFLOW
  8727					;OR CARRY FLAGS ON THE KI10.  FIRST, OVFL AND CRY0,1 FLAGS ARE CLEARED;
  8728					;THEN,DMOVN IS EXECUTED.  NEXT, OVFL AND CRY0,1 FLAGS ARE EXAMINED.
  8729					;IF ANY OF THESE FLAGS ARE SET, THE TEST FAILS.
  8730
  8731					;**KL10**
  8732					;THIS MACRO VERIFIES THAT THE DMOVN INSTRUCTION DOES SET OVERFLOW
  8733					;OR CARRY FLAGS ON THE KL10.  FIRST, OVFL AND CRY0,1 FLAGS ARE CLEARED;
  8734					;THEN,DMOVN IS EXECUTED.  NEXT, OVFL AND CRY0,1 FLAGS ARE EXAMINED.
  8735					;IF THE PROPER FLAGS ARE NOT SET, THE TEST FAILS.
  8736
  8737	036446	255 17 0 00 036447 	Q15700:	JFCL	17,.+1		;CLEAR OVFL AND CRY0,1 FLAGS
  8738						DMOVE	AC,[XWD 400000,0
  8739	036447	120 04 0 00 036774 			    XWD 400000,0]	;SETUP INITIAL
  8740	036450	125 04 0 00 036524 		DMOVNM	AC,TSTWD	;*DMOVNM TEST
  8741	036451	265 04 0 00 036452 		JSP	AC,.+1		;READ FLAGS
  8742	036452	621 04 0 00 027777 	Q15701:	TLZ	AC,027777	;CLEAR EXTRA JUNK
  8743	036453	603 04 0 00 010000 		TLNE	AC,USERF	;IN USER MODE ?
  8744	036454	254 00 0 00 036466 		JRST	Q15704		;YES
  8745	036455	332 00 0 00 030041 		SKIPE	KLFLG		;KL10 ?
  8746	036456	254 00 0 00 036463 		JRST	Q15703		;YES
  8747					;KI10 EXEC MODE
  8748	036457	312 04 0 00 037034 		CAME	AC,[0,,Q15701]
  8749	036460	013 04 0 00 015701 		ER13	AC,15701		;FAIL IF OVFL OR CRY0,1 FLG SET
  8750	036461	321 10 0 00 036446 	Q15702:	JUMPL	SAC,Q15700	;LOOP ON ERROR SWITCH
  8751	036462	254 00 0 00 036476 		JRST	Q15706
  8752					;KL10 EXEC MODE
  8753	036463	312 04 0 00 037035 	Q15703:	CAME	AC,[100000,,Q15701]
  8754	036464	013 04 0 00 015701 		ER13	AC,15701		;FAIL IF FLAGS NOT SET
  8755	036465	254 00 0 00 036461 		JRST	Q15702
  8756					;KL10/KI10 USER MODE
  8757	036466	332 00 0 00 030041 	Q15704:	SKIPE	KLFLG		;KL10 ?
  8758	036467	254 00 0 00 036473 		JRST	Q15705		;YES
  8759					;KI10 USER MODE
  8760	036470	312 04 0 00 037036 		CAME	AC,[010000,,Q15701]
  8761	036471	013 04 0 00 015701 		ER13	AC,15701		;FAIL IF ANY FLAGS SET
  8762	036472	254 00 0 00 036461 		JRST	Q15702
  8763					;KL10 USER MODE
  8764	036473	312 04 0 00 037037 	Q15705:	CAME	AC,[510000,,Q15701]
  8765	036474	013 04 0 00 015701 		ER13	AC,15701		;FAIL IF FLAGS NOT SET
  8766	036475	254 00 0 00 036461 		JRST	Q15702
  8767
  8768	036476	254 00 0 00 036477 	Q15706:	JRST	.+1^
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 54
DBKCCM	MAC	28-MAY-76 11:09		DIAGNOSTIC SECTION - DMOVNM - BIS FLAG                                             SEQ 0217

  8769					SUBTTL	DIAGNOSTIC SECTION - DMOVNM - BIS FLAG
  8770
  8771	036477	332 00 0 00 030041 		SKIPE	KLFLG		;KL10 ?
  8772	036500	254 00 0 00 036523 		JRST	LAST		;YES
  8773
  8774					;**KI10 ONLY TEST**
  8775					;VERIFY THAT C(E) IS NOT MODIFIED BY 'DMOVNM AC,E" IF 'BIS'
  8776					;FLAG IS SET; AND THAT THE SECOND PART OF "DMOVNM" CLEARS 'BIS'.
  8777
  8778			000004			AC=4
  8779			000010			SAC=<AC+4>&17
  8780						SAVEAC	(1,1)^
  8781	036501	201 10 0 00 036501 		MOVEI	SAC,.
  8782	036502	202 10 0 00 030051 		MOVEM	SAC,TESTPC	;SETUP SUBTEST PC
  8783	036503	201 10 0 00 000010 		MOVEI	SAC,SAC		;INFORM ERROR ROUTINE WHICH
  8784	036504	202 10 0 00 037213 		MOVEM	SAC,ERRLOP#	;AC IS USED FOR ITERATION^
  8785			000002			E=<AC-2>&17
  8786
  8787					Q16000:	DMOVE	AC,[631463,,146314
  8788	036505	120 04 0 00 036737 			    424242,,131313]	;INITIALIZE AC,AC+1
  8789	036506	403 02 0 00 000003 		SETZB	E,E+1		;INITIALIZE E,E+1
  8790	036507	210 07 0 00 036740 		MOVN	AC+3,[424242,,131313]	;INITIALIZE EXPECTED C(E+1)
  8791	036510	254 02 1 00 036511 		JRSTF	@.+1		;SET 'BIS' FLAG
  8792	036511	020000	036512			XWD	BIS,.+1
  8793	036512	125 04 0 00 000002 		DMOVNM	AC,E		;*DMOVNM SHOULD MODIFY ONLY 'E+1' AND CLEAR BIS FLAG
  8794	036513	332 00 0 00 000002 		SKIPE	E		;WAS C(E) MODIFIED?
  8795	036514	005 02 0 00 016001 		ER5	E,16001		;YES
  8796	036515	312 03 0 00 000007 		CAME	E+1,<AC+3>&17	;WAS C(E+1) MODIFIED?
  8797	036516	006 03 0 00 016001 		ER6	E+1,16001	;NO
  8798	036517	265 06 0 00 036520 		JSP	AC+2,.+1	;READ FLAGS
  8799	036520	603 06 0 00 020000 		TLNE	AC+2,BIS	;IS 'BIS' FLAG CLEAR?
  8800	036521	013 06 0 00 016001 		ER13	AC+2,16001	;NO
  8801	036522	321 10 0 00 036505 		JUMPL	SAC,Q16000	;LOOP ON ERROR SWITCH
  8802
  8803	036523	254 00 0 00 030057 	LAST:	JRST	BEGEND
  8804
  8805	036524				TSTWD:	BLOCK	2
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 1
UUOERR	KLM	22-APR-75		*UUOERR* OLD-UUO ERROR HANDLER SUBROUTINE, V75B, APR 22,1975                       SEQ 0218

  8806					SUBTTL	*UUOERR* OLD-UUO ERROR HANDLER SUBROUTINE, V75B, APR 22,1975
  8807
  8808					;THIS SUBROUTINE PROVIDES ERROR REPORTING THRU THE USE OF UUO'S.
  8809
  8810	036526	202 00 0 00 037217 	ERRMES:	MOVEM	0,%ERAC0#	;SAVE AC0
  8811						IFDEF	EXCASB,<IFDEF	KI10,<
  8812	036527	336 00 0 00 030040 		SKIPN	KAIFLG
  8813	036530	254 00 0 00 036535 		JRST	.+5
  8814	036531	332 00 0 00 030037 		SKIPE	USER		;USER MODE ?
  8815	036532	254 00 0 00 036535 		JRST	.+3
  8816	036533	332 00 0 00 030055 		SKIPE	MARGIN
  8817	036534	7 000 14 0 00 037040 		DATAO	APR,[IMGNOF,,ISPDOF] ;CLR MARGINS >>
  8818	036535	202 01 0 00 037220 		MOVEM	1,%ERAC1#	;SAVE AC1
  8819	036536	202 02 0 00 037221 		MOVEM	2,%ERAC2#	;SAVE AC2
  8820	036537	350 00 0 00 030053 		AOS	ERRTLS		;INCREMENT ERROR TOTALS
  8821	036540	550 00 0 00 030114 		HRRZ	0,$SVUPC	;GET PC OF UUO
  8822	036541	316 00 0 00 030052 		CAMN	0,ERRPC		;PC = PC OF LAST ERROR ?
  8823	036542	350 00 0 00 037214 		AOS	MICNT#		;YES, ADD 1 TO ERROR COUNT
  8824	036543	200 00 0 00 037214 		MOVE	0,MICNT
  8825	036544	504 00 0 00 030114 		HRL	0,$SVUPC
  8826	036545	336 00 0 00 030041 		SKIPN	KLFLG		;NOT KL10
  8827	036546	332 00 0 00 030037 		SKIPE	USER		;AND NOT USER?
  8828	036547	254 00 0 00 036551 		JRST	.+2
  8829	036550	7 004 14 0 00 000000 		DATAO	PI,0		;YES, DISPLAY ERROR PC,ERROR COUNT
  8830	036551	402 00 0 00 037215 		SETZM	PROCED#		;CLEAR PROCEED FLAG
  8831	036552	037 10 0 00 000002 		SWITCH
  8832	036553	603 00 0 00 040000 		TLNE	NOPNT		;PRINTOUT ?
  8833	036554	254 00 0 00 036667 		JRST	%ERRS1		;NO, RESTORE AC'S AND RETURN
  8834	036555	200 01 0 00 030113 		MOVE	1,$SVUUO
  8835	036556	242 01 0 00 777745 		LSH	1,-^D27
  8836	036557	202 01 0 00 037216 		MOVEM	1,%ACS1A#	;SAVE UUO NUMBER
  8837	036560	200 00 0 00 037217 		MOVE	0,%ERAC0
  8838	036561	200 01 0 00 037220 		MOVE	1,%ERAC1
  8839	036562	335 00 1 00 037213 		SKIPGE	@ERRLOP		;ERR LOOP AC > OR = 0 ?
  8840	036563	254 00 0 00 036727 		JRST	%ERRS4		;NO, SEE IF PRINT ALL
  8841	036564	402 00 0 00 037214 	%ERMS1:	SETZM	MICNT		;CLEAR ERROR COUNT
  8842	036565	331 00 0 00 030043 		SKIPL	MONCTL		;DIAG MON OR SYS EXER ?
  8843	036566	254 00 0 00 036572 		JRST	.+4		;NO, DON'T NEED TITLE
  8844	036567	336 00 0 00 037222 		SKIPN	%ERFST#		;FIRST ERROR ?
  8845	036570	037 04 0 00 000002 		PNTNM			;YES, PRINT PROGRAM TITLE
  8846	036571	476 00 0 00 037222 		SETOM	%ERFST
  8847	036572	336 00 0 00 030047 		SKIPN	PASCNT		;FIRST PASS ?
  8848	036573	254 00 0 00 036577 		JRST	.+4		;YES
  8849						PMSG	<^TEST PASS COUNT = >^
  8850	036574	037 02 0 00 037041 		PSIXM	[SIXBIT\^TEST PASS COUNT = _\]^
  8851	036575	200 00 0 00 030047 		MOVE	PASCNT
  8852	036576	037 15 0 00 000000 		PNTDEC
  8853						PMSG	<^PC =   >^
  8854	036577	037 02 0 00 037045 		PSIXM	[SIXBIT\^PC =   _\]^
  8855	036600	550 00 0 00 030114 		HRRZ	0,$SVUPC	;GET PC OF UUO
  8856	036601	202 00 0 00 030052 		MOVEM	0,ERRPC		;SAVE FOR COMPARE
  8857	036602	037 06 0 00 000000 		PNT6			;PRINT UUO ADDRESS
  8858						XLIST
  8859						IFDEF	ERDIAG,<LIST
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 2
UUOERR	KLM	22-APR-75		*UUOERR* OLD-UUO ERROR HANDLER SUBROUTINE, V75B, APR 22,1975                       SEQ 0219

  8860					;DIAGNOSTIC FORMAT ERROR PRINTER
  8861
  8862					;PRINT RESULT
  8863
  8864	036603				%ERMS2:	PMSG	<^RESULT  = >^
  8865	036603	037 02 0 00 037047 		PSIXM	[SIXBIT\^RESULT  = _\]^
  8866	036604	200 01 0 00 030113 		MOVE	1,$SVUUO	;GET AC # OF UUO
  8867	036605	242 01 0 00 777751 		LSH	1,-27
  8868	036606	405 01 0 00 000017 		ANDI	1,17
  8869	036607	200 00 0 01 000000 		MOVE	0,(1)		;GET C(AC)
  8870	036610	307 01 0 00 000001 		CAIG	1,1		;IS AC # = TO SAVE AC ?
  8871	036611	200 00 0 01 037217 		MOVE	0,%ERAC0(1)	;YES, GET SAVED AC
  8872	036612	037 13 0 00 000000 		PNTHW			;PRINT C(AC)
  8873
  8874	036613	200 00 0 00 030046 		MOVE	CONSW
  8875	036614	603 00 0 00 000200 		TLNE	TXTINH		;PRINT FAILURE DES AND FLT NBR ?
  8876	036615	254 00 0 00 036664 		JRST	%ERMORE		;NO, RESTORE AC'S ETC.
  8877
  8878					;PRINT FAILURE DESCRIPTOR
  8879
  8880	036616	200 01 0 00 037216 		MOVE	1,%ACS1A	;GET UUO NUMBER
  8881	036617	307 01 0 00 000001 		CAIG	1,1		;PRINT DESCRIPTOR ?
  8882	036620	254 00 0 00 036624 		JRST	%ERMS3		;NO, JUST PRINT FAULT NUMBER
  8883	036621	037 00 0 00 030242 		PCRL
  8884	036622	200 00 0 01 036650 		MOVE	%FLTTB(1)
  8885	036623	037 17 0 00 000000 		PNTAL			;PRINT FAULT DESCRIPTOR
  8886
  8887					;PRINT FAULT NUMBER
  8888
  8889	036624				%ERMS3:	PMSG	<^FAULT NUMBER = >^
  8890	036624	037 02 0 00 037051 		PSIXM	[SIXBIT\^FAULT NUMBER = _\]^
  8891	036625	201 00 0 00 036647 		MOVEI	TLET
  8892	036626	037 00 0 00 000000 		PNTA			;PRINT TEST LETTER
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 3
UUOERR	KLM	22-APR-75		*UUOERR* OLD-UUO ERROR HANDLER SUBROUTINE, V75B, APR 22,1975                       SEQ 0220

  8893
  8894	036627	550 00 0 00 030113 		HRRZ	$SVUUO
  8895	036630	602 00 0 00 700000 		TRNE	700000
  8896	036631	254 00 0 00 036645 		JRST	%ER6X
  8897	036632	602 00 0 00 070000 		TRNE	070000
  8898	036633	254 00 0 00 036643 		JRST	%ER5X
  8899	036634	602 00 0 00 007000 		TRNE	007000
  8900	036635	254 00 0 00 036641 		JRST	%ER4X
  8901	036636	037 03 0 00 000000 		PNT3			;PRINT FAULT NUMBER
  8902	036637	037 00 0 00 030242 	%ER7X:	PCRL
  8903	036640	254 00 0 00 036664 		JRST	%ERMORE
  8904
  8905	036641	037 04 0 00 000000 	%ER4X:	PNT4
  8906	036642	254 00 0 00 036637 		JRST	%ER7X
  8907	036643	037 05 0 00 000000 	%ER5X:	PNT5
  8908	036644	254 00 0 00 036637 		JRST	%ER7X
  8909	036645	037 06 0 00 000000 	%ER6X:	PNT6
  8910	036646	254 00 0 00 036637 		JRST	%ER7X
  8911
  8912					;FAILURE DESCRIPTORS
  8913
  8914	036647	000000	000000		TLET:	0			;TEST LETTER
  8915	036650	000000	000000		%FLTTB:	0			;DESCRIPTOR TABLE
  8916	036651	000000	036741		%NODES:	[0]			;NO DESCRIPTOR
  8917	036652	000000	036741		SPDES:	[0]			;SPECIAL USER FAILURE DESCRIPTOR
  8918	036653	000000	037054		$ACF:	[ASCIZ/C(AC) FAILED/]
  8919	036654	000000	037057		%AC1F:	[ASCIZ/C(AC+1) FAILED/]
  8920	036655	000000	037062		%EF:	[ASCIZ/C(E) FAILED/]
  8921	036656	000000	037065		%E1F:	[ASCIZ/C(E+1) FAILED/]
  8922	036657	000000	037070		%ARF:	[ASCIZ/C(C(ACR)) FAILED/]
  8923	036660	000000	037074		%AR1F:	[ASCIZ/C(C(ACR+1)) FAILED/]
  8924	036661	000000	037100		%ALF:	[ASCIZ/C(C(ACL)) FAILED/]
  8925	036662	000000	037104		%EEF:	[ASCIZ/C(C(E)) FAILED/]
  8926	036663	000000	037107		%FF:	[ASCIZ/FLAG FAILED/]
  8927					>
  8928						XLIST
  8929						LIST
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 8
UUOERR	KLM	22-APR-75		*UUOERR* OLD-UUO ERROR HANDLER SUBROUTINE, V75B, APR 22,1975                       SEQ 0221

  8930					;RESTORE AC'S AND RETURN OR HALT
  8931
  8932	036664	256 00 0 00 030101 	%ERMORE:XCT	ERMORE
  8933	036665	037 16 0 00 000002 		PNTMGN			;PRINT MARGINS	
  8934	036666	037 10 0 00 000002 		SWITCH
  8935
  8936	036667	037 07 0 00 000003 	%ERRS1:	TTALTM			;ALTMODE CHECK
  8937	036670	254 00 0 00 036674 		JRST	.+4		;NONE
  8938	036671	201 00 0 00 036674 		MOVEI	.+3		;SAVE CONT ADDRESS
  8939	036672	202 00 0 00 000130 		MOVEM	JOBOPC
  8940	036673	254 00 1 00 030063 		JRST	@ALTMGO		;PERFORM TRANSFER
  8941	036674	200 00 0 00 030046 		MOVE	CONSW
  8942	036675	603 00 0 00 002000 		TLNE	0,ERSTOP	;HALT ON ERROR SWITCH SET ?
  8943	036676	037 14 0 00 000004 		ERRHLT			;YES
  8944	036677	607 00 0 00 004000 		TLNN	0,LOOPER	;LOOP ON ERROR SWITCH SET ?
  8945	036700	476 00 0 00 037215 		SETOM	PROCED		;NO, SET THE PROCEED FLAG
  8946	036701	603 00 0 00 010000 		TLNE	0,DING		;RING BELL SWITCH SET ?
  8947	036702	037 01 0 00 000007 		PBELL			;YES, GO RING BELL
  8948
  8949	036703	200 02 0 00 037221 	%ERRS2:	MOVE	2,%ERAC2	;RESTORE AC'S
  8950	036704	200 01 0 00 037220 		MOVE	1,%ERAC1
  8951	036705	476 00 1 00 037213 		SETOM	@ERRLOP		;SET C(ERR LOOP AC) TO -1
  8952	036706	336 00 0 00 037215 		SKIPN	PROCED		;LOOP ON ERROR ?
  8953	036707	254 00 0 00 036717 		JRST	%ERRS5		;YES
  8954	036710	350 00 1 00 037213 		AOS	@ERRLOP		;NO, INC C(ERR LOOP AC)
  8955	036711	350 00 1 00 037213 		AOS	@ERRLOP		;SO IT ='S 1
  8956	036712	331 00 0 00 030043 		SKIPL	MONCTL		;UNDER DIAGNOSTIC MONITOR ?
  8957	036713	254 00 0 00 036717 		JRST	%ERRS5		;NO, CONTINUE PROGRAM
  8958	036714	200 00 0 00 030053 		MOVE	0,ERRTLS	;YES
  8959	036715	301 00 0 00 000005 		CAIL	0,5		;PRINTED ALLOWED ERRORS ?
  8960	036716	254 00 0 00 030061 		JRST	$BEND2
  8961
  8962	036717	200 00 0 00 037217 	%ERRS5:	MOVE	0,%ERAC0	;NO, CONTINUE PROGRAM
  8963						IFDEF	EXCASB,<IFDEF KI10,<
  8964	036720	336 00 0 00 030040 		SKIPN	KAIFLG
  8965	036721	254 00 0 00 036726 		JRST	.+5
  8966	036722	332 00 0 00 030037 		SKIPE	USER
  8967	036723	254 00 0 00 036726 		JRST	.+3
  8968	036724	332 00 0 00 030055 		SKIPE	MARGIN
  8969	036725	7 000 14 0 00 030055 		DATAO	APR,MARGIN	;RESET MARGIN SYSTEM >>
  8970	036726	254 00 0 00 030065 		JRST	UUOEXT
  8971
  8972	036727	200 00 0 00 030046 	%ERRS4:	MOVE	0,CONSW
  8973	036730	607 00 0 00 001000 		TLNN	PALERS		;PRINT ALL ERRORS ?
  8974	036731	254 00 0 00 036667 		JRST	%ERRS1		;NO
  8975	036732	254 00 0 00 036564 		JRST	%ERMS1		;YES
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 1
STOR	KLM	 5-JAN-76		*STOR* RESERVED STORAGE, JAN 5,1976                                                SEQ 0222

  8976					SUBTTL	*STOR* RESERVED STORAGE, JAN 5,1976
  8977
  8978					;PROGRAM LITERALS
  8979
  8980						XLIST
  8981					IFNDEF	$LPAPER,<LIST>
  8982	036733					LIT
  8983	036733	45 70 51 64 00 00 
  8984	036734	103 103 000 000 000 
  8985	036735	233525	252525
  8986	036736	252525	252525
  8987	036737	631463	146314
  8988	036740	424242	131313
  8989	036741	000000	000000
  8990	036742	707070	707070
  8991	036743	070707	070707
  8992	036744	000000	000000
  8993	036745	000000	000000
  8994	036746	777777	777777
  8995	036747	777777	777777
  8996	036750	000000	000000
  8997	036751	525252	525252
  8998	036752	252525	252525
  8999	036753	525252	525252
  9000	036754	000000	000001
  9001	036755	000000	000000
  9002	036756	000000	000001
  9003	036757	777777	777777
  9004	036760	000000	000001
  9005	036761	252525	252526
  9006	036762	525252	525252
  9007	036763	252525	252526
  9008	036764	525252	525253
  9009	036765	252525	252525
  9010	036766	525252	525253
  9011	036767	000000	777777
  9012	036770	000000	000000
  9013	036771	000000	777777
  9014	036772	400000	000000
  9015	036773	000000	000000
  9016	036774	400000	000000
  9017	036775	400000	000000
  9018	036776	000000	035443
  9019	036777	300000	035443
  9020	037000	010000	035443
  9021	037001	310000	035443
  9022	037002	000000	035473
  9023	037003	100000	035473
  9024	037004	010000	035473
  9025	037005	510000	035473
  9026	037006	000000	035523
  9027	037007	300000	035523
  9028	037010	010000	035523
  9029	037011	310000	035523
  9030	037012	000000	035553
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 1-1
STOR	KLM	 5-JAN-76		*STOR* RESERVED STORAGE, JAN 5,1976                                                SEQ 0223

  9031	037013	100000	035553
  9032	037014	010000	035553
  9033	037015	510000	035553
  9034	037016	777777	777777
  9035	037017	000000	777777
  9036	037020	000000	036337
  9037	037021	300000	036337
  9038	037022	010000	036337
  9039	037023	310000	036337
  9040	037024	000000	036370
  9041	037025	100000	036370
  9042	037026	010000	036370
  9043	037027	510000	036370
  9044	037030	000000	036421
  9045	037031	300000	036421
  9046	037032	010000	036421
  9047	037033	310000	036421
  9048	037034	000000	036452
  9049	037035	100000	036452
  9050	037036	010000	036452
  9051	037037	510000	036452
  9052	037040	002000	010000
  9053	037041	76 64 45 63 64 00 
  9054	037042	60 41 63 63 00 43 
  9055	037043	57 65 56 64 00 35 
  9056	037044	00 77 00 00 00 00 
  9057	037045	76 60 43 00 35 00 
  9058	037046	00 00 77 00 00 00 
  9059	037047	76 62 45 63 65 54 
  9060	037050	64 00 00 35 00 77 
  9061	037051	76 46 41 65 54 64 
  9062	037052	00 56 65 55 42 45 
  9063	037053	62 00 35 00 77 00 
  9064	037054	103 050 101 103 051 
  9065	037055	040 106 101 111 114 
  9066	037056	105 104 000 000 000 
  9067	037057	103 050 101 103 053 
  9068	037060	061 051 040 106 101 
  9069	037061	111 114 105 104 000 
  9070	037062	103 050 105 051 040 
  9071	037063	106 101 111 114 105 
  9072	037064	104 000 000 000 000 
  9073	037065	103 050 105 053 061 
  9074	037066	051 040 106 101 111 
  9075	037067	114 105 104 000 000 
  9076	037070	103 050 103 050 101 
  9077	037071	103 122 051 051 040 
  9078	037072	106 101 111 114 105 
  9079	037073	104 000 000 000 000 
  9080	037074	103 050 103 050 101 
  9081	037075	103 122 053 061 051 
  9082	037076	051 040 106 101 111 
  9083	037077	114 105 104 000 000 
  9084	037100	103 050 103 050 101 
  9085	037101	103 114 051 051 040 
DBKCC PDP-10 KI10 ADVANCED INSTRUCTION DIAGNOSTIC #3, VERSION 0,3 	MACRO %52(462) 11:37  9-AUG-76 PAGE 1-2
STOR	KLM	 5-JAN-76		*STOR* RESERVED STORAGE, JAN 5,1976                                                SEQ 0224

  9086	037102	106 101 111 114 105 
  9087	037103	104 000 000 000 000 
  9088	037104	103 050 103 050 105 
  9089	037105	051 051 040 106 101 
  9090	037106	111 114 105 104 000 
  9091	037107	106 114 101 107 040 
  9092	037110	106 101 111 114 105 
  9093	037111	104 000 000 000 000 
  9094						LIST
  9095	037112	000000	000000		ENDSLD:	0
  9096
  9097					IFDEF	DEBUG,<
  9098	037113				PATCH:	BLOCK DEBUG		;PATCHING AREA
  9099					>
  9100
  9101					;PROGRAM VARIABLES
  9102	037213					VAR
  9103
  9104					IFDEF	PGMEND,<
  9105	037224	000000	000000		END:	0
  9106			030000			END	BEGIN	>

NO ERRORS DETECTED

PROGRAM BREAK IS 000000
ABSLUTE BREAK IS 037225
CPU TIME USED 00:27.879

9K CORE USED

ABORT	   432#
AC	  1012#	  1013	  1022	  1023	  1024	  1025	  1030#	  1031	  1041	  1042	  1043	  1044	  1077	  1078     SEQ 0225
	  1079	  1080	  1081	  1093	  1094	  1095	  1096	  1097	  1109	  1110	  1111	  1112	  1113	  1125
	  1126	  1127	  1128	  1129	  1141	  1142	  1143	  1144	  1145	  1157	  1158	  1159	  1160	  1161
	  1173	  1174	  1175	  1176	  1177	  1189	  1190	  1191	  1192	  1193	  1205	  1206	  1207	  1208
	  1209	  1221	  1222	  1223	  1224	  1225	  1237	  1238	  1239	  1240	  1241	  1253	  1254	  1255
	  1256	  1257	  1269	  1270	  1271	  1272	  1273	  1285	  1286	  1287	  1288	  1289	  1301	  1302
	  1303	  1304	  1305	  1317	  1318	  1319	  1320	  1321	  1333	  1334	  1335	  1336	  1337	  1349
	  1350	  1351	  1352	  1353	  1385	  1386	  1387	  1388	  1389	  1401	  1402	  1403	  1404	  1405
	  1417	  1418	  1419	  1420	  1421	  1433	  1434	  1435	  1436	  1437	  1449	  1450	  1451	  1452
	  1453	  1465	  1466	  1467	  1468	  1469	  1481	  1482	  1483	  1484	  1485	  1497	  1498	  1499
	  1500	  1501	  1513	  1514	  1515	  1516	  1517	  1529	  1530	  1531	  1532	  1533	  1545	  1546
	  1547	  1548	  1549	  1561	  1562	  1563	  1564	  1565	  1577	  1578	  1579	  1580	  1581	  1593
	  1594	  1595	  1596	  1597	  1609	  1610	  1611	  1612	  1613	  1625	  1626	  1627	  1628	  1629
	  1641	  1642	  1643	  1644	  1645	  1679	  1680	  1681	  1682	  1683	  1694	  1695	  1696	  1697
	  1698	  1709	  1710	  1711	  1712	  1713	  1724	  1725	  1726	  1727	  1728	  1739	  1740	  1741
	  1742	  1743	  1754	  1755	  1756	  1757	  1758	  1769	  1770	  1771	  1772	  1773	  1784	  1785
	  1786	  1787	  1788	  1799	  1800	  1801	  1802	  1803	  1835	  1836	  1837	  1838	  1839	  1851
	  1852	  1853	  1854	  1855	  1867	  1868	  1869	  1870	  1871	  1883	  1884	  1885	  1886	  1887
	  1899	  1900	  1901	  1902	  1903	  1915	  1916	  1917	  1918	  1919	  1931	  1932	  1933	  1934
	  1935	  1947	  1948	  1949	  1950	  1951	  1963	  1964	  1965	  1966	  1967	  1979	  1980	  1981
	  1982	  1983	  1995	  1996	  1997	  1998	  1999	  2011	  2012	  2013	  2014	  2015	  2027	  2028
	  2029	  2030	  2031	  2043	  2044	  2045	  2046	  2047	  2059	  2060	  2061	  2062	  2063	  2075
	  2076	  2077	  2078	  2079	  2091	  2092	  2093	  2094	  2095	  2107	  2108	  2109	  2110	  2111
	  2147	  2148	  2149	  2150	  2151	  2152	  2164	  2165	  2166	  2167	  2168	  2169	  2206	  2207
	  2208	  2209	  2210	  2211	  2224	  2225	  2226	  2227	  2228	  2229	  2242	  2243	  2244	  2245
	  2246	  2247	  2260	  2261	  2262	  2263	  2264	  2265	  2278	  2279	  2280	  2281	  2282	  2283
	  2296	  2297	  2298	  2299	  2300	  2301	  2314	  2315	  2316	  2317	  2318	  2319	  2332	  2333
	  2334	  2335	  2336	  2337	  2373	  2374	  2375	  2376	  2377	  2378	  2391	  2392	  2393	  2394
	  2395	  2396	  2409	  2410	  2411	  2412	  2413	  2414	  2427	  2428	  2429	  2430	  2431	  2432
	  2445	  2446	  2447	  2448	  2449	  2450	  2463	  2464	  2465	  2466	  2467	  2468	  2481	  2482
	  2483	  2484	  2485	  2486	  2499	  2500	  2501	  2502	  2503	  2504	  2517	  2518	  2519	  2520
	  2521	  2522	  2558	  2559	  2560	  2561	  2562	  2563	  2576	  2577	  2578	  2579	  2580	  2581
	  2594	  2595	  2596	  2597	  2598	  2599	  2612	  2613	  2614	  2615	  2616	  2617	  2630	  2631
	  2632	  2633	  2634	  2635	  2648	  2649	  2650	  2651	  2652	  2653	  2666	  2667	  2668	  2669
	  2670	  2671	  2684	  2685	  2686	  2687	  2688	  2689	  2702	  2703	  2704	  2705	  2706	  2707
	  2742	  2743	  2744	  2745	  2746	  2747	  2759	  2760	  2761	  2762	  2763	  2764	  2776	  2777
	  2778	  2779	  2780	  2781	  2793	  2794	  2795	  2796	  2797	  2798	  2810	  2811	  2812	  2813
	  2814	  2815	  2827	  2828	  2829	  2830	  2831	  2832	  2844	  2845	  2846	  2847	  2848	  2849
	  2861	  2862	  2863	  2864	  2865	  2866	  2874	  2875	  2876	  2877	  2878	  2879	  2890	  2891
	  2892	  2893	  2895	  2896	  2906	  2907	  2908	  2910	  2911	  2920	  2921	  2922	  2923	  2925
	  2926	  2936	  2937	  2938	  2940	  2941	  2950	  2951	  2953	  2954	  2964	  2965	  2966	  2968
	  2969	  2978	  2979	  2981	  2982	  2992	  2993	  2995	  2996	  3005	  3006	  3008	  3009	  3019
	  3020	  3022	  3023	  3032	  3033	  3035	  3036	  3046	  3047	  3049	  3050	  3061	  3062	  3063
	  3064	  3065	  3066	  3072	  3073	  3074	  3075	  3086	  3087	  3088	  3089	  3091	  3092	  3103
	  3104	  3105	  3107	  3108	  3118	  3119	  3120	  3121	  3123	  3124	  3135	  3136	  3137	  3138
	  3140	  3141	  3151	  3152	  3154	  3155	  3166	  3167	  3168	  3170	  3171	  3181	  3182	  3184
	  3185	  3196	  3197	  3199	  3200	  3210	  3211	  3213	  3214	  3225	  3226	  3228	  3229	  3239
	  3240	  3242	  3243	  3254	  3255	  3257	  3258	  3264	  3265	  3266	  3267	  3268	  3269	  3270
	  3280	  3283	  3290	  3291	  3292	  3293	  3294	  3295	  3297	  3304	  3305	  3306	  3307	  3308
	  3309	  3310	  3313	  3319	  3320	  3321	  3322	  3323	  3324	  3326	  3333	  3334	  3335	  3336
	  3337	  3338	  3339	  3340	  3343	  3349	  3350	  3351	  3352	  3384	  3385	  3386	  3387	  3388
	  3399	  3400	  3401	  3402	  3403	  3414	  3415	  3416	  3417	  3418	  3429	  3430	  3431	  3432
	  3433	  3444	  3445	  3446	  3447	  3448	  3459	  3460	  3461	  3462	  3463	  3474	  3475	  3476
	  3477	  3478	  3489	  3490	  3491	  3492	  3493	  3504	  3505	  3506	  3507	  3508	  3519	  3520     SEQ 0226
	  3521	  3522	  3523	  3534	  3535	  3536	  3537	  3538	  3549	  3550	  3551	  3552	  3553	  3564
	  3565	  3566	  3567	  3568	  3579	  3580	  3581	  3582	  3583	  3594	  3595	  3596	  3597	  3598
	  3609	  3610	  3611	  3612	  3613	  3624	  3625	  3626	  3627	  3628	  3661	  3662	  3663	  3664
	  3665	  3677	  3678	  3679	  3680	  3681	  3693	  3694	  3695	  3696	  3697	  3709	  3710	  3711
	  3712	  3713	  3725	  3726	  3727	  3728	  3729	  3741	  3742	  3743	  3744	  3745	  3757	  3758
	  3759	  3760	  3761	  3773	  3774	  3775	  3776	  3777	  3789	  3790	  3791	  3792	  3793	  3805
	  3806	  3807	  3808	  3809	  3821	  3822	  3823	  3824	  3825	  3837	  3838	  3839	  3840	  3841
	  3853	  3854	  3855	  3856	  3857	  3869	  3870	  3871	  3872	  3873	  3885	  3886	  3887	  3888
	  3889	  3901	  3902	  3903	  3904	  3905	  3917	  3918	  3919	  3920	  3921	  3933	  3934	  3935
	  3936	  3937	  3973	  3974	  3975	  3976	  3977	  3989	  3990	  3991	  3992	  3993	  4005	  4006
	  4007	  4008	  4009	  4021	  4022	  4023	  4024	  4025	  4037	  4038	  4039	  4040	  4041	  4053
	  4054	  4055	  4056	  4057	  4069	  4070	  4071	  4072	  4073	  4085	  4086	  4087	  4088	  4089
	  4101	  4102	  4103	  4104	  4105	  4117	  4118	  4119	  4120	  4121	  4133	  4134	  4135	  4136
	  4137	  4149	  4150	  4151	  4152	  4153	  4165	  4166	  4167	  4168	  4169	  4181	  4182	  4183
	  4184	  4185	  4197	  4198	  4199	  4200	  4201	  4213	  4214	  4215	  4216	  4217	  4229	  4230
	  4231	  4232	  4233	  4245	  4246	  4247	  4248	  4249	  4282	  4283	  4284	  4285	  4286	  4298
	  4299	  4300	  4301	  4302	  4314	  4315	  4316	  4317	  4318	  4330	  4331	  4332	  4333	  4334
	  4346	  4347	  4348	  4349	  4350	  4362	  4363	  4364	  4365	  4366	  4378	  4379	  4380	  4381
	  4382	  4394	  4395	  4396	  4397	  4398	  4410	  4411	  4412	  4413	  4414	  4426	  4427	  4428
	  4429	  4430	  4442	  4443	  4444	  4445	  4446	  4458	  4459	  4460	  4461	  4462	  4474	  4475
	  4476	  4477	  4478	  4490	  4491	  4492	  4493	  4494	  4506	  4507	  4508	  4509	  4510	  4522
	  4523	  4524	  4525	  4526	  4538	  4539	  4540	  4541	  4542	  4554	  4555	  4556	  4557	  4558
	  4566	  4567	  4568	  4569	  4577	  4578	  4579	  4580	  4581	  4582	  4616	  4617	  4618	  4619
	  4620	  4621	  4622	  4634	  4635	  4636	  4637	  4638	  4639	  4640	  4652	  4653	  4654	  4655
	  4656	  4657	  4658	  4670	  4671	  4672	  4673	  4674	  4675	  4676	  4688	  4689	  4690	  4691
	  4692	  4693	  4694	  4706	  4707	  4708	  4709	  4710	  4711	  4712	  4724	  4725	  4726	  4727
	  4728	  4729	  4730	  4742	  4743	  4744	  4745	  4746	  4747	  4748	  4760	  4761	  4762	  4763
	  4764	  4765	  4766	  4778	  4779	  4780	  4781	  4782	  4783	  4784	  4819	  4820	  4821	  4822
	  4823	  4824	  4825	  4837	  4838	  4839	  4840	  4841	  4842	  4843	  4855	  4856	  4857	  4858
	  4859	  4860	  4861	  4873	  4874	  4875	  4876	  4877	  4878	  4879	  4891	  4892	  4893	  4894
	  4895	  4896	  4897	  4909	  4910	  4911	  4912	  4913	  4914	  4915	  4927	  4928	  4929	  4930
	  4931	  4932	  4933	  4945	  4946	  4947	  4948	  4949	  4950	  4951	  4984	  4985	  4986	  4987
	  4988	  4989	  5001	  5002	  5003	  5004	  5005	  5006	  5018	  5019	  5020	  5021	  5022	  5023
	  5035	  5036	  5037	  5038	  5039	  5040	  5052	  5053	  5054	  5055	  5056	  5057	  5069	  5070
	  5071	  5072	  5073	  5074	  5086	  5087	  5088	  5089	  5090	  5091	  5103	  5104	  5105	  5106
	  5107	  5108	  5146	  5147	  5148	  5149	  5150	  5151	  5152	  5164	  5165	  5166	  5167	  5168
	  5169	  5170	  5182	  5183	  5184	  5185	  5186	  5187	  5188	  5200	  5201	  5202	  5203	  5204
	  5205	  5206	  5218	  5219	  5220	  5221	  5222	  5223	  5224	  5236	  5237	  5238	  5239	  5240
	  5241	  5242	  5254	  5255	  5256	  5257	  5258	  5259	  5260	  5272	  5273	  5274	  5275	  5276
	  5277	  5278	  5290	  5291	  5292	  5293	  5294	  5295	  5296	  5308	  5309	  5310	  5311	  5312
	  5313	  5314	  5348	  5349	  5350	  5351	  5352	  5353	  5365	  5366	  5367	  5368	  5369	  5370
	  5382	  5383	  5384	  5385	  5386	  5387	  5399	  5400	  5401	  5402	  5403	  5404	  5416	  5417
	  5418	  5419	  5420	  5421	  5433	  5434	  5435	  5436	  5437	  5438	  5450	  5451	  5452	  5453
	  5454	  5455	  5467	  5468	  5469	  5470	  5471	  5472	  5505	  5506	  5507	  5509	  5510	  5522
	  5523	  5524	  5526	  5527	  5539	  5540	  5541	  5543	  5544	  5556	  5557	  5558	  5560	  5561
	  5573	  5574	  5575	  5577	  5578	  5590	  5591	  5592	  5594	  5595	  5607	  5608	  5609	  5611
	  5612	  5624	  5625	  5626	  5628	  5629	  5668	  5669	  5670	  5671	  5672	  5674	  5675	  5687
	  5688	  5689	  5690	  5691	  5693	  5694	  5706	  5707	  5708	  5709	  5710	  5712	  5713	  5725
	  5726	  5727	  5728	  5729	  5731	  5732	  5744	  5745	  5746	  5747	  5748	  5750	  5751	  5763
	  5764	  5765	  5766	  5767	  5769	  5770	  5782	  5783	  5784	  5785	  5786	  5788	  5789	  5801
	  5802	  5803	  5804	  5805	  5807	  5808	  5820	  5821	  5822	  5823	  5824	  5826	  5827	  5839
	  5840	  5841	  5842	  5843	  5845	  5846	  5881	  5882	  5883	  5884	  5886	  5887	  5899	  5900
	  5901	  5902	  5904	  5905	  5917	  5918	  5919	  5920	  5922	  5923	  5935	  5936	  5937	  5938     SEQ 0227
	  5940	  5941	  5953	  5954	  5955	  5956	  5958	  5959	  5971	  5972	  5973	  5974	  5976	  5977
	  5989	  5990	  5991	  5992	  5994	  5995	  6007	  6008	  6009	  6010	  6012	  6013	  6046	  6047
	  6048	  6050	  6051	  6063	  6064	  6065	  6067	  6068	  6080	  6081	  6082	  6084	  6085	  6097
	  6098	  6099	  6101	  6102	  6114	  6115	  6116	  6118	  6119	  6131	  6132	  6133	  6135	  6136
	  6148	  6149	  6150	  6152	  6153	  6165	  6166	  6167	  6169	  6170	  6179	  6180	  6181	  6182
	  6184	  6185	  6220	  6221	  6222	  6223	  6224	  6226	  6227	  6239	  6240	  6241	  6242	  6243
	  6245	  6246	  6258	  6259	  6260	  6261	  6262	  6264	  6265	  6277	  6278	  6279	  6280	  6281
	  6283	  6284	  6296	  6297	  6298	  6299	  6300	  6302	  6303	  6315	  6316	  6317	  6318	  6319
	  6321	  6322	  6334	  6335	  6336	  6337	  6338	  6340	  6341	  6353	  6354	  6355	  6356	  6357
	  6359	  6360	  6372	  6373	  6374	  6375	  6376	  6378	  6379	  6391	  6392	  6393	  6394	  6395
	  6397	  6398	  6434	  6435	  6436	  6437	  6438	  6440	  6441	  6453	  6454	  6455	  6456	  6457
	  6459	  6460	  6472	  6473	  6474	  6475	  6476	  6478	  6479	  6491	  6492	  6493	  6494	  6495
	  6497	  6498	  6510	  6511	  6512	  6513	  6514	  6516	  6517	  6529	  6530	  6531	  6532	  6533
	  6535	  6536	  6548	  6549	  6550	  6551	  6552	  6554	  6555	  6567	  6568	  6569	  6570	  6571
	  6573	  6574	  6609	  6610	  6611	  6612	  6614	  6615	  6627	  6628	  6629	  6630	  6632	  6633
	  6645	  6646	  6647	  6648	  6650	  6651	  6663	  6664	  6665	  6666	  6668	  6669	  6681	  6682
	  6683	  6684	  6686	  6687	  6699	  6700	  6701	  6702	  6704	  6705	  6717	  6718	  6719	  6720
	  6722	  6723	  6735	  6736	  6737	  6738	  6740	  6741	  6753	  6754	  6755	  6756	  6758	  6759
	  6767	  6768	  6769	  6770	  6771	  6773	  6774	  6781	  6782	  6783	  6784	  6786	  6787	  6795
	  6796	  6797	  6798	  6800	  6801	  6807	  6808	  6809	  6810	  6811	  6812	  6813	  6819	  6820
	  6821	  6822	  6823	  6824	  6825	  6837	  6838	  6839	  6840	  6841	  6843	  6844	  6845	  6846
	  6858	  6859	  6860	  6861	  6862	  6864	  6865	  6866	  6867	  6879	  6880	  6881	  6882	  6883
	  6885	  6886	  6887	  6888	  6900	  6901	  6902	  6903	  6904	  6906	  6907	  6908	  6909	  6921
	  6922	  6923	  6924	  6925	  6927	  6928	  6929	  6930	  6942	  6943	  6944	  6945	  6946	  6948
	  6949	  6950	  6951	  6957#	  6958	  6974	  6975	  6976	  6977	  6978	  6979	  6981	  6983	  6984
	  6985	  6986	  6988	  6989	  6990	  6991	  6997#	  6998	  7004	  7026	  7029	  7030	  7031	  7032
	  7033	  7034	  7035	  7040	  7043	  7044	  7045	  7046	  7047	  7048	  7049	  7054	  7057	  7058
	  7059	  7060	  7061	  7062	  7063	  7068	  7071	  7072	  7073	  7074	  7075	  7076	  7077	  7082
	  7085	  7086	  7087	  7088	  7089	  7090	  7091	  7098	  7100	  7101	  7102	  7103	  7104	  7117
	  7119	  7121	  7122	  7130	  7132	  7133	  7134	  7135	  7148	  7150	  7159	  7160	  7161	  7163
	  7164	  7165	  7166	  7179	  7181	  7190	  7191	  7192	  7194	  7195	  7196	  7197	  7210	  7212
	  7214	  7215	  7223	  7225	  7226	  7227	  7228	  7241	  7243	  7252	  7253	  7254	  7256	  7257
	  7258	  7259	  7272	  7274	  7283	  7284	  7285	  7287	  7288	  7289	  7290	  7296#	  7297	  7314
	  7315	  7317	  7326	  7327	  7328	  7330	  7332	  7333	  7334	  7335	  7337	  7338	  7339	  7340
	  7346#	  7347	  7353	  7377	  7379	  7380	  7381	  7384	  7385	  7386	  7387	  7388	  7393	  7395
	  7396	  7397	  7400	  7401	  7402	  7403	  7404	  7409	  7411	  7412	  7413	  7416	  7417	  7418
	  7419	  7420	  7425	  7427	  7428	  7429	  7432	  7433	  7434	  7435	  7436	  7441	  7443	  7444
	  7445	  7448	  7449	  7450	  7451	  7452	  7467	  7469	  7471	  7472	  7480	  7482	  7483	  7484
	  7485	  7498	  7500	  7505	  7506	  7511	  7513	  7514	  7515	  7516	  7529	  7531	  7536	  7537
	  7542	  7544	  7545	  7546	  7547	  7554	  7555	  7556	  7573	  7575	  7576	  7577	  7582	  7583
	  7587	  7588	  7594	  7595	  7598	  7599	  7618	  7620	  7621	  7622	  7627	  7628	  7632	  7633
	  7639	  7640	  7643	  7644	  7663	  7665	  7666	  7667	  7672	  7673	  7677	  7678	  7684	  7685
	  7688	  7689	  7708	  7710	  7711	  7712	  7717	  7718	  7722	  7723	  7729	  7730	  7733	  7734
	  7742	  7744	  7745	  7746	  7747	  7748	  7761	  7763	  7764	  7765	  7767	  7769	  7770	  7771
	  7772	  7773	  7786	  7788	  7789	  7790	  7792	  7794	  7795	  7796	  7797	  7798	  7811	  7813
	  7814	  7815	  7817	  7819	  7820	  7821	  7822	  7823	  7836	  7838	  7839	  7840	  7842	  7844
	  7845	  7846	  7847	  7848	  7861	  7863	  7864	  7865	  7867	  7869	  7870	  7871	  7872	  7873
	  7886	  7888	  7889	  7890	  7892	  7894	  7895	  7896	  7897	  7898	  7904#	  7905	  7922	  7923
	  7925	  7926	  7927	  7929	  7931	  7932	  7934	  7935	  7936	  7937	  7939	  7940	  7941	  7942
	  7948#	  7949	  7955	  7986	  7988	  7991	  7993	  8005	  8007	  8010	  8012	  8024	  8026	  8029
	  8031	  8043	  8045	  8048	  8050	  8062	  8064	  8067	  8069	  8095#	  8096	  8102	  8104	  8109
	  8112	  8114	  8115	  8116	  8122	  8124	  8125	  8126	  8127	  8128	  8143	  8145	  8146	  8148
	  8150	  8152	  8153	  8154	  8155	  8156	  8171	  8173	  8174	  8176	  8178	  8180	  8181	  8182     SEQ 0228
	  8183	  8184	  8199	  8201	  8202	  8204	  8206	  8208	  8209	  8210	  8211	  8212	  8227	  8229
	  8230	  8232	  8234	  8236	  8237	  8238	  8239	  8240	  8255	  8257	  8258	  8260	  8262	  8264
	  8265	  8266	  8267	  8268	  8283	  8285	  8286	  8288	  8290	  8292	  8293	  8294	  8295	  8296
	  8302#	  8303	  8322	  8324	  8325	  8327	  8329	  8332	  8333	  8335	  8336	  8337	  8338	  8340
	  8341	  8342	  8343	  8349#	  8350	  8356	  8391	  8393	  8394	  8397	  8398	  8400	  8402	  8404
	  8414	  8416	  8417	  8420	  8421	  8423	  8425	  8427	  8437	  8439	  8440	  8443	  8444	  8446
	  8448	  8450	  8460	  8462	  8463	  8465	  8466	  8467	  8469	  8471	  8473	  8483	  8485	  8486
	  8489	  8490	  8492	  8494	  8496	  8513	  8515	  8516	  8518	  8520	  8522	  8523	  8524	  8525
	  8526	  8541	  8543	  8544	  8546	  8548	  8550	  8551	  8552	  8553	  8554	  8569	  8571	  8572
	  8574	  8576	  8578	  8579	  8580	  8581	  8582	  8600	  8602	  8603	  8604	  8605	  8610	  8611
	  8615	  8616	  8622	  8623	  8626	  8627	  8646	  8648	  8649	  8650	  8651	  8656	  8657	  8661
	  8662	  8668	  8669	  8672	  8673	  8692	  8694	  8695	  8696	  8697	  8702	  8703	  8707	  8708
	  8714	  8715	  8718	  8719	  8738	  8740	  8741	  8742	  8743	  8748	  8749	  8753	  8754	  8760
	  8761	  8764	  8765	  8778#	  8779	  8785	  8787	  8790	  8793	  8796	  8798	  8799	  8800
ALTMGO	   747#	  8940
AMCLRB	   661#
ANXM	   661#
APR	  8817	  8969
AROV	   661#	  3306	  3336
AROVTP	   661#
AROVU	   661#
AST	   862#
ATSIN	   863#
BEGEND	   743#	  8803
BEGIN	    63	    64	    76	    79	    80	    81	   674#	  9106
BEGIN1	   690#	   744
BELL	   866#
BIS	   661#	  8108	  8115	  8792	  8799
CC00	  1008	  1012#
CCA	   661#
CHAIN	   452#
CHNOFF	   661#
CHNON	   661#
CLK	   661#
CLKCLR	   661#
CLKDIS	   661#
CLKENB	   661#
CLKU	   661#
CLOCKF	   729#
CNTLC	   746#
CNTRP	   661#
COMMA	   855#
CONSW	   730#	  8874	  8941	  8972
CPOPJ	   750#
CPOPJ1	   748#
CRLF	   581	   582	   850#
CRLF2	   585	   586	   852#
CRY0	   661#
CRY1	   661#
CSHFLG	   909#
CSHMEM	   910#
CTRP	   661#
CYCL60	   903#                                                                                                            SEQ 0229
DCK	   661#
DDTLNK	   466#	   688
DDTSRT	   688#
DEBUG	    56#	  9097	  9098
DECVER	     3#	    10	    24	   709
DF22F	   814#
DIAGMN	   677#
DING	   438#	  8946
DOLLAR	   869#
DSKUPD	   714
E	  7004#	  7007	  7007#	  7025	  7025#	  7027	  7028	  7031	  7039	  7039#	  7041	  7042	  7045	  7053
	  7053#	  7055	  7056	  7059	  7067	  7067#	  7069	  7070	  7073	  7081	  7081#	  7083	  7084	  7087
	  7353#	  7356	  7356#	  7376	  7376#	  7382	  7384	  7392	  7392#	  7398	  7400	  7408	  7408#	  7414
	  7416	  7424	  7424#	  7430	  7432	  7440	  7440#	  7446	  7448	  7955#	  7958	  7958#	  7983	  7983#
	  7984	  7988	  7989	  7990	  7991	  7992	  7993	  7995	  8002	  8002#	  8003	  8007	  8008	  8009
	  8010	  8011	  8012	  8014	  8021	  8021#	  8022	  8026	  8027	  8028	  8029	  8030	  8031	  8033
	  8040	  8040#	  8041	  8045	  8046	  8047	  8048	  8050	  8052	  8059	  8059#	  8060	  8064	  8065
	  8066	  8067	  8068	  8069	  8071	  8102#	  8106	  8109	  8110	  8111	  8112	  8113	  8356#	  8359
	  8359#	  8388	  8388#	  8389	  8394	  8397	  8398	  8399	  8400	  8401	  8402	  8404	  8411	  8411#
	  8412	  8417	  8420	  8421	  8422	  8423	  8424	  8425	  8427	  8434	  8434#	  8435	  8440	  8443
	  8444	  8445	  8446	  8447	  8448	  8450	  8457	  8457#	  8458	  8463	  8466	  8467	  8468	  8469
	  8470	  8471	  8473	  8480	  8480#	  8481	  8486	  8489	  8490	  8491	  8492	  8493	  8494	  8496
	  8785#	  8789	  8793	  8794	  8795	  8796	  8797
END	  9105#
ENDFIX	   983#
ENDSLD	  9095#
ERDIAG	    61#	  8859
ERMORE	   763#	  8932
ERRELB	  8929
ERRLOP	  1018#	  1018	  1036#	  1036	  3060#	  3060	  6963#	  6963	  7003#	  7003	  7302#	  7302	  7352#	  7352
	  7910#	  7910	  7954#	  7954	  8101#	  8101	  8308#	  8308	  8355#	  8355	  8784#	  8784	  8839	  8951
	  8954	  8955
ERRMES	    42	    43	    44	    45	    46	    47	    48	    49	    50	    51	    52	  8810#
ERRPC	   734#	  8822	  8856
ERRTLS	   735#	  8820	  8958
ERSTOP	   441#	  8942
EXCASB	    57#	   712	  8811	  8963
EXCMEM	   661#
EXCPFW	   661#
EXIOT	   661#
FOV	   661#
FOVU	   661#
FRDLNK	   464#
FSELNK	   463#
FXU	   661#
HYPEN	   860#
IADBRK	   661#
IADEXC	   661#
IADSTP	   661#
IADUSR	   661#
IAPRC1	   661#
IAPRE1	   661#
IASRTC	   661#                                                                                                            SEQ 0230
IASRTE	   661#
IASRTS	   661#
ICNSLL	   661#
ICNSLR	   661#
IDATAF	   661#
IEVNPR	   661#
IFMMAN	   661#
IINSTF	   661#
IIOPFC	   661#
IIOPFL	   661#
IMAINT	   661#
IMGINM	   661#
IMGNLO	   661#
IMGNOF	   661#	  8817
IMGNON	   661#
IMIPGD	   661#
IMLAPD	   661#
INHCSH	   449#
INHPAG	   446#
INXCLR	   661#
INXM	   661#
INXSTP	   661#
IOCLR	   661#
IP50HZ	   661#
IPAREN	   661#
IPARER	   661#
IPRSTP	   661#
IPWRFL	   661#
IPWRLO	   661#
IRQCLR	   661#
ISPDOF	   661#	  8817
ISPDON	   661#
ITERAT	    95#	   707
ITMDIS	   661#
ITMENB	   661#
ITMOEN	   661#
ITMOUT	   661#
ITMSET	   661#
ITRCH1	   767#
ITRCNT	   707#
IWRITE	   661#
JOB41	   661#
JOBAPR	   661#
JOBCNI	   661#
JOBDDT	   661#
JOBFF	   661#
JOBOPC	   661#	  8939
JOBREL	   661#
JOBREN	   661#
JOBSA	   661#
JOBSYM	   661#
JOBTPC	   661#
JOBUSY	   661#                                                                                                            SEQ 0231
JOBUUO	   661#
JOBVER	   661#
KA10	   661
KAHZ50	   454#
KAIFLG	   724#	  8812	  8964
KI10	    59#	   661	  8811	  8963
KL10	   661
KLFLG	   725#	  7579	  7591	  7624	  7636	  7669	  7681	  7714	  7726	  8076	  8088	  8464	  8607	  8619
	  8653	  8665	  8699	  8711	  8745	  8757	  8771	  8826
KLOLD	    62#	   661
KLTYP	   941#
KNTRP	   661#
KTRP	   661#
LAST	  8772	  8803#
LDEXCB	   661#
LDLNK	   465#	   677	   679
LDUSRB	   661#
LFP	   864#
LIP	   661#
LOOPER	   440#	  8944
LUUO	   661#
LUUO1	    42#	   794	   795
LUUO10	    49#	   794	   799
LUUO11	    50#	   794	   799
LUUO12	    51#	   794	   800
LUUO13	    52#	   794	   800
LUUO14	   794	   801
LUUO15	   794	   801
LUUO16	   794	   802
LUUO17	   794	   802
LUUO2	    43#	   794	   796
LUUO20	   794	   803
LUUO21	   794	   803
LUUO22	   794	   804
LUUO23	   794	   804
LUUO24	   794	   805
LUUO25	   794	   805
LUUO26	   794	   806
LUUO27	   794	   806
LUUO3	    44#	   794	   796
LUUO30	   794	   807
LUUO31	   794	   807
LUUO32	   794	   808
LUUO33	   794	   808
LUUO4	    45#	   794	   797
LUUO5	    46#	   794	   797
LUUO6	    47#	   794	   798
LUUO7	    48#	   794	   798
LUUOI	   661#
MAPNEW	   815#
MARGIN	   737#	  8816	  8968	  8969
MCNVER	     4#	    10	    24	   709
MEMLOW	   817#                                                                                                            SEQ 0232
MEMMAP	   715
MEMSIZ	   818#
MEMTOT	   816#
MICNT	  8823#	  8823	  8824	  8841
MINUS	   859#
MODDVC	   448#
MODDVL	    64#	   646	   710
MODDVU	    63#	   647	   711
MODLNK	   467#	   674
MONCTL	   727#	  8842	  8956
MONFLG	   726#
MONTEN	   728#
MPVU	   661#
MUUO	   661#
MUUOPC	   661#
NOPNT	   436#	  8832
NXMU	   661#
OPRSEL	   450#
OPTIME	   829#
P	   493	   494	   495	   496	   661#	   749	  8080	  8084
PAG	   661#
PALERS	   442#	  8973
PARCLR	   661#
PARDIS	   661#
PAREA1	    88#	   705
PAREA2	    89#	   706
PAREA3	    90#	   703
PAREA4	    91#	   704
PAREA5	    92#	   716
PAREA6	    93#	   717
PAREA7	   716#
PAREA8	   717#
PARENB	   661#
PARU	   661#
PASCNT	   731#	  8847	  8851
PATCH	  9098#
PDISF	   826#
PDLOVU	   661#
PDOVTP	   661#
PERIOD	   856#
PFSTRT	   683#
PGFTRP	   661#
PGMEND	    60#	  9104
PGMNAM	   708	   988#
PI	  8829
PICHN1	   661#
PICHN2	   661#
PICHN3	   661#
PICHN4	   661#
PICHN5	   661#
PICHN6	   661#
PICHN7	   661#
PICHNA	   661#                                                                                                            SEQ 0233
PICLR	   661#
PIOFF	   661#
PION	   661#
PLIST	   895#	   895
PLISTE	   895	   897#	   981
PLISTS	   896#
PLUS	   861#
PNTENB	   825#
PNTEXT	   704#
PNTFLG	   824#
PNTINH	   827#
PNTLPT	   437#
PNTNAM	   703#
PNTRP	   661#
PNTSPC	   828#
PROCED	  8830#	  8830	  8945	  8952
PTRP	   661#
PVPAGI	   922#
PWFCLR	   661#
Q10	  1022#	  1026
Q100	  1041#	  1045
Q1000	  2178#
Q10000	  6795#	  6802
Q10010	  6807#	  6814
Q10050	  6819#	  6826
Q10100	  6837#	  6847
Q10200	  6858#	  6868
Q10300	  6879#	  6889
Q10400	  6900#	  6910
Q10500	  6921#	  6931
Q10600	  6942#	  6952
Q10700	  6975#
Q10710	  6974#	  6992
Q10713	  6981#
Q1100	  2345#
Q11000	  7009#
Q11050	  7098#	  7105
Q11100	  7117#	  7136
Q11200	  7148#	  7167
Q11300	  7179#	  7198
Q11400	  7210#	  7229
Q11500	  7241#	  7260
Q11600	  7272#	  7291
Q11700	  7314#	  7341
Q1200	  2530#
Q12000	  7358#
Q12100	  7467#	  7486
Q12200	  7498#	  7517
Q12300	  7529#	  7548
Q12400	  7553#	  7557
Q12500	  7572#	  7584
Q12501	  7576#	  7582	  7587	  7594	  7598
Q12502	  7584#	  7589	  7596	  7600                                                                                     SEQ 0234
Q12503	  7580	  7587#
Q12504	  7578	  7591#
Q12505	  7592	  7598#
Q12506	  7585	  7602#
Q12600	  7617#	  7629
Q12601	  7621#	  7627	  7632	  7639	  7643
Q12602	  7629#	  7634	  7641	  7645
Q12603	  7625	  7632#
Q12604	  7623	  7636#
Q12605	  7637	  7643#
Q12606	  7630	  7647#
Q12700	  7662#	  7674
Q12701	  7666#	  7672	  7677	  7684	  7688
Q12702	  7674#	  7679	  7686	  7690
Q12703	  7670	  7677#
Q12704	  7668	  7681#
Q12705	  7682	  7688#
Q12706	  7675	  7692#
Q1300	  2716#
Q13000	  7707#	  7719
Q13001	  7711#	  7717	  7722	  7729	  7733
Q13002	  7719#	  7724	  7731	  7735
Q13003	  7715	  7722#
Q13004	  7713	  7726#
Q13005	  7727	  7733#
Q13006	  7720	  7737#
Q13050	  7742#	  7749
Q13100	  7761#	  7774
Q13200	  7786#	  7799
Q13300	  7811#	  7824
Q13400	  7836#	  7849
Q13500	  7861#	  7874
Q13600	  7886#	  7899
Q13700	  7922#	  7943
Q1400	  2874#	  2880
Q14000	  7960#
Q14001	  8051	  8076#
Q14002	  8079#
Q14003	  8077	  8083#
Q14020	  8104#	  8117
Q14021	  8074	  8088#
Q14050	  8089	  8122#	  8129
Q14100	  8143#	  8157
Q14200	  8171#	  8185
Q14300	  8199#	  8213
Q14400	  8227#	  8241
Q14500	  8255#	  8269
Q14600	  8283#	  8297
Q14700	  8322#	  8344
Q1500	  2890#	  2897
Q15000	  8361#
Q15100	  8513#	  8527
Q15200	  8541#	  8555                                                                                                     SEQ 0235
Q15300	  8569#	  8583
Q15400	  8599#	  8612
Q15401	  8604#	  8610	  8615	  8622	  8626
Q15402	  8612#	  8617	  8624	  8628
Q15403	  8608	  8615#
Q15404	  8606	  8619#
Q15405	  8620	  8626#
Q15406	  8613	  8630#
Q15500	  8645#	  8658
Q15501	  8650#	  8656	  8661	  8668	  8672
Q15502	  8658#	  8663	  8670	  8674
Q15503	  8654	  8661#
Q15504	  8652	  8665#
Q15505	  8666	  8672#
Q15506	  8659	  8676#
Q15600	  8691#	  8704
Q15601	  8696#	  8702	  8707	  8714	  8718
Q15602	  8704#	  8709	  8716	  8720
Q15603	  8700	  8707#
Q15604	  8698	  8711#
Q15605	  8712	  8718#
Q15606	  8705	  8722#
Q15700	  8737#	  8750
Q15701	  8742#	  8748	  8753	  8760	  8764
Q15702	  8750#	  8755	  8762	  8766
Q15703	  8746	  8753#
Q15704	  8744	  8757#
Q15705	  8758	  8764#
Q15706	  8751	  8768#
Q1600	  2906#	  2912
Q16000	  8787#	  8801
Q1700	  2920#	  2927
Q200	  1052#
Q2000	  2936#	  2942
Q2100	  2950#	  2955
Q2200	  2964#	  2970
Q2300	  2978#	  2983
Q2400	  2992#	  2997
Q2500	  3005#	  3010
Q2600	  3019#	  3024
Q2700	  3032#	  3037
Q300	  1360#
Q3000	  3046#	  3051
Q3010	  3061#	  3067
Q3050	  3072#	  3076
Q3100	  3086#	  3093
Q3200	  3103#	  3109
Q3300	  3118#	  3125
Q3400	  3135#	  3142
Q3500	  3151#	  3156
Q3600	  3166#	  3172
Q3700	  3181#	  3186
Q4000	  3196#	  3201                                                                                                     SEQ 0236
Q4100	  3210#	  3215
Q4200	  3225#	  3230
Q4300	  3239#	  3244
Q4400	  3254#	  3259
Q4410	  3264#	  3271
Q4500	  3279#	  3284
Q4600	  3289#	  3298
Q4700	  3303#	  3314
Q500	  1656#
Q5000	  3318#	  3327
Q5100	  3332#	  3344
Q5150	  3349#
Q5200	  3361#
Q5300	  3636#
Q5400	  3948#
Q5500	  4257#
Q5600	  4566#	  4570
Q5700	  4577#	  4583
Q600	  1810#
Q6000	  4589#
Q6100	  4792#
Q6200	  4958#
Q6300	  5119#
Q6400	  5322#
Q6500	  5479#
Q6600	  5640#
Q6700	  5854#
Q700	  2121#
Q7000	  6020#
Q7100	  6179#	  6186
Q7200	  6192#
Q7300	  6406#
Q7400	  6582#
Q7500	  6753#	  6760
Q7600	  6767#	  6775
Q7700	  6781#	  6788
QUEST	   867#
RADIX	   870#
RADLSC	   872#
RADLSP	   871#
RANDBS	   705#
REENTR	   685#
RELIAB	   444#
RENTR1	    78	   985#
REPT	   661#
REPT1	   661#
REPTU	   783#
REQSET	   661#
RESRT1	    77	   760#
RESRT2	   761#
RETURN	   692#
RSTART	   433#
RTP	   865#                                                                                                            SEQ 0237
RUNFLG	   732#
SAC	  1013#	  1015	  1016	  1017	  1018	  1026	  1031#	  1033	  1034	  1035	  1036	  1045	  1082	  1098
	  1114	  1130	  1146	  1162	  1178	  1194	  1210	  1226	  1242	  1258	  1274	  1290	  1306	  1322
	  1338	  1354	  1390	  1406	  1422	  1438	  1454	  1470	  1486	  1502	  1518	  1534	  1550	  1566
	  1582	  1598	  1614	  1630	  1646	  1684	  1699	  1714	  1729	  1744	  1759	  1774	  1789	  1804
	  1840	  1856	  1872	  1888	  1904	  1920	  1936	  1952	  1968	  1984	  2000	  2016	  2032	  2048
	  2064	  2080	  2096	  2112	  2153	  2170	  2212	  2230	  2248	  2266	  2284	  2302	  2320	  2338
	  2379	  2397	  2415	  2433	  2451	  2469	  2487	  2505	  2523	  2564	  2582	  2600	  2618	  2636
	  2654	  2672	  2690	  2708	  2748	  2765	  2782	  2799	  2816	  2833	  2850	  2867	  2880	  2897
	  2912	  2927	  2942	  2955	  2970	  2983	  2997	  3010	  3024	  3037	  3051	  3057	  3058	  3059
	  3060	  3067	  3076	  3093	  3109	  3125	  3142	  3156	  3172	  3186	  3201	  3215	  3230	  3244
	  3259	  3271	  3284	  3298	  3314	  3327	  3344	  3353	  3389	  3404	  3419	  3434	  3449	  3464
	  3479	  3494	  3509	  3524	  3539	  3554	  3569	  3584	  3599	  3614	  3629	  3666	  3682	  3698
	  3714	  3730	  3746	  3762	  3778	  3794	  3810	  3826	  3842	  3858	  3874	  3890	  3906	  3922
	  3938	  3978	  3994	  4010	  4026	  4042	  4058	  4074	  4090	  4106	  4122	  4138	  4154	  4170
	  4186	  4202	  4218	  4234	  4250	  4287	  4303	  4319	  4335	  4351	  4367	  4383	  4399	  4415
	  4431	  4447	  4463	  4479	  4495	  4511	  4527	  4543	  4559	  4570	  4583	  4623	  4641	  4659
	  4677	  4695	  4713	  4731	  4749	  4767	  4785	  4826	  4844	  4862	  4880	  4898	  4916	  4934
	  4952	  4990	  5007	  5024	  5041	  5058	  5075	  5092	  5109	  5153	  5171	  5189	  5207	  5225
	  5243	  5261	  5279	  5297	  5315	  5354	  5371	  5388	  5405	  5422	  5439	  5456	  5473	  5511
	  5528	  5545	  5562	  5579	  5596	  5613	  5630	  5676	  5695	  5714	  5733	  5752	  5771	  5790
	  5809	  5828	  5847	  5888	  5906	  5924	  5942	  5960	  5978	  5996	  6014	  6052	  6069	  6086
	  6103	  6120	  6137	  6154	  6171	  6186	  6228	  6247	  6266	  6285	  6304	  6323	  6342	  6361
	  6380	  6399	  6442	  6461	  6480	  6499	  6518	  6537	  6556	  6575	  6616	  6634	  6652	  6670
	  6688	  6706	  6724	  6742	  6760	  6775	  6788	  6802	  6814	  6826	  6847	  6868	  6889	  6910
	  6931	  6952	  6958#	  6960	  6961	  6962	  6963	  6992	  6998#	  7000	  7001	  7002	  7003	  7036
	  7050	  7064	  7078	  7092	  7105	  7136	  7167	  7198	  7229	  7260	  7291	  7297#	  7299	  7300
	  7301	  7302	  7341	  7347#	  7349	  7350	  7351	  7352	  7389	  7405	  7421	  7437	  7453	  7486
	  7517	  7548	  7557	  7584	  7629	  7674	  7719	  7749	  7774	  7799	  7824	  7849	  7874	  7899
	  7905#	  7907	  7908	  7909	  7910	  7943	  7949#	  7951	  7952	  7953	  7954	  7996	  8015	  8034
	  8053	  8072	  8096#	  8098	  8099	  8100	  8101	  8117	  8129	  8157	  8185	  8213	  8241	  8269
	  8297	  8303#	  8305	  8306	  8307	  8308	  8344	  8350#	  8352	  8353	  8354	  8355	  8403	  8426
	  8449	  8474	  8495	  8527	  8555	  8583	  8612	  8658	  8704	  8750	  8779#	  8781	  8782	  8783
	  8784	  8801
SADR1	    76#	   681
SADR10	    85#	   697
SADR11	    86#	   698
SADR2	    77#	   683
SADR3	    78#	   685
SADR4	    79#
SADR5	    80#	   746
SADR6	    81#	   747
SADR7	    82#	   694
SADR8	    83#	   695
SADR9	    84#	   696
SBINIT	   506	   691#
SCOPE	   784#
SENSE1	   661#
SENSE2	   661#
SENSE3	   661#
SENSE4	   661#
SENSE5	   661#
SENSE6	   661#                                                                                                            SEQ 0238
SFSTRT	   681#
SLASH	   868#
SMLUSR	   661#
SN	  1048#	  1073	  1073#	  1081	  1089	  1089#	  1097	  1105	  1105#	  1113	  1121	  1121#	  1129	  1137
	  1137#	  1145	  1153	  1153#	  1161	  1169	  1169#	  1177	  1185	  1185#	  1193	  1201	  1201#	  1209
	  1217	  1217#	  1225	  1233	  1233#	  1241	  1249	  1249#	  1257	  1265	  1265#	  1273	  1281	  1281#
	  1289	  1297	  1297#	  1305	  1313	  1313#	  1321	  1329	  1329#	  1337	  1345	  1345#	  1353	  1357#
	  1381	  1381#	  1389	  1397	  1397#	  1405	  1413	  1413#	  1421	  1429	  1429#	  1437	  1445	  1445#
	  1453	  1461	  1461#	  1469	  1477	  1477#	  1485	  1493	  1493#	  1501	  1509	  1509#	  1517	  1525
	  1525#	  1533	  1541	  1541#	  1549	  1557	  1557#	  1565	  1573	  1573#	  1581	  1589	  1589#	  1597
	  1605	  1605#	  1613	  1621	  1621#	  1629	  1637	  1637#	  1645	  1652#	  1676	  1676#	  1683	  1691
	  1691#	  1698	  1706	  1706#	  1713	  1721	  1721#	  1728	  1736	  1736#	  1743	  1751	  1751#	  1758
	  1766	  1766#	  1773	  1781	  1781#	  1788	  1796	  1796#	  1803	  1807#	  1831	  1831#	  1839	  1847
	  1847#	  1855	  1863	  1863#	  1871	  1879	  1879#	  1887	  1895	  1895#	  1903	  1911	  1911#	  1919
	  1927	  1927#	  1935	  1943	  1943#	  1951	  1959	  1959#	  1967	  1975	  1975#	  1983	  1991	  1991#
	  1999	  2007	  2007#	  2015	  2023	  2023#	  2031	  2039	  2039#	  2047	  2055	  2055#	  2063	  2071
	  2071#	  2079	  2087	  2087#	  2095	  2103	  2103#	  2111	  2117#	  2143	  2143#	  2152	  2160	  2160#
	  2169	  2173#	  2201	  2201#	  2211	  2219	  2219#	  2229	  2237	  2237#	  2247	  2255	  2255#	  2265
	  2273	  2273#	  2283	  2291	  2291#	  2301	  2309	  2309#	  2319	  2327	  2327#	  2337	  2340#	  2368
	  2368#	  2378	  2386	  2386#	  2396	  2404	  2404#	  2414	  2422	  2422#	  2432	  2440	  2440#	  2450
	  2458	  2458#	  2468	  2476	  2476#	  2486	  2494	  2494#	  2504	  2512	  2512#	  2522	  2527#	  2553
	  2553#	  2563	  2571	  2571#	  2581	  2589	  2589#	  2599	  2607	  2607#	  2617	  2625	  2625#	  2635
	  2643	  2643#	  2653	  2661	  2661#	  2671	  2679	  2679#	  2689	  2697	  2697#	  2707	  2711#	  2738
	  2738#	  2747	  2755	  2755#	  2764	  2772	  2772#	  2781	  2789	  2789#	  2798	  2806	  2806#	  2815
	  2823	  2823#	  2832	  2840	  2840#	  2849	  2857	  2857#	  2866	  3357#	  3381	  3381#	  3388	  3396
	  3396#	  3403	  3411	  3411#	  3418	  3426	  3426#	  3433	  3441	  3441#	  3448	  3456	  3456#	  3463
	  3471	  3471#	  3478	  3486	  3486#	  3493	  3501	  3501#	  3508	  3516	  3516#	  3523	  3531	  3531#
	  3538	  3546	  3546#	  3553	  3561	  3561#	  3568	  3576	  3576#	  3583	  3591	  3591#	  3598	  3606
	  3606#	  3613	  3621	  3621#	  3628	  3632#	  3657	  3657#	  3665	  3673	  3673#	  3681	  3689	  3689#
	  3697	  3705	  3705#	  3713	  3721	  3721#	  3729	  3737	  3737#	  3745	  3753	  3753#	  3761	  3769
	  3769#	  3777	  3785	  3785#	  3793	  3801	  3801#	  3809	  3817	  3817#	  3825	  3833	  3833#	  3841
	  3849	  3849#	  3857	  3865	  3865#	  3873	  3881	  3881#	  3889	  3897	  3897#	  3905	  3913	  3913#
	  3921	  3929	  3929#	  3937	  3944#	  3969	  3969#	  3977	  3985	  3985#	  3993	  4001	  4001#	  4009
	  4017	  4017#	  4025	  4033	  4033#	  4041	  4049	  4049#	  4057	  4065	  4065#	  4073	  4081	  4081#
	  4089	  4097	  4097#	  4105	  4113	  4113#	  4121	  4129	  4129#	  4137	  4145	  4145#	  4153	  4161
	  4161#	  4169	  4177	  4177#	  4185	  4193	  4193#	  4201	  4209	  4209#	  4217	  4225	  4225#	  4233
	  4241	  4241#	  4249	  4253#	  4278	  4278#	  4286	  4294	  4294#	  4302	  4310	  4310#	  4318	  4326
	  4326#	  4334	  4342	  4342#	  4350	  4358	  4358#	  4366	  4374	  4374#	  4382	  4390	  4390#	  4398
	  4406	  4406#	  4414	  4422	  4422#	  4430	  4438	  4438#	  4446	  4454	  4454#	  4462	  4470	  4470#
	  4478	  4486	  4486#	  4494	  4502	  4502#	  4510	  4518	  4518#	  4526	  4534	  4534#	  4542	  4550
	  4550#	  4558	  4585#	  4612	  4612#	  4622	  4630	  4630#	  4640	  4648	  4648#	  4658	  4666	  4666#
	  4676	  4684	  4684#	  4694	  4702	  4702#	  4712	  4720	  4720#	  4730	  4738	  4738#	  4748	  4756
	  4756#	  4766	  4774	  4774#	  4784	  4788#	  4815	  4815#	  4825	  4833	  4833#	  4843	  4851	  4851#
	  4861	  4869	  4869#	  4879	  4887	  4887#	  4897	  4905	  4905#	  4915	  4923	  4923#	  4933	  4941
	  4941#	  4951	  4954#	  4980	  4980#	  4989	  4997	  4997#	  5006	  5014	  5014#	  5023	  5031	  5031#
	  5040	  5048	  5048#	  5057	  5065	  5065#	  5074	  5082	  5082#	  5091	  5099	  5099#	  5108	  5115#
	  5142	  5142#	  5152	  5160	  5160#	  5170	  5178	  5178#	  5188	  5196	  5196#	  5206	  5214	  5214#
	  5224	  5232	  5232#	  5242	  5250	  5250#	  5260	  5268	  5268#	  5278	  5286	  5286#	  5296	  5304
	  5304#	  5314	  5318#	  5344	  5344#	  5353	  5361	  5361#	  5370	  5378	  5378#	  5387	  5395	  5395#
	  5404	  5412	  5412#	  5421	  5429	  5429#	  5438	  5446	  5446#	  5455	  5463	  5463#	  5472	  5475#
	  5501	  5501#	  5510	  5518	  5518#	  5527	  5535	  5535#	  5544	  5552	  5552#	  5561	  5569	  5569#
	  5578	  5586	  5586#	  5595	  5603	  5603#	  5612	  5620	  5620#	  5629	  5636#	  5664	  5664#	  5675
	  5683	  5683#	  5694	  5702	  5702#	  5713	  5721	  5721#	  5732	  5740	  5740#	  5751	  5759	  5759#    SEQ 0239
	  5770	  5778	  5778#	  5789	  5797	  5797#	  5808	  5816	  5816#	  5827	  5835	  5835#	  5846	  5850#
	  5877	  5877#	  5887	  5895	  5895#	  5905	  5913	  5913#	  5923	  5931	  5931#	  5941	  5949	  5949#
	  5959	  5967	  5967#	  5977	  5985	  5985#	  5995	  6003	  6003#	  6013	  6016#	  6042	  6042#	  6051
	  6059	  6059#	  6068	  6076	  6076#	  6085	  6093	  6093#	  6102	  6110	  6110#	  6119	  6127	  6127#
	  6136	  6144	  6144#	  6153	  6161	  6161#	  6170	  6188#	  6216	  6216#	  6227	  6235	  6235#	  6246
	  6254	  6254#	  6265	  6273	  6273#	  6284	  6292	  6292#	  6303	  6311	  6311#	  6322	  6330	  6330#
	  6341	  6349	  6349#	  6360	  6368	  6368#	  6379	  6387	  6387#	  6398	  6402#	  6430	  6430#	  6441
	  6449	  6449#	  6460	  6468	  6468#	  6479	  6487	  6487#	  6498	  6506	  6506#	  6517	  6525	  6525#
	  6536	  6544	  6544#	  6555	  6563	  6563#	  6574	  6578#	  6605	  6605#	  6615	  6623	  6623#	  6633
	  6641	  6641#	  6651	  6659	  6659#	  6669	  6677	  6677#	  6687	  6695	  6695#	  6705	  6713	  6713#
	  6723	  6731	  6731#	  6741	  7006#	  7024	  7024#	  7033	  7035	  7038	  7038#	  7047	  7049	  7052
	  7052#	  7061	  7063	  7066	  7066#	  7075	  7077	  7080	  7080#	  7089	  7091	  7355#	  7375	  7375#
	  7386	  7388	  7391	  7391#	  7402	  7404	  7407	  7407#	  7418	  7420	  7423	  7423#	  7434	  7436
	  7439	  7439#	  7450	  7452	  7957#	  7982	  7982#	  7990	  7995	  8001	  8001#	  8009	  8014	  8020
	  8020#	  8028	  8033	  8039	  8039#	  8047	  8052	  8058	  8058#	  8066	  8071	  8358#	  8387	  8387#
	  8399	  8401	  8410	  8410#	  8422	  8424	  8433	  8433#	  8445	  8447	  8456	  8456#	  8468	  8470
	  8479	  8479#	  8491	  8493
SNTRP	   661#
SPACE	   857#
SPDES	  8917#
SRTDDT	   687#
START	   675	  1004#
START1	   694#
START2	   695#
START3	   696#
START4	   697#
START5	   698#
STARTA	   690	  1008#
STRP	   661#
SUBLNK	   468#	   691
SWTEXR	   706#
SYSEXR	   679#
TAB	   858#
TESTPC	   733#	  1016	  1034	  3058	  6961	  7001	  7300	  7350	  7908	  7952	  8099	  8306	  8353	  8782
TICKS	   736#
TLET	  1006	  8891	  8914#
TN0	   661#
TN1	   661#
TOTALS	   434#
TRP3TP	   661#
TRPENB	   661#
TSTWD	  3062	  3064	  3266	  3268	  6809	  6811	  7763	  7764	  7767	  7769	  7788	  7789	  7792	  7794
	  7813	  7814	  7817	  7819	  7838	  7839	  7842	  7844	  7863	  7864	  7867	  7869	  7888	  7889
	  7892	  7894	  7925	  7926	  7929	  7931	  8145	  8150	  8152	  8173	  8178	  8180	  8201	  8206
	  8208	  8229	  8234	  8236	  8257	  8262	  8264	  8285	  8290	  8292	  8324	  8329	  8332	  8515
	  8520	  8522	  8543	  8548	  8550	  8571	  8576	  8578	  8602	  8648	  8694	  8740	  8805#
TTNBRF	   916#
TTYFIL	   832#
TTYSPD	   833#
TXTINH	   445#	  8875
UOLIP	   661#
UOUSR	   661#
USER	   723#	  8814	  8827	  8966                                                                                     SEQ 0240
USERF	   661#	  7577	  7622	  7667	  7712	  8605	  8651	  8697	  8743
USRASB	    58#	   713
USRCMP	   661#
USRCRF	   842#
USRLFF	   841#
USRPFW	   661#
UUODIS	   795#
UUOEXT	   751#	  8970
UUORTN	   752#
UUOSKP	   749#
WW	  2714#	  2741	  2741#	  2744	  2758	  2758#	  2761	  2775	  2775#	  2778	  2792	  2792#	  2795	  2809
	  2809#	  2812	  2826	  2826#	  2829	  2843	  2843#	  2846	  2860	  2860#	  2863
XX	  1049#	  1074	  1074#	  1077	  1090	  1090#	  1093	  1106	  1106#	  1109	  1122	  1122#	  1125	  1138
	  1138#	  1141	  1154	  1154#	  1157	  1170	  1170#	  1173	  1186	  1186#	  1189	  1202	  1202#	  1205
	  1218	  1218#	  1221	  1234	  1234#	  1237	  1250	  1250#	  1253	  1266	  1266#	  1269	  1282	  1282#
	  1285	  1298	  1298#	  1301	  1314	  1314#	  1317	  1330	  1330#	  1333	  1346	  1346#	  1349	  1382
	  1382#	  1385	  1398	  1398#	  1401	  1414	  1414#	  1417	  1430	  1430#	  1433	  1446	  1446#	  1449
	  1462	  1462#	  1465	  1478	  1478#	  1481	  1494	  1494#	  1497	  1510	  1510#	  1513	  1526	  1526#
	  1529	  1542	  1542#	  1545	  1558	  1558#	  1561	  1574	  1574#	  1577	  1590	  1590#	  1593	  1606
	  1606#	  1609	  1622	  1622#	  1625	  1638	  1638#	  1641	  1653#	  1677	  1677#	  1679	  1692	  1692#
	  1694	  1707	  1707#	  1709	  1722	  1722#	  1724	  1737	  1737#	  1739	  1752	  1752#	  1754	  1767
	  1767#	  1769	  1782	  1782#	  1784	  1797	  1797#	  1799	  1832	  1832#	  1835	  1848	  1848#	  1851
	  1864	  1864#	  1867	  1880	  1880#	  1883	  1896	  1896#	  1899	  1912	  1912#	  1915	  1928	  1928#
	  1931	  1944	  1944#	  1947	  1960	  1960#	  1963	  1976	  1976#	  1979	  1992	  1992#	  1995	  2008
	  2008#	  2011	  2024	  2024#	  2027	  2040	  2040#	  2043	  2056	  2056#	  2059	  2072	  2072#	  2075
	  2088	  2088#	  2091	  2104	  2104#	  2107	  2118#	  2144	  2144#	  2147	  2161	  2161#	  2164	  2174#
	  2202	  2202#	  2206	  2220	  2220#	  2224	  2238	  2238#	  2242	  2256	  2256#	  2260	  2274	  2274#
	  2278	  2292	  2292#	  2296	  2310	  2310#	  2314	  2328	  2328#	  2332	  2341#	  2369	  2369#	  2373
	  2387	  2387#	  2391	  2405	  2405#	  2409	  2423	  2423#	  2427	  2441	  2441#	  2445	  2459	  2459#
	  2463	  2477	  2477#	  2481	  2495	  2495#	  2499	  2513	  2513#	  2517	  2554	  2554#	  2558	  2572
	  2572#	  2576	  2590	  2590#	  2594	  2608	  2608#	  2612	  2626	  2626#	  2630	  2644	  2644#	  2648
	  2662	  2662#	  2666	  2680	  2680#	  2684	  2698	  2698#	  2702	  2712#	  2739	  2739#	  2742	  2756
	  2756#	  2759	  2773	  2773#	  2776	  2790	  2790#	  2793	  2807	  2807#	  2810	  2824	  2824#	  2827
	  2841	  2841#	  2844	  2858	  2858#	  2861	  3358#	  3382	  3382#	  3384	  3397	  3397#	  3399	  3412
	  3412#	  3414	  3427	  3427#	  3429	  3442	  3442#	  3444	  3457	  3457#	  3459	  3472	  3472#	  3474
	  3487	  3487#	  3489	  3502	  3502#	  3504	  3517	  3517#	  3519	  3532	  3532#	  3534	  3547	  3547#
	  3549	  3562	  3562#	  3564	  3577	  3577#	  3579	  3592	  3592#	  3594	  3607	  3607#	  3609	  3622
	  3622#	  3624	  3633#	  3658	  3658#	  3660	  3660#	  3661	  3674	  3674#	  3676	  3677	  3690	  3690#
	  3692	  3693	  3706	  3706#	  3708	  3709	  3722	  3722#	  3724	  3725	  3738	  3738#	  3740	  3741
	  3754	  3754#	  3756	  3757	  3770	  3770#	  3772	  3773	  3786	  3786#	  3788	  3789	  3802	  3802#
	  3804	  3805	  3818	  3818#	  3820	  3821	  3834	  3834#	  3836	  3837	  3850	  3850#	  3852	  3853
	  3866	  3866#	  3868	  3869	  3882	  3882#	  3884	  3885	  3898	  3898#	  3900	  3901	  3914	  3914#
	  3916	  3917	  3930	  3930#	  3932	  3933	  3945#	  3970	  3970#	  3972	  3972#	  3973	  3986	  3986#
	  3988	  3989	  4002	  4002#	  4004	  4005	  4018	  4018#	  4020	  4021	  4034	  4034#	  4036	  4037
	  4050	  4050#	  4052	  4053	  4066	  4066#	  4068	  4069	  4082	  4082#	  4084	  4085	  4098	  4098#
	  4100	  4101	  4114	  4114#	  4116	  4117	  4130	  4130#	  4132	  4133	  4146	  4146#	  4148	  4149
	  4162	  4162#	  4164	  4165	  4178	  4178#	  4180	  4181	  4194	  4194#	  4196	  4197	  4210	  4210#
	  4212	  4213	  4226	  4226#	  4228	  4229	  4242	  4242#	  4244	  4245	  4254#	  4279	  4279#	  4281
	  4281#	  4282	  4295	  4295#	  4297	  4298	  4311	  4311#	  4313	  4314	  4327	  4327#	  4329	  4330
	  4343	  4343#	  4345	  4346	  4359	  4359#	  4361	  4362	  4375	  4375#	  4377	  4378	  4391	  4391#
	  4393	  4394	  4407	  4407#	  4409	  4410	  4423	  4423#	  4425	  4426	  4439	  4439#	  4441	  4442
	  4455	  4455#	  4457	  4458	  4471	  4471#	  4473	  4474	  4487	  4487#	  4489	  4490	  4503	  4503#
	  4505	  4506	  4519	  4519#	  4521	  4522	  4535	  4535#	  4537	  4538	  4551	  4551#	  4553	  4554     SEQ 0241
	  4586#	  4613	  4613#	  4616	  4631	  4631#	  4634	  4649	  4649#	  4652	  4667	  4667#	  4670	  4685
	  4685#	  4688	  4703	  4703#	  4706	  4721	  4721#	  4724	  4739	  4739#	  4742	  4757	  4757#	  4760
	  4775	  4775#	  4778	  4789#	  4816	  4816#	  4818	  4818#	  4819	  4834	  4834#	  4836	  4837	  4852
	  4852#	  4854	  4855	  4870	  4870#	  4872	  4873	  4888	  4888#	  4890	  4891	  4906	  4906#	  4908
	  4909	  4924	  4924#	  4926	  4927	  4942	  4942#	  4944	  4945	  4955#	  4981	  4981#	  4984	  4998
	  4998#	  5001	  5015	  5015#	  5018	  5032	  5032#	  5035	  5049	  5049#	  5052	  5066	  5066#	  5069
	  5083	  5083#	  5086	  5100	  5100#	  5103	  5116#	  5143	  5143#	  5147	  5161	  5161#	  5165	  5179
	  5179#	  5183	  5197	  5197#	  5201	  5215	  5215#	  5219	  5233	  5233#	  5237	  5251	  5251#	  5255
	  5269	  5269#	  5273	  5287	  5287#	  5291	  5305	  5305#	  5309	  5319#	  5345	  5345#	  5347	  5347#
	  5348	  5362	  5362#	  5364	  5365	  5379	  5379#	  5381	  5382	  5396	  5396#	  5398	  5399	  5413
	  5413#	  5415	  5416	  5430	  5430#	  5432	  5433	  5447	  5447#	  5449	  5450	  5464	  5464#	  5466
	  5467	  5476#	  5502	  5502#	  5505	  5519	  5519#	  5522	  5536	  5536#	  5539	  5553	  5553#	  5556
	  5570	  5570#	  5573	  5587	  5587#	  5590	  5604	  5604#	  5607	  5621	  5621#	  5624	  5637#	  5665
	  5665#	  5669	  5684	  5684#	  5688	  5703	  5703#	  5707	  5722	  5722#	  5726	  5741	  5741#	  5745
	  5760	  5760#	  5764	  5779	  5779#	  5783	  5798	  5798#	  5802	  5817	  5817#	  5821	  5836	  5836#
	  5840	  5851#	  5878	  5878#	  5880	  5880#	  5881	  5896	  5896#	  5898	  5899	  5914	  5914#	  5916
	  5917	  5932	  5932#	  5934	  5935	  5950	  5950#	  5952	  5953	  5968	  5968#	  5970	  5971	  5986
	  5986#	  5988	  5989	  6004	  6004#	  6006	  6007	  6017#	  6043	  6043#	  6046	  6060	  6060#	  6063
	  6077	  6077#	  6080	  6094	  6094#	  6097	  6111	  6111#	  6114	  6128	  6128#	  6131	  6145	  6145#
	  6148	  6162	  6162#	  6165	  6189#	  6217	  6217#	  6221	  6236	  6236#	  6240	  6255	  6255#	  6259
	  6274	  6274#	  6278	  6293	  6293#	  6297	  6312	  6312#	  6316	  6331	  6331#	  6335	  6350	  6350#
	  6354	  6369	  6369#	  6373	  6388	  6388#	  6392	  6403#	  6431	  6431#	  6433	  6433#	  6434	  6450
	  6450#	  6452	  6453	  6469	  6469#	  6471	  6472	  6488	  6488#	  6490	  6491	  6507	  6507#	  6509
	  6510	  6526	  6526#	  6528	  6529	  6545	  6545#	  6547	  6548	  6564	  6564#	  6566	  6567	  6579#
	  6606	  6606#	  6609	  6624	  6624#	  6627	  6642	  6642#	  6645	  6660	  6660#	  6663	  6678	  6678#
	  6681	  6696	  6696#	  6699	  6714	  6714#	  6717	  6732	  6732#	  6735
YY	  1050#	  1075	  1075#	  1076	  1076#	  1078	  1091	  1091#	  1092	  1094	  1107	  1107#	  1108	  1110
	  1123	  1123#	  1124	  1126	  1139	  1139#	  1140	  1142	  1155	  1155#	  1156	  1158	  1171	  1171#
	  1172	  1174	  1187	  1187#	  1188	  1190	  1203	  1203#	  1204	  1206	  1219	  1219#	  1220	  1222
	  1235	  1235#	  1236	  1238	  1251	  1251#	  1252	  1254	  1267	  1267#	  1268	  1270	  1283	  1283#
	  1284	  1286	  1299	  1299#	  1300	  1302	  1315	  1315#	  1316	  1318	  1331	  1331#	  1332	  1334
	  1347	  1347#	  1348	  1350	  1358#	  1383	  1383#	  1384	  1384#	  1386	  1399	  1399#	  1400	  1402
	  1415	  1415#	  1416	  1418	  1431	  1431#	  1432	  1434	  1447	  1447#	  1448	  1450	  1463	  1463#
	  1464	  1466	  1479	  1479#	  1480	  1482	  1495	  1495#	  1496	  1498	  1511	  1511#	  1512	  1514
	  1527	  1527#	  1528	  1530	  1543	  1543#	  1544	  1546	  1559	  1559#	  1560	  1562	  1575	  1575#
	  1576	  1578	  1591	  1591#	  1592	  1594	  1607	  1607#	  1608	  1610	  1623	  1623#	  1624	  1626
	  1639	  1639#	  1640	  1642	  1654#	  1678	  1678#	  1680	  1693	  1693#	  1695	  1708	  1708#	  1710
	  1723	  1723#	  1725	  1738	  1738#	  1740	  1753	  1753#	  1755	  1768	  1768#	  1770	  1783	  1783#
	  1785	  1798	  1798#	  1800	  1808#	  1833	  1833#	  1834	  1834#	  1836	  1849	  1849#	  1850	  1852
	  1865	  1865#	  1866	  1868	  1881	  1881#	  1882	  1884	  1897	  1897#	  1898	  1900	  1913	  1913#
	  1914	  1916	  1929	  1929#	  1930	  1932	  1945	  1945#	  1946	  1948	  1961	  1961#	  1962	  1964
	  1977	  1977#	  1978	  1980	  1993	  1993#	  1994	  1996	  2009	  2009#	  2010	  2012	  2025	  2025#
	  2026	  2028	  2041	  2041#	  2042	  2044	  2057	  2057#	  2058	  2060	  2073	  2073#	  2074	  2076
	  2089	  2089#	  2090	  2092	  2105	  2105#	  2106	  2108	  2175#	  2203	  2203#	  2205	  2205#	  2207
	  2221	  2221#	  2223	  2225	  2239	  2239#	  2241	  2243	  2257	  2257#	  2259	  2261	  2275	  2275#
	  2277	  2279	  2293	  2293#	  2295	  2297	  2311	  2311#	  2313	  2315	  2329	  2329#	  2331	  2333
	  2342#	  2370	  2370#	  2372	  2372#	  2374	  2388	  2388#	  2390	  2392	  2406	  2406#	  2408	  2410
	  2424	  2424#	  2426	  2428	  2442	  2442#	  2444	  2446	  2460	  2460#	  2462	  2464	  2478	  2478#
	  2480	  2482	  2496	  2496#	  2498	  2500	  2514	  2514#	  2516	  2518	  2555	  2555#	  2559	  2573
	  2573#	  2577	  2591	  2591#	  2595	  2609	  2609#	  2613	  2627	  2627#	  2631	  2645	  2645#	  2649
	  2663	  2663#	  2667	  2681	  2681#	  2685	  2699	  2699#	  2703	  3359#	  3383	  3383#	  3385	  3398
	  3398#	  3400	  3413	  3413#	  3415	  3428	  3428#	  3430	  3443	  3443#	  3445	  3458	  3458#	  3460
	  3473	  3473#	  3475	  3488	  3488#	  3490	  3503	  3503#	  3505	  3518	  3518#	  3520	  3533	  3533#    SEQ 0242
	  3535	  3548	  3548#	  3550	  3563	  3563#	  3565	  3578	  3578#	  3580	  3593	  3593#	  3595	  3608
	  3608#	  3610	  3623	  3623#	  3625	  3634#	  3659	  3659#	  3662	  3675	  3675#	  3678	  3691	  3691#
	  3694	  3707	  3707#	  3710	  3723	  3723#	  3726	  3739	  3739#	  3742	  3755	  3755#	  3758	  3771
	  3771#	  3774	  3787	  3787#	  3790	  3803	  3803#	  3806	  3819	  3819#	  3822	  3835	  3835#	  3838
	  3851	  3851#	  3854	  3867	  3867#	  3870	  3883	  3883#	  3886	  3899	  3899#	  3902	  3915	  3915#
	  3918	  3931	  3931#	  3934	  3946#	  3971	  3971#	  3974	  3987	  3987#	  3990	  4003	  4003#	  4006
	  4019	  4019#	  4022	  4035	  4035#	  4038	  4051	  4051#	  4054	  4067	  4067#	  4070	  4083	  4083#
	  4086	  4099	  4099#	  4102	  4115	  4115#	  4118	  4131	  4131#	  4134	  4147	  4147#	  4150	  4163
	  4163#	  4166	  4179	  4179#	  4182	  4195	  4195#	  4198	  4211	  4211#	  4214	  4227	  4227#	  4230
	  4243	  4243#	  4246	  4255#	  4280	  4280#	  4283	  4296	  4296#	  4299	  4312	  4312#	  4315	  4328
	  4328#	  4331	  4344	  4344#	  4347	  4360	  4360#	  4363	  4376	  4376#	  4379	  4392	  4392#	  4395
	  4408	  4408#	  4411	  4424	  4424#	  4427	  4440	  4440#	  4443	  4456	  4456#	  4459	  4472	  4472#
	  4475	  4488	  4488#	  4491	  4504	  4504#	  4507	  4520	  4520#	  4523	  4536	  4536#	  4539	  4552
	  4552#	  4555	  4587#	  4614	  4614#	  4615	  4615#	  4619	  4632	  4632#	  4633	  4637	  4650	  4650#
	  4651	  4655	  4668	  4668#	  4669	  4673	  4686	  4686#	  4687	  4691	  4704	  4704#	  4705	  4709
	  4722	  4722#	  4723	  4727	  4740	  4740#	  4741	  4745	  4758	  4758#	  4759	  4763	  4776	  4776#
	  4777	  4781	  4790#	  4817	  4817#	  4822	  4835	  4835#	  4840	  4853	  4853#	  4858	  4871	  4871#
	  4876	  4889	  4889#	  4894	  4907	  4907#	  4912	  4925	  4925#	  4930	  4943	  4943#	  4948	  4956#
	  4982	  4982#	  4983	  4983#	  4986	  4999	  4999#	  5000	  5003	  5016	  5016#	  5017	  5020	  5033
	  5033#	  5034	  5037	  5050	  5050#	  5051	  5054	  5067	  5067#	  5068	  5071	  5084	  5084#	  5085
	  5088	  5101	  5101#	  5102	  5105	  5117#	  5144	  5144#	  5145	  5145#	  5149	  5162	  5162#	  5163
	  5167	  5180	  5180#	  5181	  5185	  5198	  5198#	  5199	  5203	  5216	  5216#	  5217	  5221	  5234
	  5234#	  5235	  5239	  5252	  5252#	  5253	  5257	  5270	  5270#	  5271	  5275	  5288	  5288#	  5289
	  5293	  5306	  5306#	  5307	  5311	  5320#	  5346	  5346#	  5350	  5363	  5363#	  5367	  5380	  5380#
	  5384	  5397	  5397#	  5401	  5414	  5414#	  5418	  5431	  5431#	  5435	  5448	  5448#	  5452	  5465
	  5465#	  5469	  5477#	  5503	  5503#	  5504	  5504#	  5506	  5520	  5520#	  5521	  5523	  5537	  5537#
	  5538	  5540	  5554	  5554#	  5555	  5557	  5571	  5571#	  5572	  5574	  5588	  5588#	  5589	  5591
	  5605	  5605#	  5606	  5608	  5622	  5622#	  5623	  5625	  5638#	  5666	  5666#	  5667	  5667#	  5671
	  5685	  5685#	  5686	  5690	  5704	  5704#	  5705	  5709	  5723	  5723#	  5724	  5728	  5742	  5742#
	  5743	  5747	  5761	  5761#	  5762	  5766	  5780	  5780#	  5781	  5785	  5799	  5799#	  5800	  5804
	  5818	  5818#	  5819	  5823	  5837	  5837#	  5838	  5842	  5852#	  5879	  5879#	  5883	  5897	  5897#
	  5901	  5915	  5915#	  5919	  5933	  5933#	  5937	  5951	  5951#	  5955	  5969	  5969#	  5973	  5987
	  5987#	  5991	  6005	  6005#	  6009	  6018#	  6044	  6044#	  6045	  6045#	  6047	  6061	  6061#	  6062
	  6064	  6078	  6078#	  6079	  6081	  6095	  6095#	  6096	  6098	  6112	  6112#	  6113	  6115	  6129
	  6129#	  6130	  6132	  6146	  6146#	  6147	  6149	  6163	  6163#	  6164	  6166	  6190#	  6218	  6218#
	  6219	  6219#	  6223	  6237	  6237#	  6238	  6242	  6256	  6256#	  6257	  6261	  6275	  6275#	  6276
	  6280	  6294	  6294#	  6295	  6299	  6313	  6313#	  6314	  6318	  6332	  6332#	  6333	  6337	  6351
	  6351#	  6352	  6356	  6370	  6370#	  6371	  6375	  6389	  6389#	  6390	  6394	  6404#	  6432	  6432#
	  6437	  6451	  6451#	  6456	  6470	  6470#	  6475	  6489	  6489#	  6494	  6508	  6508#	  6513	  6527
	  6527#	  6532	  6546	  6546#	  6551	  6565	  6565#	  6570	  6580#	  6607	  6607#	  6608	  6608#	  6611
	  6625	  6625#	  6626	  6629	  6643	  6643#	  6644	  6647	  6661	  6661#	  6662	  6665	  6679	  6679#
	  6680	  6683	  6697	  6697#	  6698	  6701	  6715	  6715#	  6716	  6719	  6733	  6733#	  6734	  6737
ZZ	  2119#	  2145	  2145#	  2146	  2146#	  2149	  2162	  2162#	  2163	  2166	  2176#	  2204	  2204#	  2208
	  2222	  2222#	  2226	  2240	  2240#	  2244	  2258	  2258#	  2262	  2276	  2276#	  2280	  2294	  2294#
	  2298	  2312	  2312#	  2316	  2330	  2330#	  2334	  2343#	  2371	  2371#	  2375	  2389	  2389#	  2393
	  2407	  2407#	  2411	  2425	  2425#	  2429	  2443	  2443#	  2447	  2461	  2461#	  2465	  2479	  2479#
	  2483	  2497	  2497#	  2501	  2515	  2515#	  2519	  2528#	  2556	  2556#	  2557	  2557#	  2560	  2574
	  2574#	  2575	  2578	  2592	  2592#	  2593	  2596	  2610	  2610#	  2611	  2614	  2628	  2628#	  2629
	  2632	  2646	  2646#	  2647	  2650	  2664	  2664#	  2665	  2668	  2682	  2682#	  2683	  2686	  2700
	  2700#	  2701	  2704	  2713#	  2740	  2740#	  2743	  2757	  2757#	  2760	  2774	  2774#	  2777	  2791
	  2791#	  2794	  2808	  2808#	  2811	  2825	  2825#	  2828	  2842	  2842#	  2845	  2859	  2859#	  2862
$$MUUO	   947#
$$OUTE	   953#                                                                                                            SEQ 0243
$$TAX1	   965#
$$TAX2	   966#
$$TOGG	   959#
$$UUO	   936#
$ACC0	   774#
$ACF	  8918#
$BEND1	   744#
$BEND2	   745#	  8960
$CHRIN	   835#
$CRLF	   837#
$DEVCH	   661#
$DSKUP	   714#
$DVCH1	   661#
$DVOFF	   831#
$EMODE	   712#
$ENDFX	   981#	   982
$FFF	   839#
$IBUF	   887#
$INEXT	   889#
$INNM	   888#
$ITRHL	   755#
$ITRX1	   756#
$LPAPE	  8981
$MMAP	   715#
$MODVL	   710#
$MODVU	   711#
$OBUF	   878#
$ONETM	   738#
$OUTEX	   880#
$OUTNM	   879#
$PAPER	   661
$PARER	   762#
$PNAME	   708#
$PSHER	   766#
$PVER	   709#
$RSRTX	   758#
$RSRTY	   759#
$SPAG1	   778#
$START	   675#
$SVAPR	   776#
$SVPAG	   777#
$SVPI	   775#
$SVUPC	   781#	  8821	  8825	  8855
$SVUUO	   780#	  8834	  8866	  8894
$TABF	   838#
$TTCHR	   834#
$TWCNT	   830#
$TYPNB	   836#
$UMODE	   713#
$UORTX	   753#
$USRHL	   757#
$UUOER	   754#	   795
$VTF	   840#                                                                                                            SEQ 0244
%AC1F	  8919#
%ACS1A	  8836#	  8836	  8880
%ACTFL	   787#
%ACTUL	   788#
%ALF	  8924#
%AR1F	  8923#
%ARF	  8922#
%COREC	   786#
%CORFL	   785#
%DISCR	   789#
%E1F	  8921#
%EEF	  8925#
%EF	  8920#
%ER4X	  8900	  8905#
%ER5X	  8898	  8907#
%ER6X	  8896	  8909#
%ER7X	  8902#	  8906	  8908	  8910
%ERAC0	  8810#	  8810	  8837	  8871	  8962
%ERAC1	  8818#	  8818	  8838	  8950
%ERAC2	  8819#	  8819	  8949
%ERFST	  8844#	  8844	  8846
%ERHI1	   928#
%ERHI2	   929#
%ERHI3	   930#
%ERMOR	  8876	  8903	  8932#
%ERMS1	  8841#	  8975
%ERMS2	  8864#
%ERMS3	  8882	  8889#
%ERRS1	  8833	  8936#	  8974
%ERRS2	  8949#
%ERRS4	  8840	  8972#
%ERRS5	  8953	  8957	  8962#
%FF	  8926#
%FLTTB	  8884	  8915#
%NODES	  8916#
%SV17	  6974#	  6974	  6984	  6989	  6991	  7314	  7333	  7338	  7340	  7922	  7935	  7940	  7942	  8336
	  8341	  8343
.JB41	   661#
.JBAPR	   661#
.JBCNI	   661#
.JBDDT	   661#
.JBFF	   661#
.JBOPC	   661#
.JBREL	   661#
.JBREN	   661#
.JBSA	   661#
.JBSYM	   661#
.JBTPC	   661#
.JBUSY	   661#
.JBUUO	   661#
.JBVER	   661#

CFLUSH	   617#
CINVAL	   616#                                                                                                            SEQ 0245
CLOKOP	   611#
CWRTBI	   618#
DMVE	    96#	  6828	  6849	  6870	  6891	  6912	  6933
DMVE17	   118#	  6965
DMVM	   258#	  7751	  7776	  7801	  7826	  7851	  7876
DMVM17	   310#	  7912
DMVN	   146#	  7107	  7138	  7169	  7200	  7231	  7262	  7457	  7488	  7519
DMVN17	   176#	  7304
DMVNF	   214#	  7559	  7604	  7649	  7694
DMVNM	   283#	  8131	  8159	  8187	  8215	  8243	  8271	  8501	  8529	  8557
DMVNM1	   342#	  8310
DMVNMF	   377#	  8586	  8632	  8678	  8724
DROPDV	   578#	   985
ENDUUO	   624#	   743
EOPUUO	   625#	   745
ER1	    30#
ER10	    37#
ER11	    38#
ER12	    39#
ER13	    40#	  3283	  3297	  3313	  3326	  3343	  7556	  7583	  7588	  7595	  7599	  7628	  7633	  7640
	  7644	  7673	  7678	  7685	  7689	  7718	  7723	  7730	  7734	  8116	  8611	  8616	  8623	  8627
	  8657	  8662	  8669	  8673	  8703	  8708	  8715	  8719	  8749	  8754	  8761	  8765	  8800
ER2	    31#
ER3	    32#	  1044	  1081	  1097	  1113	  1129	  1145	  1161	  1177	  1193	  1209	  1225	  1241	  1257
	  1273	  1289	  1305	  1321	  1337	  1353	  1389	  1405	  1421	  1437	  1453	  1469	  1485	  1501
	  1517	  1533	  1549	  1565	  1581	  1597	  1613	  1629	  1645	  1683	  1698	  1713	  1728	  1743
	  1758	  1773	  1788	  1803	  1839	  1855	  1871	  1887	  1903	  1919	  1935	  1951	  1967	  1983
	  1999	  2015	  2031	  2047	  2063	  2079	  2095	  2111	  2152	  2169	  2211	  2229	  2247	  2265
	  2283	  2301	  2319	  2337	  2378	  2396	  2414	  2432	  2450	  2468	  2486	  2504	  2522	  2563
	  2581	  2599	  2617	  2635	  2653	  2671	  2689	  2707	  2747	  2764	  2781	  2798	  2815	  2832
	  2849	  2866	  2879	  2896	  2911	  2926	  2941	  2954	  2969	  2982	  2996	  3009	  3023	  3036
	  3050	  3066	  3092	  3108	  3124	  3141	  3155	  3171	  3185	  3200	  3214	  3229	  3243	  3258
	  3270	  3294	  3309	  3323	  3339	  3388	  3403	  3418	  3433	  3448	  3463	  3478	  3493	  3508
	  3523	  3538	  3553	  3568	  3583	  3598	  3613	  3628	  3665	  3681	  3697	  3713	  3729	  3745
	  3761	  3777	  3793	  3809	  3825	  3841	  3857	  3873	  3889	  3905	  3921	  3937	  3977	  3993
	  4009	  4025	  4041	  4057	  4073	  4089	  4105	  4121	  4137	  4153	  4169	  4185	  4201	  4217
	  4233	  4249	  4286	  4302	  4318	  4334	  4350	  4366	  4382	  4398	  4414	  4430	  4446	  4462
	  4478	  4494	  4510	  4526	  4542	  4558	  4569	  4582	  4622	  4640	  4658	  4676	  4694	  4712
	  4730	  4748	  4766	  4784	  4825	  4843	  4861	  4879	  4897	  4915	  4933	  4951	  4989	  5006
	  5023	  5040	  5057	  5074	  5091	  5108	  5152	  5170	  5188	  5206	  5224	  5242	  5260	  5278
	  5296	  5314	  5353	  5370	  5387	  5404	  5421	  5438	  5455	  5472	  5510	  5527	  5544	  5561
	  5578	  5595	  5612	  5629	  5675	  5694	  5713	  5732	  5751	  5770	  5789	  5808	  5827	  5846
	  5887	  5905	  5923	  5941	  5959	  5977	  5995	  6013	  6051	  6068	  6085	  6102	  6119	  6136
	  6153	  6170	  6185	  6227	  6246	  6265	  6284	  6303	  6322	  6341	  6360	  6379	  6398	  6441
	  6460	  6479	  6498	  6517	  6536	  6555	  6574	  6615	  6633	  6651	  6669	  6687	  6705	  6723
	  6741	  6759	  6774	  6787	  6801	  6813	  6844	  6865	  6886	  6907	  6928	  6949	  6985	  7033
	  7047	  7061	  7075	  7089	  7133	  7164	  7195	  7226	  7257	  7288	  7334	  7386	  7402	  7418
	  7434	  7450	  7483	  7514	  7545	  7746	  8126
ER4	    33#	  6846	  6867	  6888	  6909	  6930	  6951	  6990	  7035	  7049	  7063	  7077	  7091	  7135
	  7166	  7197	  7228	  7259	  7290	  7339	  7388	  7404	  7420	  7436	  7452	  7485	  7516	  7547
	  7748	  8128
ER5	    34#	  1025	  3075	  3352	  6823	  7102	  7771	  7796	  7821	  7846	  7871	  7896	  7936	  7990
	  8009	  8028	  8047	  8066	  8111	  8154	  8182	  8210	  8238	  8266	  8294	  8337	  8399	  8422     SEQ 0246
	  8445	  8468	  8491	  8524	  8552	  8580	  8795
ER6	    35#	  6825	  7104	  7773	  7798	  7823	  7848	  7873	  7898	  7941	  7995	  8014	  8033	  8052
	  8071	  8113	  8156	  8184	  8212	  8240	  8268	  8296	  8342	  8401	  8424	  8447	  8470	  8493
	  8526	  8554	  8582	  8797
ER7	    36#
ERRHLT	   513#	  8943
FATAL	   512#
FRD36	   653#
FRD8	   654#
FREAD	   652#
FSELEC	   651#
GET	   496#
GO	   493#	  8051
HALT	   498#	   764
JEN	   500#
JRSTF	   499#	  8107	  8791
MAPADR	   634#
MAPCNK	   635#
MAPMEM	   631#
MAPPNT	   637#
MAPSET	   636#
MEMSEG	   633#
MEMZRO	   632#
MODPCP	   644#
MODPCU	   643#
MTROP	   612#
NAME	     7#	    10
PBELL	   587#	  8947
PCRL	   581#	  8883	  8902
PCRL2	   585#
PCRL2F	   586#
PCRLF	   582#
PFORCE	   589#
PGMINT	   506#	  1004
PJRST	   497#
PMSG	   591#	  8849	  8853	  8864	  8889
PMSGF	   594#
PNT1	   547#
PNT11	   561#
PNT11F	   562#
PNT1F	   548#
PNT2	   549#
PNT2F	   550#
PNT3	   551#	  8901
PNT3F	   552#
PNT4	   553#	  8905
PNT4F	   554#
PNT5	   555#	  8907
PNT5F	   556#
PNT6	   557#	  8857	  8909
PNT6F	   558#
PNT7	   559#
PNT7F	   560#                                                                                                            SEQ 0247
PNTA	   533#	  8892
PNTADF	   564#
PNTADR	   563#
PNTAF	   534#
PNTAL	   535#	  8885
PNTALF	   536#
PNTCHF	   546#
PNTCHR	   545#
PNTCI	   543#
PNTCIF	   544#
PNTCW	   579#
PNTCWF	   580#
PNTDCF	   572#
PNTDEC	   571#	  8852
PNTDS	   573#
PNTDSF	   574#
PNTHW	   567#	  8872
PNTHWF	   568#
PNTMGN	   658#	  8933
PNTMSF	   540#
PNTMSG	   539#
PNTNM	   575#	  8845
PNTOCF	   570#
PNTOCS	   569#
PNTOCT	   565#
PNTOTF	   566#
PNTSIX	   576#
PNTSXF	   577#
PSIXL	   537#
PSIXLF	   538#
PSIXM	   541#	  8850	  8854	  8865	  8890
PSIXMF	   542#
PSP	   583#
PSPF	   584#
PUT	   495#
RTN	   494#	   751	  8081	  8085
S	   424#	   426	   430	   459	   461	   470	   473	   488	   489	   491	   502	   504	   508	   510
	   515	   519	   661	   666	   672	   699	   701	   719	   721	   739	   741	   770	   772	   790
	   792	   810	   812	   820	   822	   843	   848	   874	   876	   883	   885	   891	   893	   899
	   901	   905	   907	   912	   914	   918	   920	   924	   926	   932	   934	   937	   939	   943
	   945	   949	   951	   955	   957	   961	   963	   968	   973	   977	   979
SAVEAC	    68#	  1014	  1032	  3056	  6959	  6999	  7298	  7348	  7906	  7950	  8097	  8304	  8351	  8780
SIXBTZ	   600#
SWITCH	   606#	  8831	  8934
TTALTM	   528#	  8936
TTICHR	   521#
TTICNV	   526#
TTIDEC	   525#
TTINO	   523#
TTIOCT	   524#
TTIYES	   522#
TTLOOK	   527#
TTSIXB	   529#                                                                                                            SEQ 0248
TTYINP	   530#
PROGRAM	   SWITCHES        MASK           INSTR      CNTLPC  UPRPC                                                         SEQ 0249
DBKCC	000000 000000  700000 000000  100000 000000  000000  777777 

*030627  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030627 030627 030627 122200000002 777777777777 233525252525     233525252525 254000030622 0            0   0   777 
IT1	*      *      000002 *            122200000002 *                000000000000 *            0            0   0   *   
MEMST	*      *      *      *            *            000000000002     0            *            0            0   0   *   
FT6	030630 030630 030630 312100036735 777777777777 233525252525     0            *            0            0   0   *   
ET0	*      *      *      *            *            *                0            *            0            0   0   033 
ET1	*      *      *      *            *            *                0            *            0            033 0   000 
ET2	*      *      *      *            *            *                0            *            0            000 0   010 
FIXT1	*      *      *      *            *            000525252525     0            *            0            0   0   000 
ST1	*      *      *      *            *            *                000525252525 *            0            0   0   777 

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =233525 252525 
FINAL
C(AC)=000525 252525 
----------

*030640  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030640 030640 030640 122200000002 777777777777 0                416060000000 000000030626 0            0   0   777 
IT1	*      *      000002 *            122200000002 0                000525252525 *            0            0   0   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   0   *   
FT6	030641 030641 030641 302200000000 777777777777 000000000000     *            *            0            0   0   *   
ET0	*      *      *      *            *            0                *            *            0            0   0   600 
ET1	*      *      *      *            *            0                *            *            0            600 0   545 
ET2	*      *      *      *            *            0                *            *            0            545 545 243 
ST1	*      *      *      *            *            0                000000000000 *            0            *   *   777 

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000525 252525 C(E) =000000 000000 
FINAL
C(AC)=000000 000000 
----------

*030646  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030646 030646 030646 122200000002 777777777777 000000000001     000000000001 000000030637 0            545 545 777 
IT1	*      *      000002 *            122200000002 *                000000000000 *            0            *   *   *   
MEMST	*      *      *      *            *            000000000002     0            *            0            *   *   *   
FT6	030647 030647 030647 312200000003 777777777777 201400000000     0            *            0            *   *   *   
ET0	*      *      *      *            *            *                0            *            0            *   *   001 
ET1	*      *      *      *            *            *                0            *            0            001 *   746 
ET2	*      *      *      *            *            *                0            *            0            746 746 042 
SCT1	*      *      *      *            000400000000 000400000000     0            *            0            *   *   777 
SCT2	*      *      *      *            *            *                0            *            0            763 *   *   
SCT2	*      *      *      *            000100000000 000100000000     0            *            0            764 *   *   
SCT2	*      *      *      *            000020000000 000020000000     0            *            0            765 *   *   
SCT2	*      *      *      *            000004000000 000004000000     0            *            0            766 *   *   
SCT2	*      *      *      *            000001000000 000001000000     0            *            0            767 *   *   
SCT2	*      *      *      *            000000200000 000000200000     0            *            0            770 *   *   
SCT2	*      *      *      *            000000040000 000000040000     0            *            0            771 *   *   
SCT2	*      *      *      *            000000010000 000000010000     0            *            0            772 *   *   SEQ 0250
SCT2	*      *      *      *            000000002000 000000002000     0            *            0            773 *   *   
SCT2	*      *      *      *            000000000400 000000000400     0            *            0            774 *   *   
SCT2	*      *      *      *            000000000100 000000000100     0            *            0            775 *   *   
SCT2	*      *      *      *            000000000020 000000000020     0            *            0            776 *   *   
SCT2	*      *      *      *            000000000004 000000000004     0            *            0            777 *   *   
FIXT2	*      *      *      *            000000000002 000000000001     0            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                000000000001 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =201400 000000 
FINAL
C(AC)=000000 000001 
----------

*030654  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030654 030654 030654 122200000002 777777777777 000000000002     000000000002 000000030644 0            0   746 777 
IT1	*      *      000002 *            122200000002 *                000000000001 *            0            0   *   *   
MEMST	*      *      *      *            *            *                *            *            0            0   *   *   
FT6	030655 030655 030655 312200000003 777777777777 202400000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   002 
ET1	*      *      *      *            *            *                *            *            0            002 *   747 
ET2	*      *      *      *            *            *                *            *            0            747 747 041 
SCT1	*      *      *      *            000400000000 000400000000     *            *            0            *   *   777 
SCT2	*      *      *      *            000200000000 000200000000     *            *            0            764 *   *   
SCT2	*      *      *      *            000040000000 000040000000     *            *            0            765 *   *   
SCT2	*      *      *      *            000010000000 000010000000     *            *            0            766 *   *   
SCT2	*      *      *      *            000002000000 000002000000     *            *            0            767 *   *   
SCT2	*      *      *      *            000000400000 000000400000     *            *            0            770 *   *   
SCT2	*      *      *      *            000000100000 000000100000     *            *            0            771 *   *   
SCT2	*      *      *      *            000000020000 000000020000     *            *            0            772 *   *   
SCT2	*      *      *      *            000000004000 000000004000     *            *            0            773 *   *   
SCT2	*      *      *      *            000000001000 000000001000     *            *            0            774 *   *   
SCT2	*      *      *      *            000000000200 000000000200     *            *            0            775 *   *   
SCT2	*      *      *      *            000000000040 000000000040     *            *            0            776 *   *   
SCT2	*      *      *      *            000000000010 000000000010     *            *            0            777 *   *   
FIXT2	*      *      *      *            000000000003 000000000002     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                000000000002 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000001 C(E) =202400 000000 
FINAL
C(AC)=000000 000002 
----------

*030662  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030662 030662 030662 122200000002 777777777777 000000000004     000000000004 000000030652 0            0   747 777 
IT1	*      *      000002 *            122200000002 *                000000000002 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	030663 030663 030663 312200000003 777777777777 203400000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   003 
ET1	*      *      *      *            *            *                *            *            0            003 *   750 
ET2	*      *      *      *            *            *                *            *            0            750 750 040 
SCT1	*      *      *      *            000400000000 000400000000     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            764 *   *   SEQ 0251
SCT2	*      *      *      *            000100000000 000100000000     *            *            0            765 *   *   
SCT2	*      *      *      *            000020000000 000020000000     *            *            0            766 *   *   
SCT2	*      *      *      *            000004000000 000004000000     *            *            0            767 *   *   
SCT2	*      *      *      *            000001000000 000001000000     *            *            0            770 *   *   
SCT2	*      *      *      *            000000200000 000000200000     *            *            0            771 *   *   
SCT2	*      *      *      *            000000040000 000000040000     *            *            0            772 *   *   
SCT2	*      *      *      *            000000010000 000000010000     *            *            0            773 *   *   
SCT2	*      *      *      *            000000002000 000000002000     *            *            0            774 *   *   
SCT2	*      *      *      *            000000000400 000000000400     *            *            0            775 *   *   
SCT2	*      *      *      *            000000000100 000000000100     *            *            0            776 *   *   
SCT2	*      *      *      *            000000000020 000000000020     *            *            0            777 *   *   
FIXT2	*      *      *      *            000000000005 000000000004     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                000000000004 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000002 C(E) =203400 000000 
FINAL
C(AC)=000000 000004 
----------

*030670  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030670 030670 030670 122200000002 777777777777 000000000010     000000000010 000000030660 0            0   750 777 
IT1	*      *      000002 *            122200000002 *                000000000004 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	030671 030671 030671 312200000003 777777777777 204400000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   004 
ET1	*      *      *      *            *            *                *            *            0            004 *   751 
ET2	*      *      *      *            *            *                *            *            0            751 751 037 
SCT1	*      *      *      *            000400000000 000400000000     *            *            0            *   *   777 
SCT2	*      *      *      *            000200000000 000200000000     *            *            0            765 *   *   
SCT2	*      *      *      *            000040000000 000040000000     *            *            0            766 *   *   
SCT2	*      *      *      *            000010000000 000010000000     *            *            0            767 *   *   
SCT2	*      *      *      *            000002000000 000002000000     *            *            0            770 *   *   
SCT2	*      *      *      *            000000400000 000000400000     *            *            0            771 *   *   
SCT2	*      *      *      *            000000100000 000000100000     *            *            0            772 *   *   
SCT2	*      *      *      *            000000020000 000000020000     *            *            0            773 *   *   
SCT2	*      *      *      *            000000004000 000000004000     *            *            0            774 *   *   
SCT2	*      *      *      *            000000001000 000000001000     *            *            0            775 *   *   
SCT2	*      *      *      *            000000000200 000000000200     *            *            0            776 *   *   
SCT2	*      *      *      *            000000000040 000000000040     *            *            0            777 *   *   
FIXT2	*      *      *      *            000000000011 000000000010     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                000000000010 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000004 C(E) =204400 000000 
FINAL
C(AC)=000000 000010 
----------

*030676  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030676 030676 030676 122200000002 777777777777 000000000020     000000000020 000000030666 0            0   751 777 
IT1	*      *      000002 *            122200000002 *                000000000010 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	030677 030677 030677 312200000003 777777777777 205400000000     *            *            0            0   *   *   SEQ 0252
ET0	*      *      *      *            *            *                *            *            0            0   *   005 
ET1	*      *      *      *            *            *                *            *            0            005 *   752 
ET2	*      *      *      *            *            *                *            *            0            752 752 036 
SCT1	*      *      *      *            000400000000 000400000000     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            765 *   *   
SCT2	*      *      *      *            000100000000 000100000000     *            *            0            766 *   *   
SCT2	*      *      *      *            000020000000 000020000000     *            *            0            767 *   *   
SCT2	*      *      *      *            000004000000 000004000000     *            *            0            770 *   *   
SCT2	*      *      *      *            000001000000 000001000000     *            *            0            771 *   *   
SCT2	*      *      *      *            000000200000 000000200000     *            *            0            772 *   *   
SCT2	*      *      *      *            000000040000 000000040000     *            *            0            773 *   *   
SCT2	*      *      *      *            000000010000 000000010000     *            *            0            774 *   *   
SCT2	*      *      *      *            000000002000 000000002000     *            *            0            775 *   *   
SCT2	*      *      *      *            000000000400 000000000400     *            *            0            776 *   *   
SCT2	*      *      *      *            000000000100 000000000100     *            *            0            777 *   *   
FIXT2	*      *      *      *            000000000021 000000000020     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                000000000020 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000010 C(E) =205400 000000 
FINAL
C(AC)=000000 000020 
----------

*030704  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030704 030704 030704 122200000002 777777777777 000000000040     000000000040 000000030674 0            0   752 777 
IT1	*      *      000002 *            122200000002 *                000000000020 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	030705 030705 030705 312200000003 777777777777 206400000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   006 
ET1	*      *      *      *            *            *                *            *            0            006 *   753 
ET2	*      *      *      *            *            *                *            *            0            753 753 035 
SCT1	*      *      *      *            000400000000 000400000000     *            *            0            *   *   777 
SCT2	*      *      *      *            000200000000 000200000000     *            *            0            766 *   *   
SCT2	*      *      *      *            000040000000 000040000000     *            *            0            767 *   *   
SCT2	*      *      *      *            000010000000 000010000000     *            *            0            770 *   *   
SCT2	*      *      *      *            000002000000 000002000000     *            *            0            771 *   *   
SCT2	*      *      *      *            000000400000 000000400000     *            *            0            772 *   *   
SCT2	*      *      *      *            000000100000 000000100000     *            *            0            773 *   *   
SCT2	*      *      *      *            000000020000 000000020000     *            *            0            774 *   *   
SCT2	*      *      *      *            000000004000 000000004000     *            *            0            775 *   *   
SCT2	*      *      *      *            000000001000 000000001000     *            *            0            776 *   *   
SCT2	*      *      *      *            000000000200 000000000200     *            *            0            777 *   *   
FIXT2	*      *      *      *            000000000041 000000000040     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                000000000040 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000020 C(E) =206400 000000 
FINAL
C(AC)=000000 000040 
----------

*030712  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030712 030712 030712 122200000002 777777777777 000000000100     000000000100 000000030702 0            0   753 77  SEQ 0253
IT1	*      *      000002 *            122200000002 *                000000000040 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	030713 030713 030713 312200000003 777777777777 207400000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   007 
ET1	*      *      *      *            *            *                *            *            0            007 *   754 
ET2	*      *      *      *            *            *                *            *            0            754 754 034 
SCT1	*      *      *      *            000400000000 000400000000     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            766 *   *   
SCT2	*      *      *      *            000100000000 000100000000     *            *            0            767 *   *   
SCT2	*      *      *      *            000020000000 000020000000     *            *            0            770 *   *   
SCT2	*      *      *      *            000004000000 000004000000     *            *            0            771 *   *   
SCT2	*      *      *      *            000001000000 000001000000     *            *            0            772 *   *   
SCT2	*      *      *      *            000000200000 000000200000     *            *            0            773 *   *   
SCT2	*      *      *      *            000000040000 000000040000     *            *            0            774 *   *   
SCT2	*      *      *      *            000000010000 000000010000     *            *            0            775 *   *   
SCT2	*      *      *      *            000000002000 000000002000     *            *            0            776 *   *   
SCT2	*      *      *      *            000000000400 000000000400     *            *            0            777 *   *   
FIXT2	*      *      *      *            000000000101 000000000100     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                000000000100 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000040 C(E) =207400 000000 
FINAL
C(AC)=000000 000100 
----------

*030720  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030720 030720 030720 122200000002 777777777777 000000000200     000000000200 000000030710 0            0   754 777 
IT1	*      *      000002 *            122200000002 *                000000000100 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	030721 030721 030721 312200000003 777777777777 210400000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   010 
ET1	*      *      *      *            *            *                *            *            0            010 *   755 
ET2	*      *      *      *            *            *                *            *            0            755 755 033 
SCT1	*      *      *      *            000400000000 000400000000     *            *            0            *   *   777 
SCT2	*      *      *      *            000200000000 000200000000     *            *            0            767 *   *   
SCT2	*      *      *      *            000040000000 000040000000     *            *            0            770 *   *   
SCT2	*      *      *      *            000010000000 000010000000     *            *            0            771 *   *   
SCT2	*      *      *      *            000002000000 000002000000     *            *            0            772 *   *   
SCT2	*      *      *      *            000000400000 000000400000     *            *            0            773 *   *   
SCT2	*      *      *      *            000000100000 000000100000     *            *            0            774 *   *   
SCT2	*      *      *      *            000000020000 000000020000     *            *            0            775 *   *   
SCT2	*      *      *      *            000000004000 000000004000     *            *            0            776 *   *   
SCT2	*      *      *      *            000000001000 000000001000     *            *            0            777 *   *   
FIXT2	*      *      *      *            000000000201 000000000200     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                000000000200 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000100 C(E) =210400 000000 
FINAL
C(AC)=000000 000200 
----------

*030726  FIX	4,000002
STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA  SEQ 0254
IT0	030726 030726 030726 122200000002 777777777777 000000000400     000000000400 000000030716 0            0   755 777 
IT1	*      *      000002 *            122200000002 *                000000000200 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	030727 030727 030727 312200000003 777777777777 211400000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   011 
ET1	*      *      *      *            *            *                *            *            0            011 *   756 
ET2	*      *      *      *            *            *                *            *            0            756 756 032 
SCT1	*      *      *      *            000400000000 000400000000     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            767 *   *   
SCT2	*      *      *      *            000100000000 000100000000     *            *            0            770 *   *   
SCT2	*      *      *      *            000020000000 000020000000     *            *            0            771 *   *   
SCT2	*      *      *      *            000004000000 000004000000     *            *            0            772 *   *   
SCT2	*      *      *      *            000001000000 000001000000     *            *            0            773 *   *   
SCT2	*      *      *      *            000000200000 000000200000     *            *            0            774 *   *   
SCT2	*      *      *      *            000000040000 000000040000     *            *            0            775 *   *   
SCT2	*      *      *      *            000000010000 000000010000     *            *            0            776 *   *   
SCT2	*      *      *      *            000000002000 000000002000     *            *            0            777 *   *   
FIXT2	*      *      *      *            000000000401 000000000400     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                000000000400 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000200 C(E) =211400 000000 
FINAL
C(AC)=000000 000400 
----------

*030734  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030734 030734 030734 122200000002 777777777777 000000001000     000000001000 000000030724 0            0   756 777 
IT1	*      *      000002 *            122200000002 *                000000000400 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	030735 030735 030735 312200000003 777777777777 212400000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   012 
ET1	*      *      *      *            *            *                *            *            0            012 *   757 
ET2	*      *      *      *            *            *                *            *            0            757 757 031 
SCT1	*      *      *      *            000400000000 000400000000     *            *            0            *   *   777 
SCT2	*      *      *      *            000200000000 000200000000     *            *            0            770 *   *   
SCT2	*      *      *      *            000040000000 000040000000     *            *            0            771 *   *   
SCT2	*      *      *      *            000010000000 000010000000     *            *            0            772 *   *   
SCT2	*      *      *      *            000002000000 000002000000     *            *            0            773 *   *   
SCT2	*      *      *      *            000000400000 000000400000     *            *            0            774 *   *   
SCT2	*      *      *      *            000000100000 000000100000     *            *            0            775 *   *   
SCT2	*      *      *      *            000000020000 000000020000     *            *            0            776 *   *   
SCT2	*      *      *      *            000000004000 000000004000     *            *            0            777 *   *   
FIXT2	*      *      *      *            000000001001 000000001000     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                000000001000 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000400 C(E) =212400 000000 
FINAL
C(AC)=000000 001000 
----------

*030742  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030742 030742 030742 122200000002 777777777777 000000002000     000000002000 000000030732 0            0   757 77  SEQ 0255
IT1	*      *      000002 *            122200000002 *                000000001000 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	030743 030743 030743 312200000003 777777777777 213400000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   013 
ET1	*      *      *      *            *            *                *            *            0            013 *   760 
ET2	*      *      *      *            *            *                *            *            0            760 760 030 
SCT1	*      *      *      *            000400000000 000400000000     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            770 *   *   
SCT2	*      *      *      *            000100000000 000100000000     *            *            0            771 *   *   
SCT2	*      *      *      *            000020000000 000020000000     *            *            0            772 *   *   
SCT2	*      *      *      *            000004000000 000004000000     *            *            0            773 *   *   
SCT2	*      *      *      *            000001000000 000001000000     *            *            0            774 *   *   
SCT2	*      *      *      *            000000200000 000000200000     *            *            0            775 *   *   
SCT2	*      *      *      *            000000040000 000000040000     *            *            0            776 *   *   
SCT2	*      *      *      *            000000010000 000000010000     *            *            0            777 *   *   
FIXT2	*      *      *      *            000000002001 000000002000     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                000000002000 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 001000 C(E) =213400 000000 
FINAL
C(AC)=000000 002000 
----------

*030750  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030750 030750 030750 122200000002 777777777777 000000004000     000000004000 000000030740 0            0   760 777 
IT1	*      *      000002 *            122200000002 *                000000002000 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	030751 030751 030751 312200000003 777777777777 214400000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   014 
ET1	*      *      *      *            *            *                *            *            0            014 *   761 
ET2	*      *      *      *            *            *                *            *            0            761 761 027 
SCT1	*      *      *      *            000400000000 000400000000     *            *            0            *   *   777 
SCT2	*      *      *      *            000200000000 000200000000     *            *            0            771 *   *   
SCT2	*      *      *      *            000040000000 000040000000     *            *            0            772 *   *   
SCT2	*      *      *      *            000010000000 000010000000     *            *            0            773 *   *   
SCT2	*      *      *      *            000002000000 000002000000     *            *            0            774 *   *   
SCT2	*      *      *      *            000000400000 000000400000     *            *            0            775 *   *   
SCT2	*      *      *      *            000000100000 000000100000     *            *            0            776 *   *   
SCT2	*      *      *      *            000000020000 000000020000     *            *            0            777 *   *   
FIXT2	*      *      *      *            000000004001 000000004000     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                000000004000 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 002000 C(E) =214400 000000 
FINAL
C(AC)=000000 004000 
----------

*030756  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030756 030756 030756 122200000002 777777777777 000000010000     000000010000 000000030746 0            0   761 777 
IT1	*      *      000002 *            122200000002 *                000000004000 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	030757 030757 030757 312200000003 777777777777 215400000000     *            *            0            0   *   *   SEQ 0256
ET0	*      *      *      *            *            *                *            *            0            0   *   015 
ET1	*      *      *      *            *            *                *            *            0            015 *   762 
ET2	*      *      *      *            *            *                *            *            0            762 762 026 
SCT1	*      *      *      *            000400000000 000400000000     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            771 *   *   
SCT2	*      *      *      *            000100000000 000100000000     *            *            0            772 *   *   
SCT2	*      *      *      *            000020000000 000020000000     *            *            0            773 *   *   
SCT2	*      *      *      *            000004000000 000004000000     *            *            0            774 *   *   
SCT2	*      *      *      *            000001000000 000001000000     *            *            0            775 *   *   
SCT2	*      *      *      *            000000200000 000000200000     *            *            0            776 *   *   
SCT2	*      *      *      *            000000040000 000000040000     *            *            0            777 *   *   
FIXT2	*      *      *      *            000000010001 000000010000     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                000000010000 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 004000 C(E) =215400 000000 
FINAL
C(AC)=000000 010000 
----------

*030764  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030764 030764 030764 122200000002 777777777777 000000020000     000000020000 000000030754 0            0   762 777 
IT1	*      *      000002 *            122200000002 *                000000010000 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	030765 030765 030765 312200000003 777777777777 216400000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   016 
ET1	*      *      *      *            *            *                *            *            0            016 *   763 
ET2	*      *      *      *            *            *                *            *            0            763 763 025 
SCT1	*      *      *      *            000400000000 000400000000     *            *            0            *   *   777 
SCT2	*      *      *      *            000200000000 000200000000     *            *            0            772 *   *   
SCT2	*      *      *      *            000040000000 000040000000     *            *            0            773 *   *   
SCT2	*      *      *      *            000010000000 000010000000     *            *            0            774 *   *   
SCT2	*      *      *      *            000002000000 000002000000     *            *            0            775 *   *   
SCT2	*      *      *      *            000000400000 000000400000     *            *            0            776 *   *   
SCT2	*      *      *      *            000000100000 000000100000     *            *            0            777 *   *   
FIXT2	*      *      *      *            000000020001 000000020000     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                000000020000 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 010000 C(E) =216400 000000 
FINAL
C(AC)=000000 020000 
----------

*030772  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	030772 030772 030772 122200000002 777777777777 000000040000     000000040000 000000030762 0            0   763 777 
IT1	*      *      000002 *            122200000002 *                000000020000 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	030773 030773 030773 312200000003 777777777777 217400000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   017 
ET1	*      *      *      *            *            *                *            *            0            017 *   764 
ET2	*      *      *      *            *            *                *            *            0            764 764 024 
SCT1	*      *      *      *            000400000000 000400000000     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            772 *   *   SEQ 0257
SCT2	*      *      *      *            000100000000 000100000000     *            *            0            773 *   *   
SCT2	*      *      *      *            000020000000 000020000000     *            *            0            774 *   *   
SCT2	*      *      *      *            000004000000 000004000000     *            *            0            775 *   *   
SCT2	*      *      *      *            000001000000 000001000000     *            *            0            776 *   *   
SCT2	*      *      *      *            000000200000 000000200000     *            *            0            777 *   *   
FIXT2	*      *      *      *            000000040001 000000040000     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                000000040000 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 020000 C(E) =217400 000000 
FINAL
C(AC)=000000 040000 
----------

*031000  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031000 031000 031000 122200000002 777777777777 000000100000     000000100000 000000030770 0            0   764 777 
IT1	*      *      000002 *            122200000002 *                000000040000 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031001 031001 031001 312200000003 777777777777 220400000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   020 
ET1	*      *      *      *            *            *                *            *            0            020 *   765 
ET2	*      *      *      *            *            *                *            *            0            765 765 023 
SCT1	*      *      *      *            000400000000 000400000000     *            *            0            *   *   777 
SCT2	*      *      *      *            000200000000 000200000000     *            *            0            773 *   *   
SCT2	*      *      *      *            000040000000 000040000000     *            *            0            774 *   *   
SCT2	*      *      *      *            000010000000 000010000000     *            *            0            775 *   *   
SCT2	*      *      *      *            000002000000 000002000000     *            *            0            776 *   *   
SCT2	*      *      *      *            000000400000 000000400000     *            *            0            777 *   *   
FIXT2	*      *      *      *            000000100001 000000100000     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                000000100000 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 040000 C(E) =220400 000000 
FINAL
C(AC)=000000 100000 
----------

*031006  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031006 031006 031006 122200000002 777777777777 000000200000     000000200000 000000030776 0            0   765 777 
IT1	*      *      000002 *            122200000002 *                000000100000 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031007 031007 031007 312200000003 777777777777 221400000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   021 
ET1	*      *      *      *            *            *                *            *            0            021 *   766 
ET2	*      *      *      *            *            *                *            *            0            766 766 022 
SCT1	*      *      *      *            000400000000 000400000000     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            773 *   *   
SCT2	*      *      *      *            000100000000 000100000000     *            *            0            774 *   *   
SCT2	*      *      *      *            000020000000 000020000000     *            *            0            775 *   *   
SCT2	*      *      *      *            000004000000 000004000000     *            *            0            776 *   *   
SCT2	*      *      *      *            000001000000 000001000000     *            *            0            777 *   *   
FIXT2	*      *      *      *            000000200001 000000200000     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                000000200000 *            0            0   *   *   
                                                                                                                           SEQ 0258
FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 100000 C(E) =221400 000000 
FINAL
C(AC)=000000 200000 
----------

*031014  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031014 031014 031014 122200000002 777777777777 000000400000     000000400000 000000031004 0            0   766 777 
IT1	*      *      000002 *            122200000002 *                000000200000 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031015 031015 031015 312200000003 777777777777 222400000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   022 
ET1	*      *      *      *            *            *                *            *            0            022 *   767 
ET2	*      *      *      *            *            *                *            *            0            767 767 021 
SCT1	*      *      *      *            000400000000 000400000000     *            *            0            *   *   777 
SCT2	*      *      *      *            000200000000 000200000000     *            *            0            774 *   *   
SCT2	*      *      *      *            000040000000 000040000000     *            *            0            775 *   *   
SCT2	*      *      *      *            000010000000 000010000000     *            *            0            776 *   *   
SCT2	*      *      *      *            000002000000 000002000000     *            *            0            777 *   *   
FIXT2	*      *      *      *            000000400001 000000400000     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                000000400000 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 200000 C(E) =222400 000000 
FINAL
C(AC)=000000 400000 
----------

*031022  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031022 031022 031022 122200000002 777777777777 000001000000     000001000000 000000031012 0            0   767 777 
IT1	*      *      000002 *            122200000002 *                000000400000 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031023 031023 031023 312200000003 777777777777 223400000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   023 
ET1	*      *      *      *            *            *                *            *            0            023 *   770 
ET2	*      *      *      *            *            *                *            *            0            770 770 020 
SCT1	*      *      *      *            000400000000 000400000000     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            774 *   *   
SCT2	*      *      *      *            000100000000 000100000000     *            *            0            775 *   *   
SCT2	*      *      *      *            000020000000 000020000000     *            *            0            776 *   *   
SCT2	*      *      *      *            000004000000 000004000000     *            *            0            777 *   *   
FIXT2	*      *      *      *            000001000001 000001000000     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                000001000000 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 400000 C(E) =223400 000000 
FINAL
C(AC)=000001 000000 
----------

*031030  FIX	4,000002
STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA  SEQ 0259
IT0	031030 031030 031030 122200000002 777777777777 000002000000     000002000000 000000031020 0            0   770 777 
IT1	*      *      000002 *            122200000002 *                000001000000 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031031 031031 031031 312200000003 777777777777 224400000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   024 
ET1	*      *      *      *            *            *                *            *            0            024 *   771 
ET2	*      *      *      *            *            *                *            *            0            771 771 017 
SCT1	*      *      *      *            000400000000 000400000000     *            *            0            *   *   777 
SCT2	*      *      *      *            000200000000 000200000000     *            *            0            775 *   *   
SCT2	*      *      *      *            000040000000 000040000000     *            *            0            776 *   *   
SCT2	*      *      *      *            000010000000 000010000000     *            *            0            777 *   *   
FIXT2	*      *      *      *            000002000001 000002000000     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                000002000000 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000001 000000 C(E) =224400 000000 
FINAL
C(AC)=000002 000000 
----------

*031036  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031036 031036 031036 122200000002 777777777777 000004000000     000004000000 000000031026 0            0   771 777 
IT1	*      *      000002 *            122200000002 *                000002000000 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031037 031037 031037 312200000003 777777777777 225400000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   025 
ET1	*      *      *      *            *            *                *            *            0            025 *   772 
ET2	*      *      *      *            *            *                *            *            0            772 772 016 
SCT1	*      *      *      *            000400000000 000400000000     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            775 *   *   
SCT2	*      *      *      *            000100000000 000100000000     *            *            0            776 *   *   
SCT2	*      *      *      *            000020000000 000020000000     *            *            0            777 *   *   
FIXT2	*      *      *      *            000004000001 000004000000     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                000004000000 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000002 000000 C(E) =225400 000000 
FINAL
C(AC)=000004 000000 
----------

*031044  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031044 031044 031044 122200000002 777777777777 000010000000     000010000000 000000031034 0            0   772 777 
IT1	*      *      000002 *            122200000002 *                000004000000 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031045 031045 031045 312200000003 777777777777 226400000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   026 
ET1	*      *      *      *            *            *                *            *            0            026 *   773 
ET2	*      *      *      *            *            *                *            *            0            773 773 015 
SCT1	*      *      *      *            000400000000 000400000000     *            *            0            *   *   777 
SCT2	*      *      *      *            000200000000 000200000000     *            *            0            776 *   *   
SCT2	*      *      *      *            000040000000 000040000000     *            *            0            777 *   *   
FIXT2	*      *      *      *            000010000001 000010000000     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                000010000000 *            0            0   *   *   SEQ 0260

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000004 000000 C(E) =226400 000000 
FINAL
C(AC)=000010 000000 
----------

*031052  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031052 031052 031052 122200000002 777777777777 000020000000     000020000000 000000031042 0            0   773 777 
IT1	*      *      000002 *            122200000002 *                000010000000 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031053 031053 031053 312200000003 777777777777 227400000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   027 
ET1	*      *      *      *            *            *                *            *            0            027 *   774 
ET2	*      *      *      *            *            *                *            *            0            774 774 014 
SCT1	*      *      *      *            000400000000 000400000000     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            776 *   *   
SCT2	*      *      *      *            000100000000 000100000000     *            *            0            777 *   *   
FIXT2	*      *      *      *            000020000001 000020000000     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                000020000000 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000010 000000 C(E) =227400 000000 
FINAL
C(AC)=000020 000000 
----------

*031060  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031060 031060 031060 122200000002 777777777777 000040000000     000040000000 000000031050 0            0   774 777 
IT1	*      *      000002 *            122200000002 *                000020000000 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031061 031061 031061 312200000003 777777777777 230400000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   030 
ET1	*      *      *      *            *            *                *            *            0            030 *   775 
ET2	*      *      *      *            *            *                *            *            0            775 775 013 
SCT1	*      *      *      *            000400000000 000400000000     *            *            0            *   *   777 
SCT2	*      *      *      *            000200000000 000200000000     *            *            0            777 *   *   
FIXT2	*      *      *      *            000040000001 000040000000     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                000040000000 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000020 000000 C(E) =230400 000000 
FINAL
C(AC)=000040 000000 
----------

*031066  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031066 031066 031066 122200000002 777777777777 000100000000     000100000000 000000031056 0            0   775 777 
IT1	*      *      000002 *            122200000002 *                000040000000 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031067 031067 031067 312200000003 777777777777 231400000000     *            *            0            0   *   *   SEQ 0261
ET0	*      *      *      *            *            *                *            *            0            0   *   031 
ET1	*      *      *      *            *            *                *            *            0            031 *   776 
ET2	*      *      *      *            *            *                *            *            0            776 776 012 
SCT1	*      *      *      *            000400000000 000400000000     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            777 *   *   
FIXT2	*      *      *      *            000100000001 000100000000     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                000100000000 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000040 000000 C(E) =231400 000000 
FINAL
C(AC)=000100 000000 
----------

*031074  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031074 031074 031074 122200000002 777777777777 000200000000     000200000000 000000031064 0            0   776 777 
IT1	*      *      000002 *            122200000002 *                000100000000 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031075 031075 031075 312200000003 777777777777 232400000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   032 
ET1	*      *      *      *            *            *                *            *            0            032 *   777 
ET2	*      *      *      *            *            *                *            *            0            777 777 011 
SCT1	*      *      *      *            000400000000 000400000000     *            *            0            *   *   777 
FIXT2	*      *      *      *            000200000001 000200000000     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                000200000000 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000100 000000 C(E) =232400 000000 
FINAL
C(AC)=000200 000000 
----------

*031102  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031102 031102 031102 122200000002 777777777777 000400000000     000400000000 000000031072 0            0   777 777 
IT1	*      *      000002 *            122200000002 *                000200000000 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031103 031103 031103 312200000003 777777777777 233400000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   033 
ET1	*      *      *      *            *            *                *            *            0            033 *   000 
ET2	*      *      *      *            *            *                *            *            0            000 000 010 
FIXT1	*      *      *      *            *            000400000000     *            *            0            0   0   000 
ST1	*      *      *      *            *            *                000400000000 *            0            0   0   777 

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000200 000000 C(E) =233400 000000 
FINAL
C(AC)=000400 000000 
----------

*031110  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031110 031110 031110 122200000002 777777777777 001000000000     001000000000 000000031100 0            0   0   77  SEQ 0262
IT1	*      *      000002 *            122200000002 *                000400000000 *            0            0   0   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   0   *   
FT6	031111 031111 031111 312200000003 777777777777 234400000000     *            *            0            0   0   *   
ET0	*      *      *      *            *            *                *            *            0            0   0   034 
ET1	*      *      *      *            *            *                *            *            0            034 0   001 
ET2	*      *      *      *            *            *                *            *            0            001 001 007 
FIXT1	*      *      *      *            *            000400000000     *            *            0            *   *   777 
SCT2	*      *      *      *            000400000000 *                *            *            0            777 *   *   
FIXT2	*      *      *      *            001000000001 001000000000     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                001000000000 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000400 000000 C(E) =234400 000000 
FINAL
C(AC)=001000 000000 
----------

*031116  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031116 031116 031116 122200000002 777777777777 002000000000     002000000000 000000031106 0            0   001 777 
IT1	*      *      000002 *            122200000002 *                001000000000 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031117 031117 031117 312200000003 777777777777 235400000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   035 
ET1	*      *      *      *            *            *                *            *            0            035 *   002 
ET2	*      *      *      *            *            *                *            *            0            002 002 006 
FIXT1	*      *      *      *            *            000400000000     *            *            0            *   *   776 
SCT2	*      *      *      *            000400000000 *                *            *            0            776 *   777 
SCT2	*      *      *      *            001000000000 001000000000     *            *            0            777 *   *   
FIXT2	*      *      *      *            002000000001 002000000000     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                002000000000 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=001000 000000 C(E) =235400 000000 
FINAL
C(AC)=002000 000000 
----------

*031124  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031124 031124 031124 122200000002 777777777777 004000000000     004000000000 000000031114 0            0   002 777 
IT1	*      *      000002 *            122200000002 *                002000000000 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031125 031125 031125 312200000003 777777777777 236400000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   036 
ET1	*      *      *      *            *            *                *            *            0            036 *   003 
ET2	*      *      *      *            *            *                *            *            0            003 003 005 
FIXT1	*      *      *      *            *            000400000000     *            *            0            *   *   775 
SCT2	*      *      *      *            000400000000 *                *            *            0            775 *   777 
SCT2	*      *      *      *            001000000000 001000000000     *            *            0            776 *   *   
SCT2	*      *      *      *            002000000000 002000000000     *            *            0            777 *   *   
FIXT2	*      *      *      *            004000000001 004000000000     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                004000000000 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL                                                                                                                    SEQ 0263
C(AC)=002000 000000 C(E) =236400 000000 
FINAL
C(AC)=004000 000000 
----------

*031132  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031132 031132 031132 122200000002 777777777777 010000000000     010000000000 000000031122 0            0   003 777 
IT1	*      *      000002 *            122200000002 *                004000000000 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031133 031133 031133 312200000003 777777777777 237400000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   037 
ET1	*      *      *      *            *            *                *            *            0            037 *   004 
ET2	*      *      *      *            *            *                *            *            0            004 004 *   
FIXT1	*      *      *      *            *            000400000000     *            *            0            *   *   774 
SCT2	*      *      *      *            000400000000 *                *            *            0            774 *   777 
SCT2	*      *      *      *            001000000000 001000000000     *            *            0            775 *   *   
SCT2	*      *      *      *            002000000000 002000000000     *            *            0            776 *   *   
SCT2	*      *      *      *            004000000000 004000000000     *            *            0            777 *   *   
FIXT2	*      *      *      *            010000000001 010000000000     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                010000000000 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=004000 000000 C(E) =237400 000000 
FINAL
C(AC)=010000 000000 
----------

*031140  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031140 031140 031140 122200000002 777777777777 020000000000     020000000000 000000031130 0            0   004 777 
IT1	*      *      000002 *            122200000002 *                010000000000 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031141 031141 031141 312200000003 777777777777 240400000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   040 
ET1	*      *      *      *            *            *                *            *            0            040 *   005 
ET2	*      *      *      *            *            *                *            *            0            005 005 003 
FIXT1	*      *      *      *            *            000400000000     *            *            0            *   *   773 
SCT2	*      *      *      *            000400000000 *                *            *            0            773 *   777 
SCT2	*      *      *      *            001000000000 001000000000     *            *            0            774 *   *   
SCT2	*      *      *      *            002000000000 002000000000     *            *            0            775 *   *   
SCT2	*      *      *      *            004000000000 004000000000     *            *            0            776 *   *   
SCT2	*      *      *      *            010000000000 010000000000     *            *            0            777 *   *   
FIXT2	*      *      *      *            020000000001 020000000000     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                020000000000 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=010000 000000 C(E) =240400 000000 
FINAL
C(AC)=020000 000000 
----------

*031146  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031146 031146 031146 122200000002 777777777777 040000000000     040000000000 000000031136 0            0   005 77  SEQ 0264
IT1	*      *      000002 *            122200000002 *                020000000000 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031147 031147 031147 312200000003 777777777777 241400000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   041 
ET1	*      *      *      *            *            *                *            *            0            041 *   006 
ET2	*      *      *      *            *            *                *            *            0            006 006 002 
FIXT1	*      *      *      *            *            000400000000     *            *            0            *   *   772 
SCT2	*      *      *      *            000400000000 *                *            *            0            772 *   777 
SCT2	*      *      *      *            001000000000 001000000000     *            *            0            773 *   *   
SCT2	*      *      *      *            002000000000 002000000000     *            *            0            774 *   *   
SCT2	*      *      *      *            004000000000 004000000000     *            *            0            775 *   *   
SCT2	*      *      *      *            010000000000 010000000000     *            *            0            776 *   *   
SCT2	*      *      *      *            020000000000 020000000000     *            *            0            777 *   *   
FIXT2	*      *      *      *            040000000001 040000000000     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                040000000000 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=020000 000000 C(E) =241400 000000 
FINAL
C(AC)=040000 000000 
----------

*031154  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031154 031154 031154 122200000002 777777777777 100000000000     100000000000 000000031144 0            0   006 777 
IT1	*      *      000002 *            122200000002 *                040000000000 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031155 031155 031155 312200000003 777777777777 242400000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   042 
ET1	*      *      *      *            *            *                *            *            0            042 *   007 
ET2	*      *      *      *            *            *                *            *            0            007 007 001 
FIXT1	*      *      *      *            *            000400000000     *            *            0            *   *   771 
SCT2	*      *      *      *            000400000000 *                *            *            0            771 *   777 
SCT2	*      *      *      *            001000000000 001000000000     *            *            0            772 *   *   
SCT2	*      *      *      *            002000000000 002000000000     *            *            0            773 *   *   
SCT2	*      *      *      *            004000000000 004000000000     *            *            0            774 *   *   
SCT2	*      *      *      *            010000000000 010000000000     *            *            0            775 *   *   
SCT2	*      *      *      *            020000000000 020000000000     *            *            0            776 *   *   
SCT2	*      *      *      *            040000000000 040000000000     *            *            0            777 *   *   
FIXT2	*      *      *      *            100000000001 100000000000     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                100000000000 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=040000 000000 C(E) =242400 000000 
FINAL
C(AC)=100000 000000 
----------

*031162  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031162 031162 031162 122200000002 777777777777 200000000000     200000000000 000000031152 0            0   007 777 
IT1	*      *      000002 *            122200000002 *                100000000000 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031163 031163 031163 312200000003 777777777777 243400000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   043 
ET1	*      *      *      *            *            *                *            *            0            043 *   01  SEQ 0265
ET2	*      *      *      *            *            *                *            *            0            010 010 000 
FIXT1	*      *      *      *            *            000400000000     *            *            0            *   *   770 
SCT2	*      *      *      *            000400000000 *                *            *            0            770 *   777 
SCT2	*      *      *      *            001000000000 001000000000     *            *            0            771 *   *   
SCT2	*      *      *      *            002000000000 002000000000     *            *            0            772 *   *   
SCT2	*      *      *      *            004000000000 004000000000     *            *            0            773 *   *   
SCT2	*      *      *      *            010000000000 010000000000     *            *            0            774 *   *   
SCT2	*      *      *      *            020000000000 020000000000     *            *            0            775 *   *   
SCT2	*      *      *      *            040000000000 040000000000     *            *            0            776 *   *   
SCT2	*      *      *      *            100000000000 100000000000     *            *            0            777 *   *   
FIXT2	*      *      *      *            200000000001 200000000000     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                200000000000 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=100000 000000 C(E) =243400 000000 
FINAL
C(AC)=200000 000000 
----------

*031170  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031170 031170 031170 122200000002 777777777777 201400000000     201400000000 000400000000 0            0   010 777 
IT1	*      *      000002 *            122200000002 *                200000000000 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031171 031171 031171 302200000001 777777777777 201400000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   001 
ET1	*      *      *      *            *            *                *            *            0            001 *   746 
ET2	*      *      *      *            *            *                *            *            0            746 746 042 
SCT1	*      *      *      *            000400000000 000400000000     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            763 *   *   
SCT2	*      *      *      *            000100000000 000100000000     *            *            0            764 *   *   
SCT2	*      *      *      *            000020000000 000020000000     *            *            0            765 *   *   
SCT2	*      *      *      *            000004000000 000004000000     *            *            0            766 *   *   
SCT2	*      *      *      *            000001000000 000001000000     *            *            0            767 *   *   
SCT2	*      *      *      *            000000200000 000000200000     *            *            0            770 *   *   
SCT2	*      *      *      *            000000040000 000000040000     *            *            0            771 *   *   
SCT2	*      *      *      *            000000010000 000000010000     *            *            0            772 *   *   
SCT2	*      *      *      *            000000002000 000000002000     *            *            0            773 *   *   
SCT2	*      *      *      *            000000000400 000000000400     *            *            0            774 *   *   
SCT2	*      *      *      *            000000000100 000000000100     *            *            0            775 *   *   
SCT2	*      *      *      *            000000000020 000000000020     *            *            0            776 *   *   
SCT2	*      *      *      *            000000000004 000000000004     *            *            0            777 *   *   
FIXT2	*      *      *      *            000000000002 000000000001     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                000000000001 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=200000 000000 C(E) =201400 000000 
FINAL
C(AC)=000000 000001 
----------

*031176  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031176 031176 031176 122200000002 777777777777 202200000000     202200000000 000200000000 0            0   746 777 
IT1	*      *      000002 *            122200000002 *                000000000001 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   SEQ 0266
FT6	031177 031177 031177 302200000001 777777777777 202200000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   002 
ET1	*      *      *      *            *            *                *            *            0            002 *   747 
ET2	*      *      *      *            *            *                *            *            0            747 747 041 
SCT1	*      *      *      *            000200000000 000200000000     *            *            0            *   *   777 
SCT2	*      *      *      *            000100000000 000100000000     *            *            0            764 *   *   
SCT2	*      *      *      *            000020000000 000020000000     *            *            0            765 *   *   
SCT2	*      *      *      *            000004000000 000004000000     *            *            0            766 *   *   
SCT2	*      *      *      *            000001000000 000001000000     *            *            0            767 *   *   
SCT2	*      *      *      *            000000200000 000000200000     *            *            0            770 *   *   
SCT2	*      *      *      *            000000040000 000000040000     *            *            0            771 *   *   
SCT2	*      *      *      *            000000010000 000000010000     *            *            0            772 *   *   
SCT2	*      *      *      *            000000002000 000000002000     *            *            0            773 *   *   
SCT2	*      *      *      *            000000000400 000000000400     *            *            0            774 *   *   
SCT2	*      *      *      *            000000000100 000000000100     *            *            0            775 *   *   
SCT2	*      *      *      *            000000000020 000000000020     *            *            0            776 *   *   
SCT2	*      *      *      *            000000000004 000000000004     *            *            0            777 *   *   
FIXT2	*      *      *      *            000000000002 000000000001     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000001 C(E) =202200 000000 
FINAL
C(AC)=000000 000001 
----------

*031204  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031204 031204 031204 122200000002 777777777777 203100000000     203100000000 000100000000 0            0   747 777 
IT1	*      *      000002 *            122200000002 *                000000000001 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031205 031205 031205 302200000001 777777777777 203100000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   003 
ET1	*      *      *      *            *            *                *            *            0            003 *   750 
ET2	*      *      *      *            *            *                *            *            0            750 750 040 
SCT1	*      *      *      *            000100000000 000100000000     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            764 *   *   
SCT2	*      *      *      *            000020000000 000020000000     *            *            0            765 *   *   
SCT2	*      *      *      *            000004000000 000004000000     *            *            0            766 *   *   
SCT2	*      *      *      *            000001000000 000001000000     *            *            0            767 *   *   
SCT2	*      *      *      *            000000200000 000000200000     *            *            0            770 *   *   
SCT2	*      *      *      *            000000040000 000000040000     *            *            0            771 *   *   
SCT2	*      *      *      *            000000010000 000000010000     *            *            0            772 *   *   
SCT2	*      *      *      *            000000002000 000000002000     *            *            0            773 *   *   
SCT2	*      *      *      *            000000000400 000000000400     *            *            0            774 *   *   
SCT2	*      *      *      *            000000000100 000000000100     *            *            0            775 *   *   
SCT2	*      *      *      *            000000000020 000000000020     *            *            0            776 *   *   
SCT2	*      *      *      *            000000000004 000000000004     *            *            0            777 *   *   
FIXT2	*      *      *      *            000000000002 000000000001     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000001 C(E) =203100 000000 
FINAL
C(AC)=000000 000001 
----------
                                                                                                                           SEQ 0267
*031212  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031212 031212 031212 122200000002 777777777777 204040000000     204040000000 000040000000 0            0   750 777 
IT1	*      *      000002 *            122200000002 *                000000000001 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031213 031213 031213 302200000001 777777777777 204040000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   004 
ET1	*      *      *      *            *            *                *            *            0            004 *   751 
ET2	*      *      *      *            *            *                *            *            0            751 751 037 
SCT1	*      *      *      *            000040000000 000040000000     *            *            0            *   *   777 
SCT2	*      *      *      *            000020000000 000020000000     *            *            0            765 *   *   
SCT2	*      *      *      *            000004000000 000004000000     *            *            0            766 *   *   
SCT2	*      *      *      *            000001000000 000001000000     *            *            0            767 *   *   
SCT2	*      *      *      *            000000200000 000000200000     *            *            0            770 *   *   
SCT2	*      *      *      *            000000040000 000000040000     *            *            0            771 *   *   
SCT2	*      *      *      *            000000010000 000000010000     *            *            0            772 *   *   
SCT2	*      *      *      *            000000002000 000000002000     *            *            0            773 *   *   
SCT2	*      *      *      *            000000000400 000000000400     *            *            0            774 *   *   
SCT2	*      *      *      *            000000000100 000000000100     *            *            0            775 *   *   
SCT2	*      *      *      *            000000000020 000000000020     *            *            0            776 *   *   
SCT2	*      *      *      *            000000000004 000000000004     *            *            0            777 *   *   
FIXT2	*      *      *      *            000000000002 000000000001     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000001 C(E) =204040 000000 
FINAL
C(AC)=000000 000001 
----------

*031220  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031220 031220 031220 122200000002 777777777777 205020000000     205020000000 000020000000 0            0   751 777 
IT1	*      *      000002 *            122200000002 *                000000000001 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031221 031221 031221 302200000001 777777777777 205020000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   005 
ET1	*      *      *      *            *            *                *            *            0            005 *   752 
ET2	*      *      *      *            *            *                *            *            0            752 752 036 
SCT1	*      *      *      *            000020000000 000020000000     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            765 *   *   
SCT2	*      *      *      *            000004000000 000004000000     *            *            0            766 *   *   
SCT2	*      *      *      *            000001000000 000001000000     *            *            0            767 *   *   
SCT2	*      *      *      *            000000200000 000000200000     *            *            0            770 *   *   
SCT2	*      *      *      *            000000040000 000000040000     *            *            0            771 *   *   
SCT2	*      *      *      *            000000010000 000000010000     *            *            0            772 *   *   
SCT2	*      *      *      *            000000002000 000000002000     *            *            0            773 *   *   
SCT2	*      *      *      *            000000000400 000000000400     *            *            0            774 *   *   
SCT2	*      *      *      *            000000000100 000000000100     *            *            0            775 *   *   
SCT2	*      *      *      *            000000000020 000000000020     *            *            0            776 *   *   
SCT2	*      *      *      *            000000000004 000000000004     *            *            0            777 *   *   
FIXT2	*      *      *      *            000000000002 000000000001     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000001 C(E) =205020 000000                                                                                    SEQ 0268
FINAL
C(AC)=000000 000001 
----------

*031226  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031226 031226 031226 122200000002 777777777777 206010000000     206010000000 000010000000 0            0   752 777 
IT1	*      *      000002 *            122200000002 *                000000000001 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031227 031227 031227 302200000001 777777777777 206010000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   006 
ET1	*      *      *      *            *            *                *            *            0            006 *   753 
ET2	*      *      *      *            *            *                *            *            0            753 753 035 
SCT1	*      *      *      *            000010000000 000010000000     *            *            0            *   *   777 
SCT2	*      *      *      *            000004000000 000004000000     *            *            0            766 *   *   
SCT2	*      *      *      *            000001000000 000001000000     *            *            0            767 *   *   
SCT2	*      *      *      *            000000200000 000000200000     *            *            0            770 *   *   
SCT2	*      *      *      *            000000040000 000000040000     *            *            0            771 *   *   
SCT2	*      *      *      *            000000010000 000000010000     *            *            0            772 *   *   
SCT2	*      *      *      *            000000002000 000000002000     *            *            0            773 *   *   
SCT2	*      *      *      *            000000000400 000000000400     *            *            0            774 *   *   
SCT2	*      *      *      *            000000000100 000000000100     *            *            0            775 *   *   
SCT2	*      *      *      *            000000000020 000000000020     *            *            0            776 *   *   
SCT2	*      *      *      *            000000000004 000000000004     *            *            0            777 *   *   
FIXT2	*      *      *      *            000000000002 000000000001     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000001 C(E) =206010 000000 
FINAL
C(AC)=000000 000001 
----------

*031234  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031234 031234 031234 122200000002 777777777777 207004000000     207004000000 000004000000 0            0   753 777 
IT1	*      *      000002 *            122200000002 *                000000000001 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031235 031235 031235 302200000001 777777777777 207004000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   007 
ET1	*      *      *      *            *            *                *            *            0            007 *   754 
ET2	*      *      *      *            *            *                *            *            0            754 754 034 
SCT1	*      *      *      *            000004000000 000004000000     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            766 *   *   
SCT2	*      *      *      *            000001000000 000001000000     *            *            0            767 *   *   
SCT2	*      *      *      *            000000200000 000000200000     *            *            0            770 *   *   
SCT2	*      *      *      *            000000040000 000000040000     *            *            0            771 *   *   
SCT2	*      *      *      *            000000010000 000000010000     *            *            0            772 *   *   
SCT2	*      *      *      *            000000002000 000000002000     *            *            0            773 *   *   
SCT2	*      *      *      *            000000000400 000000000400     *            *            0            774 *   *   
SCT2	*      *      *      *            000000000100 000000000100     *            *            0            775 *   *   
SCT2	*      *      *      *            000000000020 000000000020     *            *            0            776 *   *   
SCT2	*      *      *      *            000000000004 000000000004     *            *            0            777 *   *   
FIXT2	*      *      *      *            000000000002 000000000001     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   *   *   
FLAGS - INT/FINAL   000000 000000                                                                                          SEQ 0269
INITIAL
C(AC)=000000 000001 C(E) =207004 000000 
FINAL
C(AC)=000000 000001 
----------

*031242  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031242 031242 031242 122200000002 777777777777 210002000000     210002000000 000002000000 0            0   754 777 
IT1	*      *      000002 *            122200000002 *                000000000001 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031243 031243 031243 302200000001 777777777777 210002000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   010 
ET1	*      *      *      *            *            *                *            *            0            010 *   755 
ET2	*      *      *      *            *            *                *            *            0            755 755 033 
SCT1	*      *      *      *            000002000000 000002000000     *            *            0            *   *   777 
SCT2	*      *      *      *            000001000000 000001000000     *            *            0            767 *   *   
SCT2	*      *      *      *            000000200000 000000200000     *            *            0            770 *   *   
SCT2	*      *      *      *            000000040000 000000040000     *            *            0            771 *   *   
SCT2	*      *      *      *            000000010000 000000010000     *            *            0            772 *   *   
SCT2	*      *      *      *            000000002000 000000002000     *            *            0            773 *   *   
SCT2	*      *      *      *            000000000400 000000000400     *            *            0            774 *   *   
SCT2	*      *      *      *            000000000100 000000000100     *            *            0            775 *   *   
SCT2	*      *      *      *            000000000020 000000000020     *            *            0            776 *   *   
SCT2	*      *      *      *            000000000004 000000000004     *            *            0            777 *   *   
FIXT2	*      *      *      *            000000000002 000000000001     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000001 C(E) =210002 000000 
FINAL
C(AC)=000000 000001 
----------

*031250  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031250 031250 031250 122200000002 777777777777 211001000000     211001000000 000001000000 0            0   755 777 
IT1	*      *      000002 *            122200000002 *                000000000001 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031251 031251 031251 302200000001 777777777777 211001000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   011 
ET1	*      *      *      *            *            *                *            *            0            011 *   756 
ET2	*      *      *      *            *            *                *            *            0            756 756 032 
SCT1	*      *      *      *            000001000000 000001000000     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            767 *   *   
SCT2	*      *      *      *            000000200000 000000200000     *            *            0            770 *   *   
SCT2	*      *      *      *            000000040000 000000040000     *            *            0            771 *   *   
SCT2	*      *      *      *            000000010000 000000010000     *            *            0            772 *   *   
SCT2	*      *      *      *            000000002000 000000002000     *            *            0            773 *   *   
SCT2	*      *      *      *            000000000400 000000000400     *            *            0            774 *   *   
SCT2	*      *      *      *            000000000100 000000000100     *            *            0            775 *   *   
SCT2	*      *      *      *            000000000020 000000000020     *            *            0            776 *   *   
SCT2	*      *      *      *            000000000004 000000000004     *            *            0            777 *   *   
FIXT2	*      *      *      *            000000000002 000000000001     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   *   *   
FLAGS - INT/FINAL   000000 000000                                                                                          SEQ 0270
INITIAL
C(AC)=000000 000001 C(E) =211001 000000 
FINAL
C(AC)=000000 000001 
----------

*031256  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031256 031256 031256 122200000002 777777777777 212000400000     212000400000 000000031246 0            0   756 777 
IT1	*      *      000002 *            122200000002 *                000000000001 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031257 031257 031257 302200000001 777777777777 212000400000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   012 
ET1	*      *      *      *            *            *                *            *            0            012 *   757 
ET2	*      *      *      *            *            *                *            *            0            757 757 031 
SCT1	*      *      *      *            000000400000 000000400000     *            *            0            *   *   777 
SCT2	*      *      *      *            000000200000 000000200000     *            *            0            770 *   *   
SCT2	*      *      *      *            000000040000 000000040000     *            *            0            771 *   *   
SCT2	*      *      *      *            000000010000 000000010000     *            *            0            772 *   *   
SCT2	*      *      *      *            000000002000 000000002000     *            *            0            773 *   *   
SCT2	*      *      *      *            000000000400 000000000400     *            *            0            774 *   *   
SCT2	*      *      *      *            000000000100 000000000100     *            *            0            775 *   *   
SCT2	*      *      *      *            000000000020 000000000020     *            *            0            776 *   *   
SCT2	*      *      *      *            000000000004 000000000004     *            *            0            777 *   *   
FIXT2	*      *      *      *            000000000002 000000000001     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000001 C(E) =212000 400000 
FINAL
C(AC)=000000 000001 
----------

*031264  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031264 031264 031264 122200000002 777777777777 213000200000     213000200000 000000031254 0            0   757 777 
IT1	*      *      000002 *            122200000002 *                000000000001 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031265 031265 031265 302200000001 777777777777 213000200000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   013 
ET1	*      *      *      *            *            *                *            *            0            013 *   760 
ET2	*      *      *      *            *            *                *            *            0            760 760 030 
SCT1	*      *      *      *            000000200000 000000200000     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            770 *   *   
SCT2	*      *      *      *            000000040000 000000040000     *            *            0            771 *   *   
SCT2	*      *      *      *            000000010000 000000010000     *            *            0            772 *   *   
SCT2	*      *      *      *            000000002000 000000002000     *            *            0            773 *   *   
SCT2	*      *      *      *            000000000400 000000000400     *            *            0            774 *   *   
SCT2	*      *      *      *            000000000100 000000000100     *            *            0            775 *   *   
SCT2	*      *      *      *            000000000020 000000000020     *            *            0            776 *   *   
SCT2	*      *      *      *            000000000004 000000000004     *            *            0            777 *   *   
FIXT2	*      *      *      *            000000000002 000000000001     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000001 C(E) =213000 200000                                                                                    SEQ 0271
FINAL
C(AC)=000000 000001 
----------

*031272  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031272 031272 031272 122200000002 777777777777 214000100000     214000100000 000000031262 0            0   760 777 
IT1	*      *      000002 *            122200000002 *                000000000001 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031273 031273 031273 302200000001 777777777777 214000100000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   014 
ET1	*      *      *      *            *            *                *            *            0            014 *   761 
ET2	*      *      *      *            *            *                *            *            0            761 761 027 
SCT1	*      *      *      *            000000100000 000000100000     *            *            0            *   *   777 
SCT2	*      *      *      *            000000040000 000000040000     *            *            0            771 *   *   
SCT2	*      *      *      *            000000010000 000000010000     *            *            0            772 *   *   
SCT2	*      *      *      *            000000002000 000000002000     *            *            0            773 *   *   
SCT2	*      *      *      *            000000000400 000000000400     *            *            0            774 *   *   
SCT2	*      *      *      *            000000000100 000000000100     *            *            0            775 *   *   
SCT2	*      *      *      *            000000000020 000000000020     *            *            0            776 *   *   
SCT2	*      *      *      *            000000000004 000000000004     *            *            0            777 *   *   
FIXT2	*      *      *      *            000000000002 000000000001     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000001 C(E) =214000 100000 
FINAL
C(AC)=000000 000001 
----------

*031300  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031300 031300 031300 122200000002 777777777777 215000040000     215000040000 000000031270 0            0   761 777 
IT1	*      *      000002 *            122200000002 *                000000000001 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031301 031301 031301 302200000001 777777777777 215000040000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   015 
ET1	*      *      *      *            *            *                *            *            0            015 *   762 
ET2	*      *      *      *            *            *                *            *            0            762 762 026 
SCT1	*      *      *      *            000000040000 000000040000     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            771 *   *   
SCT2	*      *      *      *            000000010000 000000010000     *            *            0            772 *   *   
SCT2	*      *      *      *            000000002000 000000002000     *            *            0            773 *   *   
SCT2	*      *      *      *            000000000400 000000000400     *            *            0            774 *   *   
SCT2	*      *      *      *            000000000100 000000000100     *            *            0            775 *   *   
SCT2	*      *      *      *            000000000020 000000000020     *            *            0            776 *   *   
SCT2	*      *      *      *            000000000004 000000000004     *            *            0            777 *   *   
FIXT2	*      *      *      *            000000000002 000000000001     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000001 C(E) =215000 040000 
FINAL
C(AC)=000000 000001 
----------
                                                                                                                           SEQ 0272
*031306  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031306 031306 031306 122200000002 777777777777 216000020000     216000020000 000000031276 0            0   762 777 
IT1	*      *      000002 *            122200000002 *                000000000001 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031307 031307 031307 302200000001 777777777777 216000020000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   016 
ET1	*      *      *      *            *            *                *            *            0            016 *   763 
ET2	*      *      *      *            *            *                *            *            0            763 763 025 
SCT1	*      *      *      *            000000020000 000000020000     *            *            0            *   *   777 
SCT2	*      *      *      *            000000010000 000000010000     *            *            0            772 *   *   
SCT2	*      *      *      *            000000002000 000000002000     *            *            0            773 *   *   
SCT2	*      *      *      *            000000000400 000000000400     *            *            0            774 *   *   
SCT2	*      *      *      *            000000000100 000000000100     *            *            0            775 *   *   
SCT2	*      *      *      *            000000000020 000000000020     *            *            0            776 *   *   
SCT2	*      *      *      *            000000000004 000000000004     *            *            0            777 *   *   
FIXT2	*      *      *      *            000000000002 000000000001     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000001 C(E) =216000 020000 
FINAL
C(AC)=000000 000001 
----------

*031314  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031314 031314 031314 122200000002 777777777777 217000010000     217000010000 000000031304 0            0   763 777 
IT1	*      *      000002 *            122200000002 *                000000000001 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031315 031315 031315 302200000001 777777777777 217000010000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   017 
ET1	*      *      *      *            *            *                *            *            0            017 *   764 
ET2	*      *      *      *            *            *                *            *            0            764 764 024 
SCT1	*      *      *      *            000000010000 000000010000     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            772 *   *   
SCT2	*      *      *      *            000000002000 000000002000     *            *            0            773 *   *   
SCT2	*      *      *      *            000000000400 000000000400     *            *            0            774 *   *   
SCT2	*      *      *      *            000000000100 000000000100     *            *            0            775 *   *   
SCT2	*      *      *      *            000000000020 000000000020     *            *            0            776 *   *   
SCT2	*      *      *      *            000000000004 000000000004     *            *            0            777 *   *   
FIXT2	*      *      *      *            000000000002 000000000001     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000001 C(E) =217000 010000 
FINAL
C(AC)=000000 000001 
----------

*031322  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031322 031322 031322 122200000002 777777777777 220000004000     220000004000 000000031312 0            0   764 777 
IT1	*      *      000002 *            122200000002 *                000000000001 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   SEQ 0273
FT6	031323 031323 031323 302200000001 777777777777 220000004000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   020 
ET1	*      *      *      *            *            *                *            *            0            020 *   765 
ET2	*      *      *      *            *            *                *            *            0            765 765 023 
SCT1	*      *      *      *            000000004000 000000004000     *            *            0            *   *   777 
SCT2	*      *      *      *            000000002000 000000002000     *            *            0            773 *   *   
SCT2	*      *      *      *            000000000400 000000000400     *            *            0            774 *   *   
SCT2	*      *      *      *            000000000100 000000000100     *            *            0            775 *   *   
SCT2	*      *      *      *            000000000020 000000000020     *            *            0            776 *   *   
SCT2	*      *      *      *            000000000004 000000000004     *            *            0            777 *   *   
FIXT2	*      *      *      *            000000000002 000000000001     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000001 C(E) =220000 004000 
FINAL
C(AC)=000000 000001 
----------

*031330  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031330 031330 031330 122200000002 777777777777 221000002000     221000002000 000000031320 0            0   765 777 
IT1	*      *      000002 *            122200000002 *                000000000001 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031331 031331 031331 302200000001 777777777777 221000002000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   021 
ET1	*      *      *      *            *            *                *            *            0            021 *   766 
ET2	*      *      *      *            *            *                *            *            0            766 766 022 
SCT1	*      *      *      *            000000002000 000000002000     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            773 *   *   
SCT2	*      *      *      *            000000000400 000000000400     *            *            0            774 *   *   
SCT2	*      *      *      *            000000000100 000000000100     *            *            0            775 *   *   
SCT2	*      *      *      *            000000000020 000000000020     *            *            0            776 *   *   
SCT2	*      *      *      *            000000000004 000000000004     *            *            0            777 *   *   
FIXT2	*      *      *      *            000000000002 000000000001     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000001 C(E) =221000 002000 
FINAL
C(AC)=000000 000001 
----------

*031336  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031336 031336 031336 122200000002 777777777777 222000001000     222000001000 000000031326 0            0   766 777 
IT1	*      *      000002 *            122200000002 *                000000000001 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031337 031337 031337 302200000001 777777777777 222000001000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   022 
ET1	*      *      *      *            *            *                *            *            0            022 *   767 
ET2	*      *      *      *            *            *                *            *            0            767 767 021 
SCT1	*      *      *      *            000000001000 000000001000     *            *            0            *   *   777 
SCT2	*      *      *      *            000000000400 000000000400     *            *            0            774 *   *   
SCT2	*      *      *      *            000000000100 000000000100     *            *            0            775 *   *   
SCT2	*      *      *      *            000000000020 000000000020     *            *            0            776 *   *   SEQ 0274
SCT2	*      *      *      *            000000000004 000000000004     *            *            0            777 *   *   
FIXT2	*      *      *      *            000000000002 000000000001     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000001 C(E) =222000 001000 
FINAL
C(AC)=000000 000001 
----------

*031344  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031344 031344 031344 122200000002 777777777777 223000000400     223000000400 000000031334 0            0   767 777 
IT1	*      *      000002 *            122200000002 *                000000000001 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031345 031345 031345 302200000001 777777777777 223000000400     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   023 
ET1	*      *      *      *            *            *                *            *            0            023 *   770 
ET2	*      *      *      *            *            *                *            *            0            770 770 020 
SCT1	*      *      *      *            000000000400 000000000400     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            774 *   *   
SCT2	*      *      *      *            000000000100 000000000100     *            *            0            775 *   *   
SCT2	*      *      *      *            000000000020 000000000020     *            *            0            776 *   *   
SCT2	*      *      *      *            000000000004 000000000004     *            *            0            777 *   *   
FIXT2	*      *      *      *            000000000002 000000000001     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000001 C(E) =223000 000400 
FINAL
C(AC)=000000 000001 
----------

*031352  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031352 031352 031352 122200000002 777777777777 224000000200     224000000200 000000031342 0            0   770 777 
IT1	*      *      000002 *            122200000002 *                000000000001 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031353 031353 031353 302200000001 777777777777 224000000200     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   024 
ET1	*      *      *      *            *            *                *            *            0            024 *   771 
ET2	*      *      *      *            *            *                *            *            0            771 771 017 
SCT1	*      *      *      *            000000000200 000000000200     *            *            0            *   *   777 
SCT2	*      *      *      *            000000000100 000000000100     *            *            0            775 *   *   
SCT2	*      *      *      *            000000000020 000000000020     *            *            0            776 *   *   
SCT2	*      *      *      *            000000000004 000000000004     *            *            0            777 *   *   
FIXT2	*      *      *      *            000000000002 000000000001     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000001 C(E) =224000 000200 
FINAL
C(AC)=000000 000001 
----------
                                                                                                                           SEQ 0275
*031360  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031360 031360 031360 122200000002 777777777777 225000000100     225000000100 000000031350 0            0   771 777 
IT1	*      *      000002 *            122200000002 *                000000000001 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031361 031361 031361 302200000001 777777777777 225000000100     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   025 
ET1	*      *      *      *            *            *                *            *            0            025 *   772 
ET2	*      *      *      *            *            *                *            *            0            772 772 016 
SCT1	*      *      *      *            000000000100 000000000100     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            775 *   *   
SCT2	*      *      *      *            000000000020 000000000020     *            *            0            776 *   *   
SCT2	*      *      *      *            000000000004 000000000004     *            *            0            777 *   *   
FIXT2	*      *      *      *            000000000002 000000000001     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000001 C(E) =225000 000100 
FINAL
C(AC)=000000 000001 
----------

*031366  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031366 031366 031366 122200000002 777777777777 226000000040     226000000040 000000031356 0            0   772 777 
IT1	*      *      000002 *            122200000002 *                000000000001 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031367 031367 031367 302200000001 777777777777 226000000040     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   026 
ET1	*      *      *      *            *            *                *            *            0            026 *   773 
ET2	*      *      *      *            *            *                *            *            0            773 773 015 
SCT1	*      *      *      *            000000000040 000000000040     *            *            0            *   *   777 
SCT2	*      *      *      *            000000000020 000000000020     *            *            0            776 *   *   
SCT2	*      *      *      *            000000000004 000000000004     *            *            0            777 *   *   
FIXT2	*      *      *      *            000000000002 000000000001     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000001 C(E) =226000 000040 
FINAL
C(AC)=000000 000001 
----------

*031374  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031374 031374 031374 122200000002 777777777777 227000000020     227000000020 000000031364 0            0   773 777 
IT1	*      *      000002 *            122200000002 *                000000000001 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031375 031375 031375 302200000001 777777777777 227000000020     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   027 
ET1	*      *      *      *            *            *                *            *            0            027 *   774 
ET2	*      *      *      *            *            *                *            *            0            774 774 014 
SCT1	*      *      *      *            000000000020 000000000020     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            776 *   *   
SCT2	*      *      *      *            000000000004 000000000004     *            *            0            777 *   *   SEQ 0276
FIXT2	*      *      *      *            000000000002 000000000001     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000001 C(E) =227000 000020 
FINAL
C(AC)=000000 000001 
----------

*031402  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031402 031402 031402 122200000002 777777777777 230000000010     230000000010 000000031372 0            0   774 777 
IT1	*      *      000002 *            122200000002 *                000000000001 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031403 031403 031403 302200000001 777777777777 230000000010     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   030 
ET1	*      *      *      *            *            *                *            *            0            030 *   775 
ET2	*      *      *      *            *            *                *            *            0            775 775 013 
SCT1	*      *      *      *            000000000010 000000000010     *            *            0            *   *   777 
SCT2	*      *      *      *            000000000004 000000000004     *            *            0            777 *   *   
FIXT2	*      *      *      *            000000000002 000000000001     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000001 C(E) =230000 000010 
FINAL
C(AC)=000000 000001 
----------

*031410  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031410 031410 031410 122200000002 777777777777 231000000004     231000000004 000000031400 0            0   775 777 
IT1	*      *      000002 *            122200000002 *                000000000001 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031411 031411 031411 302200000001 777777777777 231000000004     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   031 
ET1	*      *      *      *            *            *                *            *            0            031 *   776 
ET2	*      *      *      *            *            *                *            *            0            776 776 012 
SCT1	*      *      *      *            000000000004 000000000004     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            777 *   *   
FIXT2	*      *      *      *            000000000002 000000000001     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000001 C(E) =231000 000004 
FINAL
C(AC)=000000 000001 
----------

*031416  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031416 031416 031416 122200000002 777777777777 232000000002     232000000002 000000031406 0            0   776 777 
IT1	*      *      000002 *            122200000002 *                000000000001 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   SEQ 0277
FT6	031417 031417 031417 302200000001 777777777777 232000000002     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   032 
ET1	*      *      *      *            *            *                *            *            0            032 *   777 
ET2	*      *      *      *            *            *                *            *            0            777 777 011 
SCT1	*      *      *      *            000000000002 000000000002     *            *            0            *   *   777 
FIXT2	*      *      *      *            *            000000000001     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                *            *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000001 C(E) =232000 000002 
FINAL
C(AC)=000000 000001 
----------

*031424  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031424 031424 031424 122200000002 777777777777 233000000001     233000000001 000000031414 0            0   777 777 
IT1	*      *      000002 *            122200000002 *                000000000001 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031425 031425 031425 302200000001 777777777777 233000000001     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   033 
ET1	*      *      *      *            *            *                *            *            0            033 *   000 
ET2	*      *      *      *            *            *                *            *            0            000 000 010 
FIXT1	*      *      *      *            *            000000000001     *            *            0            0   0   000 
ST1	*      *      *      *            *            *                *            *            0            0   0   777 

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000001 C(E) =233000 000001 
FINAL
C(AC)=000000 000001 
----------

*031433  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031433 031433 031433 122200000002 777777777777 777777777777     777777777777 000400000000 0            0   0   777 
IT1	*      *      000002 *            122200000002 *                000000000001 *            0            0   0   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   0   *   
FT6	031434 031434 031434 312200000003 777777777777 576400000000     *            *            0            0   0   *   
ET0	*      *      *      *            *            *                *            *            0            0   0   776 
ET1	*      *      *      *            *            *                *            *            0            776 0   746 
ET2	*      *      *      *            *            *                *            *            0            746 746 042 
SCT1	*      *      *      *            777400000000 777400000000     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            763 *   *   
SCT2	*      *      *      *            777700000000 777700000000     *            *            0            764 *   *   
SCT2	*      *      *      *            777760000000 777760000000     *            *            0            765 *   *   
SCT2	*      *      *      *            777774000000 777774000000     *            *            0            766 *   *   
SCT2	*      *      *      *            777777000000 777777000000     *            *            0            767 *   *   
SCT2	*      *      *      *            777777600000 777777600000     *            *            0            770 *   *   
SCT2	*      *      *      *            777777740000 777777740000     *            *            0            771 *   *   
SCT2	*      *      *      *            777777770000 777777770000     *            *            0            772 *   *   
SCT2	*      *      *      *            777777776000 777777776000     *            *            0            773 *   *   
SCT2	*      *      *      *            777777777400 777777777400     *            *            0            774 *   *   
SCT2	*      *      *      *            777777777700 777777777700     *            *            0            775 *   *   
SCT2	*      *      *      *            777777777760 777777777760     *            *            0            776 *   *   
SCT2	*      *      *      *            777777777774 777777777774     *            *            0            777 *   *   
FIXT2	*      *      *      *            000000000000 777777777777     *            *            0            000 *   *   SEQ 0278
ST1	*      *      *      *            777777777777 *                777777777777 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000001 C(E) =576400 000000 
FINAL
C(AC)=777777 777777 
----------

*031442  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031442 031442 031442 122200000002 777777777777 777777777776     777777777776 000400000000 0            0   746 777 
IT1	*      *      000002 *            122200000002 *                777777777777 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031443 031443 031443 312200000003 777777777777 575400000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   775 
ET1	*      *      *      *            *            *                *            *            0            775 *   747 
ET2	*      *      *      *            *            *                *            *            0            747 747 041 
SCT1	*      *      *      *            777400000000 777400000000     *            *            0            *   *   777 
SCT2	*      *      *      *            777600000000 777600000000     *            *            0            764 *   *   
SCT2	*      *      *      *            777740000000 777740000000     *            *            0            765 *   *   
SCT2	*      *      *      *            777770000000 777770000000     *            *            0            766 *   *   
SCT2	*      *      *      *            777776000000 777776000000     *            *            0            767 *   *   
SCT2	*      *      *      *            777777400000 777777400000     *            *            0            770 *   *   
SCT2	*      *      *      *            777777700000 777777700000     *            *            0            771 *   *   
SCT2	*      *      *      *            777777760000 777777760000     *            *            0            772 *   *   
SCT2	*      *      *      *            777777774000 777777774000     *            *            0            773 *   *   
SCT2	*      *      *      *            777777777000 777777777000     *            *            0            774 *   *   
SCT2	*      *      *      *            777777777600 777777777600     *            *            0            775 *   *   
SCT2	*      *      *      *            777777777740 777777777740     *            *            0            776 *   *   
SCT2	*      *      *      *            777777777770 777777777770     *            *            0            777 *   *   
FIXT2	*      *      *      *            777777777777 777777777776     *            *            0            000 *   *   
ST1	*      *      *      *            *            *                777777777776 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 C(E) =575400 000000 
FINAL
C(AC)=777777 777776 
----------

*031451  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031451 031451 031451 122200000002 777777777777 777777777775     777777777775 000200000000 0            0   747 777 
IT1	*      *      000002 *            122200000002 *                777777777776 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031452 031452 031452 312200000003 777777777777 575200000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   775 
ET1	*      *      *      *            *            *                *            *            0            775 *   747 
ET2	*      *      *      *            *            *                *            *            0            747 *   041 
SCT1	*      *      *      *            777200000000 777200000000     *            *            0            *   *   777 
SCT2	*      *      *      *            777500000000 777500000000     *            *            0            764 *   *   
SCT2	*      *      *      *            777720000000 777720000000     *            *            0            765 *   *   
SCT2	*      *      *      *            777764000000 777764000000     *            *            0            766 *   *   
SCT2	*      *      *      *            777775000000 777775000000     *            *            0            767 *   *   
SCT2	*      *      *      *            777777200000 777777200000     *            *            0            770 *   *   
SCT2	*      *      *      *            777777640000 777777640000     *            *            0            771 *   *   
SCT2	*      *      *      *            777777750000 777777750000     *            *            0            772 *   *   SEQ 0279
SCT2	*      *      *      *            777777772000 777777772000     *            *            0            773 *   *   
SCT2	*      *      *      *            777777776400 777777776400     *            *            0            774 *   *   
SCT2	*      *      *      *            777777777500 777777777500     *            *            0            775 *   *   
SCT2	*      *      *      *            777777777720 777777777720     *            *            0            776 *   *   
SCT2	*      *      *      *            777777777764 777777777764     *            *            0            777 *   *   
FIXT2	*      *      *      *            777777777776 777777777775     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                777777777775 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777776 C(E) =575200 000000 
FINAL
C(AC)=777777 777775 
----------

*031460  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031460 031460 031460 122200000002 777777777777 777777777773     777777777773 000300000000 0            0   747 777 
IT1	*      *      000002 *            122200000002 *                777777777775 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031461 031461 031461 312200000003 777777777777 574300000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   774 
ET1	*      *      *      *            *            *                *            *            0            774 *   750 
ET2	*      *      *      *            *            *                *            *            0            750 750 040 
SCT1	*      *      *      *            777300000000 777300000000     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            764 *   *   
SCT2	*      *      *      *            777660000000 777660000000     *            *            0            765 *   *   
SCT2	*      *      *      *            777754000000 777754000000     *            *            0            766 *   *   
SCT2	*      *      *      *            777773000000 777773000000     *            *            0            767 *   *   
SCT2	*      *      *      *            777776600000 777776600000     *            *            0            770 *   *   
SCT2	*      *      *      *            777777540000 777777540000     *            *            0            771 *   *   
SCT2	*      *      *      *            777777730000 777777730000     *            *            0            772 *   *   
SCT2	*      *      *      *            777777766000 777777766000     *            *            0            773 *   *   
SCT2	*      *      *      *            777777775400 777777775400     *            *            0            774 *   *   
SCT2	*      *      *      *            777777777300 777777777300     *            *            0            775 *   *   
SCT2	*      *      *      *            777777777660 777777777660     *            *            0            776 *   *   
SCT2	*      *      *      *            777777777754 777777777754     *            *            0            777 *   *   
FIXT2	*      *      *      *            777777777774 777777777773     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                777777777773 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777775 C(E) =574300 000000 
FINAL
C(AC)=777777 777773 
----------

*031467  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031467 031467 031467 122200000002 777777777777 777777777767     777777777767 000340000000 0            0   750 777 
IT1	*      *      000002 *            122200000002 *                777777777773 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031470 031470 031470 312200000003 777777777777 573340000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   773 
ET1	*      *      *      *            *            *                *            *            0            773 *   751 
ET2	*      *      *      *            *            *                *            *            0            751 751 037 
SCT1	*      *      *      *            777340000000 777340000000     *            *            0            *   *   777 
SCT2	*      *      *      *            777560000000 777560000000     *            *            0            765 *   *   SEQ 0280
SCT2	*      *      *      *            777734000000 777734000000     *            *            0            766 *   *   
SCT2	*      *      *      *            777767000000 777767000000     *            *            0            767 *   *   
SCT2	*      *      *      *            777775600000 777775600000     *            *            0            770 *   *   
SCT2	*      *      *      *            777777340000 777777340000     *            *            0            771 *   *   
SCT2	*      *      *      *            777777670000 777777670000     *            *            0            772 *   *   
SCT2	*      *      *      *            777777756000 777777756000     *            *            0            773 *   *   
SCT2	*      *      *      *            777777773400 777777773400     *            *            0            774 *   *   
SCT2	*      *      *      *            777777776700 777777776700     *            *            0            775 *   *   
SCT2	*      *      *      *            777777777560 777777777560     *            *            0            776 *   *   
SCT2	*      *      *      *            777777777734 777777777734     *            *            0            777 *   *   
FIXT2	*      *      *      *            777777777770 777777777767     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                777777777767 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777773 C(E) =573340 000000 
FINAL
C(AC)=777777 777767 
----------

*031476  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031476 031476 031476 122200000002 777777777777 777777777757     777777777757 000360000000 0            0   751 777 
IT1	*      *      000002 *            122200000002 *                777777777767 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031477 031477 031477 312200000003 777777777777 572360000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   772 
ET1	*      *      *      *            *            *                *            *            0            772 *   752 
ET2	*      *      *      *            *            *                *            *            0            752 752 036 
SCT1	*      *      *      *            777360000000 777360000000     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            765 *   *   
SCT2	*      *      *      *            777674000000 777674000000     *            *            0            766 *   *   
SCT2	*      *      *      *            777757000000 777757000000     *            *            0            767 *   *   
SCT2	*      *      *      *            777773600000 777773600000     *            *            0            770 *   *   
SCT2	*      *      *      *            777776740000 777776740000     *            *            0            771 *   *   
SCT2	*      *      *      *            777777570000 777777570000     *            *            0            772 *   *   
SCT2	*      *      *      *            777777736000 777777736000     *            *            0            773 *   *   
SCT2	*      *      *      *            777777767400 777777767400     *            *            0            774 *   *   
SCT2	*      *      *      *            777777775700 777777775700     *            *            0            775 *   *   
SCT2	*      *      *      *            777777777360 777777777360     *            *            0            776 *   *   
SCT2	*      *      *      *            777777777674 777777777674     *            *            0            777 *   *   
FIXT2	*      *      *      *            777777777760 777777777757     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                777777777757 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777767 C(E) =572360 000000 
FINAL
C(AC)=777777 777757 
----------

*031505  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031505 031505 031505 122200000002 777777777777 777777777737     777777777737 000370000000 0            0   752 777 
IT1	*      *      000002 *            122200000002 *                777777777757 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031506 031506 031506 312200000003 777777777777 571370000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   77  SEQ 0281
ET1	*      *      *      *            *            *                *            *            0            771 *   753 
ET2	*      *      *      *            *            *                *            *            0            753 753 035 
SCT1	*      *      *      *            777370000000 777370000000     *            *            0            *   *   777 
SCT2	*      *      *      *            777574000000 777574000000     *            *            0            766 *   *   
SCT2	*      *      *      *            777737000000 777737000000     *            *            0            767 *   *   
SCT2	*      *      *      *            777767600000 777767600000     *            *            0            770 *   *   
SCT2	*      *      *      *            777775740000 777775740000     *            *            0            771 *   *   
SCT2	*      *      *      *            777777370000 777777370000     *            *            0            772 *   *   
SCT2	*      *      *      *            777777676000 777777676000     *            *            0            773 *   *   
SCT2	*      *      *      *            777777757400 777777757400     *            *            0            774 *   *   
SCT2	*      *      *      *            777777773700 777777773700     *            *            0            775 *   *   
SCT2	*      *      *      *            777777776760 777777776760     *            *            0            776 *   *   
SCT2	*      *      *      *            777777777574 777777777574     *            *            0            777 *   *   
FIXT2	*      *      *      *            777777777740 777777777737     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                777777777737 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777757 C(E) =571370 000000 
FINAL
C(AC)=777777 777737 
----------

*031514  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031514 031514 031514 122200000002 777777777777 777777777677     777777777677 000374000000 0            0   753 777 
IT1	*      *      000002 *            122200000002 *                777777777737 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031515 031515 031515 312200000003 777777777777 570374000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   770 
ET1	*      *      *      *            *            *                *            *            0            770 *   754 
ET2	*      *      *      *            *            *                *            *            0            754 754 034 
SCT1	*      *      *      *            777374000000 777374000000     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            766 *   *   
SCT2	*      *      *      *            777677000000 777677000000     *            *            0            767 *   *   
SCT2	*      *      *      *            777757600000 777757600000     *            *            0            770 *   *   
SCT2	*      *      *      *            777773740000 777773740000     *            *            0            771 *   *   
SCT2	*      *      *      *            777776770000 777776770000     *            *            0            772 *   *   
SCT2	*      *      *      *            777777576000 777777576000     *            *            0            773 *   *   
SCT2	*      *      *      *            777777737400 777777737400     *            *            0            774 *   *   
SCT2	*      *      *      *            777777767700 777777767700     *            *            0            775 *   *   
SCT2	*      *      *      *            777777775760 777777775760     *            *            0            776 *   *   
SCT2	*      *      *      *            777777777374 777777777374     *            *            0            777 *   *   
FIXT2	*      *      *      *            777777777700 777777777677     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                777777777677 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777737 C(E) =570374 000000 
FINAL
C(AC)=777777 777677 
----------

*031523  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031523 031523 031523 122200000002 777777777777 777777777577     777777777577 000376000000 0            0   754 777 
IT1	*      *      000002 *            122200000002 *                777777777677 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   SEQ 0282
FT6	031524 031524 031524 312200000003 777777777777 567376000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   767 
ET1	*      *      *      *            *            *                *            *            0            767 *   755 
ET2	*      *      *      *            *            *                *            *            0            755 755 033 
SCT1	*      *      *      *            777376000000 777376000000     *            *            0            *   *   777 
SCT2	*      *      *      *            777577000000 777577000000     *            *            0            767 *   *   
SCT2	*      *      *      *            777737600000 777737600000     *            *            0            770 *   *   
SCT2	*      *      *      *            777767740000 777767740000     *            *            0            771 *   *   
SCT2	*      *      *      *            777775770000 777775770000     *            *            0            772 *   *   
SCT2	*      *      *      *            777777376000 777777376000     *            *            0            773 *   *   
SCT2	*      *      *      *            777777677400 777777677400     *            *            0            774 *   *   
SCT2	*      *      *      *            777777757700 777777757700     *            *            0            775 *   *   
SCT2	*      *      *      *            777777773760 777777773760     *            *            0            776 *   *   
SCT2	*      *      *      *            777777776774 777777776774     *            *            0            777 *   *   
FIXT2	*      *      *      *            777777777600 777777777577     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                777777777577 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777677 C(E) =567376 000000 
FINAL
C(AC)=777777 777577 
----------

*031532  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031532 031532 031532 122200000002 777777777777 777777777377     777777777377 000377000000 0            0   755 777 
IT1	*      *      000002 *            122200000002 *                777777777577 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031533 031533 031533 312200000003 777777777777 566377000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   766 
ET1	*      *      *      *            *            *                *            *            0            766 *   756 
ET2	*      *      *      *            *            *                *            *            0            756 756 032 
SCT1	*      *      *      *            777377000000 777377000000     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            767 *   *   
SCT2	*      *      *      *            777677600000 777677600000     *            *            0            770 *   *   
SCT2	*      *      *      *            777757740000 777757740000     *            *            0            771 *   *   
SCT2	*      *      *      *            777773770000 777773770000     *            *            0            772 *   *   
SCT2	*      *      *      *            777776776000 777776776000     *            *            0            773 *   *   
SCT2	*      *      *      *            777777577400 777777577400     *            *            0            774 *   *   
SCT2	*      *      *      *            777777737700 777777737700     *            *            0            775 *   *   
SCT2	*      *      *      *            777777767760 777777767760     *            *            0            776 *   *   
SCT2	*      *      *      *            777777775774 777777775774     *            *            0            777 *   *   
FIXT2	*      *      *      *            777777777400 777777777377     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                777777777377 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777577 C(E) =566377 000000 
FINAL
C(AC)=777777 777377 
----------

*031541  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031541 031541 031541 122200000002 777777777777 777777776777     777777776777 000000031527 0            0   756 777 
IT1	*      *      000002 *            122200000002 *                777777777377 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   SEQ 0283
FT6	031542 031542 031542 312200000003 777777777777 565377400000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   765 
ET1	*      *      *      *            *            *                *            *            0            765 *   757 
ET2	*      *      *      *            *            *                *            *            0            757 757 031 
SCT1	*      *      *      *            777377400000 777377400000     *            *            0            *   *   777 
SCT2	*      *      *      *            777577600000 777577600000     *            *            0            770 *   *   
SCT2	*      *      *      *            777737740000 777737740000     *            *            0            771 *   *   
SCT2	*      *      *      *            777767770000 777767770000     *            *            0            772 *   *   
SCT2	*      *      *      *            777775776000 777775776000     *            *            0            773 *   *   
SCT2	*      *      *      *            777777377400 777777377400     *            *            0            774 *   *   
SCT2	*      *      *      *            777777677700 777777677700     *            *            0            775 *   *   
SCT2	*      *      *      *            777777757760 777777757760     *            *            0            776 *   *   
SCT2	*      *      *      *            777777773774 777777773774     *            *            0            777 *   *   
FIXT2	*      *      *      *            777777777000 777777776777     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                777777776777 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777377 C(E) =565377 400000 
FINAL
C(AC)=777777 776777 
----------

*031550  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031550 031550 031550 122200000002 777777777777 777777775777     777777775777 000000031536 0            0   757 777 
IT1	*      *      000002 *            122200000002 *                777777776777 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031551 031551 031551 312200000003 777777777777 564377600000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   764 
ET1	*      *      *      *            *            *                *            *            0            764 *   760 
ET2	*      *      *      *            *            *                *            *            0            760 760 030 
SCT1	*      *      *      *            777377600000 777377600000     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            770 *   *   
SCT2	*      *      *      *            777677740000 777677740000     *            *            0            771 *   *   
SCT2	*      *      *      *            777757770000 777757770000     *            *            0            772 *   *   
SCT2	*      *      *      *            777773776000 777773776000     *            *            0            773 *   *   
SCT2	*      *      *      *            777776777400 777776777400     *            *            0            774 *   *   
SCT2	*      *      *      *            777777577700 777777577700     *            *            0            775 *   *   
SCT2	*      *      *      *            777777737760 777777737760     *            *            0            776 *   *   
SCT2	*      *      *      *            777777767774 777777767774     *            *            0            777 *   *   
FIXT2	*      *      *      *            777777776000 777777775777     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                777777775777 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 776777 C(E) =564377 600000 
FINAL
C(AC)=777777 775777 
----------

*031557  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031557 031557 031557 122200000002 777777777777 777777773777     777777773777 000000031545 0            0   760 777 
IT1	*      *      000002 *            122200000002 *                777777775777 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031560 031560 031560 312200000003 777777777777 563377700000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   76  SEQ 0284
ET1	*      *      *      *            *            *                *            *            0            763 *   761 
ET2	*      *      *      *            *            *                *            *            0            761 761 027 
SCT1	*      *      *      *            777377700000 777377700000     *            *            0            *   *   777 
SCT2	*      *      *      *            777577740000 777577740000     *            *            0            771 *   *   
SCT2	*      *      *      *            777737770000 777737770000     *            *            0            772 *   *   
SCT2	*      *      *      *            777767776000 777767776000     *            *            0            773 *   *   
SCT2	*      *      *      *            777775777400 777775777400     *            *            0            774 *   *   
SCT2	*      *      *      *            777777377700 777777377700     *            *            0            775 *   *   
SCT2	*      *      *      *            777777677760 777777677760     *            *            0            776 *   *   
SCT2	*      *      *      *            777777757774 777777757774     *            *            0            777 *   *   
FIXT2	*      *      *      *            777777774000 777777773777     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                777777773777 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 775777 C(E) =563377 700000 
FINAL
C(AC)=777777 773777 
----------

*031566  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031566 031566 031566 122200000002 777777777777 777777767777     777777767777 000000031554 0            0   761 777 
IT1	*      *      000002 *            122200000002 *                777777773777 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031567 031567 031567 312200000003 777777777777 562377740000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   762 
ET1	*      *      *      *            *            *                *            *            0            762 *   *   
ET2	*      *      *      *            *            *                *            *            0            *   762 026 
SCT1	*      *      *      *            777377740000 777377740000     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            771 *   *   
SCT2	*      *      *      *            777677770000 777677770000     *            *            0            772 *   *   
SCT2	*      *      *      *            777757776000 777757776000     *            *            0            773 *   *   
SCT2	*      *      *      *            777773777400 777773777400     *            *            0            774 *   *   
SCT2	*      *      *      *            777776777700 777776777700     *            *            0            775 *   *   
SCT2	*      *      *      *            777777577760 777777577760     *            *            0            776 *   *   
SCT2	*      *      *      *            777777737774 777777737774     *            *            0            777 *   *   
FIXT2	*      *      *      *            777777770000 777777767777     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                777777767777 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 773777 C(E) =562377 740000 
FINAL
C(AC)=777777 767777 
----------

*031575  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031575 031575 031575 122200000002 777777777777 777777757777     777777757777 000000031563 0            0   762 777 
IT1	*      *      000002 *            122200000002 *                777777767777 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031576 031576 031576 312200000003 777777777777 561377760000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   761 
ET1	*      *      *      *            *            *                *            *            0            761 *   763 
ET2	*      *      *      *            *            *                *            *            0            763 763 025 
SCT1	*      *      *      *            777377760000 777377760000     *            *            0            *   *   777 
SCT2	*      *      *      *            777577770000 777577770000     *            *            0            772 *   *   SEQ 0285
SCT2	*      *      *      *            777737776000 777737776000     *            *            0            773 *   *   
SCT2	*      *      *      *            777767777400 777767777400     *            *            0            774 *   *   
SCT2	*      *      *      *            777775777700 777775777700     *            *            0            775 *   *   
SCT2	*      *      *      *            777777377760 777777377760     *            *            0            776 *   *   
SCT2	*      *      *      *            777777677774 777777677774     *            *            0            777 *   *   
FIXT2	*      *      *      *            777777760000 777777757777     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                777777757777 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 767777 C(E) =561377 760000 
FINAL
C(AC)=777777 757777 
----------

*031604  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031604 031604 031604 122200000002 777777777777 777777737777     777777737777 000000031572 0            0   763 777 
IT1	*      *      000002 *            122200000002 *                777777757777 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031605 031605 031605 312200000003 777777777777 560377770000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   760 
ET1	*      *      *      *            *            *                *            *            0            760 *   764 
ET2	*      *      *      *            *            *                *            *            0            764 764 024 
SCT1	*      *      *      *            777377770000 777377770000     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            772 *   *   
SCT2	*      *      *      *            777677776000 777677776000     *            *            0            773 *   *   
SCT2	*      *      *      *            777757777400 777757777400     *            *            0            774 *   *   
SCT2	*      *      *      *            777773777700 777773777700     *            *            0            775 *   *   
SCT2	*      *      *      *            777776777760 777776777760     *            *            0            776 *   *   
SCT2	*      *      *      *            777777577774 777777577774     *            *            0            777 *   *   
FIXT2	*      *      *      *            777777740000 777777737777     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                777777737777 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 757777 C(E) =560377 770000 
FINAL
C(AC)=777777 737777 
----------

*031613  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031613 031613 031613 122200000002 777777777777 777777677777     777777677777 000000031601 0            0   764 777 
IT1	*      *      000002 *            122200000002 *                777777737777 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031614 031614 031614 312200000003 777777777777 557377774000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   757 
ET1	*      *      *      *            *            *                *            *            0            757 *   765 
ET2	*      *      *      *            *            *                *            *            0            765 765 023 
SCT1	*      *      *      *            777377774000 777377774000     *            *            0            *   *   777 
SCT2	*      *      *      *            777577776000 777577776000     *            *            0            773 *   *   
SCT2	*      *      *      *            777737777400 777737777400     *            *            0            774 *   *   
SCT2	*      *      *      *            777767777700 777767777700     *            *            0            775 *   *   
SCT2	*      *      *      *            777775777760 777775777760     *            *            0            776 *   *   
SCT2	*      *      *      *            777777377774 777777377774     *            *            0            777 *   *   
FIXT2	*      *      *      *            777777700000 777777677777     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                777777677777 *            0            0   *   *   SEQ 0286

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 737777 C(E) =557377 774000 
FINAL
C(AC)=777777 677777 
----------

*031622  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031622 031622 031622 122200000002 777777777777 777777577777     777777577777 000000031610 0            0   765 777 
IT1	*      *      000002 *            122200000002 *                777777677777 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031623 031623 031623 312200000003 777777777777 556377776000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   756 
ET1	*      *      *      *            *            *                *            *            0            756 *   766 
ET2	*      *      *      *            *            *                *            *            0            766 766 022 
SCT1	*      *      *      *            777377776000 777377776000     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            773 *   *   
SCT2	*      *      *      *            777677777400 777677777400     *            *            0            774 *   *   
SCT2	*      *      *      *            777757777700 777757777700     *            *            0            775 *   *   
SCT2	*      *      *      *            777773777760 777773777760     *            *            0            776 *   *   
SCT2	*      *      *      *            777776777774 777776777774     *            *            0            777 *   *   
FIXT2	*      *      *      *            777777600000 777777577777     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                777777577777 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 677777 C(E) =556377 776000 
FINAL
C(AC)=777777 577777 
----------

*031631  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031631 031631 031631 122200000002 777777777777 777777377777     777777377777 000000031617 0            0   766 777 
IT1	*      *      000002 *            122200000002 *                777777577777 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031632 031632 031632 312200000003 777777777777 555377777000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   755 
ET1	*      *      *      *            *            *                *            *            0            755 *   767 
ET2	*      *      *      *            *            *                *            *            0            767 767 021 
SCT1	*      *      *      *            777377777000 777377777000     *            *            0            *   *   777 
SCT2	*      *      *      *            777577777400 777577777400     *            *            0            774 *   *   
SCT2	*      *      *      *            777737777700 777737777700     *            *            0            775 *   *   
SCT2	*      *      *      *            777767777760 777767777760     *            *            0            776 *   *   
SCT2	*      *      *      *            777775777774 777775777774     *            *            0            777 *   *   
FIXT2	*      *      *      *            777777400000 777777377777     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                777777377777 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 577777 C(E) =555377 777000 
FINAL
C(AC)=777777 377777 
----------
*031640  FIX	4,000002                                                                                                   SEQ 0287

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031640 031640 031640 122200000002 777777777777 777776777777     777776777777 000000031626 0            0   767 777 
IT1	*      *      000002 *            122200000002 *                777777377777 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031641 031641 031641 312200000003 777777777777 554377777400     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   754 
ET1	*      *      *      *            *            *                *            *            0            754 *   770 
ET2	*      *      *      *            *            *                *            *            0            770 770 020 
SCT1	*      *      *      *            777377777400 777377777400     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            774 *   *   
SCT2	*      *      *      *            777677777700 777677777700     *            *            0            775 *   *   
SCT2	*      *      *      *            777757777760 777757777760     *            *            0            776 *   *   
SCT2	*      *      *      *            777773777774 777773777774     *            *            0            777 *   *   
FIXT2	*      *      *      *            777777000000 777776777777     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                777776777777 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 377777 C(E) =554377 777400 
FINAL
C(AC)=777776 777777 
----------

*031647  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031647 031647 031647 122200000002 777777777777 777775777777     777775777777 000000031635 0            0   770 777 
IT1	*      *      000002 *            122200000002 *                777776777777 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031650 031650 031650 312200000003 777777777777 553377777600     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   753 
ET1	*      *      *      *            *            *                *            *            0            753 *   771 
ET2	*      *      *      *            *            *                *            *            0            771 771 017 
SCT1	*      *      *      *            777377777600 777377777600     *            *            0            *   *   777 
SCT2	*      *      *      *            777577777700 777577777700     *            *            0            775 *   *   
SCT2	*      *      *      *            777737777760 777737777760     *            *            0            776 *   *   
SCT2	*      *      *      *            777767777774 777767777774     *            *            0            777 *   *   
FIXT2	*      *      *      *            777776000000 777775777777     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                777775777777 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777776 777777 C(E) =553377 777600 
FINAL
C(AC)=777775 777777 
----------

*031656  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031656 031656 031656 122200000002 777777777777 777773777777     777773777777 000000031644 0            0   771 777 
IT1	*      *      000002 *            122200000002 *                777775777777 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031657 031657 031657 312200000003 777777777777 552377777700     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   752 
ET1	*      *      *      *            *            *                *            *            0            752 *   772 
ET2	*      *      *      *            *            *                *            *            0            772 772 016 
SCT1	*      *      *      *            777377777700 777377777700     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            775 *   *   SEQ 0288
SCT2	*      *      *      *            777677777760 777677777760     *            *            0            776 *   *   
SCT2	*      *      *      *            777757777774 777757777774     *            *            0            777 *   *   
FIXT2	*      *      *      *            777774000000 777773777777     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                777773777777 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777775 777777 C(E) =552377 777700 
FINAL
C(AC)=777773 777777 
----------

*031665  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031665 031665 031665 122200000002 777777777777 777767777777     777767777777 000000031653 0            0   772 777 
IT1	*      *      000002 *            122200000002 *                777773777777 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031666 031666 031666 312200000003 777777777777 551377777740     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   751 
ET1	*      *      *      *            *            *                *            *            0            751 *   773 
ET2	*      *      *      *            *            *                *            *            0            773 773 015 
SCT1	*      *      *      *            777377777740 777377777740     *            *            0            *   *   777 
SCT2	*      *      *      *            777577777760 777577777760     *            *            0            776 *   *   
SCT2	*      *      *      *            777737777774 777737777774     *            *            0            777 *   *   
FIXT2	*      *      *      *            777770000000 777767777777     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                777767777777 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777773 777777 C(E) =551377 777740 
FINAL
C(AC)=777767 777777 
----------

*031674  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031674 031674 031674 122200000002 777777777777 777757777777     777757777777 000000031662 0            0   773 777 
IT1	*      *      000002 *            122200000002 *                777767777777 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031675 031675 031675 312200000003 777777777777 550377777760     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   750 
ET1	*      *      *      *            *            *                *            *            0            750 *   774 
ET2	*      *      *      *            *            *                *            *            0            774 774 014 
SCT1	*      *      *      *            777377777760 777377777760     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            776 *   *   
SCT2	*      *      *      *            777677777774 777677777774     *            *            0            777 *   *   
FIXT2	*      *      *      *            777760000000 777757777777     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                777757777777 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777767 777777 C(E) =550377 777760 
FINAL
C(AC)=777757 777777 
----------

*031703  FIX	4,000002
                                                                                                                           SEQ 0289
STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031703 031703 031703 122200000002 777777777777 777737777777     777737777777 000000031671 0            0   774 777 
IT1	*      *      000002 *            122200000002 *                777757777777 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031704 031704 031704 312200000003 777777777777 547377777770     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   747 
ET1	*      *      *      *            *            *                *            *            0            747 *   775 
ET2	*      *      *      *            *            *                *            *            0            775 775 013 
SCT1	*      *      *      *            777377777770 777377777770     *            *            0            *   *   777 
SCT2	*      *      *      *            777577777774 777577777774     *            *            0            777 *   *   
FIXT2	*      *      *      *            777740000000 777737777777     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                777737777777 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777757 777777 C(E) =547377 777770 
FINAL
C(AC)=777737 777777 
----------

*031712  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031712 031712 031712 122200000002 777777777777 777677777777     777677777777 000000031700 0            0   775 777 
IT1	*      *      000002 *            122200000002 *                777737777777 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031713 031713 031713 312200000003 777777777777 546377777774     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   746 
ET1	*      *      *      *            *            *                *            *            0            746 *   776 
ET2	*      *      *      *            *            *                *            *            0            776 776 012 
SCT1	*      *      *      *            777377777774 777377777774     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            777 *   *   
FIXT2	*      *      *      *            777700000000 777677777777     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                777677777777 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777737 777777 C(E) =546377 777774 
FINAL
C(AC)=777677 777777 
----------

*031721  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031721 031721 031721 122200000002 777777777777 777577777777     777577777777 000000031707 0            0   776 777 
IT1	*      *      000002 *            122200000002 *                777677777777 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031722 031722 031722 312200000003 777777777777 545377777776     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   745 
ET1	*      *      *      *            *            *                *            *            0            745 *   777 
ET2	*      *      *      *            *            *                *            *            0            777 777 011 
SCT1	*      *      *      *            777377777776 777377777776     *            *            0            *   *   777 
FIXT2	*      *      *      *            777600000000 777577777777     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                777577777777 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777677 777777 C(E) =545377 777776 
FINAL                                                                                                                      SEQ 0290
C(AC)=777577 777777 
----------

*031730  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031730 031730 031730 122200000002 777777777777 777377777777     777377777777 000000031716 0            0   777 777 
IT1	*      *      000002 *            122200000002 *                777577777777 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031731 031731 031731 312200000003 777777777777 544377777777     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   744 
ET1	*      *      *      *            *            *                *            *            0            744 *   000 
ET2	*      *      *      *            *            *                *            *            0            000 000 010 
FIXT1	*      *      *      *            *            777377777777     *            *            0            0   0   000 
ST1	*      *      *      *            *            *                777377777777 *            0            0   0   777 

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777577 777777 C(E) =544377 777777 
FINAL
C(AC)=777377 777777 
----------

*031737  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031737 031737 031737 122200000002 777777777777 776777777776     776777777776 000000031725 0            0   0   777 
IT1	*      *      000002 *            122200000002 *                777377777777 *            0            0   0   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   0   *   
FT6	031740 031740 031740 312200000003 777777777777 543377777777     *            *            0            0   0   *   
ET0	*      *      *      *            *            *                *            *            0            0   0   743 
ET1	*      *      *      *            *            *                *            *            0            743 0   001 
ET2	*      *      *      *            *            *                *            *            0            001 001 007 
FIXT1	*      *      *      *            *            777377777777     *            *            0            *   *   777 
SCT2	*      *      *      *            777377777777 *                *            *            0            777 *   *   
FIXT2	*      *      *      *            776777777777 776777777776     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                776777777776 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777377 777777 C(E) =543377 777777 
FINAL
C(AC)=776777 777776 
----------

*031746  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031746 031746 031746 122200000002 777777777777 775777777774     775777777774 000000031734 0            0   001 777 
IT1	*      *      000002 *            122200000002 *                776777777776 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031747 031747 031747 312200000003 777777777777 542377777777     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   742 
ET1	*      *      *      *            *            *                *            *            0            742 *   002 
ET2	*      *      *      *            *            *                *            *            0            002 002 006 
FIXT1	*      *      *      *            *            777377777777     *            *            0            *   *   776 
SCT2	*      *      *      *            777377777777 *                *            *            0            776 *   777 
SCT2	*      *      *      *            776777777776 776777777776     *            *            0            777 *   *   
FIXT2	*      *      *      *            775777777775 775777777774     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                775777777774 *            0            0   *   *   SEQ 0291

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=776777 777776 C(E) =542377 777777 
FINAL
C(AC)=775777 777774 
----------

*031755  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031755 031755 031755 122200000002 777777777777 773777777770     773777777770 000000031743 0            0   002 777 
IT1	*      *      000002 *            122200000002 *                775777777774 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031756 031756 031756 312200000003 777777777777 541377777777     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   741 
ET1	*      *      *      *            *            *                *            *            0            741 *   003 
ET2	*      *      *      *            *            *                *            *            0            003 003 005 
FIXT1	*      *      *      *            *            777377777777     *            *            0            *   *   775 
SCT2	*      *      *      *            777377777777 *                *            *            0            775 *   777 
SCT2	*      *      *      *            776777777776 776777777776     *            *            0            776 *   *   
SCT2	*      *      *      *            775777777774 775777777774     *            *            0            777 *   *   
FIXT2	*      *      *      *            773777777771 773777777770     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                773777777770 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=775777 777774 C(E) =541377 777777 
FINAL
C(AC)=773777 777770 
----------

*031764  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	031764 031764 031764 122200000002 777777777777 767777777760     767777777760 000000031752 0            0   003 777 
IT1	*      *      000002 *            122200000002 *                773777777770 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031765 031765 031765 312200000003 777777777777 540377777777     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   740 
ET1	*      *      *      *            *            *                *            *            0            740 *   004 
ET2	*      *      *      *            *            *                *            *            0            004 004 *   
FIXT1	*      *      *      *            *            777377777777     *            *            0            *   *   774 
SCT2	*      *      *      *            777377777777 *                *            *            0            774 *   777 
SCT2	*      *      *      *            776777777776 776777777776     *            *            0            775 *   *   
SCT2	*      *      *      *            775777777774 775777777774     *            *            0            776 *   *   
SCT2	*      *      *      *            773777777770 773777777770     *            *            0            777 *   *   
FIXT2	*      *      *      *            767777777761 767777777760     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                767777777760 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=773777 777770 C(E) =540377 777777 
FINAL
C(AC)=767777 777760 
----------

*031773  FIX	4,000002
STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA  SEQ 0292
IT0	031773 031773 031773 122200000002 777777777777 757777777740     757777777740 000000031761 0            0   004 777 
IT1	*      *      000002 *            122200000002 *                767777777760 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	031774 031774 031774 312200000003 777777777777 537377777777     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   737 
ET1	*      *      *      *            *            *                *            *            0            737 *   005 
ET2	*      *      *      *            *            *                *            *            0            005 005 003 
FIXT1	*      *      *      *            *            777377777777     *            *            0            *   *   773 
SCT2	*      *      *      *            777377777777 *                *            *            0            773 *   777 
SCT2	*      *      *      *            776777777776 776777777776     *            *            0            774 *   *   
SCT2	*      *      *      *            775777777774 775777777774     *            *            0            775 *   *   
SCT2	*      *      *      *            773777777770 773777777770     *            *            0            776 *   *   
SCT2	*      *      *      *            767777777760 767777777760     *            *            0            777 *   *   
FIXT2	*      *      *      *            757777777741 757777777740     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                757777777740 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=767777 777760 C(E) =537377 777777 
FINAL
C(AC)=757777 777740 
----------

*032002  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032002 032002 032002 122200000002 777777777777 737777777700     737777777700 000000031770 0            0   005 777 
IT1	*      *      000002 *            122200000002 *                757777777740 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	032003 032003 032003 312200000003 777777777777 536377777777     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   736 
ET1	*      *      *      *            *            *                *            *            0            736 *   006 
ET2	*      *      *      *            *            *                *            *            0            006 006 002 
FIXT1	*      *      *      *            *            777377777777     *            *            0            *   *   772 
SCT2	*      *      *      *            777377777777 *                *            *            0            772 *   777 
SCT2	*      *      *      *            776777777776 776777777776     *            *            0            773 *   *   
SCT2	*      *      *      *            775777777774 775777777774     *            *            0            774 *   *   
SCT2	*      *      *      *            773777777770 773777777770     *            *            0            775 *   *   
SCT2	*      *      *      *            767777777760 767777777760     *            *            0            776 *   *   
SCT2	*      *      *      *            757777777740 757777777740     *            *            0            777 *   *   
FIXT2	*      *      *      *            737777777701 737777777700     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                737777777700 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=757777 777740 C(E) =536377 777777 
FINAL
C(AC)=737777 777700 
----------

*032011  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032011 032011 032011 122200000002 777777777777 677777777600     677777777600 000000031777 0            0   006 777 
IT1	*      *      000002 *            122200000002 *                737777777700 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	032012 032012 032012 312200000003 777777777777 535377777777     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   735 
ET1	*      *      *      *            *            *                *            *            0            735 *   007 
ET2	*      *      *      *            *            *                *            *            0            007 007 00  SEQ 0293
FIXT1	*      *      *      *            *            777377777777     *            *            0            *   *   771 
SCT2	*      *      *      *            777377777777 *                *            *            0            771 *   777 
SCT2	*      *      *      *            776777777776 776777777776     *            *            0            772 *   *   
SCT2	*      *      *      *            775777777774 775777777774     *            *            0            773 *   *   
SCT2	*      *      *      *            773777777770 773777777770     *            *            0            774 *   *   
SCT2	*      *      *      *            767777777760 767777777760     *            *            0            775 *   *   
SCT2	*      *      *      *            757777777740 757777777740     *            *            0            776 *   *   
SCT2	*      *      *      *            737777777700 737777777700     *            *            0            777 *   *   
FIXT2	*      *      *      *            677777777601 677777777600     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                677777777600 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=737777 777700 C(E) =535377 777777 
FINAL
C(AC)=677777 777600 
----------

*032020  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032020 032020 032020 122200000002 777777777777 577777777400     577777777400 000000032006 0            0   007 777 
IT1	*      *      000002 *            122200000002 *                677777777600 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	032021 032021 032021 312200000003 777777777777 534377777777     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   734 
ET1	*      *      *      *            *            *                *            *            0            734 *   010 
ET2	*      *      *      *            *            *                *            *            0            010 010 000 
FIXT1	*      *      *      *            *            777377777777     *            *            0            *   *   770 
SCT2	*      *      *      *            777377777777 *                *            *            0            770 *   777 
SCT2	*      *      *      *            776777777776 776777777776     *            *            0            771 *   *   
SCT2	*      *      *      *            775777777774 775777777774     *            *            0            772 *   *   
SCT2	*      *      *      *            773777777770 773777777770     *            *            0            773 *   *   
SCT2	*      *      *      *            767777777760 767777777760     *            *            0            774 *   *   
SCT2	*      *      *      *            757777777740 757777777740     *            *            0            775 *   *   
SCT2	*      *      *      *            737777777700 737777777700     *            *            0            776 *   *   
SCT2	*      *      *      *            677777777600 677777777600     *            *            0            777 *   *   
FIXT2	*      *      *      *            577777777401 577777777400     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                577777777400 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=677777 777600 C(E) =534377 777777 
FINAL
C(AC)=577777 777400 
----------

*032027  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032027 032027 032027 122200000002 777777777777 377777777400     377777777400 000000032015 0            0   010 777 
IT1	*      *      000002 *            122200000002 *                577777777400 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	032030 032030 032030 312200000003 777777777777 243777777777     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   043 
ET1	*      *      *      *            *            *                *            *            0            043 *   010 
ET2	*      *      *      *            *            *                *            *            0            010 *   000 
FIXT1	*      *      *      *            *            000777777777     *            *            0            *   *   770 
SCT2	*      *      *      *            000777777777 *                *            *            0            770 *   777 
SCT2	*      *      *      *            001777777776 001777777776     *            *            0            771 *   *   SEQ 0294
SCT2	*      *      *      *            003777777774 003777777774     *            *            0            772 *   *   
SCT2	*      *      *      *            007777777770 007777777770     *            *            0            773 *   *   
SCT2	*      *      *      *            017777777760 017777777760     *            *            0            774 *   *   
SCT2	*      *      *      *            037777777740 037777777740     *            *            0            775 *   *   
SCT2	*      *      *      *            077777777700 077777777700     *            *            0            776 *   *   
SCT2	*      *      *      *            177777777600 177777777600     *            *            0            777 *   *   
FIXT2	*      *      *      *            377777777401 377777777400     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                377777777400 *            0            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=577777 777400 C(E) =243777 777777 
FINAL
C(AC)=377777 777400 
----------

*032036  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032036 032036 032036 122200000002 777777777777 777777777777     416060000000 000000032024 0            0   010 777 
IT1	*      *      000002 *            122200000002 *                377777777400 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	032037 032037 032037 312200000003 777777777777 576000000001     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   776 
ET1	*      *      *      *            *            *                *            *            0            776 *   746 
ET2	*      *      *      *            *            *                *            *            0            746 746 042 
SCT1	*      *      *      *            777000000001 777000000001     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            763 *   *   
SCT2	*      *      *      *            777600000000 777600000000     *            *            000400000000 764 *   *   
SCT2	*      *      *      *            777740000000 777740000000     *            *            000100000000 765 *   *   
SCT2	*      *      *      *            777770000000 777770000000     *            *            000020000000 766 *   *   
SCT2	*      *      *      *            777776000000 777776000000     *            *            000004000000 767 *   *   
SCT2	*      *      *      *            777777400000 777777400000     *            *            000001000000 770 *   *   
SCT2	*      *      *      *            777777700000 777777700000     *            *            000000200000 771 *   *   
SCT2	*      *      *      *            777777760000 777777760000     *            *            000000040000 772 *   *   
SCT2	*      *      *      *            777777774000 777777774000     *            *            000000010000 773 *   *   
SCT2	*      *      *      *            777777777000 777777777000     *            *            000000002000 774 *   *   
SCT2	*      *      *      *            777777777600 777777777600     *            *            000000000400 775 *   *   
SCT2	*      *      *      *            777777777740 777777777740     *            *            000000000100 776 *   *   
SCT2	*      *      *      *            777777777770 777777777770     *            *            000000000020 777 *   *   
FIXT2	*      *      *      *            777777777777 777777777776     *            *            000000000004 000 *   *   
ST1	*      *      *      *            *            777777777777     777777777777 *            *            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=377777 777400 C(E) =576000 000001 
FINAL
C(AC)=777777 777777 
----------

*032044  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032044 032044 032044 122200000002 777777777777 777777777777     416060000000 000000032033 0            0   746 777 
IT1	*      *      000002 *            122200000002 *                777777777777 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	032045 032045 032045 312200000003 777777777777 576200000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   776 
ET1	*      *      *      *            *            *                *            *            0            776 *   746 
ET2	*      *      *      *            *            *                *            *            0            746 *   04  SEQ 0295
SCT1	*      *      *      *            777200000000 777200000000     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            763 *   *   
SCT2	*      *      *      *            777640000000 777640000000     *            *            0            764 *   *   
SCT2	*      *      *      *            777750000000 777750000000     *            *            0            765 *   *   
SCT2	*      *      *      *            777772000000 777772000000     *            *            0            766 *   *   
SCT2	*      *      *      *            777776400000 777776400000     *            *            0            767 *   *   
SCT2	*      *      *      *            777777500000 777777500000     *            *            0            770 *   *   
SCT2	*      *      *      *            777777720000 777777720000     *            *            0            771 *   *   
SCT2	*      *      *      *            777777764000 777777764000     *            *            0            772 *   *   
SCT2	*      *      *      *            777777775000 777777775000     *            *            0            773 *   *   
SCT2	*      *      *      *            777777777200 777777777200     *            *            0            774 *   *   
SCT2	*      *      *      *            777777777640 777777777640     *            *            0            775 *   *   
SCT2	*      *      *      *            777777777750 777777777750     *            *            0            776 *   *   
SCT2	*      *      *      *            777777777772 777777777772     *            *            0            777 *   *   
FIXT2	*      *      *      *            777777777777 777777777776     *            *            001000000000 000 *   *   
ST1	*      *      *      *            *            777777777777     *            *            *            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 C(E) =576200 000000 
FINAL
C(AC)=777777 777777 
----------

*032053  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032053 032053 032053 122200000002 777777777777 777777777777     416060000000 000000032042 0            0   746 777 
IT1	*      *      000002 *            122200000002 *                777777777777 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	032054 032054 032054 312200000003 777777777777 576200000001     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   776 
ET1	*      *      *      *            *            *                *            *            0            776 *   746 
ET2	*      *      *      *            *            *                *            *            0            746 *   042 
SCT1	*      *      *      *            777200000001 777200000001     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            763 *   *   
SCT2	*      *      *      *            777640000000 777640000000     *            *            000400000000 764 *   *   
SCT2	*      *      *      *            777750000000 777750000000     *            *            000100000000 765 *   *   
SCT2	*      *      *      *            777772000000 777772000000     *            *            000020000000 766 *   *   
SCT2	*      *      *      *            777776400000 777776400000     *            *            000004000000 767 *   *   
SCT2	*      *      *      *            777777500000 777777500000     *            *            000001000000 770 *   *   
SCT2	*      *      *      *            777777720000 777777720000     *            *            000000200000 771 *   *   
SCT2	*      *      *      *            777777764000 777777764000     *            *            000000040000 772 *   *   
SCT2	*      *      *      *            777777775000 777777775000     *            *            000000010000 773 *   *   
SCT2	*      *      *      *            777777777200 777777777200     *            *            000000002000 774 *   *   
SCT2	*      *      *      *            777777777640 777777777640     *            *            000000000400 775 *   *   
SCT2	*      *      *      *            777777777750 777777777750     *            *            000000000100 776 *   *   
SCT2	*      *      *      *            777777777772 777777777772     *            *            000000000020 777 *   *   
FIXT2	*      *      *      *            777777777777 777777777776     *            *            001000000004 000 *   *   
ST1	*      *      *      *            *            777777777777     *            *            *            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 C(E) =576200 000001 
FINAL
C(AC)=777777 777777 
----------

*032061  FIX	4,000002
                                                                                                                           SEQ 0296
STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032061 032061 032061 122200000002 777777777777 577000000001     577000000001 000000032050 0            0   746 777 
IT1	*      *      000002 *            122200000002 *                777777777777 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	032062 032062 032062 302200000000 777777777777 577000000001     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   *   
ET1	*      *      *      *            *            *                *            *            0            777 *   745 
ET2	*      *      *      *            *            *                *            *            0            745 745 043 
SCT1	*      *      *      *            777000000001 777000000001     *            *            0            *   *   777 
SCT2	*      *      *      *            777400000000 777400000000     *            *            001000000000 763 *   *   
SCT2	*      *      *      *            777700000000 777700000000     *            *            000200000000 764 *   *   
SCT2	*      *      *      *            777760000000 777760000000     *            *            000040000000 765 *   *   
SCT2	*      *      *      *            777774000000 777774000000     *            *            000010000000 766 *   *   
SCT2	*      *      *      *            777777000000 777777000000     *            *            000002000000 767 *   *   
SCT2	*      *      *      *            777777600000 777777600000     *            *            000000400000 770 *   *   
SCT2	*      *      *      *            777777740000 777777740000     *            *            000000100000 771 *   *   
SCT2	*      *      *      *            777777770000 777777770000     *            *            000000020000 772 *   *   
SCT2	*      *      *      *            777777776000 777777776000     *            *            000000004000 773 *   *   
SCT2	*      *      *      *            777777777400 777777777400     *            *            000000001000 774 *   *   
SCT2	*      *      *      *            777777777700 777777777700     *            *            000000000200 775 *   *   
SCT2	*      *      *      *            777777777760 777777777760     *            *            000000000040 776 *   *   
SCT2	*      *      *      *            777777777774 777777777774     *            *            000000000010 777 *   *   
FIXT2	*      *      *      *            000000000000 777777777777     *            *            000000000002 000 *   *   
ST1	*      *      *      *            777777777777 000000000000     000000000000 *            *            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 C(E) =577000 000001 
FINAL
C(AC)=000000 000000 
----------

*032066  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032066 032066 032066 122200000002 777777777777 577400000000     577400000000 000000032057 0            0   745 777 
IT1	*      *      000002 *            122200000002 *                000000000000 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     0            *            0            0   *   *   
FT6	032067 032067 032067 302200000000 777777777777 577400000000     0            *            0            0   *   *   
ET0	*      *      *      *            *            *                0            *            0            0   *   *   
ET1	*      *      *      *            *            *                0            *            0            777 *   745 
ET2	*      *      *      *            *            *                0            *            0            745 *   043 
SCT1	*      *      *      *            777400000000 777400000000     0            *            0            *   *   777 
SCT2	*      *      *      *            777600000000 777600000000     0            *            0            763 *   *   
SCT2	*      *      *      *            777740000000 777740000000     0            *            0            764 *   *   
SCT2	*      *      *      *            777770000000 777770000000     0            *            0            765 *   *   
SCT2	*      *      *      *            777776000000 777776000000     0            *            0            766 *   *   
SCT2	*      *      *      *            777777400000 777777400000     0            *            0            767 *   *   
SCT2	*      *      *      *            777777700000 777777700000     0            *            0            770 *   *   
SCT2	*      *      *      *            777777760000 777777760000     0            *            0            771 *   *   
SCT2	*      *      *      *            777777774000 777777774000     0            *            0            772 *   *   
SCT2	*      *      *      *            777777777000 777777777000     0            *            0            773 *   *   
SCT2	*      *      *      *            777777777600 777777777600     0            *            0            774 *   *   
SCT2	*      *      *      *            777777777740 777777777740     0            *            0            775 *   *   
SCT2	*      *      *      *            777777777770 777777777770     0            *            0            776 *   *   
SCT2	*      *      *      *            777777777776 777777777776     0            *            0            777 *   *   
FIXT2	*      *      *      *            000000000000 777777777777     0            *            001000000000 000 *   *   
ST1	*      *      *      *            777777777777 000000000000     0            *            *            0   *   *   
FLAGS - INT/FINAL   000000 000000                                                                                          SEQ 0297
INITIAL
C(AC)=000000 000000 C(E) =577400 000000 
FINAL
C(AC)=000000 000000 
----------

*032074  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032074 032074 032074 122200000002 777777777777 600000000001     600000000001 000000032065 0            0   745 777 
IT1	*      *      000002 *            122200000002 *                000000000000 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     0            *            0            0   *   *   
FT6	032075 032075 032075 302200000000 777777777777 600000000001     0            *            0            0   *   *   
ET0	*      *      *      *            *            *                0            *            0            0   *   000 
ET1	*      *      *      *            *            *                0            *            0            0   *   744 
ET2	*      *      *      *            *            *                0            *            0            744 744 044 
ST1	*      *      *      *            *            000000000000     0            *            0            *   *   777 

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =600000 000001 
FINAL
C(AC)=000000 000000 
----------

*032101  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032101 032101 032101 122200000002 777777777777 177777777777     177777777777 000000032072 0            744 744 777 
IT1	*      *      000002 *            122200000002 *                000000000000 *            0            *   *   *   
MEMST	*      *      *      *            *            000000000002     0            *            0            *   *   *   
FT6	032102 032102 032102 302200000000 777777777777 177777777777     0            *            0            *   *   *   
ET0	*      *      *      *            *            *                0            *            0            *   *   *   
ET1	*      *      *      *            *            *                0            *            0            777 *   744 
ET2	*      *      *      *            *            *                0            *            0            744 *   044 
ST1	*      *      *      *            *            000000000000     0            *            0            *   *   777 

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =177777 777777 
FINAL
C(AC)=000000 000000 
----------

*032106  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032106 032106 032106 122200000002 777777777777 200400000000     200400000000 000000032100 0            744 744 777 
IT1	*      *      000002 *            122200000002 *                000000000000 *            0            *   *   *   
MEMST	*      *      *      *            *            000000000002     0            *            0            *   *   *   
FT6	032107 032107 032107 302200000000 777777777777 200400000000     0            *            0            *   *   *   
ET0	*      *      *      *            *            *                0            *            0            *   *   000 
ET1	*      *      *      *            *            *                0            *            0            000 *   745 
ET2	*      *      *      *            *            *                0            *            0            745 745 043 
SCT1	*      *      *      *            000400000000 000400000000     0            *            0            *   *   777 
SCT2	*      *      *      *            000200000000 000200000000     0            *            0            763 *   *   
SCT2	*      *      *      *            000040000000 000040000000     0            *            0            764 *   *   
SCT2	*      *      *      *            000010000000 000010000000     0            *            0            765 *   *   
SCT2	*      *      *      *            000002000000 000002000000     0            *            0            766 *   *   
SCT2	*      *      *      *            000000400000 000000400000     0            *            0            767 *   *   SEQ 0298
SCT2	*      *      *      *            000000100000 000000100000     0            *            0            770 *   *   
SCT2	*      *      *      *            000000020000 000000020000     0            *            0            771 *   *   
SCT2	*      *      *      *            000000004000 000000004000     0            *            0            772 *   *   
SCT2	*      *      *      *            000000001000 000000001000     0            *            0            773 *   *   
SCT2	*      *      *      *            000000000200 000000000200     0            *            0            774 *   *   
SCT2	*      *      *      *            000000000040 000000000040     0            *            0            775 *   *   
SCT2	*      *      *      *            000000000010 000000000010     0            *            0            776 *   *   
SCT2	*      *      *      *            000000000002 000000000002     0            *            0            777 *   *   
FIXT2	*      *      *      *            000000000001 000000000000     0            *            001000000000 000 *   *   
ST1	*      *      *      *            777777777777 0                0            *            *            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =200400 000000 
FINAL
C(AC)=000000 000000 
----------

*032113  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032113 032113 032113 122200000002 777777777777 200777777777     200777777777 000000032105 0            0   745 777 
IT1	*      *      000002 *            122200000002 *                000000000000 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     0            *            0            0   *   *   
FT6	032114 032114 032114 302200000000 777777777777 200777777777     0            *            0            0   *   *   
ET0	*      *      *      *            *            *                0            *            0            0   *   000 
ET1	*      *      *      *            *            *                0            *            0            0   *   745 
ET2	*      *      *      *            *            *                0            *            0            745 *   043 
SCT1	*      *      *      *            000777777777 000777777777     0            *            0            *   *   777 
SCT2	*      *      *      *            000377777777 000377777777     0            *            001000000000 763 *   *   
SCT2	*      *      *      *            000077777777 000077777777     0            *            001600000000 764 *   *   
SCT2	*      *      *      *            000017777777 000017777777     0            *            001740000000 765 *   *   
SCT2	*      *      *      *            000003777777 000003777777     0            *            001770000000 766 *   *   
SCT2	*      *      *      *            000000777777 000000777777     0            *            001776000000 767 *   *   
SCT2	*      *      *      *            000000177777 000000177777     0            *            001777400000 770 *   *   
SCT2	*      *      *      *            000000037777 000000037777     0            *            001777700000 771 *   *   
SCT2	*      *      *      *            000000007777 000000007777     0            *            001777760000 772 *   *   
SCT2	*      *      *      *            000000001777 000000001777     0            *            001777774000 773 *   *   
SCT2	*      *      *      *            000000000377 000000000377     0            *            001777777000 774 *   *   
SCT2	*      *      *      *            000000000077 000000000077     0            *            001777777600 775 *   *   
SCT2	*      *      *      *            000000000017 000000000017     0            *            001777777740 776 *   *   
SCT2	*      *      *      *            000000000003 000000000003     0            *            001777777770 777 *   *   
FIXT2	*      *      *      *            000000000001 000000000000     0            *            001777777776 000 *   *   
ST1	*      *      *      *            777777777777 0                0            *            *            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =200777 777777 
FINAL
C(AC)=000000 000000 
----------

*032120  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032120 032120 032120 122200000002 777777777777 201577777777     201577777777 000000032112 0            0   745 777 
IT1	*      *      000002 *            122200000002 *                000000000000 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     0            *            0            0   *   *   
FT6	032121 032121 032121 302200000001 777777777777 201577777777     0            *            0            0   *   *   
ET0	*      *      *      *            *            *                0            *            0            0   *   00  SEQ 0299
ET1	*      *      *      *            *            *                0            *            0            001 *   746 
ET2	*      *      *      *            *            *                0            *            0            746 746 042 
SCT1	*      *      *      *            000577777777 000577777777     0            *            0            *   *   777 
SCT2	*      *      *      *            *            *                0            *            0            763 *   *   
SCT2	*      *      *      *            000137777777 000137777777     0            *            001400000000 764 *   *   
SCT2	*      *      *      *            000027777777 000027777777     0            *            001700000000 765 *   *   
SCT2	*      *      *      *            000005777777 000005777777     0            *            001760000000 766 *   *   
SCT2	*      *      *      *            000001377777 000001377777     0            *            001774000000 767 *   *   
SCT2	*      *      *      *            000000277777 000000277777     0            *            001777000000 770 *   *   
SCT2	*      *      *      *            000000057777 000000057777     0            *            001777600000 771 *   *   
SCT2	*      *      *      *            000000013777 000000013777     0            *            001777740000 772 *   *   
SCT2	*      *      *      *            000000002777 000000002777     0            *            001777770000 773 *   *   
SCT2	*      *      *      *            000000000577 000000000577     0            *            001777776000 774 *   *   
SCT2	*      *      *      *            000000000137 000000000137     0            *            001777777400 775 *   *   
SCT2	*      *      *      *            000000000027 000000000027     0            *            001777777700 776 *   *   
SCT2	*      *      *      *            000000000005 000000000005     0            *            001777777760 777 *   *   
FIXT2	*      *      *      *            000000000002 000000000001     0            *            000777777774 000 *   *   
ST1	*      *      *      *            777777777777 *                000000000001 *            *            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =201577 777777 
FINAL
C(AC)=000000 000001 
----------

*032125  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032125 032125 032125 122200000002 777777777777 201600000000     201600000000 000000032117 0            0   746 777 
IT1	*      *      000002 *            122200000002 *                000000000001 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	032126 032126 032126 302200000001 777777777777 201600000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   001 
ET1	*      *      *      *            *            *                *            *            0            001 *   746 
ET2	*      *      *      *            *            *                *            *            0            746 *   042 
SCT1	*      *      *      *            000600000000 000600000000     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            763 *   *   
SCT2	*      *      *      *            000140000000 000140000000     *            *            0            764 *   *   
SCT2	*      *      *      *            000030000000 000030000000     *            *            0            765 *   *   
SCT2	*      *      *      *            000006000000 000006000000     *            *            0            766 *   *   
SCT2	*      *      *      *            000001400000 000001400000     *            *            0            767 *   *   
SCT2	*      *      *      *            000000300000 000000300000     *            *            0            770 *   *   
SCT2	*      *      *      *            000000060000 000000060000     *            *            0            771 *   *   
SCT2	*      *      *      *            000000014000 000000014000     *            *            0            772 *   *   
SCT2	*      *      *      *            000000003000 000000003000     *            *            0            773 *   *   
SCT2	*      *      *      *            000000000600 000000000600     *            *            0            774 *   *   
SCT2	*      *      *      *            000000000140 000000000140     *            *            0            775 *   *   
SCT2	*      *      *      *            000000000030 000000000030     *            *            0            776 *   *   
SCT2	*      *      *      *            000000000006 000000000006     *            *            0            777 *   *   
FIXT2	*      *      *      *            000000000002 000000000001     *            *            001000000000 000 *   *   
ST1	*      *      *      *            777777777777 *                *            *            *            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000001 C(E) =201600 000000 
FINAL
C(AC)=000000 000001 
----------
                                                                                                                           SEQ 0300
*032132  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032132 032132 032132 122200000002 777777777777 201777777777     201777777777 000000032124 0            0   746 777 
IT1	*      *      000002 *            122200000002 *                000000000001 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	032133 032133 032133 302200000001 777777777777 201777777777     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   001 
ET1	*      *      *      *            *            *                *            *            0            001 *   746 
ET2	*      *      *      *            *            *                *            *            0            746 *   042 
SCT1	*      *      *      *            000777777777 000777777777     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            763 *   *   
SCT2	*      *      *      *            000177777777 000177777777     *            *            001400000000 764 *   *   
SCT2	*      *      *      *            000037777777 000037777777     *            *            001700000000 765 *   *   
SCT2	*      *      *      *            000007777777 000007777777     *            *            001760000000 766 *   *   
SCT2	*      *      *      *            000001777777 000001777777     *            *            001774000000 767 *   *   
SCT2	*      *      *      *            000000377777 000000377777     *            *            001777000000 770 *   *   
SCT2	*      *      *      *            000000077777 000000077777     *            *            001777600000 771 *   *   
SCT2	*      *      *      *            000000017777 000000017777     *            *            001777740000 772 *   *   
SCT2	*      *      *      *            000000003777 000000003777     *            *            001777770000 773 *   *   
SCT2	*      *      *      *            000000000777 000000000777     *            *            001777776000 774 *   *   
SCT2	*      *      *      *            000000000177 000000000177     *            *            001777777400 775 *   *   
SCT2	*      *      *      *            000000000037 000000000037     *            *            001777777700 776 *   *   
SCT2	*      *      *      *            000000000007 000000000007     *            *            001777777760 777 *   *   
FIXT2	*      *      *      *            000000000002 000000000001     *            *            001777777774 000 *   *   
ST1	*      *      *      *            777777777777 *                *            *            *            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000001 C(E) =201777 777777 
FINAL
C(AC)=000000 000001 
----------

*032145  FIX	4,036524

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032145 032145 032145 122200036524 777777777777 777777777777     416060000000 000000032131 0            0   746 777 
IT1	*      *      036524 *            122200036524 *                000000000001 *            0            0   *   *   
MEMST	*      *      *      *            *            000000036524     *            *            0            0   *   *   
FT6	032146 032146 032146 312200000003 777777777777 576200000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   776 
ET1	*      *      *      *            *            *                *            *            0            776 *   746 
ET2	*      *      *      *            *            *                *            *            0            746 *   042 
SCT1	*      *      *      *            777200000000 777200000000     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            763 *   *   
SCT2	*      *      *      *            777640000000 777640000000     *            *            0            764 *   *   
SCT2	*      *      *      *            777750000000 777750000000     *            *            0            765 *   *   
SCT2	*      *      *      *            777772000000 777772000000     *            *            0            766 *   *   
SCT2	*      *      *      *            777776400000 777776400000     *            *            0            767 *   *   
SCT2	*      *      *      *            777777500000 777777500000     *            *            0            770 *   *   
SCT2	*      *      *      *            777777720000 777777720000     *            *            0            771 *   *   
SCT2	*      *      *      *            777777764000 777777764000     *            *            0            772 *   *   
SCT2	*      *      *      *            777777775000 777777775000     *            *            0            773 *   *   
SCT2	*      *      *      *            777777777200 777777777200     *            *            0            774 *   *   
SCT2	*      *      *      *            777777777640 777777777640     *            *            0            775 *   *   
SCT2	*      *      *      *            777777777750 777777777750     *            *            0            776 *   *   
SCT2	*      *      *      *            777777777772 777777777772     *            *            0            777 *   *   
FIXT2	*      *      *      *            777777777777 777777777776     *            *            001000000000 000 *   *   
ST1	*      *      *      *            *            777777777777     777777777777 *            *            0   *   *   SEQ 0301

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000001 C(E) =576200 000000 
FINAL
C(AC)=777777 777777 
----------

*032152  FIXR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032152 032152 032152 126200000002 777777777777 233525252525     233525252525 000000032142 0            0   746 777 
IT1	*      *      000002 *            126200000002 *                777777777777 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	032153 032153 032153 312100036735 777777777777 233525252525     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   033 
ET1	*      *      *      *            *            *                *            *            0            033 *   000 
ET2	*      *      *      *            *            *                *            *            0            000 000 010 
FIXT1	*      *      *      *            *            000525252525     *            *            0            0   0   000 
ST1	*      *      *      *            *            *                000525252525 *            0            0   0   777 

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 C(E) =233525 252525 
FINAL
C(AC)=000525 252525 
----------

*032161  FIXR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032161 032161 032161 126200000002 777777777777 777777777776     777777777776 000000032151 0            0   0   777 
IT1	*      *      000002 *            126200000002 *                000525252525 *            0            0   0   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   0   *   
FT6	032162 032162 032162 312200000003 777777777777 576000000001     *            *            0            0   0   *   
ET0	*      *      *      *            *            *                *            *            0            0   0   776 
ET1	*      *      *      *            *            *                *            *            0            776 0   746 
ET2	*      *      *      *            *            *                *            *            0            746 746 042 
SCT1	*      *      *      *            777000000001 777000000001     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            763 *   *   
SCT2	*      *      *      *            777600000000 777600000000     *            *            000400000000 764 *   *   
SCT2	*      *      *      *            777740000000 777740000000     *            *            000100000000 765 *   *   
SCT2	*      *      *      *            777770000000 777770000000     *            *            000020000000 766 *   *   
SCT2	*      *      *      *            777776000000 777776000000     *            *            000004000000 767 *   *   
SCT2	*      *      *      *            777777400000 777777400000     *            *            000001000000 770 *   *   
SCT2	*      *      *      *            777777700000 777777700000     *            *            000000200000 771 *   *   
SCT2	*      *      *      *            777777760000 777777760000     *            *            000000040000 772 *   *   
SCT2	*      *      *      *            777777774000 777777774000     *            *            000000010000 773 *   *   
SCT2	*      *      *      *            777777777000 777777777000     *            *            000000002000 774 *   *   
SCT2	*      *      *      *            777777777600 777777777600     *            *            000000000400 775 *   *   
SCT2	*      *      *      *            777777777740 777777777740     *            *            000000000100 776 *   *   
SCT2	*      *      *      *            777777777770 777777777770     *            *            000000000020 777 *   *   
FIXT2	*      *      *      *            777777777777 777777777776     *            *            000000000004 000 *   *   
ST1	*      *      *      *            *            *                777777777776 *            *            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000525 252525 C(E) =576000 000001 
FINAL
C(AC)=777777 777776                                                                                                        SEQ 0302
----------

*032167  FIXR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032167 032167 032167 126200000002 777777777777 777777777777     416060000000 000000032156 0            0   746 777 
IT1	*      *      000002 *            126200000002 *                777777777776 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	032170 032170 032170 312200000003 777777777777 576200000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   776 
ET1	*      *      *      *            *            *                *            *            0            776 *   746 
ET2	*      *      *      *            *            *                *            *            0            746 *   042 
SCT1	*      *      *      *            777200000000 777200000000     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            763 *   *   
SCT2	*      *      *      *            777640000000 777640000000     *            *            0            764 *   *   
SCT2	*      *      *      *            777750000000 777750000000     *            *            0            765 *   *   
SCT2	*      *      *      *            777772000000 777772000000     *            *            0            766 *   *   
SCT2	*      *      *      *            777776400000 777776400000     *            *            0            767 *   *   
SCT2	*      *      *      *            777777500000 777777500000     *            *            0            770 *   *   
SCT2	*      *      *      *            777777720000 777777720000     *            *            0            771 *   *   
SCT2	*      *      *      *            777777764000 777777764000     *            *            0            772 *   *   
SCT2	*      *      *      *            777777775000 777777775000     *            *            0            773 *   *   
SCT2	*      *      *      *            777777777200 777777777200     *            *            0            774 *   *   
SCT2	*      *      *      *            777777777640 777777777640     *            *            0            775 *   *   
SCT2	*      *      *      *            777777777750 777777777750     *            *            0            776 *   *   
SCT2	*      *      *      *            777777777772 777777777772     *            *            0            777 *   *   
FIXT2	*      *      *      *            777777777777 777777777776     *            *            001000000000 000 *   *   
ST1	*      *      *      *            *            777777777777     777777777777 *            *            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777776 C(E) =576200 000000 
FINAL
C(AC)=777777 777777 
----------

*032176  FIXR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032176 032176 032176 126200000002 777777777777 777777777777     416060000000 000000032165 0            0   746 777 
IT1	*      *      000002 *            126200000002 *                777777777777 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	032177 032177 032177 312200000003 777777777777 576200000001     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   776 
ET1	*      *      *      *            *            *                *            *            0            776 *   746 
ET2	*      *      *      *            *            *                *            *            0            746 *   042 
SCT1	*      *      *      *            777200000001 777200000001     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            763 *   *   
SCT2	*      *      *      *            777640000000 777640000000     *            *            000400000000 764 *   *   
SCT2	*      *      *      *            777750000000 777750000000     *            *            000100000000 765 *   *   
SCT2	*      *      *      *            777772000000 777772000000     *            *            000020000000 766 *   *   
SCT2	*      *      *      *            777776400000 777776400000     *            *            000004000000 767 *   *   
SCT2	*      *      *      *            777777500000 777777500000     *            *            000001000000 770 *   *   
SCT2	*      *      *      *            777777720000 777777720000     *            *            000000200000 771 *   *   
SCT2	*      *      *      *            777777764000 777777764000     *            *            000000040000 772 *   *   
SCT2	*      *      *      *            777777775000 777777775000     *            *            000000010000 773 *   *   
SCT2	*      *      *      *            777777777200 777777777200     *            *            000000002000 774 *   *   
SCT2	*      *      *      *            777777777640 777777777640     *            *            000000000400 775 *   *   
SCT2	*      *      *      *            777777777750 777777777750     *            *            000000000100 776 *   *   
SCT2	*      *      *      *            777777777772 777777777772     *            *            000000000020 777 *   *   SEQ 0303
FIXT2	*      *      *      *            777777777777 777777777776     *            *            001000000004 000 *   *   
ST1	*      *      *      *            *            777777777777     *            *            *            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 C(E) =576200 000001 
FINAL
C(AC)=777777 777777 
----------

*032205  FIXR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032205 032205 032205 126200000002 777777777777 777777777777     416060000000 000000032173 0            0   746 777 
IT1	*      *      000002 *            126200000002 *                777777777777 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	032206 032206 032206 312200000003 777777777777 577000000001     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   *   
ET1	*      *      *      *            *            *                *            *            0            777 *   745 
ET2	*      *      *      *            *            *                *            *            0            745 745 043 
SCT1	*      *      *      *            777000000001 777000000001     *            *            0            *   *   777 
SCT2	*      *      *      *            777400000000 777400000000     *            *            001000000000 763 *   *   
SCT2	*      *      *      *            777700000000 777700000000     *            *            000200000000 764 *   *   
SCT2	*      *      *      *            777760000000 777760000000     *            *            000040000000 765 *   *   
SCT2	*      *      *      *            777774000000 777774000000     *            *            000010000000 766 *   *   
SCT2	*      *      *      *            777777000000 777777000000     *            *            000002000000 767 *   *   
SCT2	*      *      *      *            777777600000 777777600000     *            *            000000400000 770 *   *   
SCT2	*      *      *      *            777777740000 777777740000     *            *            000000100000 771 *   *   
SCT2	*      *      *      *            777777770000 777777770000     *            *            000000020000 772 *   *   
SCT2	*      *      *      *            777777776000 777777776000     *            *            000000004000 773 *   *   
SCT2	*      *      *      *            777777777400 777777777400     *            *            000000001000 774 *   *   
SCT2	*      *      *      *            777777777700 777777777700     *            *            000000000200 775 *   *   
SCT2	*      *      *      *            777777777760 777777777760     *            *            000000000040 776 *   *   
SCT2	*      *      *      *            777777777774 777777777774     *            *            000000000010 777 *   *   
FIXT2	*      *      *      *            000000000000 777777777777     *            *            000000000002 000 *   *   
ST1	*      *      *      *            777777777777 *                *            *            *            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 C(E) =577000 000001 
FINAL
C(AC)=777777 777777 
----------

*032212  FIXR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032212 032212 032212 126200000002 777777777777 577400000000     577400000000 000000032202 0            0   745 777 
IT1	*      *      000002 *            126200000002 *                777777777777 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	032213 032213 032213 302200000000 777777777777 577400000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   *   
ET1	*      *      *      *            *            *                *            *            0            777 *   745 
ET2	*      *      *      *            *            *                *            *            0            745 *   043 
SCT1	*      *      *      *            777400000000 777400000000     *            *            0            *   *   777 
SCT2	*      *      *      *            777600000000 777600000000     *            *            0            763 *   *   
SCT2	*      *      *      *            777740000000 777740000000     *            *            0            764 *   *   
SCT2	*      *      *      *            777770000000 777770000000     *            *            0            765 *   *   
SCT2	*      *      *      *            777776000000 777776000000     *            *            0            766 *   *   
SCT2	*      *      *      *            777777400000 777777400000     *            *            0            767 *   *   SEQ 0304
SCT2	*      *      *      *            777777700000 777777700000     *            *            0            770 *   *   
SCT2	*      *      *      *            777777760000 777777760000     *            *            0            771 *   *   
SCT2	*      *      *      *            777777774000 777777774000     *            *            0            772 *   *   
SCT2	*      *      *      *            777777777000 777777777000     *            *            0            773 *   *   
SCT2	*      *      *      *            777777777600 777777777600     *            *            0            774 *   *   
SCT2	*      *      *      *            777777777740 777777777740     *            *            0            775 *   *   
SCT2	*      *      *      *            777777777770 777777777770     *            *            0            776 *   *   
SCT2	*      *      *      *            777777777776 777777777776     *            *            0            777 *   *   
FIXT2	*      *      *      *            000000000000 777777777777     *            *            001000000000 000 *   *   
ST1	*      *      *      *            777777777777 000000000000     000000000000 *            *            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=777777 777777 C(E) =577400 000000 
FINAL
C(AC)=000000 000000 
----------

*032220  FIXR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032220 032220 032220 126200000002 777777777777 600000000001     600000000001 000000032211 0            0   745 777 
IT1	*      *      000002 *            126200000002 *                000000000000 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     0            *            0            0   *   *   
FT6	032221 032221 032221 302200000000 777777777777 600000000001     0            *            0            0   *   *   
ET0	*      *      *      *            *            *                0            *            0            0   *   000 
ET1	*      *      *      *            *            *                0            *            0            0   *   744 
ET2	*      *      *      *            *            *                0            *            0            744 744 044 
ST1	*      *      *      *            *            000000000000     0            *            0            *   *   777 

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =600000 000001 
FINAL
C(AC)=000000 000000 
----------

*032225  FIXR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032225 032225 032225 126200000002 777777777777 177777777777     177777777777 000000032216 0            744 744 777 
IT1	*      *      000002 *            126200000002 *                000000000000 *            0            *   *   *   
MEMST	*      *      *      *            *            000000000002     0            *            0            *   *   *   
FT6	032226 032226 032226 302200000000 777777777777 177777777777     0            *            0            *   *   *   
ET0	*      *      *      *            *            *                0            *            0            *   *   *   
ET1	*      *      *      *            *            *                0            *            0            777 *   744 
ET2	*      *      *      *            *            *                0            *            0            744 *   044 
ST1	*      *      *      *            *            000000000000     0            *            0            *   *   777 

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =177777 777777 
FINAL
C(AC)=000000 000000 
----------

*032232  FIXR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032232 032232 032232 126200000002 777777777777 200400000000     200400000000 000000032224 0            744 744 77  SEQ 0305
IT1	*      *      000002 *            126200000002 *                000000000000 *            0            *   *   *   
MEMST	*      *      *      *            *            000000000002     0            *            0            *   *   *   
FT6	032233 032233 032233 302200000001 777777777777 200400000000     0            *            0            *   *   *   
ET0	*      *      *      *            *            *                0            *            0            *   *   000 
ET1	*      *      *      *            *            *                0            *            0            000 *   745 
ET2	*      *      *      *            *            *                0            *            0            745 745 043 
SCT1	*      *      *      *            000400000000 000400000000     0            *            0            *   *   777 
SCT2	*      *      *      *            000200000000 000200000000     0            *            0            763 *   *   
SCT2	*      *      *      *            000040000000 000040000000     0            *            0            764 *   *   
SCT2	*      *      *      *            000010000000 000010000000     0            *            0            765 *   *   
SCT2	*      *      *      *            000002000000 000002000000     0            *            0            766 *   *   
SCT2	*      *      *      *            000000400000 000000400000     0            *            0            767 *   *   
SCT2	*      *      *      *            000000100000 000000100000     0            *            0            770 *   *   
SCT2	*      *      *      *            000000020000 000000020000     0            *            0            771 *   *   
SCT2	*      *      *      *            000000004000 000000004000     0            *            0            772 *   *   
SCT2	*      *      *      *            000000001000 000000001000     0            *            0            773 *   *   
SCT2	*      *      *      *            000000000200 000000000200     0            *            0            774 *   *   
SCT2	*      *      *      *            000000000040 000000000040     0            *            0            775 *   *   
SCT2	*      *      *      *            000000000010 000000000010     0            *            0            776 *   *   
SCT2	*      *      *      *            000000000002 000000000002     0            *            0            777 *   *   
FIXT2	*      *      *      *            000000000001 000000000000     0            *            001000000000 000 *   *   
ST1	*      *      *      *            777777777777 000000000001     000000000001 *            *            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000000 C(E) =200400 000000 
FINAL
C(AC)=000000 000001 
----------

*032237  FIXR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032237 032237 032237 126200000002 777777777777 200777777777     200777777777 000000032231 0            0   745 777 
IT1	*      *      000002 *            126200000002 *                000000000001 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	032240 032240 032240 302200000001 777777777777 200777777777     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   000 
ET1	*      *      *      *            *            *                *            *            0            0   *   745 
ET2	*      *      *      *            *            *                *            *            0            745 *   043 
SCT1	*      *      *      *            000777777777 000777777777     *            *            0            *   *   777 
SCT2	*      *      *      *            000377777777 000377777777     *            *            001000000000 763 *   *   
SCT2	*      *      *      *            000077777777 000077777777     *            *            001600000000 764 *   *   
SCT2	*      *      *      *            000017777777 000017777777     *            *            001740000000 765 *   *   
SCT2	*      *      *      *            000003777777 000003777777     *            *            001770000000 766 *   *   
SCT2	*      *      *      *            000000777777 000000777777     *            *            001776000000 767 *   *   
SCT2	*      *      *      *            000000177777 000000177777     *            *            001777400000 770 *   *   
SCT2	*      *      *      *            000000037777 000000037777     *            *            001777700000 771 *   *   
SCT2	*      *      *      *            000000007777 000000007777     *            *            001777760000 772 *   *   
SCT2	*      *      *      *            000000001777 000000001777     *            *            001777774000 773 *   *   
SCT2	*      *      *      *            000000000377 000000000377     *            *            001777777000 774 *   *   
SCT2	*      *      *      *            000000000077 000000000077     *            *            001777777600 775 *   *   
SCT2	*      *      *      *            000000000017 000000000017     *            *            001777777740 776 *   *   
SCT2	*      *      *      *            000000000003 000000000003     *            *            001777777770 777 *   *   
FIXT2	*      *      *      *            000000000001 000000000000     *            *            001777777776 000 *   *   
ST1	*      *      *      *            777777777777 000000000001     *            *            *            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000001 C(E) =200777 777777                                                                                    SEQ 0306
FINAL
C(AC)=000000 000001 
----------

*032244  FIXR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032244 032244 032244 126200000002 777777777777 201577777777     201577777777 000000032236 0            0   745 777 
IT1	*      *      000002 *            126200000002 *                000000000001 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	032245 032245 032245 302200000001 777777777777 201577777777     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   001 
ET1	*      *      *      *            *            *                *            *            0            001 *   746 
ET2	*      *      *      *            *            *                *            *            0            746 746 042 
SCT1	*      *      *      *            000577777777 000577777777     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            763 *   *   
SCT2	*      *      *      *            000137777777 000137777777     *            *            001400000000 764 *   *   
SCT2	*      *      *      *            000027777777 000027777777     *            *            001700000000 765 *   *   
SCT2	*      *      *      *            000005777777 000005777777     *            *            001760000000 766 *   *   
SCT2	*      *      *      *            000001377777 000001377777     *            *            001774000000 767 *   *   
SCT2	*      *      *      *            000000277777 000000277777     *            *            001777000000 770 *   *   
SCT2	*      *      *      *            000000057777 000000057777     *            *            001777600000 771 *   *   
SCT2	*      *      *      *            000000013777 000000013777     *            *            001777740000 772 *   *   
SCT2	*      *      *      *            000000002777 000000002777     *            *            001777770000 773 *   *   
SCT2	*      *      *      *            000000000577 000000000577     *            *            001777776000 774 *   *   
SCT2	*      *      *      *            000000000137 000000000137     *            *            001777777400 775 *   *   
SCT2	*      *      *      *            000000000027 000000000027     *            *            001777777700 776 *   *   
SCT2	*      *      *      *            000000000005 000000000005     *            *            001777777760 777 *   *   
FIXT2	*      *      *      *            000000000002 000000000001     *            *            000777777774 000 *   *   
ST1	*      *      *      *            777777777777 *                *            *            *            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000001 C(E) =201577 777777 
FINAL
C(AC)=000000 000001 
----------

*032251  FIXR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032251 032251 032251 126200000002 777777777777 201600000000     201600000000 000000032243 0            0   746 777 
IT1	*      *      000002 *            126200000002 *                000000000001 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	032252 032252 032252 302200000002 777777777777 201600000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   001 
ET1	*      *      *      *            *            *                *            *            0            001 *   746 
ET2	*      *      *      *            *            *                *            *            0            746 *   042 
SCT1	*      *      *      *            000600000000 000600000000     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            763 *   *   
SCT2	*      *      *      *            000140000000 000140000000     *            *            0            764 *   *   
SCT2	*      *      *      *            000030000000 000030000000     *            *            0            765 *   *   
SCT2	*      *      *      *            000006000000 000006000000     *            *            0            766 *   *   
SCT2	*      *      *      *            000001400000 000001400000     *            *            0            767 *   *   
SCT2	*      *      *      *            000000300000 000000300000     *            *            0            770 *   *   
SCT2	*      *      *      *            000000060000 000000060000     *            *            0            771 *   *   
SCT2	*      *      *      *            000000014000 000000014000     *            *            0            772 *   *   
SCT2	*      *      *      *            000000003000 000000003000     *            *            0            773 *   *   
SCT2	*      *      *      *            000000000600 000000000600     *            *            0            774 *   *   
SCT2	*      *      *      *            000000000140 000000000140     *            *            0            775 *   *   SEQ 0307
SCT2	*      *      *      *            000000000030 000000000030     *            *            0            776 *   *   
SCT2	*      *      *      *            000000000006 000000000006     *            *            0            777 *   *   
FIXT2	*      *      *      *            000000000002 000000000001     *            *            001000000000 000 *   *   
ST1	*      *      *      *            777777777777 000000000002     000000000002 *            *            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000001 C(E) =201600 000000 
FINAL
C(AC)=000000 000002 
----------

*032256  FIXR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032256 032256 032256 126200000002 777777777777 201777777777     201777777777 000000032250 0            0   746 777 
IT1	*      *      000002 *            126200000002 *                000000000002 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	032257 032257 032257 302200000002 777777777777 201777777777     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   001 
ET1	*      *      *      *            *            *                *            *            0            001 *   746 
ET2	*      *      *      *            *            *                *            *            0            746 *   042 
SCT1	*      *      *      *            000777777777 000777777777     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            763 *   *   
SCT2	*      *      *      *            000177777777 000177777777     *            *            001400000000 764 *   *   
SCT2	*      *      *      *            000037777777 000037777777     *            *            001700000000 765 *   *   
SCT2	*      *      *      *            000007777777 000007777777     *            *            001760000000 766 *   *   
SCT2	*      *      *      *            000001777777 000001777777     *            *            001774000000 767 *   *   
SCT2	*      *      *      *            000000377777 000000377777     *            *            001777000000 770 *   *   
SCT2	*      *      *      *            000000077777 000000077777     *            *            001777600000 771 *   *   
SCT2	*      *      *      *            000000017777 000000017777     *            *            001777740000 772 *   *   
SCT2	*      *      *      *            000000003777 000000003777     *            *            001777770000 773 *   *   
SCT2	*      *      *      *            000000000777 000000000777     *            *            001777776000 774 *   *   
SCT2	*      *      *      *            000000000177 000000000177     *            *            001777777400 775 *   *   
SCT2	*      *      *      *            000000000037 000000000037     *            *            001777777700 776 *   *   
SCT2	*      *      *      *            000000000007 000000000007     *            *            001777777760 777 *   *   
FIXT2	*      *      *      *            000000000002 000000000001     *            *            001777777774 000 *   *   
ST1	*      *      *      *            777777777777 000000000002     *            *            *            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000002 C(E) =201777 777777 
FINAL
C(AC)=000000 000002 
----------

*032266  FIXR	4,036524

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032266 032266 032266 126200036524 777777777777 777777777776     777777777776 000000032255 0            0   746 777 
IT1	*      *      036524 *            126200036524 *                000000000002 *            0            0   *   *   
MEMST	*      *      *      *            *            000000036524     *            *            0            0   *   *   
FT6	032267 032267 032267 312200000003 777777777777 576000000001     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   776 
ET1	*      *      *      *            *            *                *            *            0            776 *   746 
ET2	*      *      *      *            *            *                *            *            0            746 *   042 
SCT1	*      *      *      *            777000000001 777000000001     *            *            0            *   *   777 
SCT2	*      *      *      *            *            *                *            *            0            763 *   *   
SCT2	*      *      *      *            777600000000 777600000000     *            *            000400000000 764 *   *   
SCT2	*      *      *      *            777740000000 777740000000     *            *            000100000000 765 *   *   SEQ 0308
SCT2	*      *      *      *            777770000000 777770000000     *            *            000020000000 766 *   *   
SCT2	*      *      *      *            777776000000 777776000000     *            *            000004000000 767 *   *   
SCT2	*      *      *      *            777777400000 777777400000     *            *            000001000000 770 *   *   
SCT2	*      *      *      *            777777700000 777777700000     *            *            000000200000 771 *   *   
SCT2	*      *      *      *            777777760000 777777760000     *            *            000000040000 772 *   *   
SCT2	*      *      *      *            777777774000 777777774000     *            *            000000010000 773 *   *   
SCT2	*      *      *      *            777777777000 777777777000     *            *            000000002000 774 *   *   
SCT2	*      *      *      *            777777777600 777777777600     *            *            000000000400 775 *   *   
SCT2	*      *      *      *            777777777740 777777777740     *            *            000000000100 776 *   *   
SCT2	*      *      *      *            777777777770 777777777770     *            *            000000000020 777 *   *   
FIXT2	*      *      *      *            777777777777 777777777776     *            *            000000000004 000 *   *   
ST1	*      *      *      *            *            *                777777777776 *            *            0   *   *   

FLAGS - INT/FINAL   000000 000000 
INITIAL
C(AC)=000000 000002 C(E) =576000 000001 
FINAL
C(AC)=777777 777776 
----------

*032303  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032303 032303 032303 122200000002 777777777777 777777777777     777777777777 000000032272 0            0   746 777 
IT1	*      *      000002 *            122200000002 *                *            *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	032304 032304 032304 312200000003 777777777777 244400000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   044 
ET1	*      *      *      *            *            *                *            *            0            044 *   011 
ET2	*      *      *      *            *            *                *            *            0            011 011 777 

FLAGS - INT/FINAL   000000 400200 
INITIAL
C(AC)=777777 777777 C(E) =244400 000000 
FINAL
C(AC)=777777 777777 
----------

*032316  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032316 032316 032316 122200000002 777777777777 377777777400     377777777400 000000032300 0            011 011 777 
IT1	*      *      000002 *            122200000002 *                777777777777 *            0            *   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            *   *   *   
FT6	032317 032317 032317 312200000003 777777777777 243777777777     *            *            0            *   *   *   
ET0	*      *      *      *            *            *                *            *            0            *   *   043 
ET1	*      *      *      *            *            *                *            *            0            043 *   010 
ET2	*      *      *      *            *            *                *            *            0            010 010 000 
FIXT1	*      *      *      *            *            000777777777     *            *            0            *   *   770 
SCT2	*      *      *      *            000777777777 *                *            *            0            770 *   777 
SCT2	*      *      *      *            001777777776 001777777776     *            *            0            771 *   *   
SCT2	*      *      *      *            003777777774 003777777774     *            *            0            772 *   *   
SCT2	*      *      *      *            007777777770 007777777770     *            *            0            773 *   *   
SCT2	*      *      *      *            017777777760 017777777760     *            *            0            774 *   *   
SCT2	*      *      *      *            037777777740 037777777740     *            *            0            775 *   *   
SCT2	*      *      *      *            077777777700 077777777700     *            *            0            776 *   *   
SCT2	*      *      *      *            177777777600 177777777600     *            *            0            777 *   *   
FIXT2	*      *      *      *            377777777401 377777777400     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                377777777400 *            0            0   *   *   
                                                                                                                           SEQ 0309
FLAGS - INT/FINAL   000200 000200 
INITIAL
C(AC)=777777 777777 C(E) =243777 777777 
FINAL
C(AC)=377777 777400 
----------

*032331  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032331 032331 032331 122200000002 777777777777 777777777777     777777777777 000000032312 0            0   010 777 
IT1	*      *      000002 *            122200000002 *                *            *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   
FT6	032332 032332 032332 312200000003 777777777777 533400000000     *            *            0            0   *   *   
ET0	*      *      *      *            *            *                *            *            0            0   *   733 
ET1	*      *      *      *            *            *                *            *            0            733 *   011 
ET2	*      *      *      *            *            *                *            *            0            011 011 777 

FLAGS - INT/FINAL   000200 400200 
INITIAL
C(AC)=777777 777777 C(E) =533400 000000 
FINAL
C(AC)=777777 777777 
----------

*032345  FIX	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032345 032345 032345 122200000002 777777777777 400000000400     400000000400 400000000000 0            011 011 777 
IT1	*      *      000002 *            122200000002 *                777777777777 *            0            *   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            *   *   *   
FT6	032346 032346 032346 312200000003 777777777777 534000000001     *            *            0            *   *   *   
ET0	*      *      *      *            *            *                *            *            0            *   *   734 
ET1	*      *      *      *            *            *                *            *            0            734 *   010 
ET2	*      *      *      *            *            *                *            *            0            010 010 000 
FIXT1	*      *      *      *            *            777000000001     *            *            0            *   *   770 
SCT2	*      *      *      *            777000000001 *                *            *            0            770 *   777 
SCT2	*      *      *      *            776000000002 776000000002     *            *            0            771 *   *   
SCT2	*      *      *      *            774000000004 774000000004     *            *            0            772 *   *   
SCT2	*      *      *      *            770000000010 770000000010     *            *            0            773 *   *   
SCT2	*      *      *      *            760000000020 760000000020     *            *            0            774 *   *   
SCT2	*      *      *      *            740000000040 740000000040     *            *            0            775 *   *   
SCT2	*      *      *      *            700000000100 700000000100     *            *            0            776 *   *   
SCT2	*      *      *      *            600000000200 600000000200     *            *            0            777 *   *   
FIXT2	*      *      *      *            400000000401 400000000400     *            *            0            000 *   *   
ST1	*      *      *      *            777777777777 *                400000000400 *            0            0   *   *   

FLAGS - INT/FINAL   000200 000200 
INITIAL
C(AC)=777777 777777 C(E) =534000 000001 
FINAL
C(AC)=400000 000400 
----------

*032356  FLTR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032356 032356 032356 127200000002 777777777777 252525252525     252525252525 000000032340 0            0   010 777 
IT1	*      *      000002 *            127200000002 *                400000000400 *            0            0   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            0   *   *   SEQ 0310
FT6	032357 032357 032357 312100036736 777777777777 252525252525     *            *            0            0   *   *   
ET2	*      *      *      *            *            *                *            *            0            0   *   774 
SCT2	*      *      *      *            252525252525 *                *            *            0            774 *   777 
SCT2	*      *      *      *            052525252525 052525252525     *            *            000400000000 775 *   *   
SCT2	*      *      *      *            012525252525 012525252525     *            *            000500000000 776 *   *   
SCT2	*      *      *      *            002525252525 002525252525     *            *            000520000000 777 *   *   
NRT1	*      *      *      *            000525252525 000525252525     *            *            000524000000 000 *   735 
NRT4	*      *      *      *            *            *                *            *            *            735 *   043 
ST1	*      *      *      *            777777777777 243525252525     243525252525 *            001252000000 *   *   745 

FLAGS - INT/FINAL   000200 000200 
INITIAL
C(AC)=400000 000400 C(E) =252525 252525 
FINAL
C(AC)=243525 252525 
----------

*032364  FLTR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032364 032364 032364 127200000002 777777777777 243400000000     243400000000 000000023415 0            735 010 777 
IT1	*      *      000002 *            127200000002 *                243525252525 *            0            *   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            *   *   *   
FT6	032365 032365 032365 312200000003 777777777777 200000000000     *            *            0            *   *   *   
ET2	*      *      *      *            *            *                *            *            0            *   *   774 
SCT2	*      *      *      *            200000000000 *                *            *            0            774 *   777 
SCT2	*      *      *      *            040000000000 040000000000     *            *            0            775 *   *   
SCT2	*      *      *      *            010000000000 010000000000     *            *            0            776 *   *   
SCT2	*      *      *      *            002000000000 002000000000     *            *            0            777 *   *   
NRT1	*      *      *      *            000400000000 000400000000     *            *            0            000 *   735 
NRT4	*      *      *      *            *            *                *            *            0            735 *   043 
ST1	*      *      *      *            777777777777 243400000000     243400000000 *            0            *   *   745 

FLAGS - INT/FINAL   000200 000200 
INITIAL
C(AC)=243525 252525 C(E) =200000 000000 
FINAL
C(AC)=243400 000000 
----------

*032372  FLTR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032372 032372 032372 127200000002 777777777777 242400000000     242400000000 000000032362 0            735 010 777 
IT1	*      *      000002 *            127200000002 *                243400000000 *            0            *   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            *   *   *   
FT6	032373 032373 032373 312200000003 777777777777 100000000000     *            *            0            *   *   *   
ET2	*      *      *      *            *            *                *            *            0            *   *   774 
SCT2	*      *      *      *            100000000000 *                *            *            0            774 *   777 
SCT2	*      *      *      *            020000000000 020000000000     *            *            0            775 *   *   
SCT2	*      *      *      *            004000000000 004000000000     *            *            0            776 *   *   
SCT2	*      *      *      *            001000000000 001000000000     *            *            0            777 *   *   
NRT1	*      *      *      *            000200000000 000200000000     *            *            0            000 *   735 
NRT2	*      *      *      *            *            *                *            *            0            735 *   777 
NRT4	*      *      *      *            000400000000 000400000000     *            *            0            736 *   042 
ST1	*      *      *      *            777777777777 242400000000     242400000000 *            0            *   *   745 

FLAGS - INT/FINAL   000200 000200 
INITIAL
C(AC)=243400 000000 C(E) =100000 000000                                                                                    SEQ 0311
FINAL
C(AC)=242400 000000 
----------

*032400  FLTR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032400 032400 032400 127200000002 777777777777 241400000000     241400000000 000000032370 0            736 010 777 
IT1	*      *      000002 *            127200000002 *                242400000000 *            0            *   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            *   *   *   
FT6	032401 032401 032401 312200000003 777777777777 040000000000     *            *            0            *   *   *   
ET2	*      *      *      *            *            *                *            *            0            *   *   774 
SCT2	*      *      *      *            040000000000 *                *            *            0            774 *   777 
SCT2	*      *      *      *            010000000000 010000000000     *            *            0            775 *   *   
SCT2	*      *      *      *            002000000000 002000000000     *            *            0            776 *   *   
SCT2	*      *      *      *            000400000000 000400000000     *            *            0            777 *   *   
NRT1	*      *      *      *            000100000000 000100000000     *            *            0            000 *   735 
NRT2	*      *      *      *            *            *                *            *            0            735 *   777 
NRT2	*      *      *      *            000200000000 000200000000     *            *            0            736 *   *   
NRT4	*      *      *      *            000400000000 000400000000     *            *            0            737 *   041 
ST1	*      *      *      *            777777777777 241400000000     241400000000 *            0            *   *   745 

FLAGS - INT/FINAL   000200 000200 
INITIAL
C(AC)=242400 000000 C(E) =040000 000000 
FINAL
C(AC)=241400 000000 
----------

*032406  FLTR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032406 032406 032406 127200000002 777777777777 240400000000     240400000000 000000032376 0            737 010 777 
IT1	*      *      000002 *            127200000002 *                241400000000 *            0            *   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            *   *   *   
FT6	032407 032407 032407 312200000003 777777777777 020000000000     *            *            0            *   *   *   
ET2	*      *      *      *            *            *                *            *            0            *   *   774 
SCT2	*      *      *      *            020000000000 *                *            *            0            774 *   777 
SCT2	*      *      *      *            004000000000 004000000000     *            *            0            775 *   *   
SCT2	*      *      *      *            001000000000 001000000000     *            *            0            776 *   *   
SCT2	*      *      *      *            000200000000 000200000000     *            *            0            777 *   *   
NRT1	*      *      *      *            000040000000 000040000000     *            *            0            000 *   735 
NRT2	*      *      *      *            *            *                *            *            0            735 *   777 
NRT2	*      *      *      *            000100000000 000100000000     *            *            0            736 *   *   
NRT2	*      *      *      *            000200000000 000200000000     *            *            0            737 *   *   
NRT4	*      *      *      *            000400000000 000400000000     *            *            0            740 *   040 
ST1	*      *      *      *            777777777777 240400000000     240400000000 *            0            *   *   745 

FLAGS - INT/FINAL   000200 000200 
INITIAL
C(AC)=241400 000000 C(E) =020000 000000 
FINAL
C(AC)=240400 000000 
----------

*032414  FLTR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032414 032414 032414 127200000002 777777777777 237400000000     237400000000 000000032404 0            740 010 777 
IT1	*      *      000002 *            127200000002 *                240400000000 *            0            *   *   *   SEQ 0312
MEMST	*      *      *      *            *            000000000002     *            *            0            *   *   *   
FT6	032415 032415 032415 312200000003 777777777777 010000000000     *            *            0            *   *   *   
ET2	*      *      *      *            *            *                *            *            0            *   *   774 
SCT2	*      *      *      *            010000000000 *                *            *            0            774 *   777 
SCT2	*      *      *      *            002000000000 002000000000     *            *            0            775 *   *   
SCT2	*      *      *      *            000400000000 000400000000     *            *            0            776 *   *   
SCT2	*      *      *      *            000100000000 000100000000     *            *            0            777 *   *   
NRT1	*      *      *      *            000020000000 000020000000     *            *            0            000 *   735 
NRT2	*      *      *      *            *            *                *            *            0            735 *   777 
NRT2	*      *      *      *            000040000000 000040000000     *            *            0            736 *   *   
NRT2	*      *      *      *            000100000000 000100000000     *            *            0            737 *   *   
NRT2	*      *      *      *            000200000000 000200000000     *            *            0            740 *   *   
NRT4	*      *      *      *            000400000000 000400000000     *            *            0            741 *   037 
ST1	*      *      *      *            777777777777 237400000000     237400000000 *            0            *   *   745 

FLAGS - INT/FINAL   000200 000200 
INITIAL
C(AC)=240400 000000 C(E) =010000 000000 
FINAL
C(AC)=237400 000000 
----------

*032422  FLTR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032422 032422 032422 127200000002 777777777777 236400000000     236400000000 000000032412 0            741 010 777 
IT1	*      *      000002 *            127200000002 *                237400000000 *            0            *   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            *   *   *   
FT6	032423 032423 032423 312200000003 777777777777 004000000000     *            *            0            *   *   *   
ET2	*      *      *      *            *            *                *            *            0            *   *   774 
SCT2	*      *      *      *            004000000000 *                *            *            0            774 *   777 
SCT2	*      *      *      *            001000000000 001000000000     *            *            0            775 *   *   
SCT2	*      *      *      *            000200000000 000200000000     *            *            0            776 *   *   
SCT2	*      *      *      *            000040000000 000040000000     *            *            0            777 *   *   
NRT1	*      *      *      *            000010000000 000010000000     *            *            0            000 *   735 
NRT2	*      *      *      *            *            *                *            *            0            735 *   777 
NRT2	*      *      *      *            000020000000 000020000000     *            *            0            736 *   *   
NRT2	*      *      *      *            000040000000 000040000000     *            *            0            737 *   *   
NRT2	*      *      *      *            000100000000 000100000000     *            *            0            740 *   *   
NRT2	*      *      *      *            000200000000 000200000000     *            *            0            741 *   *   
NRT4	*      *      *      *            000400000000 000400000000     *            *            0            742 *   036 
ST1	*      *      *      *            777777777777 236400000000     236400000000 *            0            *   *   745 

FLAGS - INT/FINAL   000200 000200 
INITIAL
C(AC)=237400 000000 C(E) =004000 000000 
FINAL
C(AC)=236400 000000 
----------

*032430  FLTR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032430 032430 032430 127200000002 777777777777 235400000000     235400000000 000000032420 0            742 010 777 
IT1	*      *      000002 *            127200000002 *                236400000000 *            0            *   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            *   *   *   
FT6	032431 032431 032431 312200000003 777777777777 002000000000     *            *            0            *   *   *   
ET2	*      *      *      *            *            *                *            *            0            *   *   774 
SCT2	*      *      *      *            002000000000 *                *            *            0            774 *   777 
SCT2	*      *      *      *            000400000000 000400000000     *            *            0            775 *   *   SEQ 0313
SCT2	*      *      *      *            000100000000 000100000000     *            *            0            776 *   *   
SCT2	*      *      *      *            000020000000 000020000000     *            *            0            777 *   *   
NRT1	*      *      *      *            000004000000 000004000000     *            *            0            000 *   735 
NRT2	*      *      *      *            *            *                *            *            0            735 *   777 
NRT2	*      *      *      *            000010000000 000010000000     *            *            0            736 *   *   
NRT2	*      *      *      *            000020000000 000020000000     *            *            0            737 *   *   
NRT2	*      *      *      *            000040000000 000040000000     *            *            0            740 *   *   
NRT2	*      *      *      *            000100000000 000100000000     *            *            0            741 *   *   
NRT2	*      *      *      *            000200000000 000200000000     *            *            0            742 *   *   
NRT4	*      *      *      *            000400000000 000400000000     *            *            0            743 *   035 
ST1	*      *      *      *            777777777777 235400000000     235400000000 *            0            *   *   745 

FLAGS - INT/FINAL   000200 000200 
INITIAL
C(AC)=236400 000000 C(E) =002000 000000 
FINAL
C(AC)=235400 000000 
----------

*032436  FLTR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032436 032436 032436 127200000002 777777777777 234400000000     234400000000 000000032426 0            743 010 777 
IT1	*      *      000002 *            127200000002 *                235400000000 *            0            *   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            *   *   *   
FT6	032437 032437 032437 312200000003 777777777777 001000000000     *            *            0            *   *   *   
ET2	*      *      *      *            *            *                *            *            0            *   *   774 
SCT2	*      *      *      *            001000000000 *                *            *            0            774 *   777 
SCT2	*      *      *      *            000200000000 000200000000     *            *            0            775 *   *   
SCT2	*      *      *      *            000040000000 000040000000     *            *            0            776 *   *   
SCT2	*      *      *      *            000010000000 000010000000     *            *            0            777 *   *   
NRT1	*      *      *      *            000002000000 000002000000     *            *            0            000 *   735 
NRT2	*      *      *      *            *            *                *            *            0            735 *   777 
NRT2	*      *      *      *            000004000000 000004000000     *            *            0            736 *   *   
NRT2	*      *      *      *            000010000000 000010000000     *            *            0            737 *   *   
NRT2	*      *      *      *            000020000000 000020000000     *            *            0            740 *   *   
NRT2	*      *      *      *            000040000000 000040000000     *            *            0            741 *   *   
NRT2	*      *      *      *            000100000000 000100000000     *            *            0            742 *   *   
NRT2	*      *      *      *            000200000000 000200000000     *            *            0            743 *   *   
NRT4	*      *      *      *            000400000000 000400000000     *            *            0            744 *   034 
ST1	*      *      *      *            777777777777 234400000000     234400000000 *            0            *   *   745 

FLAGS - INT/FINAL   000200 000200 
INITIAL
C(AC)=235400 000000 C(E) =001000 000000 
FINAL
C(AC)=234400 000000 
----------

*032444  FLTR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032444 032444 032444 127200000002 777777777777 233400000000     233400000000 000000032434 0            744 010 777 
IT1	*      *      000002 *            127200000002 *                234400000000 *            0            *   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            *   *   *   
FT6	032445 032445 032445 312200000003 777777777777 000400000000     *            *            0            *   *   *   
ET2	*      *      *      *            *            *                *            *            0            *   *   774 
SCT2	*      *      *      *            000400000000 *                *            *            0            774 *   777 
SCT2	*      *      *      *            000100000000 000100000000     *            *            0            775 *   *   
SCT2	*      *      *      *            000020000000 000020000000     *            *            0            776 *   *   SEQ 0314
SCT2	*      *      *      *            000004000000 000004000000     *            *            0            777 *   *   
NRT1	*      *      *      *            000001000000 000001000000     *            *            0            000 *   735 
NRT2	*      *      *      *            *            *                *            *            0            735 *   777 
NRT2	*      *      *      *            000002000000 000002000000     *            *            0            736 *   *   
NRT2	*      *      *      *            000004000000 000004000000     *            *            0            737 *   *   
NRT2	*      *      *      *            000010000000 000010000000     *            *            0            740 *   *   
NRT2	*      *      *      *            000020000000 000020000000     *            *            0            741 *   *   
NRT2	*      *      *      *            000040000000 000040000000     *            *            0            742 *   *   
NRT2	*      *      *      *            000100000000 000100000000     *            *            0            743 *   *   
NRT2	*      *      *      *            000200000000 000200000000     *            *            0            744 *   *   
NRT4	*      *      *      *            000400000000 000400000000     *            *            0            745 *   033 
ST1	*      *      *      *            777777777777 233400000000     233400000000 *            0            *   *   745 

FLAGS - INT/FINAL   000200 000200 
INITIAL
C(AC)=234400 000000 C(E) =000400 000000 
FINAL
C(AC)=233400 000000 
----------

*032452  FLTR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032452 032452 032452 127200000002 777777777777 232400000000     232400000000 000000032442 0            745 010 777 
IT1	*      *      000002 *            127200000002 *                233400000000 *            0            *   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            *   *   *   
FT6	032453 032453 032453 312200000003 777777777777 000200000000     *            *            0            *   *   *   
ET2	*      *      *      *            *            *                *            *            0            *   *   774 
SCT2	*      *      *      *            000200000000 *                *            *            0            774 *   777 
SCT2	*      *      *      *            000040000000 000040000000     *            *            0            775 *   *   
SCT2	*      *      *      *            000010000000 000010000000     *            *            0            776 *   *   
SCT2	*      *      *      *            000002000000 000002000000     *            *            0            777 *   *   
NRT1	*      *      *      *            000000400000 000000400000     *            *            0            000 *   735 
NRT2	*      *      *      *            *            *                *            *            0            735 *   777 
NRT2	*      *      *      *            000001000000 000001000000     *            *            0            736 *   *   
NRT2	*      *      *      *            000002000000 000002000000     *            *            0            737 *   *   
NRT2	*      *      *      *            000004000000 000004000000     *            *            0            740 *   *   
NRT2	*      *      *      *            000010000000 000010000000     *            *            0            741 *   *   
NRT2	*      *      *      *            000020000000 000020000000     *            *            0            742 *   *   
NRT2	*      *      *      *            000040000000 000040000000     *            *            0            743 *   *   
NRT2	*      *      *      *            000100000000 000100000000     *            *            0            744 *   *   
NRT2	*      *      *      *            000200000000 000200000000     *            *            0            745 *   *   
NRT4	*      *      *      *            000400000000 000400000000     *            *            0            746 *   032 
ST1	*      *      *      *            777777777777 232400000000     232400000000 *            0            *   *   745 

FLAGS - INT/FINAL   000200 000200 
INITIAL
C(AC)=233400 000000 C(E) =000200 000000 
FINAL
C(AC)=232400 000000 
----------

*032460  FLTR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032460 032460 032460 127200000002 777777777777 231400000000     231400000000 000000032450 0            746 010 777 
IT1	*      *      000002 *            127200000002 *                232400000000 *            0            *   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            *   *   *   
FT6	032461 032461 032461 312200000003 777777777777 000100000000     *            *            0            *   *   *   
ET2	*      *      *      *            *            *                *            *            0            *   *   77  SEQ 0315
SCT2	*      *      *      *            000100000000 *                *            *            0            774 *   777 
SCT2	*      *      *      *            000020000000 000020000000     *            *            0            775 *   *   
SCT2	*      *      *      *            000004000000 000004000000     *            *            0            776 *   *   
SCT2	*      *      *      *            000001000000 000001000000     *            *            0            777 *   *   
NRT1	*      *      *      *            000000200000 000000200000     *            *            0            000 *   735 
NRT2	*      *      *      *            *            *                *            *            0            735 *   777 
NRT2	*      *      *      *            000000400000 000000400000     *            *            0            736 *   *   
NRT2	*      *      *      *            000001000000 000001000000     *            *            0            737 *   *   
NRT2	*      *      *      *            000002000000 000002000000     *            *            0            740 *   *   
NRT2	*      *      *      *            000004000000 000004000000     *            *            0            741 *   *   
NRT2	*      *      *      *            000010000000 000010000000     *            *            0            742 *   *   
NRT2	*      *      *      *            000020000000 000020000000     *            *            0            743 *   *   
NRT2	*      *      *      *            000040000000 000040000000     *            *            0            744 *   *   
NRT2	*      *      *      *            000100000000 000100000000     *            *            0            745 *   *   
NRT2	*      *      *      *            000200000000 000200000000     *            *            0            746 *   *   
NRT4	*      *      *      *            000400000000 000400000000     *            *            0            747 *   031 
ST1	*      *      *      *            777777777777 231400000000     231400000000 *            0            *   *   745 

FLAGS - INT/FINAL   000200 000200 
INITIAL
C(AC)=232400 000000 C(E) =000100 000000 
FINAL
C(AC)=231400 000000 
----------

*032466  FLTR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032466 032466 032466 127200000002 777777777777 230400000000     230400000000 000000032456 0            747 010 777 
IT1	*      *      000002 *            127200000002 *                231400000000 *            0            *   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            *   *   *   
FT6	032467 032467 032467 312200000003 777777777777 000040000000     *            *            0            *   *   *   
ET2	*      *      *      *            *            *                *            *            0            *   *   774 
SCT2	*      *      *      *            000040000000 *                *            *            0            774 *   777 
SCT2	*      *      *      *            000010000000 000010000000     *            *            0            775 *   *   
SCT2	*      *      *      *            000002000000 000002000000     *            *            0            776 *   *   
SCT2	*      *      *      *            000000400000 000000400000     *            *            0            777 *   *   
NRT1	*      *      *      *            000000100000 000000100000     *            *            0            000 *   735 
NRT2	*      *      *      *            *            *                *            *            0            735 *   777 
NRT2	*      *      *      *            000000200000 000000200000     *            *            0            736 *   *   
NRT2	*      *      *      *            000000400000 000000400000     *            *            0            737 *   *   
NRT2	*      *      *      *            000001000000 000001000000     *            *            0            740 *   *   
NRT2	*      *      *      *            000002000000 000002000000     *            *            0            741 *   *   
NRT2	*      *      *      *            000004000000 000004000000     *            *            0            742 *   *   
NRT2	*      *      *      *            000010000000 000010000000     *            *            0            743 *   *   
NRT2	*      *      *      *            000020000000 000020000000     *            *            0            744 *   *   
NRT2	*      *      *      *            000040000000 000040000000     *            *            0            745 *   *   
NRT2	*      *      *      *            000100000000 000100000000     *            *            0            746 *   *   
NRT2	*      *      *      *            000200000000 000200000000     *            *            0            747 *   *   
NRT4	*      *      *      *            000400000000 000400000000     *            *            0            750 *   030 
ST1	*      *      *      *            777777777777 230400000000     230400000000 *            0            *   *   745 

FLAGS - INT/FINAL   000200 000200 
INITIAL
C(AC)=231400 000000 C(E) =000040 000000 
FINAL
C(AC)=230400 000000 
----------
*032474  FLTR	4,000002                                                                                                   SEQ 0316

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032474 032474 032474 127200000002 777777777777 227400000000     227400000000 000000032464 0            750 010 777 
IT1	*      *      000002 *            127200000002 *                230400000000 *            0            *   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            *   *   *   
FT6	032475 032475 032475 312200000003 777777777777 000020000000     *            *            0            *   *   *   
ET2	*      *      *      *            *            *                *            *            0            *   *   774 
SCT2	*      *      *      *            000020000000 *                *            *            0            774 *   777 
SCT2	*      *      *      *            000004000000 000004000000     *            *            0            775 *   *   
SCT2	*      *      *      *            000001000000 000001000000     *            *            0            776 *   *   
SCT2	*      *      *      *            000000200000 000000200000     *            *            0            777 *   *   
NRT1	*      *      *      *            000000040000 000000040000     *            *            0            000 *   735 
NRT2	*      *      *      *            *            *                *            *            0            735 *   777 
NRT2	*      *      *      *            000000100000 000000100000     *            *            0            736 *   *   
NRT2	*      *      *      *            000000200000 000000200000     *            *            0            737 *   *   
NRT2	*      *      *      *            000000400000 000000400000     *            *            0            740 *   *   
NRT2	*      *      *      *            000001000000 000001000000     *            *            0            741 *   *   
NRT2	*      *      *      *            000002000000 000002000000     *            *            0            742 *   *   
NRT2	*      *      *      *            000004000000 000004000000     *            *            0            743 *   *   
NRT2	*      *      *      *            000010000000 000010000000     *            *            0            744 *   *   
NRT2	*      *      *      *            000020000000 000020000000     *            *            0            745 *   *   
NRT2	*      *      *      *            000040000000 000040000000     *            *            0            746 *   *   
NRT2	*      *      *      *            000100000000 000100000000     *            *            0            747 *   *   
NRT2	*      *      *      *            000200000000 000200000000     *            *            0            750 *   *   
NRT4	*      *      *      *            000400000000 000400000000     *            *            0            751 *   027 
ST1	*      *      *      *            777777777777 227400000000     227400000000 *            0            *   *   745 

FLAGS - INT/FINAL   000200 000200 
INITIAL
C(AC)=230400 000000 C(E) =000020 000000 
FINAL
C(AC)=227400 000000 
----------

*032502  FLTR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032502 032502 032502 127200000002 777777777777 226400000000     226400000000 000000032472 0            751 010 777 
IT1	*      *      000002 *            127200000002 *                227400000000 *            0            *   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            *   *   *   
FT6	032503 032503 032503 312200000003 777777777777 000010000000     *            *            0            *   *   *   
ET2	*      *      *      *            *            *                *            *            0            *   *   774 
SCT2	*      *      *      *            000010000000 *                *            *            0            774 *   777 
SCT2	*      *      *      *            000002000000 000002000000     *            *            0            775 *   *   
SCT2	*      *      *      *            000000400000 000000400000     *            *            0            776 *   *   
SCT2	*      *      *      *            000000100000 000000100000     *            *            0            777 *   *   
NRT1	*      *      *      *            000000020000 000000020000     *            *            0            000 *   735 
NRT2	*      *      *      *            *            *                *            *            0            735 *   777 
NRT2	*      *      *      *            000000040000 000000040000     *            *            0            736 *   *   
NRT2	*      *      *      *            000000100000 000000100000     *            *            0            737 *   *   
NRT2	*      *      *      *            000000200000 000000200000     *            *            0            740 *   *   
NRT2	*      *      *      *            000000400000 000000400000     *            *            0            741 *   *   
NRT2	*      *      *      *            000001000000 000001000000     *            *            0            742 *   *   
NRT2	*      *      *      *            000002000000 000002000000     *            *            0            743 *   *   
NRT2	*      *      *      *            000004000000 000004000000     *            *            0            744 *   *   
NRT2	*      *      *      *            000010000000 000010000000     *            *            0            745 *   *   
NRT2	*      *      *      *            000020000000 000020000000     *            *            0            746 *   *   
NRT2	*      *      *      *            000040000000 000040000000     *            *            0            747 *   *   
NRT2	*      *      *      *            000100000000 000100000000     *            *            0            750 *   *   
NRT2	*      *      *      *            000200000000 000200000000     *            *            0            751 *   *   SEQ 0317
NRT4	*      *      *      *            000400000000 000400000000     *            *            0            752 *   026 
ST1	*      *      *      *            777777777777 226400000000     226400000000 *            0            *   *   745 

FLAGS - INT/FINAL   000200 000200 
INITIAL
C(AC)=227400 000000 C(E) =000010 000000 
FINAL
C(AC)=226400 000000 
----------

*032510  FLTR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032510 032510 032510 127200000002 777777777777 225400000000     225400000000 000000032500 0            752 010 777 
IT1	*      *      000002 *            127200000002 *                226400000000 *            0            *   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            *   *   *   
FT6	032511 032511 032511 312200000003 777777777777 000004000000     *            *            0            *   *   *   
ET2	*      *      *      *            *            *                *            *            0            *   *   774 
SCT2	*      *      *      *            000004000000 *                *            *            0            774 *   777 
SCT2	*      *      *      *            000001000000 000001000000     *            *            0            775 *   *   
SCT2	*      *      *      *            000000200000 000000200000     *            *            0            776 *   *   
SCT2	*      *      *      *            000000040000 000000040000     *            *            0            777 *   *   
NRT1	*      *      *      *            000000010000 000000010000     *            *            0            000 *   735 
NRT2	*      *      *      *            *            *                *            *            0            735 *   777 
NRT2	*      *      *      *            000000020000 000000020000     *            *            0            736 *   *   
NRT2	*      *      *      *            000000040000 000000040000     *            *            0            737 *   *   
NRT2	*      *      *      *            000000100000 000000100000     *            *            0            740 *   *   
NRT2	*      *      *      *            000000200000 000000200000     *            *            0            741 *   *   
NRT2	*      *      *      *            000000400000 000000400000     *            *            0            742 *   *   
NRT2	*      *      *      *            000001000000 000001000000     *            *            0            743 *   *   
NRT2	*      *      *      *            000002000000 000002000000     *            *            0            744 *   *   
NRT2	*      *      *      *            000004000000 000004000000     *            *            0            745 *   *   
NRT2	*      *      *      *            000010000000 000010000000     *            *            0            746 *   *   
NRT2	*      *      *      *            000020000000 000020000000     *            *            0            747 *   *   
NRT2	*      *      *      *            000040000000 000040000000     *            *            0            750 *   *   
NRT2	*      *      *      *            000100000000 000100000000     *            *            0            751 *   *   
NRT2	*      *      *      *            000200000000 000200000000     *            *            0            752 *   *   
NRT4	*      *      *      *            000400000000 000400000000     *            *            0            753 *   025 
ST1	*      *      *      *            777777777777 225400000000     225400000000 *            0            *   *   745 

FLAGS - INT/FINAL   000200 000200 
INITIAL
C(AC)=226400 000000 C(E) =000004 000000 
FINAL
C(AC)=225400 000000 
----------

*032516  FLTR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032516 032516 032516 127200000002 777777777777 224400000000     224400000000 000000032506 0            753 010 777 
IT1	*      *      000002 *            127200000002 *                225400000000 *            0            *   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            *   *   *   
FT6	032517 032517 032517 312200000003 777777777777 000002000000     *            *            0            *   *   *   
ET2	*      *      *      *            *            *                *            *            0            *   *   774 
SCT2	*      *      *      *            000002000000 *                *            *            0            774 *   777 
SCT2	*      *      *      *            000000400000 000000400000     *            *            0            775 *   *   
SCT2	*      *      *      *            000000100000 000000100000     *            *            0            776 *   *   
SCT2	*      *      *      *            000000020000 000000020000     *            *            0            777 *   *   
NRT1	*      *      *      *            000000004000 000000004000     *            *            0            000 *   73  SEQ 0318
NRT2	*      *      *      *            *            *                *            *            0            735 *   777 
NRT2	*      *      *      *            000000010000 000000010000     *            *            0            736 *   *   
NRT2	*      *      *      *            000000020000 000000020000     *            *            0            737 *   *   
NRT2	*      *      *      *            000000040000 000000040000     *            *            0            740 *   *   
NRT2	*      *      *      *            000000100000 000000100000     *            *            0            741 *   *   
NRT2	*      *      *      *            000000200000 000000200000     *            *            0            742 *   *   
NRT2	*      *      *      *            000000400000 000000400000     *            *            0            743 *   *   
NRT2	*      *      *      *            000001000000 000001000000     *            *            0            744 *   *   
NRT2	*      *      *      *            000002000000 000002000000     *            *            0            745 *   *   
NRT2	*      *      *      *            000004000000 000004000000     *            *            0            746 *   *   
NRT2	*      *      *      *            000010000000 000010000000     *            *            0            747 *   *   
NRT2	*      *      *      *            000020000000 000020000000     *            *            0            750 *   *   
NRT2	*      *      *      *            000040000000 000040000000     *            *            0            751 *   *   
NRT2	*      *      *      *            000100000000 000100000000     *            *            0            752 *   *   
NRT2	*      *      *      *            000200000000 000200000000     *            *            0            753 *   *   
NRT4	*      *      *      *            000400000000 000400000000     *            *            0            754 *   024 
ST1	*      *      *      *            777777777777 224400000000     224400000000 *            0            *   *   745 

FLAGS - INT/FINAL   000200 000200 
INITIAL
C(AC)=225400 000000 C(E) =000002 000000 
FINAL
C(AC)=224400 000000 
----------

*032524  FLTR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032524 032524 032524 127200000002 777777777777 223400000000     223400000000 000000032514 0            754 010 777 
IT1	*      *      000002 *            127200000002 *                224400000000 *            0            *   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            *   *   *   
FT6	032525 032525 032525 312200000003 777777777777 000001000000     *            *            0            *   *   *   
ET2	*      *      *      *            *            *                *            *            0            *   *   774 
SCT2	*      *      *      *            000001000000 *                *            *            0            774 *   777 
SCT2	*      *      *      *            000000200000 000000200000     *            *            0            775 *   *   
SCT2	*      *      *      *            000000040000 000000040000     *            *            0            776 *   *   
SCT2	*      *      *      *            000000010000 000000010000     *            *            0            777 *   *   
NRT1	*      *      *      *            000000002000 000000002000     *            *            0            000 *   735 
NRT2	*      *      *      *            *            *                *            *            0            735 *   777 
NRT2	*      *      *      *            000000004000 000000004000     *            *            0            736 *   *   
NRT2	*      *      *      *            000000010000 000000010000     *            *            0            737 *   *   
NRT2	*      *      *      *            000000020000 000000020000     *            *            0            740 *   *   
NRT2	*      *      *      *            000000040000 000000040000     *            *            0            741 *   *   
NRT2	*      *      *      *            000000100000 000000100000     *            *            0            742 *   *   
NRT2	*      *      *      *            000000200000 000000200000     *            *            0            743 *   *   
NRT2	*      *      *      *            000000400000 000000400000     *            *            0            744 *   *   
NRT2	*      *      *      *            000001000000 000001000000     *            *            0            745 *   *   
NRT2	*      *      *      *            000002000000 000002000000     *            *            0            746 *   *   
NRT2	*      *      *      *            000004000000 000004000000     *            *            0            747 *   *   
NRT2	*      *      *      *            000010000000 000010000000     *            *            0            750 *   *   
NRT2	*      *      *      *            000020000000 000020000000     *            *            0            751 *   *   
NRT2	*      *      *      *            000040000000 000040000000     *            *            0            752 *   *   
NRT2	*      *      *      *            000100000000 000100000000     *            *            0            753 *   *   
NRT2	*      *      *      *            000200000000 000200000000     *            *            0            754 *   *   
NRT4	*      *      *      *            000400000000 000400000000     *            *            0            755 *   023 
ST1	*      *      *      *            777777777777 223400000000     223400000000 *            0            *   *   745 

FLAGS - INT/FINAL   000200 000200 
INITIAL
C(AC)=224400 000000 C(E) =000001 000000                                                                                    SEQ 0319
FINAL
C(AC)=223400 000000 
----------

*032532  FLTR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032532 032532 032532 127200000002 777777777777 222400000000     222400000000 000000032522 0            755 010 777 
IT1	*      *      000002 *            127200000002 *                223400000000 *            0            *   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            *   *   *   
FT6	032533 032533 032533 312200000003 777777777777 000000400000     *            *            0            *   *   *   
ET2	*      *      *      *            *            *                *            *            0            *   *   774 
SCT2	*      *      *      *            000000400000 *                *            *            0            774 *   777 
SCT2	*      *      *      *            000000100000 000000100000     *            *            0            775 *   *   
SCT2	*      *      *      *            000000020000 000000020000     *            *            0            776 *   *   
SCT2	*      *      *      *            000000004000 000000004000     *            *            0            777 *   *   
NRT1	*      *      *      *            000000001000 000000001000     *            *            0            000 *   735 
NRT2	*      *      *      *            *            *                *            *            0            735 *   777 
NRT2	*      *      *      *            000000002000 000000002000     *            *            0            736 *   *   
NRT2	*      *      *      *            000000004000 000000004000     *            *            0            737 *   *   
NRT2	*      *      *      *            000000010000 000000010000     *            *            0            740 *   *   
NRT2	*      *      *      *            000000020000 000000020000     *            *            0            741 *   *   
NRT2	*      *      *      *            000000040000 000000040000     *            *            0            742 *   *   
NRT2	*      *      *      *            000000100000 000000100000     *            *            0            743 *   *   
NRT2	*      *      *      *            000000200000 000000200000     *            *            0            744 *   *   
NRT2	*      *      *      *            000000400000 000000400000     *            *            0            745 *   *   
NRT2	*      *      *      *            000001000000 000001000000     *            *            0            746 *   *   
NRT2	*      *      *      *            000002000000 000002000000     *            *            0            747 *   *   
NRT2	*      *      *      *            000004000000 000004000000     *            *            0            750 *   *   
NRT2	*      *      *      *            000010000000 000010000000     *            *            0            751 *   *   
NRT2	*      *      *      *            000020000000 000020000000     *            *            0            752 *   *   
NRT2	*      *      *      *            000040000000 000040000000     *            *            0            753 *   *   
NRT2	*      *      *      *            000100000000 000100000000     *            *            0            754 *   *   
NRT2	*      *      *      *            000200000000 000200000000     *            *            0            755 *   *   
NRT4	*      *      *      *            000400000000 000400000000     *            *            0            756 *   022 
ST1	*      *      *      *            777777777777 222400000000     222400000000 *            0            *   *   745 

FLAGS - INT/FINAL   000200 000200 
INITIAL
C(AC)=223400 000000 C(E) =000000 400000 
FINAL
C(AC)=222400 000000 
----------

*032540  FLTR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032540 032540 032540 127200000002 777777777777 221400000000     221400000000 000000777773 0            756 010 777 
IT1	*      *      000002 *            127200000002 *                222400000000 *            0            *   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            *   *   *   
FT6	032541 032541 032541 312200000003 777777777777 000000200000     *            *            0            *   *   *   
ET2	*      *      *      *            *            *                *            *            0            *   *   774 
SCT2	*      *      *      *            000000200000 *                *            *            0            774 *   777 
SCT2	*      *      *      *            000000040000 000000040000     *            *            0            775 *   *   
SCT2	*      *      *      *            000000010000 000000010000     *            *            0            776 *   *   
SCT2	*      *      *      *            000000002000 000000002000     *            *            0            777 *   *   
NRT1	*      *      *      *            000000000400 000000000400     *            *            0            000 *   735 
NRT2	*      *      *      *            *            *                *            *            0            735 *   777 
NRT2	*      *      *      *            000000001000 000000001000     *            *            0            736 *   *   
NRT2	*      *      *      *            000000002000 000000002000     *            *            0            737 *   *   SEQ 0320
NRT2	*      *      *      *            000000004000 000000004000     *            *            0            740 *   *   
NRT2	*      *      *      *            000000010000 000000010000     *            *            0            741 *   *   
NRT2	*      *      *      *            000000020000 000000020000     *            *            0            742 *   *   
NRT2	*      *      *      *            000000040000 000000040000     *            *            0            743 *   *   
NRT2	*      *      *      *            000000100000 000000100000     *            *            0            744 *   *   
NRT2	*      *      *      *            000000200000 000000200000     *            *            0            745 *   *   
NRT2	*      *      *      *            000000400000 000000400000     *            *            0            746 *   *   
NRT2	*      *      *      *            000001000000 000001000000     *            *            0            747 *   *   
NRT2	*      *      *      *            000002000000 000002000000     *            *            0            750 *   *   
NRT2	*      *      *      *            000004000000 000004000000     *            *            0            751 *   *   
NRT2	*      *      *      *            000010000000 000010000000     *            *            0            752 *   *   
NRT2	*      *      *      *            000020000000 000020000000     *            *            0            753 *   *   
NRT2	*      *      *      *            000040000000 000040000000     *            *            0            754 *   *   
NRT2	*      *      *      *            000100000000 000100000000     *            *            0            755 *   *   
NRT2	*      *      *      *            000200000000 000200000000     *            *            0            756 *   *   
NRT4	*      *      *      *            000400000000 000400000000     *            *            0            757 *   021 
ST1	*      *      *      *            777777777777 221400000000     221400000000 *            0            *   *   745 

FLAGS - INT/FINAL   000200 000200 
INITIAL
C(AC)=222400 000000 C(E) =000000 200000 
FINAL
C(AC)=221400 000000 
----------

*032546  FLTR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032546 032546 032546 127200000002 777777777777 220400000000     220400000000 000000777773 0            757 010 777 
IT1	*      *      000002 *            127200000002 *                221400000000 *            0            *   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            *   *   *   
FT6	032547 032547 032547 312200000003 777777777777 000000100000     *            *            0            *   *   *   
ET2	*      *      *      *            *            *                *            *            0            *   *   774 
SCT2	*      *      *      *            000000100000 *                *            *            0            774 *   777 
SCT2	*      *      *      *            000000020000 000000020000     *            *            0            775 *   *   
SCT2	*      *      *      *            000000004000 000000004000     *            *            0            776 *   *   
SCT2	*      *      *      *            000000001000 000000001000     *            *            0            777 *   *   
NRT1	*      *      *      *            000000000200 000000000200     *            *            0            000 *   735 
NRT2	*      *      *      *            *            *                *            *            0            735 *   777 
NRT2	*      *      *      *            000000000400 000000000400     *            *            0            736 *   *   
NRT2	*      *      *      *            000000001000 000000001000     *            *            0            737 *   *   
NRT2	*      *      *      *            000000002000 000000002000     *            *            0            740 *   *   
NRT2	*      *      *      *            000000004000 000000004000     *            *            0            741 *   *   
NRT2	*      *      *      *            000000010000 000000010000     *            *            0            742 *   *   
NRT2	*      *      *      *            000000020000 000000020000     *            *            0            743 *   *   
NRT2	*      *      *      *            000000040000 000000040000     *            *            0            744 *   *   
NRT2	*      *      *      *            000000100000 000000100000     *            *            0            745 *   *   
NRT2	*      *      *      *            000000200000 000000200000     *            *            0            746 *   *   
NRT2	*      *      *      *            000000400000 000000400000     *            *            0            747 *   *   
NRT2	*      *      *      *            000001000000 000001000000     *            *            0            750 *   *   
NRT2	*      *      *      *            000002000000 000002000000     *            *            0            751 *   *   
NRT2	*      *      *      *            000004000000 000004000000     *            *            0            752 *   *   
NRT2	*      *      *      *            000010000000 000010000000     *            *            0            753 *   *   
NRT2	*      *      *      *            000020000000 000020000000     *            *            0            754 *   *   
NRT2	*      *      *      *            000040000000 000040000000     *            *            0            755 *   *   
NRT2	*      *      *      *            000100000000 000100000000     *            *            0            756 *   *   
NRT2	*      *      *      *            000200000000 000200000000     *            *            0            757 *   *   
NRT4	*      *      *      *            000400000000 000400000000     *            *            0            760 *   020 
ST1	*      *      *      *            777777777777 220400000000     220400000000 *            0            *   *   745 
                                                                                                                           SEQ 0321
FLAGS - INT/FINAL   000200 000200 
INITIAL
C(AC)=221400 000000 C(E) =000000 100000 
FINAL
C(AC)=220400 000000 
----------

*032554  FLTR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032554 032554 032554 127200000002 777777777777 217400000000     217400000000 000000777773 0            760 010 777 
IT1	*      *      000002 *            127200000002 *                220400000000 *            0            *   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            *   *   *   
FT6	032555 032555 032555 312200000003 777777777777 000000040000     *            *            0            *   *   *   
ET2	*      *      *      *            *            *                *            *            0            *   *   774 
SCT2	*      *      *      *            000000040000 *                *            *            0            774 *   777 
SCT2	*      *      *      *            000000010000 000000010000     *            *            0            775 *   *   
SCT2	*      *      *      *            000000002000 000000002000     *            *            0            776 *   *   
SCT2	*      *      *      *            000000000400 000000000400     *            *            0            777 *   *   
NRT1	*      *      *      *            000000000100 000000000100     *            *            0            000 *   735 
NRT2	*      *      *      *            *            *                *            *            0            735 *   777 
NRT2	*      *      *      *            000000000200 000000000200     *            *            0            736 *   *   
NRT2	*      *      *      *            000000000400 000000000400     *            *            0            737 *   *   
NRT2	*      *      *      *            000000001000 000000001000     *            *            0            740 *   *   
NRT2	*      *      *      *            000000002000 000000002000     *            *            0            741 *   *   
NRT2	*      *      *      *            000000004000 000000004000     *            *            0            742 *   *   
NRT2	*      *      *      *            000000010000 000000010000     *            *            0            743 *   *   
NRT2	*      *      *      *            000000020000 000000020000     *            *            0            744 *   *   
NRT2	*      *      *      *            000000040000 000000040000     *            *            0            745 *   *   
NRT2	*      *      *      *            000000100000 000000100000     *            *            0            746 *   *   
NRT2	*      *      *      *            000000200000 000000200000     *            *            0            747 *   *   
NRT2	*      *      *      *            000000400000 000000400000     *            *            0            750 *   *   
NRT2	*      *      *      *            000001000000 000001000000     *            *            0            751 *   *   
NRT2	*      *      *      *            000002000000 000002000000     *            *            0            752 *   *   
NRT2	*      *      *      *            000004000000 000004000000     *            *            0            753 *   *   
NRT2	*      *      *      *            000010000000 000010000000     *            *            0            754 *   *   
NRT2	*      *      *      *            000020000000 000020000000     *            *            0            755 *   *   
NRT2	*      *      *      *            000040000000 000040000000     *            *            0            756 *   *   
NRT2	*      *      *      *            000100000000 000100000000     *            *            0            757 *   *   
NRT2	*      *      *      *            000200000000 000200000000     *            *            0            760 *   *   
NRT4	*      *      *      *            000400000000 000400000000     *            *            0            761 *   017 
ST1	*      *      *      *            777777777777 217400000000     217400000000 *            0            *   *   745 

FLAGS - INT/FINAL   000200 000200 
INITIAL
C(AC)=220400 000000 C(E) =000000 040000 
FINAL
C(AC)=217400 000000 
----------

*032562  FLTR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032562 032562 032562 127200000002 777777777777 216400000000     216400000000 000000777773 0            761 010 777 
IT1	*      *      000002 *            127200000002 *                217400000000 *            0            *   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            *   *   *   
FT6	032563 032563 032563 312200000003 777777777777 000000020000     *            *            0            *   *   *   
ET2	*      *      *      *            *            *                *            *            0            *   *   774 
SCT2	*      *      *      *            000000020000 *                *            *            0            774 *   777 
SCT2	*      *      *      *            000000004000 000000004000     *            *            0            775 *   *   SEQ 0322
SCT2	*      *      *      *            000000001000 000000001000     *            *            0            776 *   *   
SCT2	*      *      *      *            000000000200 000000000200     *            *            0            777 *   *   
NRT1	*      *      *      *            000000000040 000000000040     *            *            0            000 *   735 
NRT2	*      *      *      *            *            *                *            *            0            735 *   777 
NRT2	*      *      *      *            000000000100 000000000100     *            *            0            736 *   *   
NRT2	*      *      *      *            000000000200 000000000200     *            *            0            737 *   *   
NRT2	*      *      *      *            000000000400 000000000400     *            *            0            740 *   *   
NRT2	*      *      *      *            000000001000 000000001000     *            *            0            741 *   *   
NRT2	*      *      *      *            000000002000 000000002000     *            *            0            742 *   *   
NRT2	*      *      *      *            000000004000 000000004000     *            *            0            743 *   *   
NRT2	*      *      *      *            000000010000 000000010000     *            *            0            744 *   *   
NRT2	*      *      *      *            000000020000 000000020000     *            *            0            745 *   *   
NRT2	*      *      *      *            000000040000 000000040000     *            *            0            746 *   *   
NRT2	*      *      *      *            000000100000 000000100000     *            *            0            747 *   *   
NRT2	*      *      *      *            000000200000 000000200000     *            *            0            750 *   *   
NRT2	*      *      *      *            000000400000 000000400000     *            *            0            751 *   *   
NRT2	*      *      *      *            000001000000 000001000000     *            *            0            752 *   *   
NRT2	*      *      *      *            000002000000 000002000000     *            *            0            753 *   *   
NRT2	*      *      *      *            000004000000 000004000000     *            *            0            754 *   *   
NRT2	*      *      *      *            000010000000 000010000000     *            *            0            755 *   *   
NRT2	*      *      *      *            000020000000 000020000000     *            *            0            756 *   *   
NRT2	*      *      *      *            000040000000 000040000000     *            *            0            757 *   *   
NRT2	*      *      *      *            000100000000 000100000000     *            *            0            760 *   *   
NRT2	*      *      *      *            000200000000 000200000000     *            *            0            761 *   *   
NRT4	*      *      *      *            000400000000 000400000000     *            *            0            762 *   016 
ST1	*      *      *      *            777777777777 216400000000     216400000000 *            0            *   *   745 

FLAGS - INT/FINAL   000200 000200 
INITIAL
C(AC)=217400 000000 C(E) =000000 020000 
FINAL
C(AC)=216400 000000 
----------

*032570  FLTR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032570 032570 032570 127200000002 777777777777 215400000000     215400000000 000000777773 0            762 010 777 
IT1	*      *      000002 *            127200000002 *                216400000000 *            0            *   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            *   *   *   
FT6	032571 032571 032571 312200000003 777777777777 000000010000     *            *            0            *   *   *   
ET2	*      *      *      *            *            *                *            *            0            *   *   774 
SCT2	*      *      *      *            000000010000 *                *            *            0            774 *   777 
SCT2	*      *      *      *            000000002000 000000002000     *            *            0            775 *   *   
SCT2	*      *      *      *            000000000400 000000000400     *            *            0            776 *   *   
SCT2	*      *      *      *            000000000100 000000000100     *            *            0            777 *   *   
NRT1	*      *      *      *            000000000020 000000000020     *            *            0            000 *   735 
NRT2	*      *      *      *            *            *                *            *            0            735 *   777 
NRT2	*      *      *      *            000000000040 000000000040     *            *            0            736 *   *   
NRT2	*      *      *      *            000000000100 000000000100     *            *            0            737 *   *   
NRT2	*      *      *      *            000000000200 000000000200     *            *            0            740 *   *   
NRT2	*      *      *      *            000000000400 000000000400     *            *            0            741 *   *   
NRT2	*      *      *      *            000000001000 000000001000     *            *            0            742 *   *   
NRT2	*      *      *      *            000000002000 000000002000     *            *            0            743 *   *   
NRT2	*      *      *      *            000000004000 000000004000     *            *            0            744 *   *   
NRT2	*      *      *      *            000000010000 000000010000     *            *            0            745 *   *   
NRT2	*      *      *      *            000000020000 000000020000     *            *            0            746 *   *   
NRT2	*      *      *      *            000000040000 000000040000     *            *            0            747 *   *   
NRT2	*      *      *      *            000000100000 000000100000     *            *            0            750 *   *   
NRT2	*      *      *      *            000000200000 000000200000     *            *            0            751 *   *   SEQ 0323
NRT2	*      *      *      *            000000400000 000000400000     *            *            0            752 *   *   
NRT2	*      *      *      *            000001000000 000001000000     *            *            0            753 *   *   
NRT2	*      *      *      *            000002000000 000002000000     *            *            0            754 *   *   
NRT2	*      *      *      *            000004000000 000004000000     *            *            0            755 *   *   
NRT2	*      *      *      *            000010000000 000010000000     *            *            0            756 *   *   
NRT2	*      *      *      *            000020000000 000020000000     *            *            0            757 *   *   
NRT2	*      *      *      *            000040000000 000040000000     *            *            0            760 *   *   
NRT2	*      *      *      *            000100000000 000100000000     *            *            0            761 *   *   
NRT2	*      *      *      *            000200000000 000200000000     *            *            0            762 *   *   
NRT4	*      *      *      *            000400000000 000400000000     *            *            0            763 *   015 
ST1	*      *      *      *            777777777777 215400000000     215400000000 *            0            *   *   745 

FLAGS - INT/FINAL   000200 000200 
INITIAL
C(AC)=216400 000000 C(E) =000000 010000 
FINAL
C(AC)=215400 000000 
----------

*032576  FLTR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032576 032576 032576 127200000002 777777777777 214400000000     214400000000 000000777773 0            763 010 777 
IT1	*      *      000002 *            127200000002 *                215400000000 *            0            *   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            *   *   *   
FT6	032577 032577 032577 312200000003 777777777777 000000004000     *            *            0            *   *   *   
ET2	*      *      *      *            *            *                *            *            0            *   *   774 
SCT2	*      *      *      *            000000004000 *                *            *            0            774 *   777 
SCT2	*      *      *      *            000000001000 000000001000     *            *            0            775 *   *   
SCT2	*      *      *      *            000000000200 000000000200     *            *            0            776 *   *   
SCT2	*      *      *      *            000000000040 000000000040     *            *            0            777 *   *   
NRT1	*      *      *      *            000000000010 000000000010     *            *            0            000 *   735 
NRT2	*      *      *      *            *            *                *            *            0            735 *   777 
NRT2	*      *      *      *            000000000020 000000000020     *            *            0            736 *   *   
NRT2	*      *      *      *            000000000040 000000000040     *            *            0            737 *   *   
NRT2	*      *      *      *            000000000100 000000000100     *            *            0            740 *   *   
NRT2	*      *      *      *            000000000200 000000000200     *            *            0            741 *   *   
NRT2	*      *      *      *            000000000400 000000000400     *            *            0            742 *   *   
NRT2	*      *      *      *            000000001000 000000001000     *            *            0            743 *   *   
NRT2	*      *      *      *            000000002000 000000002000     *            *            0            744 *   *   
NRT2	*      *      *      *            000000004000 000000004000     *            *            0            745 *   *   
NRT2	*      *      *      *            000000010000 000000010000     *            *            0            746 *   *   
NRT2	*      *      *      *            000000020000 000000020000     *            *            0            747 *   *   
NRT2	*      *      *      *            000000040000 000000040000     *            *            0            750 *   *   
NRT2	*      *      *      *            000000100000 000000100000     *            *            0            751 *   *   
NRT2	*      *      *      *            000000200000 000000200000     *            *            0            752 *   *   
NRT2	*      *      *      *            000000400000 000000400000     *            *            0            753 *   *   
NRT2	*      *      *      *            000001000000 000001000000     *            *            0            754 *   *   
NRT2	*      *      *      *            000002000000 000002000000     *            *            0            755 *   *   
NRT2	*      *      *      *            000004000000 000004000000     *            *            0            756 *   *   
NRT2	*      *      *      *            000010000000 000010000000     *            *            0            757 *   *   
NRT2	*      *      *      *            000020000000 000020000000     *            *            0            760 *   *   
NRT2	*      *      *      *            000040000000 000040000000     *            *            0            761 *   *   
NRT2	*      *      *      *            000100000000 000100000000     *            *            0            762 *   *   
NRT2	*      *      *      *            000200000000 000200000000     *            *            0            763 *   *   
NRT4	*      *      *      *            000400000000 000400000000     *            *            0            764 *   014 
ST1	*      *      *      *            777777777777 214400000000     214400000000 *            0            *   *   745 

FLAGS - INT/FINAL   000200 000200 
INITIAL                                                                                                                    SEQ 0324
C(AC)=215400 000000 C(E) =000000 004000 
FINAL
C(AC)=214400 000000 
----------

*032604  FLTR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032604 032604 032604 127200000002 777777777777 213400000000     213400000000 000000777773 0            764 010 777 
IT1	*      *      000002 *            127200000002 *                214400000000 *            0            *   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            *   *   *   
FT6	032605 032605 032605 312200000003 777777777777 000000002000     *            *            0            *   *   *   
ET2	*      *      *      *            *            *                *            *            0            *   *   774 
SCT2	*      *      *      *            000000002000 *                *            *            0            774 *   777 
SCT2	*      *      *      *            000000000400 000000000400     *            *            0            775 *   *   
SCT2	*      *      *      *            000000000100 000000000100     *            *            0            776 *   *   
SCT2	*      *      *      *            000000000020 000000000020     *            *            0            777 *   *   
NRT1	*      *      *      *            000000000004 000000000004     *            *            0            000 *   735 
NRT2	*      *      *      *            *            *                *            *            0            735 *   777 
NRT2	*      *      *      *            000000000010 000000000010     *            *            0            736 *   *   
NRT2	*      *      *      *            000000000020 000000000020     *            *            0            737 *   *   
NRT2	*      *      *      *            000000000040 000000000040     *            *            0            740 *   *   
NRT2	*      *      *      *            000000000100 000000000100     *            *            0            741 *   *   
NRT2	*      *      *      *            000000000200 000000000200     *            *            0            742 *   *   
NRT2	*      *      *      *            000000000400 000000000400     *            *            0            743 *   *   
NRT2	*      *      *      *            000000001000 000000001000     *            *            0            744 *   *   
NRT2	*      *      *      *            000000002000 000000002000     *            *            0            745 *   *   
NRT2	*      *      *      *            000000004000 000000004000     *            *            0            746 *   *   
NRT2	*      *      *      *            000000010000 000000010000     *            *            0            747 *   *   
NRT2	*      *      *      *            000000020000 000000020000     *            *            0            750 *   *   
NRT2	*      *      *      *            000000040000 000000040000     *            *            0            751 *   *   
NRT2	*      *      *      *            000000100000 000000100000     *            *            0            752 *   *   
NRT2	*      *      *      *            000000200000 000000200000     *            *            0            753 *   *   
NRT2	*      *      *      *            000000400000 000000400000     *            *            0            754 *   *   
NRT2	*      *      *      *            000001000000 000001000000     *            *            0            755 *   *   
NRT2	*      *      *      *            000002000000 000002000000     *            *            0            756 *   *   
NRT2	*      *      *      *            000004000000 000004000000     *            *            0            757 *   *   
NRT2	*      *      *      *            000010000000 000010000000     *            *            0            760 *   *   
NRT2	*      *      *      *            000020000000 000020000000     *            *            0            761 *   *   
NRT2	*      *      *      *            000040000000 000040000000     *            *            0            762 *   *   
NRT2	*      *      *      *            000100000000 000100000000     *            *            0            763 *   *   
NRT2	*      *      *      *            000200000000 000200000000     *            *            0            764 *   *   
NRT4	*      *      *      *            000400000000 000400000000     *            *            0            765 *   013 
ST1	*      *      *      *            777777777777 213400000000     213400000000 *            0            *   *   745 

FLAGS - INT/FINAL   000200 000200 
INITIAL
C(AC)=214400 000000 C(E) =000000 002000 
FINAL
C(AC)=213400 000000 
----------

*032612  FLTR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032612 032612 032612 127200000002 777777777777 212400000000     212400000000 000000777773 0            765 010 777 
IT1	*      *      000002 *            127200000002 *                213400000000 *            0            *   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            *   *   *   
FT6	032613 032613 032613 312200000003 777777777777 000000001000     *            *            0            *   *   *   
ET2	*      *      *      *            *            *                *            *            0            *   *   77  SEQ 0325
SCT2	*      *      *      *            000000001000 *                *            *            0            774 *   777 
SCT2	*      *      *      *            000000000200 000000000200     *            *            0            775 *   *   
SCT2	*      *      *      *            000000000040 000000000040     *            *            0            776 *   *   
SCT2	*      *      *      *            000000000010 000000000010     *            *            0            777 *   *   
NRT1	*      *      *      *            000000000002 000000000002     *            *            0            000 *   735 
NRT2	*      *      *      *            *            *                *            *            0            735 *   777 
NRT2	*      *      *      *            000000000004 000000000004     *            *            0            736 *   *   
NRT2	*      *      *      *            000000000010 000000000010     *            *            0            737 *   *   
NRT2	*      *      *      *            000000000020 000000000020     *            *            0            740 *   *   
NRT2	*      *      *      *            000000000040 000000000040     *            *            0            741 *   *   
NRT2	*      *      *      *            000000000100 000000000100     *            *            0            742 *   *   
NRT2	*      *      *      *            000000000200 000000000200     *            *            0            743 *   *   
NRT2	*      *      *      *            000000000400 000000000400     *            *            0            744 *   *   
NRT2	*      *      *      *            000000001000 000000001000     *            *            0            745 *   *   
NRT2	*      *      *      *            000000002000 000000002000     *            *            0            746 *   *   
NRT2	*      *      *      *            000000004000 000000004000     *            *            0            747 *   *   
NRT2	*      *      *      *            000000010000 000000010000     *            *            0            750 *   *   
NRT2	*      *      *      *            000000020000 000000020000     *            *            0            751 *   *   
NRT2	*      *      *      *            000000040000 000000040000     *            *            0            752 *   *   
NRT2	*      *      *      *            000000100000 000000100000     *            *            0            753 *   *   
NRT2	*      *      *      *            000000200000 000000200000     *            *            0            754 *   *   
NRT2	*      *      *      *            000000400000 000000400000     *            *            0            755 *   *   
NRT2	*      *      *      *            000001000000 000001000000     *            *            0            756 *   *   
NRT2	*      *      *      *            000002000000 000002000000     *            *            0            757 *   *   
NRT2	*      *      *      *            000004000000 000004000000     *            *            0            760 *   *   
NRT2	*      *      *      *            000010000000 000010000000     *            *            0            761 *   *   
NRT2	*      *      *      *            000020000000 000020000000     *            *            0            762 *   *   
NRT2	*      *      *      *            000040000000 000040000000     *            *            0            763 *   *   
NRT2	*      *      *      *            000100000000 000100000000     *            *            0            764 *   *   
NRT2	*      *      *      *            000200000000 000200000000     *            *            0            765 *   *   
NRT4	*      *      *      *            000400000000 000400000000     *            *            0            766 *   012 
ST1	*      *      *      *            777777777777 212400000000     212400000000 *            0            *   *   745 

FLAGS - INT/FINAL   000200 000200 
INITIAL
C(AC)=213400 000000 C(E) =000000 001000 
FINAL
C(AC)=212400 000000 
----------

*032620  FLTR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032620 032620 032620 127200000002 777777777777 211400000000     211400000000 000000777773 0            766 010 777 
IT1	*      *      000002 *            127200000002 *                212400000000 *            0            *   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            *   *   *   
FT6	032621 032621 032621 312200000003 777777777777 000000000400     *            *            0            *   *   *   
ET2	*      *      *      *            *            *                *            *            0            *   *   774 
SCT2	*      *      *      *            000000000400 *                *            *            0            774 *   777 
SCT2	*      *      *      *            000000000100 000000000100     *            *            0            775 *   *   
SCT2	*      *      *      *            000000000020 000000000020     *            *            0            776 *   *   
SCT2	*      *      *      *            000000000004 000000000004     *            *            0            777 *   *   
NRT1	*      *      *      *            000000000001 000000000001     *            *            0            000 *   735 
NRT2	*      *      *      *            *            *                *            *            0            735 *   777 
NRT2	*      *      *      *            000000000002 000000000002     *            *            0            736 *   *   
NRT2	*      *      *      *            000000000004 000000000004     *            *            0            737 *   *   
NRT2	*      *      *      *            000000000010 000000000010     *            *            0            740 *   *   
NRT2	*      *      *      *            000000000020 000000000020     *            *            0            741 *   *   
NRT2	*      *      *      *            000000000040 000000000040     *            *            0            742 *   *   
NRT2	*      *      *      *            000000000100 000000000100     *            *            0            743 *   *   SEQ 0326
NRT2	*      *      *      *            000000000200 000000000200     *            *            0            744 *   *   
NRT2	*      *      *      *            000000000400 000000000400     *            *            0            745 *   *   
NRT2	*      *      *      *            000000001000 000000001000     *            *            0            746 *   *   
NRT2	*      *      *      *            000000002000 000000002000     *            *            0            747 *   *   
NRT2	*      *      *      *            000000004000 000000004000     *            *            0            750 *   *   
NRT2	*      *      *      *            000000010000 000000010000     *            *            0            751 *   *   
NRT2	*      *      *      *            000000020000 000000020000     *            *            0            752 *   *   
NRT2	*      *      *      *            000000040000 000000040000     *            *            0            753 *   *   
NRT2	*      *      *      *            000000100000 000000100000     *            *            0            754 *   *   
NRT2	*      *      *      *            000000200000 000000200000     *            *            0            755 *   *   
NRT2	*      *      *      *            000000400000 000000400000     *            *            0            756 *   *   
NRT2	*      *      *      *            000001000000 000001000000     *            *            0            757 *   *   
NRT2	*      *      *      *            000002000000 000002000000     *            *            0            760 *   *   
NRT2	*      *      *      *            000004000000 000004000000     *            *            0            761 *   *   
NRT2	*      *      *      *            000010000000 000010000000     *            *            0            762 *   *   
NRT2	*      *      *      *            000020000000 000020000000     *            *            0            763 *   *   
NRT2	*      *      *      *            000040000000 000040000000     *            *            0            764 *   *   
NRT2	*      *      *      *            000100000000 000100000000     *            *            0            765 *   *   
NRT2	*      *      *      *            000200000000 000200000000     *            *            0            766 *   *   
NRT4	*      *      *      *            000400000000 000400000000     *            *            0            767 *   011 
ST1	*      *      *      *            777777777777 211400000000     211400000000 *            0            *   *   745 

FLAGS - INT/FINAL   000200 000200 
INITIAL
C(AC)=212400 000000 C(E) =000000 000400 
FINAL
C(AC)=211400 000000 
----------

*032626  FLTR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032626 032626 032626 127200000002 777777777777 210400000000     210400000000 000000777773 0            767 010 777 
IT1	*      *      000002 *            127200000002 *                211400000000 *            0            *   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            *   *   *   
FT6	032627 032627 032627 312200000003 777777777777 000000000200     *            *            0            *   *   *   
ET2	*      *      *      *            *            *                *            *            0            *   *   774 
SCT2	*      *      *      *            000000000200 *                *            *            0            774 *   777 
SCT2	*      *      *      *            000000000040 000000000040     *            *            0            775 *   *   
SCT2	*      *      *      *            000000000010 000000000010     *            *            0            776 *   *   
SCT2	*      *      *      *            000000000002 000000000002     *            *            0            777 *   *   
NRT1	*      *      *      *            000000000000 000000000000     *            *            001000000000 000 *   735 
NRT2	*      *      *      *            0            0                *            *            *            735 *   777 
NRT2	*      *      *      *            000000000001 000000000001     *            *            000000000000 736 *   *   
NRT2	*      *      *      *            000000000002 000000000002     *            *            0            737 *   *   
NRT2	*      *      *      *            000000000004 000000000004     *            *            0            740 *   *   
NRT2	*      *      *      *            000000000010 000000000010     *            *            0            741 *   *   
NRT2	*      *      *      *            000000000020 000000000020     *            *            0            742 *   *   
NRT2	*      *      *      *            000000000040 000000000040     *            *            0            743 *   *   
NRT2	*      *      *      *            000000000100 000000000100     *            *            0            744 *   *   
NRT2	*      *      *      *            000000000200 000000000200     *            *            0            745 *   *   
NRT2	*      *      *      *            000000000400 000000000400     *            *            0            746 *   *   
NRT2	*      *      *      *            000000001000 000000001000     *            *            0            747 *   *   
NRT2	*      *      *      *            000000002000 000000002000     *            *            0            750 *   *   
NRT2	*      *      *      *            000000004000 000000004000     *            *            0            751 *   *   
NRT2	*      *      *      *            000000010000 000000010000     *            *            0            752 *   *   
NRT2	*      *      *      *            000000020000 000000020000     *            *            0            753 *   *   
NRT2	*      *      *      *            000000040000 000000040000     *            *            0            754 *   *   
NRT2	*      *      *      *            000000100000 000000100000     *            *            0            755 *   *   
NRT2	*      *      *      *            000000200000 000000200000     *            *            0            756 *   *   SEQ 0327
NRT2	*      *      *      *            000000400000 000000400000     *            *            0            757 *   *   
NRT2	*      *      *      *            000001000000 000001000000     *            *            0            760 *   *   
NRT2	*      *      *      *            000002000000 000002000000     *            *            0            761 *   *   
NRT2	*      *      *      *            000004000000 000004000000     *            *            0            762 *   *   
NRT2	*      *      *      *            000010000000 000010000000     *            *            0            763 *   *   
NRT2	*      *      *      *            000020000000 000020000000     *            *            0            764 *   *   
NRT2	*      *      *      *            000040000000 000040000000     *            *            0            765 *   *   
NRT2	*      *      *      *            000100000000 000100000000     *            *            0            766 *   *   
NRT2	*      *      *      *            000200000000 000200000000     *            *            0            767 *   *   
NRT4	*      *      *      *            000400000000 000400000000     *            *            0            770 *   010 
ST1	*      *      *      *            777777777777 210400000000     210400000000 *            0            *   *   745 

FLAGS - INT/FINAL   000200 000200 
INITIAL
C(AC)=211400 000000 C(E) =000000 000200 
FINAL
C(AC)=210400 000000 
----------

*032634  FLTR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032634 032634 032634 127200000002 777777777777 207400000000     207400000000 000000777773 0            770 010 777 
IT1	*      *      000002 *            127200000002 *                210400000000 *            0            *   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            *   *   *   
FT6	032635 032635 032635 312200000003 777777777777 000000000100     *            *            0            *   *   *   
ET2	*      *      *      *            *            *                *            *            0            *   *   774 
SCT2	*      *      *      *            000000000100 *                *            *            0            774 *   777 
SCT2	*      *      *      *            000000000020 000000000020     *            *            0            775 *   *   
SCT2	*      *      *      *            000000000004 000000000004     *            *            0            776 *   *   
SCT2	*      *      *      *            000000000001 000000000001     *            *            0            777 *   *   
NRT1	*      *      *      *            000000000000 000000000000     *            *            000400000000 000 *   735 
NRT2	*      *      *      *            0            0                *            *            *            735 *   777 
NRT2	*      *      *      *            0            0                *            *            001000000000 736 *   *   
NRT2	*      *      *      *            000000000001 000000000001     *            *            000000000000 737 *   *   
NRT2	*      *      *      *            000000000002 000000000002     *            *            0            740 *   *   
NRT2	*      *      *      *            000000000004 000000000004     *            *            0            741 *   *   
NRT2	*      *      *      *            000000000010 000000000010     *            *            0            742 *   *   
NRT2	*      *      *      *            000000000020 000000000020     *            *            0            743 *   *   
NRT2	*      *      *      *            000000000040 000000000040     *            *            0            744 *   *   
NRT2	*      *      *      *            000000000100 000000000100     *            *            0            745 *   *   
NRT2	*      *      *      *            000000000200 000000000200     *            *            0            746 *   *   
NRT2	*      *      *      *            000000000400 000000000400     *            *            0            747 *   *   
NRT2	*      *      *      *            000000001000 000000001000     *            *            0            750 *   *   
NRT2	*      *      *      *            000000002000 000000002000     *            *            0            751 *   *   
NRT2	*      *      *      *            000000004000 000000004000     *            *            0            752 *   *   
NRT2	*      *      *      *            000000010000 000000010000     *            *            0            753 *   *   
NRT2	*      *      *      *            000000020000 000000020000     *            *            0            754 *   *   
NRT2	*      *      *      *            000000040000 000000040000     *            *            0            755 *   *   
NRT2	*      *      *      *            000000100000 000000100000     *            *            0            756 *   *   
NRT2	*      *      *      *            000000200000 000000200000     *            *            0            757 *   *   
NRT2	*      *      *      *            000000400000 000000400000     *            *            0            760 *   *   
NRT2	*      *      *      *            000001000000 000001000000     *            *            0            761 *   *   
NRT2	*      *      *      *            000002000000 000002000000     *            *            0            762 *   *   
NRT2	*      *      *      *            000004000000 000004000000     *            *            0            763 *   *   
NRT2	*      *      *      *            000010000000 000010000000     *            *            0            764 *   *   
NRT2	*      *      *      *            000020000000 000020000000     *            *            0            765 *   *   
NRT2	*      *      *      *            000040000000 000040000000     *            *            0            766 *   *   
NRT2	*      *      *      *            000100000000 000100000000     *            *            0            767 *   *   
NRT2	*      *      *      *            000200000000 000200000000     *            *            0            770 *   *   SEQ 0328
NRT4	*      *      *      *            000400000000 000400000000     *            *            0            771 *   007 
ST1	*      *      *      *            777777777777 207400000000     207400000000 *            0            *   *   745 

FLAGS - INT/FINAL   000200 000200 
INITIAL
C(AC)=210400 000000 C(E) =000000 000100 
FINAL
C(AC)=207400 000000 
----------

*032642  FLTR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032642 032642 032642 127200000002 777777777777 206400000000     206400000000 000000777773 0            771 010 777 
IT1	*      *      000002 *            127200000002 *                207400000000 *            0            *   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            *   *   *   
FT6	032643 032643 032643 312200000003 777777777777 000000000040     *            *            0            *   *   *   
ET2	*      *      *      *            *            *                *            *            0            *   *   774 
SCT2	*      *      *      *            000000000040 *                *            *            0            774 *   777 
SCT2	*      *      *      *            000000000010 000000000010     *            *            0            775 *   *   
SCT2	*      *      *      *            000000000002 000000000002     *            *            0            776 *   *   
SCT2	*      *      *      *            000000000000 000000000000     *            *            001000000000 777 *   *   
NRT1	*      *      *      *            0            0                *            *            000200000000 000 *   735 
NRT2	*      *      *      *            0            0                *            *            *            735 *   777 
NRT2	*      *      *      *            0            0                *            *            000400000000 736 *   *   
NRT2	*      *      *      *            0            0                *            *            001000000000 737 *   *   
NRT2	*      *      *      *            000000000001 000000000001     *            *            000000000000 740 *   *   
NRT2	*      *      *      *            000000000002 000000000002     *            *            0            741 *   *   
NRT2	*      *      *      *            000000000004 000000000004     *            *            0            742 *   *   
NRT2	*      *      *      *            000000000010 000000000010     *            *            0            743 *   *   
NRT2	*      *      *      *            000000000020 000000000020     *            *            0            744 *   *   
NRT2	*      *      *      *            000000000040 000000000040     *            *            0            745 *   *   
NRT2	*      *      *      *            000000000100 000000000100     *            *            0            746 *   *   
NRT2	*      *      *      *            000000000200 000000000200     *            *            0            747 *   *   
NRT2	*      *      *      *            000000000400 000000000400     *            *            0            750 *   *   
NRT2	*      *      *      *            000000001000 000000001000     *            *            0            751 *   *   
NRT2	*      *      *      *            000000002000 000000002000     *            *            0            752 *   *   
NRT2	*      *      *      *            000000004000 000000004000     *            *            0            753 *   *   
NRT2	*      *      *      *            000000010000 000000010000     *            *            0            754 *   *   
NRT2	*      *      *      *            000000020000 000000020000     *            *            0            755 *   *   
NRT2	*      *      *      *            000000040000 000000040000     *            *            0            756 *   *   
NRT2	*      *      *      *            000000100000 000000100000     *            *            0            757 *   *   
NRT2	*      *      *      *            000000200000 000000200000     *            *            0            760 *   *   
NRT2	*      *      *      *            000000400000 000000400000     *            *            0            761 *   *   
NRT2	*      *      *      *            000001000000 000001000000     *            *            0            762 *   *   
NRT2	*      *      *      *            000002000000 000002000000     *            *            0            763 *   *   
NRT2	*      *      *      *            000004000000 000004000000     *            *            0            764 *   *   
NRT2	*      *      *      *            000010000000 000010000000     *            *            0            765 *   *   
NRT2	*      *      *      *            000020000000 000020000000     *            *            0            766 *   *   
NRT2	*      *      *      *            000040000000 000040000000     *            *            0            767 *   *   
NRT2	*      *      *      *            000100000000 000100000000     *            *            0            770 *   *   
NRT2	*      *      *      *            000200000000 000200000000     *            *            0            771 *   *   
NRT4	*      *      *      *            000400000000 000400000000     *            *            0            772 *   006 
ST1	*      *      *      *            777777777777 206400000000     206400000000 *            0            *   *   745 

FLAGS - INT/FINAL   000200 000200 
INITIAL
C(AC)=207400 000000 C(E) =000000 000040 
FINAL
C(AC)=206400 000000                                                                                                        SEQ 0329
----------

*032650  FLTR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032650 032650 032650 127200000002 777777777777 205400000000     205400000000 000000777773 0            772 010 777 
IT1	*      *      000002 *            127200000002 *                206400000000 *            0            *   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            *   *   *   
FT6	032651 032651 032651 312200000003 777777777777 000000000020     *            *            0            *   *   *   
ET2	*      *      *      *            *            *                *            *            0            *   *   774 
SCT2	*      *      *      *            000000000020 *                *            *            0            774 *   777 
SCT2	*      *      *      *            000000000004 000000000004     *            *            0            775 *   *   
SCT2	*      *      *      *            000000000001 000000000001     *            *            0            776 *   *   
SCT2	*      *      *      *            000000000000 000000000000     *            *            000400000000 777 *   *   
NRT1	*      *      *      *            0            0                *            *            000100000000 000 *   735 
NRT2	*      *      *      *            0            0                *            *            *            735 *   777 
NRT2	*      *      *      *            0            0                *            *            000200000000 736 *   *   
NRT2	*      *      *      *            0            0                *            *            000400000000 737 *   *   
NRT2	*      *      *      *            0            0                *            *            001000000000 740 *   *   
NRT2	*      *      *      *            000000000001 000000000001     *            *            000000000000 741 *   *   
NRT2	*      *      *      *            000000000002 000000000002     *            *            0            742 *   *   
NRT2	*      *      *      *            000000000004 000000000004     *            *            0            743 *   *   
NRT2	*      *      *      *            000000000010 000000000010     *            *            0            744 *   *   
NRT2	*      *      *      *            000000000020 000000000020     *            *            0            745 *   *   
NRT2	*      *      *      *            000000000040 000000000040     *            *            0            746 *   *   
NRT2	*      *      *      *            000000000100 000000000100     *            *            0            747 *   *   
NRT2	*      *      *      *            000000000200 000000000200     *            *            0            750 *   *   
NRT2	*      *      *      *            000000000400 000000000400     *            *            0            751 *   *   
NRT2	*      *      *      *            000000001000 000000001000     *            *            0            752 *   *   
NRT2	*      *      *      *            000000002000 000000002000     *            *            0            753 *   *   
NRT2	*      *      *      *            000000004000 000000004000     *            *            0            754 *   *   
NRT2	*      *      *      *            000000010000 000000010000     *            *            0            755 *   *   
NRT2	*      *      *      *            000000020000 000000020000     *            *            0            756 *   *   
NRT2	*      *      *      *            000000040000 000000040000     *            *            0            757 *   *   
NRT2	*      *      *      *            000000100000 000000100000     *            *            0            760 *   *   
NRT2	*      *      *      *            000000200000 000000200000     *            *            0            761 *   *   
NRT2	*      *      *      *            000000400000 000000400000     *            *            0            762 *   *   
NRT2	*      *      *      *            000001000000 000001000000     *            *            0            763 *   *   
NRT2	*      *      *      *            000002000000 000002000000     *            *            0            764 *   *   
NRT2	*      *      *      *            000004000000 000004000000     *            *            0            765 *   *   
NRT2	*      *      *      *            000010000000 000010000000     *            *            0            766 *   *   
NRT2	*      *      *      *            000020000000 000020000000     *            *            0            767 *   *   
NRT2	*      *      *      *            000040000000 000040000000     *            *            0            770 *   *   
NRT2	*      *      *      *            000100000000 000100000000     *            *            0            771 *   *   
NRT2	*      *      *      *            000200000000 000200000000     *            *            0            772 *   *   
NRT4	*      *      *      *            000400000000 000400000000     *            *            0            773 *   005 
ST1	*      *      *      *            777777777777 205400000000     205400000000 *            0            *   *   745 

FLAGS - INT/FINAL   000200 000200 
INITIAL
C(AC)=206400 000000 C(E) =000000 000020 
FINAL
C(AC)=205400 000000 
----------

*032656  FLTR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032656 032656 032656 127200000002 777777777777 204400000000     204400000000 000000777773 0            773 010 777 
IT1	*      *      000002 *            127200000002 *                205400000000 *            0            *   *   *   SEQ 0330
MEMST	*      *      *      *            *            000000000002     *            *            0            *   *   *   
FT6	032657 032657 032657 312200000003 777777777777 000000000010     *            *            0            *   *   *   
ET2	*      *      *      *            *            *                *            *            0            *   *   774 
SCT2	*      *      *      *            000000000010 *                *            *            0            774 *   777 
SCT2	*      *      *      *            000000000002 000000000002     *            *            0            775 *   *   
SCT2	*      *      *      *            000000000000 000000000000     *            *            001000000000 776 *   *   
SCT2	*      *      *      *            0            0                *            *            000200000000 777 *   *   
NRT1	*      *      *      *            0            0                *            *            000040000000 000 *   735 
NRT2	*      *      *      *            0            0                *            *            *            735 *   777 
NRT2	*      *      *      *            0            0                *            *            000100000000 736 *   *   
NRT2	*      *      *      *            0            0                *            *            000200000000 737 *   *   
NRT2	*      *      *      *            0            0                *            *            000400000000 740 *   *   
NRT2	*      *      *      *            0            0                *            *            001000000000 741 *   *   
NRT2	*      *      *      *            000000000001 000000000001     *            *            000000000000 742 *   *   
NRT2	*      *      *      *            000000000002 000000000002     *            *            0            743 *   *   
NRT2	*      *      *      *            000000000004 000000000004     *            *            0            744 *   *   
NRT2	*      *      *      *            000000000010 000000000010     *            *            0            745 *   *   
NRT2	*      *      *      *            000000000020 000000000020     *            *            0            746 *   *   
NRT2	*      *      *      *            000000000040 000000000040     *            *            0            747 *   *   
NRT2	*      *      *      *            000000000100 000000000100     *            *            0            750 *   *   
NRT2	*      *      *      *            000000000200 000000000200     *            *            0            751 *   *   
NRT2	*      *      *      *            000000000400 000000000400     *            *            0            752 *   *   
NRT2	*      *      *      *            000000001000 000000001000     *            *            0            753 *   *   
NRT2	*      *      *      *            000000002000 000000002000     *            *            0            754 *   *   
NRT2	*      *      *      *            000000004000 000000004000     *            *            0            755 *   *   
NRT2	*      *      *      *            000000010000 000000010000     *            *            0            756 *   *   
NRT2	*      *      *      *            000000020000 000000020000     *            *            0            757 *   *   
NRT2	*      *      *      *            000000040000 000000040000     *            *            0            760 *   *   
NRT2	*      *      *      *            000000100000 000000100000     *            *            0            761 *   *   
NRT2	*      *      *      *            000000200000 000000200000     *            *            0            762 *   *   
NRT2	*      *      *      *            000000400000 000000400000     *            *            0            763 *   *   
NRT2	*      *      *      *            000001000000 000001000000     *            *            0            764 *   *   
NRT2	*      *      *      *            000002000000 000002000000     *            *            0            765 *   *   
NRT2	*      *      *      *            000004000000 000004000000     *            *            0            766 *   *   
NRT2	*      *      *      *            000010000000 000010000000     *            *            0            767 *   *   
NRT2	*      *      *      *            000020000000 000020000000     *            *            0            770 *   *   
NRT2	*      *      *      *            000040000000 000040000000     *            *            0            771 *   *   
NRT2	*      *      *      *            000100000000 000100000000     *            *            0            772 *   *   
NRT2	*      *      *      *            000200000000 000200000000     *            *            0            773 *   *   
NRT4	*      *      *      *            000400000000 000400000000     *            *            0            774 *   004 
ST1	*      *      *      *            777777777777 204400000000     204400000000 *            0            *   *   745 

FLAGS - INT/FINAL   000200 000200 
INITIAL
C(AC)=205400 000000 C(E) =000000 000010 
FINAL
C(AC)=204400 000000 
----------

*032664  FLTR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032664 032664 032664 127200000002 777777777777 203400000000     203400000000 000000777773 0            774 010 777 
IT1	*      *      000002 *            127200000002 *                204400000000 *            0            *   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            *   *   *   
FT6	032665 032665 032665 312200000003 777777777777 000000000004     *            *            0            *   *   *   
ET2	*      *      *      *            *            *                *            *            0            *   *   774 
SCT2	*      *      *      *            000000000004 *                *            *            0            *   *   777 
SCT2	*      *      *      *            000000000001 000000000001     *            *            0            775 *   *   
SCT2	*      *      *      *            000000000000 000000000000     *            *            000400000000 776 *   *   SEQ 0331
SCT2	*      *      *      *            0            0                *            *            000100000000 777 *   *   
NRT1	*      *      *      *            0            0                *            *            000020000000 000 *   735 
NRT2	*      *      *      *            0            0                *            *            *            735 *   777 
NRT2	*      *      *      *            0            0                *            *            000040000000 736 *   *   
NRT2	*      *      *      *            0            0                *            *            000100000000 737 *   *   
NRT2	*      *      *      *            0            0                *            *            000200000000 740 *   *   
NRT2	*      *      *      *            0            0                *            *            000400000000 741 *   *   
NRT2	*      *      *      *            0            0                *            *            001000000000 742 *   *   
NRT2	*      *      *      *            000000000001 000000000001     *            *            000000000000 743 *   *   
NRT2	*      *      *      *            000000000002 000000000002     *            *            0            744 *   *   
NRT2	*      *      *      *            000000000004 000000000004     *            *            0            745 *   *   
NRT2	*      *      *      *            000000000010 000000000010     *            *            0            746 *   *   
NRT2	*      *      *      *            000000000020 000000000020     *            *            0            747 *   *   
NRT2	*      *      *      *            000000000040 000000000040     *            *            0            750 *   *   
NRT2	*      *      *      *            000000000100 000000000100     *            *            0            751 *   *   
NRT2	*      *      *      *            000000000200 000000000200     *            *            0            752 *   *   
NRT2	*      *      *      *            000000000400 000000000400     *            *            0            753 *   *   
NRT2	*      *      *      *            000000001000 000000001000     *            *            0            754 *   *   
NRT2	*      *      *      *            000000002000 000000002000     *            *            0            755 *   *   
NRT2	*      *      *      *            000000004000 000000004000     *            *            0            756 *   *   
NRT2	*      *      *      *            000000010000 000000010000     *            *            0            757 *   *   
NRT2	*      *      *      *            000000020000 000000020000     *            *            0            760 *   *   
NRT2	*      *      *      *            000000040000 000000040000     *            *            0            761 *   *   
NRT2	*      *      *      *            000000100000 000000100000     *            *            0            762 *   *   
NRT2	*      *      *      *            000000200000 000000200000     *            *            0            763 *   *   
NRT2	*      *      *      *            000000400000 000000400000     *            *            0            764 *   *   
NRT2	*      *      *      *            000001000000 000001000000     *            *            0            765 *   *   
NRT2	*      *      *      *            000002000000 000002000000     *            *            0            766 *   *   
NRT2	*      *      *      *            000004000000 000004000000     *            *            0            767 *   *   
NRT2	*      *      *      *            000010000000 000010000000     *            *            0            770 *   *   
NRT2	*      *      *      *            000020000000 000020000000     *            *            0            771 *   *   
NRT2	*      *      *      *            000040000000 000040000000     *            *            0            772 *   *   
NRT2	*      *      *      *            000100000000 000100000000     *            *            0            773 *   *   
NRT2	*      *      *      *            000200000000 000200000000     *            *            0            774 *   *   
NRT4	*      *      *      *            000400000000 000400000000     *            *            0            775 *   003 
ST1	*      *      *      *            777777777777 203400000000     203400000000 *            0            *   *   745 

FLAGS - INT/FINAL   000200 000200 
INITIAL
C(AC)=204400 000000 C(E) =000000 000004 
FINAL
C(AC)=203400 000000 
----------

*032672  FLTR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032672 032672 032672 127200000002 777777777777 202400000000     202400000000 000000777773 0            775 010 777 
IT1	*      *      000002 *            127200000002 *                203400000000 *            0            *   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            *   *   *   
FT6	032673 032673 032673 312200000003 777777777777 *                *            *            0            *   *   *   
ET2	*      *      *      *            *            *                *            *            0            *   *   774 
SCT2	*      *      *      *            000000000002 *                *            *            0            774 *   777 
SCT2	*      *      *      *            000000000000 000000000000     *            *            001000000000 775 *   *   
SCT2	*      *      *      *            0            0                *            *            000200000000 776 *   *   
SCT2	*      *      *      *            0            0                *            *            000040000000 777 *   *   
NRT1	*      *      *      *            0            0                *            *            000010000000 000 *   735 
NRT2	*      *      *      *            0            0                *            *            *            735 *   777 
NRT2	*      *      *      *            0            0                *            *            000020000000 736 *   *   
NRT2	*      *      *      *            0            0                *            *            000040000000 737 *   *   SEQ 0332
NRT2	*      *      *      *            0            0                *            *            000100000000 740 *   *   
NRT2	*      *      *      *            0            0                *            *            000200000000 741 *   *   
NRT2	*      *      *      *            0            0                *            *            000400000000 742 *   *   
NRT2	*      *      *      *            0            0                *            *            001000000000 743 *   *   
NRT2	*      *      *      *            000000000001 000000000001     *            *            000000000000 744 *   *   
NRT2	*      *      *      *            000000000002 000000000002     *            *            0            745 *   *   
NRT2	*      *      *      *            000000000004 000000000004     *            *            0            746 *   *   
NRT2	*      *      *      *            000000000010 000000000010     *            *            0            747 *   *   
NRT2	*      *      *      *            000000000020 000000000020     *            *            0            750 *   *   
NRT2	*      *      *      *            000000000040 000000000040     *            *            0            751 *   *   
NRT2	*      *      *      *            000000000100 000000000100     *            *            0            752 *   *   
NRT2	*      *      *      *            000000000200 000000000200     *            *            0            753 *   *   
NRT2	*      *      *      *            000000000400 000000000400     *            *            0            754 *   *   
NRT2	*      *      *      *            000000001000 000000001000     *            *            0            755 *   *   
NRT2	*      *      *      *            000000002000 000000002000     *            *            0            756 *   *   
NRT2	*      *      *      *            000000004000 000000004000     *            *            0            757 *   *   
NRT2	*      *      *      *            000000010000 000000010000     *            *            0            760 *   *   
NRT2	*      *      *      *            000000020000 000000020000     *            *            0            761 *   *   
NRT2	*      *      *      *            000000040000 000000040000     *            *            0            762 *   *   
NRT2	*      *      *      *            000000100000 000000100000     *            *            0            763 *   *   
NRT2	*      *      *      *            000000200000 000000200000     *            *            0            764 *   *   
NRT2	*      *      *      *            000000400000 000000400000     *            *            0            765 *   *   
NRT2	*      *      *      *            000001000000 000001000000     *            *            0            766 *   *   
NRT2	*      *      *      *            000002000000 000002000000     *            *            0            767 *   *   
NRT2	*      *      *      *            000004000000 000004000000     *            *            0            770 *   *   
NRT2	*      *      *      *            000010000000 000010000000     *            *            0            771 *   *   
NRT2	*      *      *      *            000020000000 000020000000     *            *            0            772 *   *   
NRT2	*      *      *      *            000040000000 000040000000     *            *            0            773 *   *   
NRT2	*      *      *      *            000100000000 000100000000     *            *            0            774 *   *   
NRT2	*      *      *      *            000200000000 000200000000     *            *            0            775 *   *   
NRT4	*      *      *      *            000400000000 000400000000     *            *            0            776 *   002 
ST1	*      *      *      *            777777777777 202400000000     202400000000 *            0            *   *   745 

FLAGS - INT/FINAL   000200 000200 
INITIAL
C(AC)=203400 000000 C(E) =000000 000002 
FINAL
C(AC)=202400 000000 
----------

*032700  FLTR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032700 032700 032700 127200000002 777777777777 201400000000     201400000000 000000777773 0            776 010 777 
IT1	*      *      000002 *            127200000002 *                202400000000 *            0            *   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            *   *   *   
FT6	032701 032701 032701 312200000003 777777777777 000000000001     *            *            0            *   *   *   
ET2	*      *      *      *            *            *                *            *            0            *   *   774 
SCT2	*      *      *      *            000000000001 *                *            *            0            774 *   777 
SCT2	*      *      *      *            000000000000 000000000000     *            *            000400000000 775 *   *   
SCT2	*      *      *      *            0            0                *            *            000100000000 776 *   *   
SCT2	*      *      *      *            0            0                *            *            000020000000 777 *   *   
NRT1	*      *      *      *            0            0                *            *            000004000000 000 *   735 
NRT2	*      *      *      *            0            0                *            *            *            735 *   777 
NRT2	*      *      *      *            0            0                *            *            000010000000 736 *   *   
NRT2	*      *      *      *            0            0                *            *            000020000000 737 *   *   
NRT2	*      *      *      *            0            0                *            *            000040000000 740 *   *   
NRT2	*      *      *      *            0            0                *            *            000100000000 741 *   *   
NRT2	*      *      *      *            0            0                *            *            000200000000 742 *   *   
NRT2	*      *      *      *            0            0                *            *            000400000000 743 *   *   SEQ 0333
NRT2	*      *      *      *            0            0                *            *            001000000000 744 *   *   
NRT2	*      *      *      *            000000000001 000000000001     *            *            000000000000 745 *   *   
NRT2	*      *      *      *            000000000002 000000000002     *            *            0            746 *   *   
NRT2	*      *      *      *            000000000004 000000000004     *            *            0            747 *   *   
NRT2	*      *      *      *            000000000010 000000000010     *            *            0            750 *   *   
NRT2	*      *      *      *            000000000020 000000000020     *            *            0            751 *   *   
NRT2	*      *      *      *            000000000040 000000000040     *            *            0            752 *   *   
NRT2	*      *      *      *            000000000100 000000000100     *            *            0            753 *   *   
NRT2	*      *      *      *            000000000200 000000000200     *            *            0            754 *   *   
NRT2	*      *      *      *            000000000400 000000000400     *            *            0            755 *   *   
NRT2	*      *      *      *            000000001000 000000001000     *            *            0            756 *   *   
NRT2	*      *      *      *            000000002000 000000002000     *            *            0            757 *   *   
NRT2	*      *      *      *            000000004000 000000004000     *            *            0            760 *   *   
NRT2	*      *      *      *            000000010000 000000010000     *            *            0            761 *   *   
NRT2	*      *      *      *            000000020000 000000020000     *            *            0            762 *   *   
NRT2	*      *      *      *            000000040000 000000040000     *            *            0            763 *   *   
NRT2	*      *      *      *            000000100000 000000100000     *            *            0            764 *   *   
NRT2	*      *      *      *            000000200000 000000200000     *            *            0            765 *   *   
NRT2	*      *      *      *            000000400000 000000400000     *            *            0            766 *   *   
NRT2	*      *      *      *            000001000000 000001000000     *            *            0            767 *   *   
NRT2	*      *      *      *            000002000000 000002000000     *            *            0            770 *   *   
NRT2	*      *      *      *            000004000000 000004000000     *            *            0            771 *   *   
NRT2	*      *      *      *            000010000000 000010000000     *            *            0            772 *   *   
NRT2	*      *      *      *            000020000000 000020000000     *            *            0            773 *   *   
NRT2	*      *      *      *            000040000000 000040000000     *            *            0            774 *   *   
NRT2	*      *      *      *            000100000000 000100000000     *            *            0            775 *   *   
NRT2	*      *      *      *            000200000000 000200000000     *            *            0            776 *   *   
NRT4	*      *      *      *            000400000000 000400000000     *            *            0            777 *   001 
ST1	*      *      *      *            777777777777 201400000000     201400000000 *            0            *   *   745 

FLAGS - INT/FINAL   000200 000200 
INITIAL
C(AC)=202400 000000 C(E) =000000 000001 
FINAL
C(AC)=201400 000000 
----------

*032706  FLTR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032706 032706 032706 127200000002 777777777777 533400000000     533400000000 000000777773 0            777 010 777 
IT1	*      *      000002 *            127200000002 *                201400000000 *            0            *   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            *   *   *   
FT6	032707 032707 032707 312200000003 777777777777 400000000000     *            *            0            *   *   *   
ET2	*      *      *      *            *            *                *            *            0            *   *   774 
SCT2	*      *      *      *            400000000000 *                *            *            0            774 *   777 
SCT2	*      *      *      *            700000000000 700000000000     *            *            0            775 *   *   
SCT2	*      *      *      *            760000000000 760000000000     *            *            0            776 *   *   
SCT2	*      *      *      *            774000000000 774000000000     *            *            0            777 *   *   
NRT1	*      *      *      *            777000000000 777000000000     *            *            0            000 *   735 
NRT3	*      *      *      *            *            *                *            *            0            735 *   734 
NRT4	*      *      *      *            777777777777 777400000000     *            *            0            734 *   733 
ST1	*      *      *      *            *            533400000000     533400000000 *            001000000000 *   *   745 

FLAGS - INT/FINAL   000200 000200 
INITIAL
C(AC)=201400 000000 C(E) =400000 000000 
FINAL
C(AC)=533400 000000 
----------                                                                                                                 SEQ 0334

*032714  FLTR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032714 032714 032714 127200000002 777777777777 534400000000     534400000000 000000032704 0            734 010 777 
IT1	*      *      000002 *            127200000002 *                533400000000 *            0            *   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            *   *   *   
FT6	032715 032715 032715 312200000003 777777777777 600000000000     *            *            0            *   *   *   
ET2	*      *      *      *            *            *                *            *            0            *   *   774 
SCT2	*      *      *      *            600000000000 *                *            *            0            774 *   777 
SCT2	*      *      *      *            740000000000 740000000000     *            *            0            775 *   *   
SCT2	*      *      *      *            770000000000 770000000000     *            *            0            776 *   *   
SCT2	*      *      *      *            776000000000 776000000000     *            *            0            777 *   *   
NRT1	*      *      *      *            777400000000 777400000000     *            *            0            000 *   735 
NRT2	*      *      *      *            *            *                *            *            0            735 *   777 
NRT3	*      *      *      *            777000000000 777000000000     *            *            0            736 *   735 
NRT4	*      *      *      *            777777777777 777400000000     *            *            0            735 *   734 
ST1	*      *      *      *            *            534400000000     534400000000 *            001000000000 *   *   745 

FLAGS - INT/FINAL   000200 000200 
INITIAL
C(AC)=533400 000000 C(E) =600000 000000 
FINAL
C(AC)=534400 000000 
----------

*032722  FLTR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032722 032722 032722 127200000002 777777777777 535400000000     535400000000 000000032712 0            735 010 777 
IT1	*      *      000002 *            127200000002 *                534400000000 *            0            *   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            *   *   *   
FT6	032723 032723 032723 312200000003 777777777777 700000000000     *            *            0            *   *   *   
ET2	*      *      *      *            *            *                *            *            0            *   *   774 
SCT2	*      *      *      *            700000000000 *                *            *            0            774 *   777 
SCT2	*      *      *      *            760000000000 760000000000     *            *            0            775 *   *   
SCT2	*      *      *      *            774000000000 774000000000     *            *            0            776 *   *   
SCT2	*      *      *      *            777000000000 777000000000     *            *            0            777 *   *   
NRT1	*      *      *      *            777600000000 777600000000     *            *            0            000 *   735 
NRT2	*      *      *      *            *            *                *            *            0            735 *   777 
NRT2	*      *      *      *            777400000000 777400000000     *            *            0            736 *   *   
NRT3	*      *      *      *            777000000000 777000000000     *            *            0            737 *   736 
NRT4	*      *      *      *            777777777777 777400000000     *            *            0            736 *   735 
ST1	*      *      *      *            *            535400000000     535400000000 *            001000000000 *   *   745 

FLAGS - INT/FINAL   000200 000200 
INITIAL
C(AC)=534400 000000 C(E) =700000 000000 
FINAL
C(AC)=535400 000000 
----------

*032730  FLTR	4,000002

STATE   PC     MA     AB     MB           AD           AR               FM           BR           MQ           SC  FE  SA
IT0	032730 032730 032730 127200000002 777777777777 536400000000     536400000000 000000032720 0            736 010 777 
IT1	*      *      000002 *            127200000002 *                535400000000 *            0            *   *   *   
MEMST	*      *      *      *            *            000000000002     *            *            0            *   *   *   
FT6	032731 032731 032731 312200000003 777777777777 740000000000     *            *            0            *   *   *   
ET2	*      *      *      *            *            *                *            *            0            *   *   77  SEQ 0335
SCT2	*      *      *      *            740000000000 *                *            *            0            774 *   777 
SCT2	*      *      *      *            770000000000 770000000000     *            *            0            775 *   *   
SCT2	*      *      *      *            776000000000 776000000000     *            *            0            776 *   *   
SCT2	*      *      *      *            777400000000 777400000000     *            *            0            777 *   *   
NRT1	*      *      *      *            777700000000 777700000000     *            *            0            000 *   735 
NRT2	*      *