Google
 

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







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


	PRODUCT CODE:	MAINDEC - 10 - DBKDB - C - D

	PRODUCT NAME:	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST

	VERSION:	0.3

	DATE RELEASED:	JUNE 9,1976

	AUTHOR:		JOHN R. KIRCHOFF

	MAINTAINED BY:	DIAGNOSTIC ENGINEERING GROUP


	COPYRIGHT(C) 1972,1973,1974,1976
	DIGITAL EQUIPMENT CORP.
	MARLBORO, MASS. 01752

THIS SOFTWARE IS FURNISHED TO PURCHASER UNDER A LICENSE FOR USE
ON A SINGLE COMPUTER SYSTEM AND CAN BE COPIED (WITH INCLUSION OF
DEC'S COPYRIGHT NOTICE) ONLY FOR USE IN SUCH SYSTEM, EXCEPT AS
MAY OTHERWISE BE PROVIDED IN WRITING BY 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-DBKDB.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	DDT COMMANDS

10.0	MISCELLANEOUS

11.0	SIMULATOR

12.0	LISTING
						MAINDEC-10-DBKDB.TXT
							PAGE 3                                                         *** SEQ 0003

1.0	ABSTRACT

	THE RANDOM NUMBER INSTRUCTION TEST IS DESIGNED TO EXPOSE PRO-
	CESSOR MALFUNCTIONS BY GENERATING AND EXECUTING RANDOM (NON
	PC-CHANGE) INSTRUCTIONS IN THE FAST ACCUMULATORS 11-16.  THE
	OPERANDS OF THESE INSTRUCTIONS REFERENCE ACCUMULATORS 0-7.  THE
	AC INSTRUCTION LOOP IS DUPLICATED IN NORMAL CORE MEMORY AND THE
	RESULTS COMPARED WITH THE FAST AC RESULTS IN AC 0-7.
	THE FAST AC LOOP IS ALSO SIMULATED AND THE SIMULATED RESULTS
	COMPARED WITH THE FAST AC RESULTS AND THE CORE MEMORY RESULTS.

	THE PROGRAM INCORPORATES DDT TO FACILITATE ERROR ISOLATION AND
	REPAIR.  CONTROL MAY BE TRANSFERED TO DDT AT ANY TIME BY TYPING
	AN ALT-MODE ($) ON THE TTY.

2.0	REQUIREMENTS

2.1	EQUIPMENT

	A PDP-10 KI10 EQUIPPED WITH A MINIMUM OF 32K OF MEMORY.
	CONSOLE TELETYPE
	LINE PRINTER (OPTIONAL)

2.2	STORAGE

	PROGRAM BEGINS AT 30000(8) AND USES THE REST OF 32K.

2.3	PRELIMINARY PROGRAMS

	PROCESSOR DIAGNOSTICS
	MEMORY DIAGNOSTICS
						MAINDEC-10-DBKDB.TXT
							PAGE 4                                                         *** SEQ 0004

3.0	PROGRAM PROCEDURES

3.1	LOADING PROCEDURE

	RUN WITH "DIAMON".

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.
	    SPECIAL FEATURE START (CLEAR OPERATING TOTALS) IS 30004.

	C.  USER MODE

	    WHEN LOADED AND RUN WITH "DIAMON" WILL RUN 2 PASSES.
	    TO THEN RUN FOREVER, TYPE "STD" TO "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:

		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.

	D.  IF IT IS DESIRED TO SPECIFY THE INITIAL BASE RANDOM NUMBER
	    SET SWITCH 'RANBAS' (BEFORE STARTING) AND RESPOND TO THE
	    FOLLOWING TYPE-OUT ACCORDINGLY.

			SPECIFY RANDOM NUMBER BASE -
						MAINDEC-10-DBKDB.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 PRO-
	    GRAM TO RUN A COMPLETE PASS AND THEN THE ERROR MESSAGES
	    MAY BE CORRELATED TO QUICKLY DIAGNOSE THE FAILURE.  IF IT
	    IS DESIRED TO LOOP ON A FAILURE SET THE LOOP ON ERROR SWITCH.
	    THE FIRST FAILURE WILL THEN CAUSE THE PROGRAM TO ENTER A
	    LOOP SUITABLE FOR DEBUGGING.  TO PRINT ALL ERRORS, EVEN IN
	    A DEBUGGING LOOP, SET THE PRINT ALL ERRORS SWITCH.

	    THE ERROR MESSAGES USED IN CONJUNCTION WITH THE LISTING, DDT,
	    AND SCOPING IF NECESSARY SHOULD ALLOW THE FAILING COMPONENT
	    TO BE ISOLATED AND REPLACED AND/OR REPAIRED.

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

	D.  PFSTRT - 30005  ; TO RESTART PROGRAM AFTER POWER FAILURE.

	E.  START1 - 30013  ; TO CONTINUE PROGRAM WITHOUT INITIALIZING
	    RANDOM NUMBER GENERATOR.

	F.  START2 - 30014  ; TO CONTINUE EXECUTION OF A FAILING INSTRUCTION
	    LOOP.

	G.  DDT - DDT MAY BE ENTERED DIRECTLY UPON STARTING THE PROGRAM
	    BY SETTING SWITCH 18.  DDT MAY ALSO BE ENTERED DURING RUNNING
	    OF THE PROGRAM BY TYPING AN ALT-MODE ($) ON THE TTY.

	    STARTING ADDRESS OF DDT IS 30007(8).
						MAINDEC-10-DBKDB.TXT
							PAGE 6                                                         *** SEQ 0006

4.0	DATA SWITCH FUNCTIONS
	---------------------

	LEFT HALF SWITCHES
	------------------
	SWITCH			STATE	FUNCTION
	------			-----	--------

	0 (400000)   ABORT	0	NORMAL
				1	ABORT PROGRAM ON PASS COMPLETION

	1 (200000)   RSTART	0	CONTINUE OPERATION
				1	PRINT TOTALS, RESTART PROGRAM

	2 (100000)   TOTALS	0	NO FUNCTION
				1	PRINT TOTALS, CONTINUE PROGRAM

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

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

	5 (010000)   DING	0	NO FUNCTION
				1	RING BELL ON ERROR

	6 (004000)   LOOPER	0	PROCEED TO NEXT TEST
				1	ENTER LOOP ON TEST ERROR

	7 (002000)   ERSTOP	0	PROGRAM CONTINUES FROM ERROR
				1	HALT ON TEST ERROR

	8 (001000)   PALERS	0	PRINT ONLY FIRST ERROR WHEN LOOPING
				1	PRINT ALL ERRORS

	9 (000400)   RELIAB	0	QUICK VERIFY MODE
				1	RELIABILITY MODE
						MAINDEC-10-DBKDB.TXT
							PAGE 7                                                         *** SEQ 0007

4.0	DATA SWITCH FUNCTIONS (CON'T)
	-----------------------------

	RIGHT HALF SWITCHES
	-------------------
	SWITCH			STATE	FUNCTION
	------			-----	--------

	18 (400000)  ENTDDT	0	NO FUNCTION
				1	ENTER DDT UPON STARTING THE
					PROGRAM.

	19 (200000)  RANBAS	0	USE PROGRAM INITIAL RANDOM BASE.
				1	SPECIFY RANDOM NUMBER BASE BY OPERATOR
					RESPONSE TO PROGRAM REQUEST.

	20 (100000)  MGNTST	0	MARGIN ENTIRE PROGRAM
				1	MARGIN FAST & SLOW LOOP ONLY

	25 (002000)  SEQPNT	0	NO FUNCTION
				1	PRINT SIMULATION SEQUENCE NUMBERS.

	27 (000400)  INHSCT	0	NORMAL SIMULATION PRINTOUT.
				1	INHIBIT SIMULATION SCT2 PRINTOUT.

	28 (000200)  INHCLK	0	PROCESS CLOCK INTERRUPTS
				1	INHIBIT CLOCK INTERRUPTS

	29 (000100)  INHMS	0	PRINT INSTRUCTION MACHINE STATES
				1	PRINT INSTRUCTION INITIAL/FINAL

	33 (000004)  SNGFL	0	REPEAT FAST LOOP (10 TIMES)
				1	SINGLE FAST LOOP

	34 (000002)  INHSIM	0	NORMAL COMPARISIONS (FAST AC, CORE, SIM).
				1	INHIBIT SIMULATION COMPARISIONS.

	35 (000001)  INHNEW	0	RUN ALL INSTRUCTIONS.
				1	INHIBIT NEW KI10 INSTRUCTIONS.
						MAINDEC-10-DBKDB.TXT
							PAGE 8                                                         *** SEQ 0008

5.0	ERRORS

	ERROR MESSAGES ARE PRINTED ON THE TTY OR LINE PRINTER.  THE
	ERROR MESSAGE CONTAINS THE FAILING INSTRUCTION GROUP, THE 
	ORIGINAL OPERANDS, THE FAST AC RESULT, THE CORE MEMORY
	RESULTS, THE INSTRUCTION SIMULATION, AND THE SIMULATED ANSWERS.

	IF THE LOOP ON ERROR SWITCH IS SET THE PROGRAM WILL CYCLE ON THE
	FAILING INSTRUCTION SEQUENCE IN AC'S 11 THRU 17.  FAILURE ANALYSIS
	MAY BE PERFORMED BY EXAMINING THE INSTRUCTIONS WITH DDT (ENTERED
	BY TYPING AN ALT-MODE ($) ON THE TTY) AND BY RESTARTING THE
	LOOP AT AN APPROPRIATE RESTART ADDRESS.

	NOTE:  IT IS POSSIBLE THAT ANY ONE OF THE INSTRUCTION SEQUENCES
	       MAY HAVE FAILED.  ANALYSIS OF THE ERROR MESSAGE
	       PRINTOUT IS REQUIRED TO DETERMINE THE ACTUAL CAUSE OF 
	       THE FAILURE.

	THE FOLLOWING EXAMPLE ERROR MESSAGE INDICATES AN INCORRECT
	RESULT IN FAST AC 2.

	----------
	RANDOM INSTRUCTION FAILURE	[SLOW ANS]	[SIM ANS]
	INST GROUP	 OPERANDS	 FAST ANS	 SLOW ANS
	11/546040000007  0/536461414037  0/536461414037  0/536461414037
	12/475300000006  1/475306407246  1/000000407246  1/000000407246
	13/553340000001  2/553756641571  2/00000000000   2/526272250404
	14/526240000004  3/526272250404  3/526272250404  3/526272250404
	15/154340000002  4/376775671572  4/204632777777  4/204632777777
	16/523100000002  5/523126204632  5/523126204632  5/523126204632
	17/   EXIT	 6/036370236031  6/777777777777  6/777777777777
		         7/116747224357  7/220422744160  7/220422744160

	RANDOM NUMBER BASE = 536461414037

	INSTRUCTION SIMULATION
	----------

		(INSTRUCTION SIMULATION OUTPUT, AS APPROPRIATE)
						MAINDEC-10-DBKDB.TXT
							PAGE 9                                                         *** SEQ 0009

6.0	ITERATION COUNT

	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

	THIS PROGRAM IS A RELIABILITY TEST USING RANDOM NUMBERS AND 
	AS SUCH SHOULD BE RUN LONG ENOUGH TO INSURE THAT ENOUGH
	NUMBERS ARE PROCESSED TO VERIFY SYSTEM RELIABILITY.

8.0	OPERATIONAL VARIATIONS

	A.  DIAGNOSTIC MONITOR

	    THIS PROGRAM IS USABLE WITH THE DIAGNOTIC 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.  MONFLG - LOCATION 30042 IS USED AS THE DIAGNOSTIC
		MONITOR SPECIAL USER MODE FLAG.

		-1  ,	NORMAL USER MODE OPERATION
		 0  ,	SPECIAL USER MODE OPERATION, I/O TREATED AS 
			EXEC AND PROCESSED BY THE DIAGNOSTIC MONITOR.

	    3.  MONCTL - LOCATION 30043 IS USED AS THE DIAGNOSTIC
	    	MONITOR CONTROL WORD.

			LH = 0, STAND ALONE OPERATION
			    -PASS COUNT, RUNNING UNDER DIAGNOSTIC MONITOR

			RH = RIGHT HALF OF CONSOLE SWITCHES IF UNDER
			     DIAGNOSTIC MONITOR CONTROL.
						MAINDEC-10-DBKDB.TXT
							PAGE 10                                                        *** SEQ 0010

8.0	OPERATIONAL VARIATIONS (CON'T)

	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 'DBKDB.TMP'.

	    EXAMPLE DEVICE ASSIGNMENT:

	    .ASSIGN DSK DEV

	    IN USER MODE THE PROGRAM WILL MAKE TWO PASSES AND THEN 
	    RETURN TO MONITOR MODE.

	    THE OUTPUT FILE (IF USED) MAY THEN BE LISTED BY USING THE
	    NORMAL MONITOR COMMANDS (R 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.
						MAINDEC-10-DBKDB.TXT
							PAGE 11                                                        *** SEQ 0011

9.0	DDT COMMANDS

	A.  TO SET A BREAKPOINT

	    UP TO 8 BREAKPOINTS MAY BE SET AT ANY ONE TIME.

	    ADR$B  ;SET A BREAKPOINT AT ADR. WHEN THE BREAKPOINT IS
	    REACHED, THE PROGRAM HALTS AND TYPES OUT $NB>>ADR

	B.  TO PROCEED FROM A BREAKPOINT HALT

	    $P  ;RESUME PROGRAM EXECUTION.
	    HALT AGAIN NEXT TIME THE BREAKPOINT IS ENCOUNTERED.
	    N$P  ;RESUME PROGRAM EXECUTION.
	    DO NOT HALT UNTIL THE NTH TIME BREAKPOINT IS ENCOUNTERED.

	C.  TO REMOVE A BREAKPOINT

	    $B  ;REMOVE ALL BREAKPOINTS

	D.  TO EXAMINE A LOCATION OR TO INSERT NEW DATA

	    ADR/ ;EXAMINE LOACATION SPECIFIED BY ADR.
	         CR CLOSES EXAMINED REGISTER
	         LF CLOSES AND EXAMINES ADR+1

	    ADR/ YYYY XXXX CR  ;EXAMINES ADR AND PLACES XXXX IN
	    LOCATION ADR AND CLOSES THE EXAMINED WORD.

	E.  TO START PROGRAM EXECUTION

	    ADR$G  ;START THE PROGRAM EXECUTION AT ADR.

	NOTE:  $ = ALT-MODE

10.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.

	MARGINS - THE RANDOM NUMBER INSTRUCTION TEST SHOULD BE RUN WITH
	APPROPRIATE VOLTAGE MARGINS TO HELP INSURE PROCESSOR RELIABILITY.
						MAINDEC-10-DBKDB.TXT
						PAGE 12                                                                *** SEQ 0012

12.0	SIMULATOR
	---------

	THE PDP-10 KI10 SIMULATOR IS USED TO SIMULATE THE ACTUAL 
	HARDWARE OPERATION OF THE PDP-10 KI10 CENTRAL PROCESSOR. THE
	PURPOSE OF THIS SIMULATION PROGRAM IS TO PROVIDE A
	MEANS OF HARDWARE DEVELOPMENT AND MACHINE CHECKOUT. THE
	SIMULATION PROGRAM MAY ALSO BE USED FOR DIAGNOSTIC PROGRAM
	DEVELOPMENT AND AS A PROGRAM OPERATION TRACE DEBUG SYSTEM. 
	THE SIMULATION IS ACCOMPLISHED THROUGH SOFTWARE BY USING PROGRAM
	ROUTINES TO FOLLOW THE HARDWARE OPERATION FLOW AND CORE MEMORY
	LOCATIONS AS PSEUDO HARDWARE REGISTERS.

	A. DDT PROGRAM TYPE-IN SIMULATION
	   ------------------------------

	TO USE THE SIMULATOR TO SIMULATE A SMALL PROGRAM TYPED-IN
	WITH DDT THE FOLLOWING PROCEDURE (EXAMPLE) IS USED.

	START PROGRAM WITH SWITCH 'ENTDDT' SET SO THAT CONTROL TRANSFERS
	TO DDT.

	*DDT*

	PATCH!		DMOVE 0,PATCH+10 ;SAMPLE PROGRAM (DDT TYPIN)
	PATCH+1!	DFAD  0,PATCH+12
	PATCH+2!	HALT
	PATCH+10!	1.0
	PATCH+11!	0
	PATCH+12!	3.0
	PATCH+13!	0

	INPC!	PATCH		;STARTING ADDRESS
	MASK!	0		;ALLOW ALL INST TO PRINT
	INSTR!	0		;ALLOW ALL INST TO PRINT
	CNPLPC!	0		;ALLOW SIMULATION TO START AT 0
	UPRPC!	777777		;CONTINUE TO 77777.

	SIMDDT$G		;TRANSFER TO SIMULATOR

	INPC =   RIGHT HALF IS OBJECT PROGRAM STARTING ADDRESS
		 LEFT HALF = 0 = EXEC MODE OBJECT PROGRAM
			   =10000 = USER MODE OBJECT PROGRAM

	MASK =   WORD TO ALLOW CHECKING OF ONLY DESIRED INSTRUCTION CODE
		 BITS TO DETERMINE INSTRUCTION SIMULATION PRINTOUT.

	INSTR = WORD TO FURTHER SELECT INSTRUCTIONS TO BE PRINTED.
	CNTLPC = WORD USED TO PREVENT SIMULATION PRINTOUT UNTIL THE
		 OBJECT PROGRAM PC IS EQUAL OR GREATER.

	UPRPC = WORD USED TO PREVENT SIMULATION PRINTOUT WHEN THE
		OBJECT PROGRAM PC IS GREATER THAN.
						MAINDEC-10-DBKDB.TXT
						PAGE 13                                                                *** SEQ 0013

	B.  SIMULATOR PRINT PROGRAM
	    -----------------------

	THE SIMULATOR PRINT PROGRAM PROVIDES A BREAK POINT IN THE 
	MAIN SIMULATOR MASTER CLOCK CYCLE AT WHICH TIME TRANSFER IS MADE 
	TO  THE SIMULATOR PRINT PROGRAM.  THE PRINT PROGRAM THEN DETER-
	MINES IF THE MASTER CLOCK IS AT THE FIRST INSTRUCTION TIME OF 
	THE INSTRUCTION. IF IT IS A CHECK IS MADE TO DETERMINE IF THIS
	INSTRUCTION IS TO BE PRINTED. DONE BY MASKING THE INSTRUCTION
	CODE BITS WITH THE WORD 'MASK' AND THEN FURTHER DELIMITING THE
	INSTRUCTION BY A 'CAME' INSTRUCTION WITH THE WORD 'INSTR'. 
	THE PC OF THE INSTRUCTION IS ALSO CHECKED AGAINST 'CNTLPC' AND
	'UPRPC' AND MUST BE BETWEEN THIS RANGE TO BE PRINTED.

	AN EXAMPLE TO PRINT SIMULATION OF THE INSTRUCTIONS IN THE RANGE
	100 TO 177 WOULD BE:

		MASK=700000,,0
		INSTR=100000,,0
		CNTLPC=0,,0
		UPRPC=0,,-1

	IF THE INSTRUCTION PASSES THESE TESTS THE PRINT CONTROL IS SET
	ACCORDINGLY. THEN THE PC, AND INSTRUCTION ARE PRINTED. THEN
	THE MACHINE STATES ARE PRINTED (IF CALLED FOR BY SW29, PNTMS)
	UNTIL THE START OF THE NEXT INSTRUCTION.  AT THIS TIME THE
	INITIAL AND FINAL FLAG AND REGISTER RESULTS ARE PRINTED.
	AT THE COMPLETION OF EACH MACHINE STATE PRINTOUT A TRANSFER
	IS MADE BACK TO THE MAIN SIMULATOR TO CONTINUE SIMULATION. 
	TRANSFER FROM AND TO THE MAIN SIMULATOR IS DONE ON EACH
	MASTER CLOCK CYCLE WITH THE INSTRUCTION AND/OR MACHINE PSEUDO
	REGISTER CONTENTS PRINTED IF CALLED FOR.
						MAINDEC-10-DBKDB.TXT
						PAGE 14                                                                *** SEQ 0014

	C.  MAIN SIMULATOR
	    --------------

	THIS SECTION PERFORMS THROUGH SOFTWARE ROUTINES AND PSEUDO
	HARDWARE REGISTERS THE ACTUAL HARDWARE OPERATION OF THE KI10
	CENTRAL PROCESSOR. THE ACTUAL OPERATION OF THIS SECTION IS
	DESCRIBED IN THE KI10 HARDWARE FLOW CHARTS AND SYMBOLIC TAGS,
	REGISTERS, FLAGS, ETC. ARE ALL AS LISTED ON THE FLOW CHARTS.
	THIS SECTION OF THE PROGRAM WAS INITIALLY WRITTEN BY PDP-10 ENGINEERING.
	ENGINNERING DESIGN UPDATES AND DEVELOPMENT BY PDP-10 DIAGNOSTICS.

	D.  ACCUMULATORS
	    ------------

	0-	F	-MISC LOGIC FLIP-FLOPS
	1-	T	-TEMPORARY REGISTER
	2-	T1	-TEMPORARY REGISTER 1
	3-	T2	-TEMPORARY REGISTER 2
	4-	T3	-TEMPORARY REGISTER 3
	5-	S	-18 BIT PSEUDO STATE REGISTER
	6-	AR	-36 BIT ARITHMETIC PSEUDO REGISTER
	7-	MQ	-36 BIT MULT/QUOTIENT PSEUDO REGISTER
	10-	BR	-36 BIT BUFFER PSEUDO REGISTER
	11-	AD	-36 BIT ADDER PSEUDO REGISTER
	12-	MB	-36 BIT MEMORY BUS PSEUDO REGISTER
	13-	PC	-18 BIT PROGRAM COUNTER PSEUDO REGISTER
	14-	MA	-18 BIT MEMORY ADDRESS PSEUDO REGISTER
	15-	SC	-9 BIT SHIFT COUNTER PSEUDO REGISTER
	16-	IR	-13 BIT INSTRUCTION PSEUDO REGISTER
	17-	P	-PUSH DOWN POINTER AC

	E.  CORE MEMORY
	    -----------

	AB	-18 BIT ADDRESS BUS PSEUDO REGISTER
	ARX	-28 BIT EXTENDED ARITHMETIC PSEUDO REGISTER
	ADX	-28 BIT EXTENDED ADDER PSEUDO REGISTER
	FE	-9 BIT FLOATING EXPONENT PSEUDO REGISTER
	SA	-9 BIT SHIFT COUNT ADDER PSEUDO REGISTER
	TIME	-ELAPSED TIME SINCE BEGINNING OF PROGRAM IN NSEC.
	ACS,+0 TO +17	-PSEUDO ACCUMULATORS

12.0	LISTINGS
DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST
MAINDEC-10-DBKDB                                                                                                       *** SEQ 0015

HISTORY:
--------

VERSION 0.3

JUNE 9,1976

PROGRAM UPDATED TO THE LATEST DIAGNOSTIC STANDARDS AND SPECIFICATIONS

INCORPORATED TIME STATE DFDT0 INTO THE SIMULATOR.
-----------
VERSION 0.2

JANUARY 14,1974

PROGRAM UPDATED TO VERSION 2 TO INCORPORATE MCN CHANGES
AND ECO # 42 CHANGES.

PS #519 INCORPORATED TO CORRECT PROBLEM WITH FLOATING
DIVIDE SIMULATION.

ECO #42 INCORPORATED TO CORRECT PROBLEM WITH FLOATING MULTIPLY
SIMULATION AND TIMING PROBLEM WITH DOUBLE FLOATING
SUBTRACT.
DBKDB DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3^         DECDOC VER  00.14   09-JUN-76 16:33   PAGE 1                
                                                                                                                       *** SEQ 0016




















				   DOCUMENT
				**************
       DBKDB DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3^
				**************

















		    COPYRIGHT 1976
		    DIGITAL EQUIPMENT CORPORATION
		    MAYNARD, MASS. 01754

DBKDB DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3^         DECDOC VER  00.14   09-JUN-76 16:33   PAGE 2                
                                                                                                                       *** SEQ 0017

				 TABLE OF CONTENTS
				*******************


	73	DIAGNOSTIC PARAMETERS

	148	*PARAM*	CONSOLE DATA SWITCH ASSIGNMENTS, FEB 26,1976

	183	*PARAM* PROGRAM/SUBROUTINE PARAMETERS, FEB 26,1976

	388	ERROR HANDLING UUO DEFINITIONS, JAN 5,1976

	427	*FIXED* FIXED CONTROL AND DISPATCH STORAGE, FEB 26,1976

	749	TEST CONTROL

	830	DIAGNOSTIC SECTION

	1500	SIMULATOR MACHINE REGISTER PRINT

	3143	SIMULATOR PARAMETERS AND DEFINITIONS

	3282	DISPATCH TABLE FOR INSTRUCTIONS		0-37

	3308	DISPATCH TABLE FOR INSTRUCTIONS		40-107

	3319	DISPATCH TABLE FOR INSTRUCTIONS		110-111

	3344	DISPATCH TABLE FOR INSTRUCTIONS		114-123

	3396	DISPATCH TABLE FOR INSTRUCTIONS		124-132

	3434	DISPATCH TABLE FOR INSTRUCTIONS		133-137

	3468	DISPATCH TABLE FOR INSTRUCTIONS		140-177

	3703	DISPATCH TABLE FOR INSTRUCTIONS		200-237

	3940	DISPATCH TABLE FOR INSTRUCTIONS		240-247

	3993	DISPATCH TABLE FOR INSTRUCTIONS		250-257

	4043	DISPATCH TABLE FOR INSTRUCTIONS		260-267

	4092	DISPATCH TABLE FOR INSTRUCTIONS		270-377

	4641	DISPATCH TABLE FOR INSTRUCTIONS		400-477
DBKDB DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3^         DECDOC VER  00.14   09-JUN-76 16:33   PAGE 3                
                                                                                                                       *** SEQ 0018

				 TABLE OF CONTENTS
				*******************


	5562	DISPATCH TABLE FOR INSTRUCTIONS		500-577

	6348	DISPATCH TABLE FOR INSTRUCTIONS		600-777

	7338	DISPATCH TABLE FOR INSTRUCTIONS		TWO PART INST'S

	7425	DISPATCH SUBROUTINES FROM MAIN TABLE

	8091	DISPATCH SUBROUTINES FROM MAIN TABLE - FETCH ACTIONS

	8439	MASTER CLOCK ROUTINE

	8621	LOGIC SUBROUTINES

	8901	TIME PULSE SUBROUTINES	IT0-IT1

	9163	TIME PULSE SUBROUTINES	-FETCH-

	9264	TIME PULSE SUBROUTINES	-EXECUTE-

	9328	TIME PULSE SUBROUTINES	-STORE-

	9484	TIME PULSE SUBROUTINES	-DIVIDE SUBRTN-

	9561	TIME PULSE SUBROUTINES	-FLOATING DIVIDE-

	9648	TIME PULSE SUBROUTINES	-NORMALIZE-

	9866	TIME PULSE SUBROUTINES	-DOUBLE NORMALIZE-

	9971	TIME PULSE SUBROUTINES	-FIX-

	10009	TIME PULSE SUBROUTINES	-DBLE FLOATING ADD/MUL/DIV-

	10210	TIME PULSE SUBROUTINES	-FLT ADD, MISC-

	10316	SHIFT SUBROUTINE

	10442	TIME PULSE SUBROUTINES	-INDONE-

	10480	TIME PULSE SUBROUTINES	-BLT-

	10552	REGISTER MIXERS, ETC.
DBKDB DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3^         DECDOC VER  00.14   09-JUN-76 16:33   PAGE 4                
                                                                                                                       *** SEQ 0019

				 TABLE OF CONTENTS
				*******************


	10946	SHIFT CONNECTIONS

	11155	MEMORY CONTROL SUBROUTINES

	11469	*STOR* RESERVED STORAGE, JAN 5,1976
DBKDB DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3^         DECDOC VER  00.14   09-JUN-76 16:33   PAGE 5                
                                                                                                                       *** SEQ 0020
		1	MAINDEC-10-DBKDB

		16	COPYRIGHT 1972,1973,1974,1976
			DIGITAL EQUIPMENT CORPORATION
			MARLBORO, MASS. 01752

		20	JOHN R. KIRCHOFF

		26	PROGRAM DESIGNED TO EXECUTE RANDOM INSTRUCTIONS (NON-PC CHANGE)
			 IN CORE, IN THE FAST AC'S, AND THRU SOFTWARE SIMULATION.
			THE RESULTS OF THE THREE GROUPS OF INST ARE COMPARED FOR EQUALITY.
			UPON A DISCREPENCY THE PROGRAM PRINTS ALL PERTINENT INFORMATION
			 AND GOES INTO A REPETITIVE FAILURE LOOP.

		32	THE PROGRAM OPERATES AS FOLLOWS:
				1. GENERATES EIGHT RANDOM NUMBERS AND STORES
				   THEM IN AC 0-7.
				2. RESTORES THEM IN RAND-RAND+7
				3. TEST AC'S FOR VALID INST.
					A. OP CODES 0-17 CHANGED TO DFAD
					B. OP CODES 20-37 CHANGED TO DFSB
					C. OP CODES 40-57 CHANGED TO DFMP
					D. OP CODES 60-77 CHANGED TO DFDV
					E. OP CODES 100-107 CHANGED TO ROTC
					F. OP CODES 114-117,123 CHANGED TO DFDV
					G. OP CODES 133-137 CHANGED TO ASHC
					H. OP CODES 243+247 CHANGED TO IMUL
					I. OP CODES 260-267 CHANGED TO IMUL
					J. OP CODES 251-257 CHANGED TO IMUL
					K. OP CODES 300-377 CHANGED TO FSBR
					L. OP CODES 600-677 CHANGED TO FDVR IF
					   IT IS THE LAST INST IN THE INST GROUP
					M. OP CODES OF 700-777 CHANGED TO FMPR
					N. THEN ALL VALID INST. ARE MASKED FOR
					   INDEX REG, INDIRECT, AC'S ABOVE 7, AND
					   ONLY AN "E" FIELD OF 0-7.
				4. STORES VALID INST IN INSBLK
				5. SETS UP SLOW CORE LOOP WITH SIMULATION TRANSFER
				   BETWEEN EACH VALID INST.
				6. EXECUTES & SIMULATES SLOW LOOP.
				7. COMPARES RESULTS AFTER EACH INST/SIMULATION.
				8. STORES ANS. (AC'S 0-7) IN ANSBLK.
				9. LOADS FAST LOOP AND AC'S
				10. EXECUTES FAST LOOP.
				11. COMPARES FAST LOOP AND SLOW LOOP ANS.
				12. RE-EXECUTES FAST LOOP 7 TIMES WITH ANS CHECKING.
				13. UPON AN ERROR THE PROGRAM WILL OUTPUT ON LPT OR TTY,
				    THE OPERANDS, INSTRUCTIONS, SLOW/FAST LOOP
				    ANSWERS, AND THE SIM/SLOW LOOP ANSWERS.
				14. THE PROGRAM WILL THEN SIMULATE AND PRINT THE
				 APPROPRIATE FAILING INSTRUCTION(S).
				15. IT THEN WILL GO INTO AN ERROR LOOP.
			
				NOTE:-  BEWARE CORE LOOP AND/OR SIMULATION LOOP MAY

DBKDB DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3^         DECDOC VER  00.14   09-JUN-76 16:33   PAGE 6                
                                                                                                                       *** SEQ 0021
					 HAVE FAILED AND NOT FAST LOOP.

		*****************************************************************
	73	DIAGNOSTIC PARAMETERS
		*****************************************************************

		75	SUBROUTINE ASSEMBLY DEFINITIONS

		85	TEST CONTROL DATA SWITCHES, RIGHT HALF

		101	MISCELLANEOUS

		104	STATEMENT OPERATORS PASSED FROM/TO MAIN SIMULATOR PROGRAM

		109	ACCUMULATOR ASSIGNMENTS, SIMULATOR

		127	BEGIN ASSEMBLY PARAMETERS

		*****************************************************************
	148	*PARAM*	CONSOLE DATA SWITCH ASSIGNMENTS, FEB 26,1976
		*****************************************************************

		153	DATA SWITCHES (READ FROM CONSOLE IN EXEC MODE OR TYPED IN IN USER MODE)
			LEFT HALF SWITCHES ARE PRE-ASSIGNED FOR SUBROUTINE PACKAGE USE
			AND CONTROL LOOPING, PRINTING (TTY OR OTHER DEVICE) AND MISC. FUNCTIONS

		*****************************************************************
	183	*PARAM* PROGRAM/SUBROUTINE PARAMETERS, FEB 26,1976
		*****************************************************************

		186	SPECIAL SUBPROGRAM LINKAGES

		197	SPECIAL SUBROUTINE FATAL HALTS
			USED TO REPORT ERRORS THAT CAUSE THE SUBROUTINES TO BE UNUSABLE

		229	SUBROUTINE INITIALIZATION CALL

		235	HALTING UUO'S (A MORE GRACEFUL HALT THAN SIMPLY USING THE HALT INSTRUCTION).

		242	TERMINAL INPUT UUO'S
			ALWAYS COME FROM THE CONSOLE TERMINAL IN EXEC MODE OR THE
			CONTROLLING TERMINAL (REAL TERMINAL OR PTY) IN USER MODE.

		257	TERMINAL OUTPUT UUO'S.

		323	SIXBTZ -- MACRO TO GENERATE SIXBIT DATA FOR PRINTING
				CONSERVES CORE OVER ASCIZ

		328	CONSOLE SWITCH INPUT UUO.
			READS CONSOLE SWITCHES IF IN EXEC MODE OR ASKS FOR THEM IF
			 USER MODE.

DBKDB DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3^         DECDOC VER  00.14   09-JUN-76 16:33   PAGE 7                
                                                                                                                       *** SEQ 0022
		334	CLOCK INITIALIZATION UUO - TO SET DESIRED CLOCK OPERATION
			EITHER IGNORE CLOCK, ONLY LET IT TICK OR CAUSE INTERRUPT TO OCCUR.

		340	KL10 ONLY CACHE OPERATION UUO'S

		345	END OF PASS/PROGRAM UUOS

		348	DECREMENT ITERATION COUNT, CHECK IF FINISHED WITH THIS PROGRAM ETC.

		353	MEMORY MANAGEMENT UUO'S
			UUO'S TO PERFORM VARIOUS MEMORY FUNCTIONS. MAPPING, ZEROING, PAGING,
			ADDRESS CONVERSION, ETC...

		365	DEVICE CODE MODIFICATION UUO
			ALLOWS THE MODIFICATION OF IOT'S TO ONE DEVICE TO BE CHANGED TO
			IOT'S TO A DIFFERENT DEVICE CODE.

		375	"DIAMON" FILE SELECTION AND READ UUOS

		382	KI10 ONLY UUO FOR PRINTING MARGIN VALUES

		*****************************************************************
	388	ERROR HANDLING UUO DEFINITIONS, JAN 5,1976
		*****************************************************************

		391	ERROR HANDLER PARAMETERS

		400	THE ERROR HANDLER MACROS

		402	A MACRO TO REPORT AN ERROR AND LOOP

		414	A MACRO TO REPORT AN ERROR AND NOT LOOP

		*****************************************************************
	427	*FIXED* FIXED CONTROL AND DISPATCH STORAGE, FEB 26,1976
		*****************************************************************

		432	PROGRAM STARTING ADDRESSES
			THESE ADDRESSES CALL VARIOUS SPECIAL START ROUTINES AND OR OPTIONS
			NORMAL START ADDRESS IS 30000 ALL OTHERS ARE SPECIAL. INVOKED BECAUSE
			OF END OF PASS, POWER FAILURE, DDT START, RE-ENTERING(TYPICALLY USER
			MODE), OR ANY NUMBER OF SPECIAL FEATURE TESTS.

		465	PROGRAM FIXED PARAMETER AREA

		485	PROGRAM VARIABLE PARAMETER AREA

		505	SPECIAL PROGRAM DISPATCH ADDRESSES

DBKDB DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3^         DECDOC VER  00.14   09-JUN-76 16:33   PAGE 8                
                                                                                                                       *** SEQ 0023
		536	PROCESSOR CONTROL STORAGE

		556	UUO DISPATCH TABLE

		576	MEMORY MANAGMENT STORAGE

		586	PRINT CONTROL STORAGE

		609	THE FOLLOWING MISCELLANEOUS PRINT CHARACTERS ARE INCLUDED
			TO FACILITATE PRINTING AND ARE CALLED AS FOLLOWS:
				MOVEI	NAME
				PNTA		;OR PNTAF

		640	USER MODE OUTPUT FILE INFORMATION

		649	DISK UPDATE MODE FILE INFORMATION

		657	PUSHDOWN LIST CONTROL INFORMATION

		665	POWER LINE CLOCK FREQUENCY FLAG

		671	KL10 CACHE CONTROL FLAGS

		678	NUMBER INPUT DIGIT FLAG

		684	KL10 & KI10 "INHPAG" SWITCH PAGING PREVENTION

		690	ERROR REPORTING ROUTINE ADDITIONAL USERS CONTROL INSTRUCTIONS

		698	SPECIAL USERS UUO INTERCEPT INSTRUCTION

		703	KL10 PROCESSOR TYPE FLAG, 0=P0, 1=BBD NEW, 2=BBD OLD

		709	SPECIAL USERS MUUO INTERCEPT INSTRUCTION

		715	SPECIAL USERS USER MODE OUTPUT ERROR INTERCEPT INSTUCTION

		721	"SWITCH" CALL USAGE CONTROL

		727	SPECIAL USERS ALTMODE SWITCH CALL INTERCEPT INSTRUCTIONS

		734	SPECIAL FUTURE EXPANSION ROOM
			IF ANY FIXED AREA TAGS ARE ADDED, REDUCE THE SIZE OF
			THIS BLOCK STATEMENT ACCORDINGLY.  THIS MUST BE DONE
			SO THAT PREVIOUS FIXED ASSIGNMENTS DO NOT CHANGE.

		743	END OF FIXED STORAGE

DBKDB DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3^         DECDOC VER  00.14   09-JUN-76 16:33   PAGE 9                
                                                                                                                       *** SEQ 0024
		*****************************************************************
	749	TEST CONTROL
		*****************************************************************

		764	SIMULATOR -DDT- INITIALIZATION SEQUENCE

		768	PROGRAM INITIALIZATION

		*****************************************************************
	830	DIAGNOSTIC SECTION
		*****************************************************************

		1044	EXECUTE FAST LOOP

		1154	ERROR ROUTINES

		1191	ERROR STOP

		1199	PRINT INSTRUCTION FAILURE

		1324	SETUP MARGINS FOR ALL OR JUST FAST & SLOW LOOP

		1343	CLOCK SERVICE ROUTINE

		1383	TEST RUN TIME SUBROUTINE
			PRINTS TIME AT HALF HOUR INTERVALS OR WHEN REQUESTED

		1429	SIMULATE INSTRUCTION

		1449	SIMULATE INSTRUCTION, PRINT

		1464	SIMULATE AND PRINT ALL INSTRUCTIONS
			FAST LOOP RELIABILITY/SPEED FAILURE

		*****************************************************************
	1500	SIMULATOR MACHINE REGISTER PRINT
		*****************************************************************

		1502	PROGRAM INITIALIZATION AND BREAK SETUP

		1544	SPECIAL USER MODE MONITOR UUO EXECUTION

		1583	MACHINE REGISTER PRINT
			THIS ROUTINE PRINTS THE CONTENTS OF THE SEVERAL
			PSEUDO MACHINE REGISTERS AT VARIOUS TIMES IN
			THE INSTRUCTION CYCLE.

		1750	INSTRUCTION PRINT
			THIS ROUTINE PRINTS THE PC AND THE INSTRUCTION
			AT IT0 OF THE INSTRUCTION CYCLE.

DBKDB DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3^         DECDOC VER  00.14   09-JUN-76 16:33   PAGE 10               
                                                                                                                       *** SEQ 0025
		1952	INSTRUCTION SYMBOLIC CONVERSION
			THIS ROUTINE CONVERTS THE INSTRUCTION TO SYMBOLIC
			AND PRINTS IT OUT.

		2116	INITIAL/FINAL AC,E PRINTOUT

		2357	THE INDEX NUMBERS IN THE FOLLOWING TABLE
			INFORM THE PROGRAM WHICH REGISTERS TO PRINT
			THE NUMBERS HAVE THE FOLLOWING SIGNIFICANCE.

		2361	INDEX	REGISTERS
			0	NONE
			1	C(AC)
			2	C(AC)			C(E)
			3	C(AC)	C(AC+1)
			4	C(AC)	C(AC+1)		C(E)
			5	C(AC)	C(C(ACR))
			6	C(AC)	C(C(ACR+1))
			7	C(AC)			C(E)	C(C(E))
			10	C(AC)	C(AC+1)		C(E)	C(E+1)
			11				C(E)
			12				C(E)	C(E+1)
			13	C(AC)	C(C(ACR))	C(E)
			14	C(AC)	C(C(ACR+1))	C(E)
			15	C(AC)	C(C(ACL))
			16	C(AC)						E
			17	C(AC)	C(AC+1)					E
			20							E

		2471	SIMULATOR SYMBOL TABLE

		2796	MACHINE STATES, K1-10
			

		2923	SYMBOLIC MACHINE STATES

		*****************************************************************
	3143	SIMULATOR PARAMETERS AND DEFINITIONS
		*****************************************************************

		3147	ACCUMULATOR DEFINITIONS

		3172	LEFT HALF BITS
			CLOCKS

		3175	EXECUTION TIME PULSE SWITCHES

		3178	AD ENABLES

DBKDB DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3^         DECDOC VER  00.14   09-JUN-76 16:33   PAGE 11               
                                                                                                                       *** SEQ 0026
		3186	RIGHT HALF BITS
			FETCH AND STORE SWITCHES

		3194	MQ ENABLES

		3196	AUX AR ENABLES

		3198	BR ENABLES

		3200	AR ENABLES

		3206	ADDRESS BUS ENABLES

		3211	CONTROL FF'S

		3228	SCADDER BITS RIGHT HALF

		3248	LEFT HALF

		3255	ADX BITS LEFT HALF

		3267	FLAGS, LEFT HALF OF PC WORD

		*****************************************************************
	3282	DISPATCH TABLE FOR INSTRUCTIONS		0-37
		*****************************************************************

		3286	FORMAT OF DISPATCH TABLE
				FETCH CYCLE ENABLES, SWITCHES
				ET0 ADDRESS,, ET1 ADDRESS
				ET2 ENABLES AND CLOCKS, ET2 DISPATCH

		3291	UUO'S

		3298	ILLEGAL UUO							0

		3301	USER UUO'S							1-37

		*****************************************************************
	3308	DISPATCH TABLE FOR INSTRUCTIONS		40-107
		*****************************************************************

		3310	MONITOR UUO'S							40-77

		3314	UNDEFINED OP CODES						100-107

DBKDB DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3^         DECDOC VER  00.14   09-JUN-76 16:33   PAGE 12               
                                                                                                                       *** SEQ 0027
		*****************************************************************
	3319	DISPATCH TABLE FOR INSTRUCTIONS		110-111
		*****************************************************************

		3321	DFAD, DFSB							110-111

		3335	DFMP								112

		3339	DFDV								113

		*****************************************************************
	3344	DISPATCH TABLE FOR INSTRUCTIONS		114-123
		*****************************************************************

		3346	UNDEFINED OP CODES						114-117

		3371	DMOVE,DMOVN							120-121

		3385	FIX								122

		3390	UNDEFINED OP CODE						123

		*****************************************************************
	3396	DISPATCH TABLE FOR INSTRUCTIONS		124-132
		*****************************************************************

		3398	DMOVEM								124

		3403	DMOVNM								125

		3409	FIXR								126

		3414	FLTR								127

		3419	UFA								130

		3424	DFN								131

		3429	FSC								132

DBKDB DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3^         DECDOC VER  00.14   09-JUN-76 16:33   PAGE 13               
                                                                                                                       *** SEQ 0028
		*****************************************************************
	3434	DISPATCH TABLE FOR INSTRUCTIONS		133-137
		*****************************************************************

		3436	IBP								133

		3439	XLDB SECOND PART						134-135

		3454	XDPB SECOND PART						136-137

		*****************************************************************
	3468	DISPATCH TABLE FOR INSTRUCTIONS		140-177
		*****************************************************************

		3470	FADXX								140-147

		3528	FSBXX								150-157

		3588	FMPXX								160-167

		3646	FDVXX								170-177

		*****************************************************************
	3703	DISPATCH TABLE FOR INSTRUCTIONS		200-237
		*****************************************************************

		3705	MOVES, ALIAS FWT						200-217

		3817	MULTIPLIES							220-227

		3874	DIVIDES							230-237

		*****************************************************************
	3940	DISPATCH TABLE FOR INSTRUCTIONS		240-247
		*****************************************************************

		3942	ASH, ROT, LSH							240-241-242

		3963	JFFO								243

		3968	ASHC, ROTC, LSHC						244-245-246

		3987	UNDEFINED OP CODE						247

DBKDB DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3^         DECDOC VER  00.14   09-JUN-76 16:33   PAGE 14               
                                                                                                                       *** SEQ 0029
		*****************************************************************
	3993	DISPATCH TABLE FOR INSTRUCTIONS		250-257
		*****************************************************************

		3995	EXCH								250

		4000	BLT								251

		4005	AOBJX								252-253

		4024	JRST								254

		4029	JFCL								255

		4034	XCT								256

		4039	MAP								257

		*****************************************************************
	4043	DISPATCH TABLE FOR INSTRUCTIONS		260-267
		*****************************************************************

		4050	PUSHJ								260

		4055	PUSH								261

		4063	POP								262

		4068	POPJ								263

		4073	JSR								264

		4078	JSP								265

		4083	JSA								266

		4088	JRA								267

		*****************************************************************
	4092	DISPATCH TABLE FOR INSTRUCTIONS		270-377
		*****************************************************************

		4094	ADD-SUBTRACT							 270-277

		4154	COMPARES, JUMPS AND SKIPS					300-377

DBKDB DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3^         DECDOC VER  00.14   09-JUN-76 16:33   PAGE 15               
                                                                                                                       *** SEQ 0030
		*****************************************************************
	4641	DISPATCH TABLE FOR INSTRUCTIONS		400-477
		*****************************************************************

		4643	BOOLEAN GROUP							400-477

		*****************************************************************
	5562	DISPATCH TABLE FOR INSTRUCTIONS		500-577
		*****************************************************************

		5564	HALF WORDS							500-577

		*****************************************************************
	6348	DISPATCH TABLE FOR INSTRUCTIONS		600-777
		*****************************************************************

		6350	TEST GROUP							600-677

		7333	IOTS								700-

		*****************************************************************
	7338	DISPATCH TABLE FOR INSTRUCTIONS		TWO PART INST'S
		*****************************************************************

		*****************************************************************
	7425	DISPATCH SUBROUTINES FROM MAIN TABLE
		*****************************************************************

		*****************************************************************
	8091	DISPATCH SUBROUTINES FROM MAIN TABLE - FETCH ACTIONS
		*****************************************************************

		8190	PC PLUS ONE GATE

		*****************************************************************
	8439	MASTER CLOCK ROUTINE
		*****************************************************************

		*****************************************************************
	8621	LOGIC SUBROUTINES
		*****************************************************************

		8729	ADX SUBROUTINE

		8788	SHIFTCOUNT ADDER

DBKDB DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3^         DECDOC VER  00.14   09-JUN-76 16:33   PAGE 16               
                                                                                                                       *** SEQ 0031
		*****************************************************************
	8901	TIME PULSE SUBROUTINES	IT0-IT1
		*****************************************************************

		8982	MB13 (0) ACTIONS

		8996	MB13(0) AND MEMREF OR NOT MB14-17 = 0

		*****************************************************************
	9163	TIME PULSE SUBROUTINES	-FETCH-
		*****************************************************************

		*****************************************************************
	9264	TIME PULSE SUBROUTINES	-EXECUTE-
		*****************************************************************

		*****************************************************************
	9328	TIME PULSE SUBROUTINES	-STORE-
		*****************************************************************

		*****************************************************************
	9484	TIME PULSE SUBROUTINES	-DIVIDE SUBRTN-
		*****************************************************************

		*****************************************************************
	9561	TIME PULSE SUBROUTINES	-FLOATING DIVIDE-
		*****************************************************************

		*****************************************************************
	9648	TIME PULSE SUBROUTINES	-NORMALIZE-
		*****************************************************************

		9684	NRT1 NORMAL ROUND CHECK

		9701	NR ALL ZEROS CHECK

		*****************************************************************
	9866	TIME PULSE SUBROUTINES	-DOUBLE NORMALIZE-
		*****************************************************************

DBKDB DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3^         DECDOC VER  00.14   09-JUN-76 16:33   PAGE 17               
                                                                                                                       *** SEQ 0032
		*****************************************************************
	9971	TIME PULSE SUBROUTINES	-FIX-
		*****************************************************************

		*****************************************************************
	10009	TIME PULSE SUBROUTINES	-DBLE FLOATING ADD/MUL/DIV-
		*****************************************************************

		*****************************************************************
	10210	TIME PULSE SUBROUTINES	-FLT ADD, MISC-
		*****************************************************************

		*****************************************************************
	10316	SHIFT SUBROUTINE
		*****************************************************************

		*****************************************************************
	10442	TIME PULSE SUBROUTINES	-INDONE-
		*****************************************************************

		*****************************************************************
	10480	TIME PULSE SUBROUTINES	-BLT-
		*****************************************************************

		*****************************************************************
	10552	REGISTER MIXERS, ETC.
		*****************************************************************

		*****************************************************************
	10946	SHIFT CONNECTIONS
		*****************************************************************

		*****************************************************************
	11155	MEMORY CONTROL SUBROUTINES
		*****************************************************************

		*****************************************************************
	11469	*STOR* RESERVED STORAGE, JAN 5,1976
		*****************************************************************
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 1
DBKDBT	MAC	 9-JUN-76 14:05		DIAGNOSTIC PARAMETERS                                                          *** SEQ 0033

     1					;*MAINDEC-10-DBKDB
     2
     3
     4			000003		DECVER==003
     5			000000		MCNVER==000
     6
     7						XLIST
     8						LIST
     9						LALL
    10
    11						NAME	\MCNVER,\DECVER^
    12
    13					TITLE	DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3^
    14
    15						XALL
    16					;*COPYRIGHT 1972,1973,1974,1976
    17					;*DIGITAL EQUIPMENT CORPORATION
    18					;*MARLBORO, MASS. 01752
    19
    20					;*JOHN R. KIRCHOFF
    21
    22	000137					LOC	137
    23	000137	000000	000003		MCNVER,,DECVER
    24
    25						NOSYM
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 2
DBKDBT	MAC	 9-JUN-76 14:05		DIAGNOSTIC PARAMETERS                                                          *** SEQ 0034

    26					;*PROGRAM DESIGNED TO EXECUTE RANDOM INSTRUCTIONS (NON-PC CHANGE)
    27					;* IN CORE, IN THE FAST AC'S, AND THRU SOFTWARE SIMULATION.
    28					;*THE RESULTS OF THE THREE GROUPS OF INST ARE COMPARED FOR EQUALITY.
    29					;*UPON A DISCREPENCY THE PROGRAM PRINTS ALL PERTINENT INFORMATION
    30					;* AND GOES INTO A REPETITIVE FAILURE LOOP.
    31
    32					;*THE PROGRAM OPERATES AS FOLLOWS:
    33					;*	1. GENERATES EIGHT RANDOM NUMBERS AND STORES
    34					;*	   THEM IN AC 0-7.
    35					;*	2. RESTORES THEM IN RAND-RAND+7
    36					;*	3. TEST AC'S FOR VALID INST.
    37					;*		A. OP CODES 0-17 CHANGED TO DFAD
    38					;*		B. OP CODES 20-37 CHANGED TO DFSB
    39					;*		C. OP CODES 40-57 CHANGED TO DFMP
    40					;*		D. OP CODES 60-77 CHANGED TO DFDV
    41					;*		E. OP CODES 100-107 CHANGED TO ROTC
    42					;*		F. OP CODES 114-117,123 CHANGED TO DFDV
    43					;*		G. OP CODES 133-137 CHANGED TO ASHC
    44					;*		H. OP CODES 243+247 CHANGED TO IMUL
    45					;*		I. OP CODES 260-267 CHANGED TO IMUL
    46					;*		J. OP CODES 251-257 CHANGED TO IMUL
    47					;*		K. OP CODES 300-377 CHANGED TO FSBR
    48					;*		L. OP CODES 600-677 CHANGED TO FDVR IF
    49					;*		   IT IS THE LAST INST IN THE INST GROUP
    50					;*		M. OP CODES OF 700-777 CHANGED TO FMPR
    51					;*		N. THEN ALL VALID INST. ARE MASKED FOR
    52					;*		   INDEX REG, INDIRECT, AC'S ABOVE 7, AND
    53					;*		   ONLY AN "E" FIELD OF 0-7.
    54					;*	4. STORES VALID INST IN INSBLK
    55					;*	5. SETS UP SLOW CORE LOOP WITH SIMULATION TRANSFER
    56					;*	   BETWEEN EACH VALID INST.
    57					;*	6. EXECUTES & SIMULATES SLOW LOOP.
    58					;*	7. COMPARES RESULTS AFTER EACH INST/SIMULATION.
    59					;*	8. STORES ANS. (AC'S 0-7) IN ANSBLK.
    60					;*	9. LOADS FAST LOOP AND AC'S
    61					;*	10. EXECUTES FAST LOOP.
    62					;*	11. COMPARES FAST LOOP AND SLOW LOOP ANS.
    63					;*	12. RE-EXECUTES FAST LOOP 7 TIMES WITH ANS CHECKING.
    64					;*	13. UPON AN ERROR THE PROGRAM WILL OUTPUT ON LPT OR TTY,
    65					;*	    THE OPERANDS, INSTRUCTIONS, SLOW/FAST LOOP
    66					;*	    ANSWERS, AND THE SIM/SLOW LOOP ANSWERS.
    67					;*	14. THE PROGRAM WILL THEN SIMULATE AND PRINT THE
    68					;*	 APPROPRIATE FAILING INSTRUCTION(S).
    69					;*	15. IT THEN WILL GO INTO AN ERROR LOOP.
    70					;*
    71					;*	NOTE:-  BEWARE CORE LOOP AND/OR SIMULATION LOOP MAY
    72					;*		 HAVE FAILED AND NOT FAST LOOP.
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 3
DBKDBT	MAC	 9-JUN-76 14:05		DIAGNOSTIC PARAMETERS                                                          *** SEQ 0035

    73					SUBTTL	DIAGNOSTIC PARAMETERS
    74
    75					;*SUBROUTINE ASSEMBLY DEFINITIONS
    76
    77			000001		EXCASB==1
    78			000001		USRASB==1
    79			000001		PGMEND==1
    80			000040		DEBUG==40
    81			000001		KI10==1
    82			000001		ONEPRT==1		;ASSEMBLE PROGRAM AS ONE PART
    83			000001		SIMASB==1
    84
    85					;*TEST CONTROL DATA SWITCHES, RIGHT HALF
    86
    87			400000		ENTDDT==	400000		;ENTER DDT UPON STARTING
    88			200000		RANBAS==	200000		;SPECIFY RANDOM NUMBER BASE
    89			100000		MGNTST==	100000		;MARGIN FAST & SLOW ONLY
    90
    91			002000		SEQPNT==	2000		;PRINT SIM SEQUENCE NUMBERS
    92
    93			000400		INHSCT==	400		;INHIBIT SIMULATION SCT2 PRINT
    94			000200		INHCLK==	200		;INHIBIT CLOCK INTERRUPTS
    95			000100		INHMS==		100		;INHIBIT PRINT SIMULATION MACHINE STATES
    96
    97			000004		SNGFL==		4		;RUN SINGLE FAST LOOP
    98			000002		INHSIM==	2		;INHIBIT SIMULATION COMPARISION
    99			000001		INHNEW==	1		;INHIBIT NEW KI10 INSTRUCTIONS
   100
   101					;*MISCELLANEOUS
   102
   103			000000		INHIF==	0	;INHIBIT INITIAL/FINAL (NOT USED)
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 4
DBKDBT	MAC	 9-JUN-76 14:05		DIAGNOSTIC PARAMETERS                                                          *** SEQ 0036

   104					;*STATEMENT OPERATORS PASSED FROM/TO MAIN SIMULATOR PROGRAM
   105
   106			032110		VM==SENTRY
   107			000000		OFFSET=0		;SIMULATED INSTRUCTIONS IN LOW SEGMENT
   108
   109					;*ACCUMULATOR ASSIGNMENTS, SIMULATOR
   110
   111			000000		F==0
   112			000001		T==1
   113			000002		T1==2
   114			000003		T2==3
   115			000004		T3==4
   116			000005		S==5
   117			000006		AR==6
   118			000007		MQ==7
   119			000010		BR==10
   120			000011		AD==11
   121			000012		MB==12
   122			000013		PC==13
   123			000014		MA==14
   124			000015		SC==15
   125			000016		IR==16
   126
   127					;*BEGIN ASSEMBLY PARAMETERS
   128
   129			030615		SADR1==	SFSRT1
   130			030076		SADR2==	RESRT1
   131			032155		SADR3==	RENTR1
   132			030000		SADR5==	BEGIN
   133			030007		SADR6==	SRTDDT
   134		254000	030707		SADR7==	JRST	CONTNU
   135		254000	031174		SADR8==	JRST	FAST
   136		254200	030000		SADR9==	HALT	BEGIN
   137		254200	030000		SADR10==HALT	BEGIN
   138		254200	030000		SADR11==HALT	BEGIN
   139
   140		123457	654321		PAREA1==123457,,654321
   141			000000		PAREA2==0,,0
   142		444253	444200		PAREA3==SIXBIT/DBKDB/
   143		645560	000000		PAREA4==SIXBIT/TMP/
   144			000000		PAREA5==0
   145			000000		PAREA6==0
   146
   147			000002		ITERAT==2
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 1
PARAM	KLM	26-FEB-76 08:30		*PARAM*	CONSOLE DATA SWITCH ASSIGNMENTS, FEB 26,1976                           *** SEQ 0037

   148					SUBTTL	*PARAM*	CONSOLE DATA SWITCH ASSIGNMENTS, FEB 26,1976
   149
   150					DEFINE	S,<;*********************************************************************>
   151
   152					S^;*********************************************************************^
   153					;*DATA SWITCHES (READ FROM CONSOLE IN EXEC MODE OR TYPED IN IN USER MODE)
   154					;*LEFT HALF SWITCHES ARE PRE-ASSIGNED FOR SUBROUTINE PACKAGE USE
   155					;*AND CONTROL LOOPING, PRINTING (TTY OR OTHER DEVICE) AND MISC. FUNCTIONS
   156					S^;*********************************************************************^
   157
   158			400000		ABORT==	400000			;ABORT PROGRAM ON PASS COMPLETION
   159			200000		RSTART==200000			;RESTART TEST, PRINT TOTALS
   160			100000		TOTALS==100000			;PRINT TOTALS, CONTINUE
   161
   162			040000		NOPNT==	040000			;INHIBIT ALL PRINT/TYPE OUT (EXCEPT FORCED)
   163			020000		PNTLPT==020000			;PRINT ALL DATA ON LPT (LOGICAL DEVICE, USER MODE)
   164			010000		DING==	010000			;RING BELL ON ERROR
   165
   166			004000		LOOPER==004000			;ENTER EXERCISE/CHECK LOOP ON ERROR
   167			002000		ERSTOP==002000			;HALT ON TEST ERROR
   168			001000		PALERS==001000			;PRINT ALL ERRORS
   169
   170			000400		RELIAB==000400			;RELIABILITY MODE
   171			000200		TXTINH==000200			;INHIBIT ERROR TEXT
   172			000100		INHPAG==000100			;INHIBIT PAGING
   173
   174			000040		MODDVC==000040			;MODIFY DEVICE CODE
   175			000020		INHCSH==000020			;INHIBIT CACHE
   176			000010		OPRSEL==000010			;OPERATOR SELECTION
   177
   178			000004		CHAIN==	000004			;CHAIN CONTROL SWITCH
   179
   180			000002		KAHZ50==000002			;KA10 50 HERTZ POWER
   181
   182									;SWITCH 17 RESERVED !!!
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 2
PARAM	KLM	26-FEB-76 08:30		*PARAM* PROGRAM/SUBROUTINE PARAMETERS, FEB 26,1976                             *** SEQ 0038

   183					SUBTTL	*PARAM* PROGRAM/SUBROUTINE PARAMETERS, FEB 26,1976
   184
   185					S^;*********************************************************************^
   186					;*SPECIAL SUBPROGRAM LINKAGES
   187					S^;*********************************************************************^
   188
   189			027772		FSELNK=	27772	;FILE SELECT LINK
   190			027773		FRDLNK=	27773	;FILE READ LINK
   191			027774		LDLNK=	27774	;LOAD LINKAGE ADDRESS
   192			027775		DDTLNK=	27775	;DDT LINKAGE ADDRESS
   193			027776		MODLNK=	27776	;OPERATIONAL MODE CHECK LINKAGE ADDRESS
   194			027777		SUBLNK=	27777	;SUBROUTINE LINKAGE ADDRESS
   195
   196					S^;*********************************************************************^
   197					;*SPECIAL SUBROUTINE FATAL HALTS
   198					;*USED TO REPORT ERRORS THAT CAUSE THE SUBROUTINES TO BE UNUSABLE
   199					S^;*********************************************************************^
   200
   201					;ADDRESS   TAG	REASON
   202					;---------------------
   203
   204					; 1010 	NOEXEC	;PROGRAM NOT CODED FOR EXEC MODE OPERATION
   205					; 1011  PLERR	;FATAL PUSH LIST POINTER ERROR
   206					; 1012  PLERR1	;INITIAL PUSH LIST POINTER ERROR
   207					; 1013  MUOERR	;MUUO WITH LUUO HANDLER WIPED OUT
   208					; 1014  DTEBER	;DTE20 INTERRUPT WITHOUT DOORBELL
   209					; 1015  DTECER	;DTE20 CLOCK INTERRUPT WITHOUT FLAG SET
   210					; 1016  CPIERR	;CPU INITIALIZATION ERROR
   211					; 1017  EOPERR	;END OF PROGRAM ERROR
   212					; 1020  LUOERR	;INTERRUPT WITH LUUO HANDLER WIPED OUT
   213
   214					S^;*********************************************************************^
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 3
PARAM	KLM	26-FEB-76 08:30		*PARAM* PROGRAM/SUBROUTINE PARAMETERS, FEB 26,1976                             *** SEQ 0039

   215					S^;*********************************************************************^
   216					;OPERATOR DEFINITIONS (NON-UUO'S)
   217					S^;*********************************************************************^
   218
   219		260740	000000		OPDEF	GO	[PUSHJ	P,]	;SUBROUTINE CALL
   220		263740	000000		OPDEF	RTN	[POPJ	P,]	;SUBROUTINE RETURN 
   221		261740	000000		OPDEF	PUT	[PUSH	P,]	;PUT DATA ON PUSH LIST
   222		262740	000000		OPDEF	GET	[POP	P,]	;GET DATA FROM PUSH LIST 
   223		254000	000000		OPDEF	PJRST	[JRST	]	;JRST TO ROUTINE THAT RTN'S
   224		254200	000000		OPDEF	HALT	[JRST	4,]	;DEFINITION FOR DDT
   225		254100	000000		OPDEF	JRSTF	[JRST	2,]	;DEFINITION FOR DDT
   226		254500	000000		OPDEF	JEN	[JRST	12,]	;DEFINITION FOR DDT
   227
   228					S^;*********************************************************************^
   229					;*SUBROUTINE INITIALIZATION CALL
   230					S^;*********************************************************************^
   231
   232		265000	030011		OPDEF	PGMINT	[JSP	0,SBINIT]	;SUBROUTINE INITIALIZATION
   233
   234					S^;*********************************************************************^
   235					;*HALTING UUO'S (A MORE GRACEFUL HALT THAN SIMPLY USING THE HALT INSTRUCTION).
   236					S^;*********************************************************************^
   237
   238		037640	000004		OPDEF	FATAL	[37B8!15B12!4]	;FATAL PROGRAMMING HALT
   239		037600	000004		OPDEF	ERRHLT	[37B8!14B12!4]	;PROGRAM ERROR HALT
   240
   241					S^;*********************************************************************^
   242					;*TERMINAL INPUT UUO'S
   243					;*ALWAYS COME FROM THE CONSOLE TERMINAL IN EXEC MODE OR THE
   244					;*CONTROLLING TERMINAL (REAL TERMINAL OR PTY) IN USER MODE.
   245					S^;*********************************************************************^
   246
   247		037000	000003		OPDEF	TTICHR 	[37B8!0B12!3]	;TTY, INPUT ANY CHARACTER
   248		037040	000003		OPDEF	TTIYES	[37B8!1B12!3]	;TTY, NORMAL RETURN Y
   249		037100	000003		OPDEF	TTINO	[37B8!2B12!3]	;TTY, NORMAL RETURN N
   250		037140	000003		OPDEF	TTIOCT	[37B8!3B12!3]	;TTY, INPUT OCTAL WORD
   251		037200	000003		OPDEF	TTIDEC	[37B8!4B12!3]	;TTY, INPUT DECIMAL WORD
   252		037240	000003		OPDEF	TTICNV	[37B8!5B12!3]	;TTY, INPUT CONVERTABLE WORD
   253		037300	000003		OPDEF	TTLOOK	[37B8!6B12!3]	;TTY, KEYBOARD CHECK
   254		037340	000003		OPDEF	TTALTM	[37B8!7B12!3]	;TTY, ALT-MODE CHECK
   255		037400	000003		OPDEF	TTSIXB	[37B8!10B12!3]	;TTY, INPUT SIXBIT WORD
   256		037440	000003		OPDEF	TTYINP	[37B8!11B12!3]	;TTY, IMAGE MODE INPUT
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 4
PARAM	KLM	26-FEB-76 08:30		*PARAM* PROGRAM/SUBROUTINE PARAMETERS, FEB 26,1976                             *** SEQ 0040

   257					;*TERMINAL OUTPUT UUO'S.
   258
   259		037000	000000		OPDEF	PNTA	[37B8!0B12!0]	;PRINT ASCII WORD
   260		037000	000001		OPDEF	PNTAF	[37B8!0B12!1]	;PRINT ASCII WORD FORCED
   261		037740	000000		OPDEF	PNTAL	[37B8!17B12!0]	;PRINT ASCIZ LINE
   262		037740	000001		OPDEF	PNTALF	[37B8!17B12!1]	;PRINT ASCIZ LINE FORCED
   263		037600	000003		OPDEF	PSIXL	[37B8!14B12!3]	;PRINT SIXBIT'Z LINE
   264		037640	000003		OPDEF	PSIXLF	[37B8!15B12!3]	;PRINT SIXBIT'Z LINE FORCED
   265		037000	000000		OPDEF	PNTMSG	[37B8!0B12!0]	;PRINT MESSAGE IMMEDIATE
   266		037040	000000		OPDEF	PNTMSF	[37B8!1B12!0]	;PRINT MESSAGE IMMEDIATE FORCED
   267		037100	000000		OPDEF	PSIXM	[37B8!2B12!0]	;PRINT SIXBIT'Z MSG IMMEDIATE
   268		037200	000000		OPDEF	PSIXMF	[37B8!4B12!0]	;PRINT SIXBIT'Z MSG IMM FORCED
   269		037000	000000		OPDEF	PNTCI	[37B8!0B12!0]	;PRINT CHARACTER IMMEDIATE
   270		037040	000000		OPDEF	PNTCIF	[37B8!1B12!0]	;PRINT CHARACTER IMMEDIATE FORCED
   271		037500	000000		OPDEF	PNTCHR	[37B8!12B12!0]	;PRINT CHARACTER
   272		037500	000001		OPDEF	PNTCHF	[37B8!12B12!1]	;PRINT CHARACTER FORCED
   273		037040	000000		OPDEF	PNT1	[37B8!1B12!0]	;PRINT ONE OCTAL DIGIT
   274		037040	000001		OPDEF	PNT1F	[37B8!1B12!1]	;PRINT 1 OCTAL DIGIT FORCED	
   275		037100	000000		OPDEF	PNT2	[37B8!2B12!0]	;PRINT TWO OCTAL DIGITS
   276		037100	000001		OPDEF	PNT2F	[37B8!2B12!1]	;PRINT 2 OCTAL DIGITS FORCED	
   277		037140	000000		OPDEF	PNT3	[37B8!3B12!0]	;PRINT THREE OCTAL DIGITS
   278		037140	000001		OPDEF	PNT3F	[37B8!3B12!1]	;PRINT THREE OCTAL DIGITS FORCED	
   279		037200	000000		OPDEF	PNT4	[37B8!4B12!0]	;PRINT FOUR OCTAL DIGITS
   280		037200	000001		OPDEF	PNT4F	[37B8!4B12!1]	;PRINT FOUR OCTAL DIGITS FORCED
   281		037240	000000		OPDEF	PNT5	[37B8!5B12!0]	;PRINT FIVE OCTAL DIGITS
   282		037240	000001		OPDEF	PNT5F	[37B8!5B12!1]	;PRINT FIVE OCTAL DIGITS FORCED
   283		037300	000000		OPDEF	PNT6	[37B8!6B12!0]	;PRINT SIX OCTAL DIGITS
   284		037300	000001		OPDEF	PNT6F	[37B8!6B12!1]	;PRINT SIX OCTAL DIGITS FORCED
   285		037340	000000		OPDEF	PNT7	[37B8!7B12!0]	;PRINT 7 OCTAL DIGITS
   286		037340	000001		OPDEF	PNT7F	[37B8!7B12!1]	;PRINT 7 OCTAL DIGITS FORCED
   287		037440	000000		OPDEF	PNT11	[37B8!11B12!0]	;PRINT 11 OCTAL DIGITS
   288		037440	000001		OPDEF	PNT11F	[37B8!11B12!1]	;PRINT 11 OCTAL DIGITS FORCED.
   289		037400	000000		OPDEF	PNTADR	[37B8!10B12!0]	;PRINT PHYSICAL ADDRESS
   290		037400	000001		OPDEF	PNTADF	[37B8!10B12!1]	;PRINT PHYSICAL ADDRESS FORCED
   291		037600	000000		OPDEF	PNTOCT  [37B8!14B12!0]	;PRINT FULL WORD OCTAL
   292		037600	000001		OPDEF	PNTOTF	[37B8!14B12!1]	;PRINT FULL WORD OCTAL FORCED
   293		037540	000000		OPDEF	PNTHW	[37B8!13B12!0]	;PRINT OCTAL HALF WORDS, 6 SP 6
   294		037540	000001		OPDEF	PNTHWF	[37B8!13B12!1]	;PRINT OCTAL HALF WORDS, 6 SP 6 FORCED
   295		037700	000003		OPDEF	PNTOCS	[37B8!16B12!3]	;PRINT OCTAL, SUPPRESS LEADING 0'S
   296		037740	000003		OPDEF	PNTOCF	[37B8!17B12!3]	;PRINT OCTAL, SUPPRESS LEADING 0'S FORCED
   297		037640	000000		OPDEF	PNTDEC	[37B8!15B12!0]	;PRINT DECIMAL, SUPRESS LEADING 0'S
   298		037640	000001		OPDEF	PNTDCF	[37B8!15B12!1]	;PRINT DECIMAL, SUPRESS LEADING 0'S FORCED
   299		037700	000000		OPDEF	PNTDS	[37B8!16B12!0]	;PRINT DECIMAL, SPACES FOR LD 0'S
   300		037700	000001		OPDEF	PNTDSF	[37B8!16B12!1]	;PRINT DECIMAL, SPACES FOR LD 0'S FORCED
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 5
PARAM	KLM	26-FEB-76 08:30		*PARAM* PROGRAM/SUBROUTINE PARAMETERS, FEB 26,1976                             *** SEQ 0041

   301		037200	000002		OPDEF	PNTNM	[37B8!4B12!2]	;PRINT PROGRAM NAME
   302		037000	000002		OPDEF	PNTSIX	[37B8!0B12!2]	;PRINT SIXBIT WORD
   303		037040	000002		OPDEF	PNTSXF	[37B8!1B12!2]	;PRINT SIXBIT WORD FORCED
   304		037240	000002		OPDEF	DROPDV	[37B8!5B12!2]	;CLOSE LOGICAL FILE, USER MODE
   305		037100	000002		OPDEF	PNTCW	[37B8!2B12!2]	;PRINT DF10 CONTROL WORD
   306		037140	000002		OPDEF	PNTCWF	[37B8!3B12!2]	;PRINT DF10 CONTROL WORD FORCED
   307		037000	030242		OPDEF	PCRL	[37B8!0B12!CRLF] ;PRINT CARRIAGE RETURN/LINE FEED
   308		037040	030242		OPDEF	PCRLF	[37B8!1B12!CRLF] ;PRINT CARRIAGE RETURN/LINE FEED FORCED
   309		037000	000040		OPDEF	PSP	[37B8!0B12!40]	;PRINT SPACE
   310		037040	000040		OPDEF	PSPF	[37B8!1B12!40]	;PRINT SPACE FORCED
   311		037000	030243		OPDEF	PCRL2	[37B8!0B12!CRLF2] ;PRINT CARRIAGE RETURN/LINE FEED (TWICE)
   312		037040	030243		OPDEF	PCRL2F	[37B8!1B12!CRLF2] ;PRINT CARRIAGE RETURN/LINE FEED (TWICE) FORCED
   313		037040	000007		OPDEF	PBELL	[37B8!1B12!7]	;PRINT TTY BELL
   314
   315		037040	000026		OPDEF	PFORCE	[37B8!1B12!26]	;PRINT FORCE, CONTROL O OVERRIDE
   316
   317					DEFINE	PMSG	(ARG),<
   318						PSIXM	[SIXBIT\ARG'_\]>
   319
   320					DEFINE	PMSGF	(ARG),<
   321						PSIXMF	[SIXBIT\ARG'_\]>
   322
   323					;*SIXBTZ -- MACRO TO GENERATE SIXBIT DATA FOR PRINTING
   324					;*	CONSERVES CORE OVER ASCIZ
   325
   326					DEFINE	SIXBTZ	(ARG),<	[SIXBIT\ARG'_\]>
   327
   328					;*CONSOLE SWITCH INPUT UUO.
   329					;*READS CONSOLE SWITCHES IF IN EXEC MODE OR ASKS FOR THEM IF
   330					;* USER MODE.
   331
   332		037400	000002		OPDEF	SWITCH	[37B8!10B12!2]	;INPUT CONSOLE SWITCHES
   333
   334					;*CLOCK INITIALIZATION UUO - TO SET DESIRED CLOCK OPERATION
   335					;*EITHER IGNORE CLOCK, ONLY LET IT TICK OR CAUSE INTERRUPT TO OCCUR.
   336
   337		037540	000004		OPDEF	CLOKOP	[37B8!13B12!4]	;CLOCK OPERATION UUO - PDP-11 CLOCK
   338		037200	000004		OPDEF	MTROP	[37B8!4B12!4]	;CLOCK OPERATION UUO - DK20 METER
   339
   340					;*KL10 ONLY CACHE OPERATION UUO'S
   341
   342		037040	000004		OPDEF	CINVAL	[37B8!1B12!4]	;CACHE INVALIDATE
   343		037100	000004		OPDEF	CFLUSH	[37B8!2B12!4]	;CACHE FLUSH
   344		037140	000004		OPDEF	CWRTBI	[37B8!3B12!4]	;CACHE WRITE-BACK & INVALIDATE
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 6
PARAM	KLM	26-FEB-76 08:30		*PARAM* PROGRAM/SUBROUTINE PARAMETERS, FEB 26,1976                             *** SEQ 0042

   345					;*END OF PASS/PROGRAM UUOS
   346
   347					;PERFORMS THE END OF PASS FUNCTIONS. INCREMENT PASS COUNT,
   348					;*DECREMENT ITERATION COUNT, CHECK IF FINISHED WITH THIS PROGRAM ETC.
   349
   350		037500	000004		OPDEF	ENDUUO	[37B8!12B12!4]	;UUO TO DISPLAY LIGHTS
   351		037700	000004		OPDEF	EOPUUO	[37B8!16B12!4]	;END OF PROGRAM UUO
   352
   353					;*MEMORY MANAGEMENT UUO'S
   354					;*UUO'S TO PERFORM VARIOUS MEMORY FUNCTIONS. MAPPING, ZEROING, PAGING,
   355					;*ADDRESS CONVERSION, ETC...
   356
   357		037000	000004		OPDEF	MAPMEM	[37B8!0B12!4]	;MAP MEMORY
   358		037500	000002		OPDEF	MEMZRO	[37B8!12B12!2]	;ZERO MEMORY
   359		037440	000002		OPDEF	MEMSEG	[37B8!11B12!2]	;SETUP MEMORY SEGMENT
   360		037540	000002		OPDEF	MAPADR	[37B8!13B12!2]	;VIRTUAL TO PHYSICAL ADR CONVERT
   361		037640	000002		OPDEF	MAPCNK	[37B8!15B12!2]	;MAP MEMORY CHUNK
   362		037600	000002		OPDEF	MAPSET	[37B8!14B12!2]	;SET KI10 EXEC PAGE MAP
   363		037740	000002		OPDEF	MAPPNT	[37B8!17B12!2]	;PRINT MEMORY MAP
   364
   365					;*DEVICE CODE MODIFICATION UUO
   366					;*ALLOWS THE MODIFICATION OF IOT'S TO ONE DEVICE TO BE CHANGED TO
   367					;*IOT'S TO A DIFFERENT DEVICE CODE.
   368
   369		037340	000002		OPDEF	MODPCU	[37B8!7B12!2]	;MODIFY PERHIPERAL CODE, USER
   370		037300	000002		OPDEF	MODPCP	[37B8!6B12!2]	;MODIFY PERHIPERAL CODE, PROGRAM
   371
   372			030000			IFNDEF	MODDVL,<MODDVL==BEGIN>
   373			030000			IFNDEF	MODDVU,<MODDVU==BEGIN>
   374
   375					;*"DIAMON" FILE SELECTION AND READ UUOS
   376
   377		037240	000004		OPDEF	FSELECT	[37B8!5B12!4]	;FILE SELECTION
   378		037300	000004		OPDEF	FREAD	[37B8!6B12!4]	;FILE READ - ASCII DATA
   379		037340	000004		OPDEF	FRD36	[37B8!7B12!4]	;FILE READ - 36 BIT DATA
   380		037400	000004		OPDEF	FRD8	[37B8!10B12!4]	;FILE READ - 8 BIT DATA
   381
   382					;*KI10 ONLY UUO FOR PRINTING MARGIN VALUES
   383
   384		037700	000002		OPDEF	PNTMGN	[37B8!16B12!2]	;PRINT MARGIN VALUE
   385
   386						XLIST
   387					IFNDEF	KLOLD,<LIST
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 7
PARAM	KLM	26-FEB-76 08:30		ERROR HANDLING UUO DEFINITIONS, JAN 5,1976                                     *** SEQ 0043

   388					SUBTTL	ERROR HANDLING UUO DEFINITIONS, JAN 5,1976
   389
   390					S^;*********************************************************************^
   391					;*ERROR HANDLER PARAMETERS
   392					S^;*********************************************************************^
   393
   394		036000	000000		OPDEF	ERUUO	[36B8]		;ERROR CALL UUO
   395		035000	000000		OPDEF	ERLOOP	[35B8]		;ERROR LOOP, CHECKS PC,REPT,REPT1,ERROR
   396		035040	000000		OPDEF	ERLP1	[35B8!1B12]	;ERROR LOOP IF PC'S MATCH
   397		035100	000000		OPDEF	ERLP2	[35B8!2B12]	;ERROR LOOP IF ANY ERROR
   398		034000	000000		OPDEF	REPTUO	[34B8]		;REPEAT LOOP UUO
   399
   400					;*THE ERROR HANDLER MACROS
   401
   402					;*A MACRO TO REPORT AN ERROR AND LOOP
   403
   404						DEFINE	ERROR	(ADR,FORMAT,CORECT,ACTUAL,F,D,ERR)<
   405						SALL
   406						ERUUO	FORMAT,[T,,[SIXBIT\F'_\]
   407							   CORECT,,ACTUAL
   408							   [SIXBIT\D'_\],,ERR]
   409						XALL
   410					
   411						ERLOOP	ADR		;IF ERROR, LOOP TO ADR
   412					>
   413
   414					;*A MACRO TO REPORT AN ERROR AND NOT LOOP
   415
   416						DEFINE	ERROR1	(FORMAT,CORECT,ACTUAL,F,D,ERR)<
   417						SALL
   418						ERUUO	FORMAT,[T,,[SIXBIT\F'_\]
   419							   CORECT,,ACTUAL
   420							   [SIXBIT\D'_\],,ERR]
   421						XALL	>
   422
   423					>;END OF KLOLD CONDITIONAL
   424
   425						XLIST
   426						LIST
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 1
FIXED	KLM	26-FEB-76 08:31		*FIXED* FIXED CONTROL AND DISPATCH STORAGE, FEB 26,1976                        *** SEQ 0044

   427					SUBTTL	*FIXED* FIXED CONTROL AND DISPATCH STORAGE, FEB 26,1976
   428
   429	030000					LOC	30000
   430
   431					S^;*********************************************************************^
   432					;*PROGRAM STARTING ADDRESSES
   433					;*THESE ADDRESSES CALL VARIOUS SPECIAL START ROUTINES AND OR OPTIONS
   434					;*NORMAL START ADDRESS IS 30000 ALL OTHERS ARE SPECIAL. INVOKED BECAUSE
   435					;*OF END OF PASS, POWER FAILURE, DDT START, RE-ENTERING(TYPICALLY USER
   436					;*MODE), OR ANY NUMBER OF SPECIAL FEATURE TESTS.
   437					S^;*********************************************************************^
   438
   439	030000	254 00 1 00 027776 	BEGIN:	JRST	@MODLNK		;STAND-ALONE START
   440	030001	254 00 0 00 030621 	$START:	JRST	START		;MODE CHECK STARTING ADDRESS
   441
   442	030002	254 00 1 00 027774 	DIAGMN:	JRST	@LDLNK		;DIAGNOSTIC MONITOR START
   443
   444	030003	254 00 1 00 027774 	SYSEXR:	JRST	@LDLNK		;SYSTEM EXERCISER START
   445
   446	030004	254 00 0 00 030615 	SFSTRT:	JRST	SADR1		;SPECIAL FEATURE START
   447
   448	030005	254 00 0 00 030076 	PFSTRT:	JRST	SADR2		;POWER FAIL RESTART
   449
   450	030006	254 00 0 00 032155 	REENTR:	JRST	SADR3		;REENTER START(USUALLY USER MODE ONLY)
   451
   452	030007				SRTDDT:				;COMMONLY MISTAKEN NAME FOR "DDTSRT"
   453	030007	254 00 1 00 027775 	DDTSRT:	JRST	@DDTLNK		;DDT START
   454
   455	030010	254 00 0 00 030637 	BEGIN1:	JRST	STARTA		;LOOP START(END OF PASS COMES HERE)
   456	030011	254 00 1 00 027777 	SBINIT:	JRST	@SUBLNK		;PMGINT LINKAGE
   457	030012	000000	000000		RETURN:	0			;RETURN ADDRESS STORAGE
   458
   459	030013	254000	030707		START1:	SADR7			;OPTIONAL STARTING ADR/INSTRUCTIONS
   460	030014	254000	031174		START2:	SADR8			; "
   461	030015	254200	030000		START3:	SADR9			; "
   462	030016	254200	030000		START4:	SADR10			; "
   463	030017	254200	030000		START5:	SADR11			; "
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 2
FIXED	KLM	26-FEB-76 08:31		*FIXED* FIXED CONTROL AND DISPATCH STORAGE, FEB 26,1976                        *** SEQ 0045

   464					S^;*********************************************************************^
   465					;*PROGRAM FIXED PARAMETER AREA
   466					S^;*********************************************************************^
   467
   468	030020	444253	444200		PNTNAM:	PAREA3		;SIXBIT PROGRAM NAME
   469	030021	645560	000000		PNTEXT:	PAREA4		;SIXBIT PROGRAM EXTENSION
   470	030022	123457	654321		RANDBS:	PAREA1		;RANDOM BASE NUMBER
   471	030023	000000	000000		SWTEXR:	PAREA2		;SYSTEM EXERCISER SWITCHES
   472	030024	000000	000002		ITRCNT:	ITERAT		;PROGRAM ITERATIONS
   473	030025	000000	030600		$PNAME:	PGMNAM		;POINTER TO PROGRAMS NAME
   474	030026	000000	000003		$PVER:	MCNVER,,DECVER	;MCN & DEC VERSION LEVEL
   475	030027	000000	030000		$MODVL:	MODDVL		;DEVICE CODE CHANGE LOWER LIMIT
   476	030030	000000	030000		$MODVU:	MODDVU		;DEVICE CODE CHANGE UPPER LIMIT
   477	030031	777777	777777		$EMODE:	IFNDEF EXCASB,<0> IFDEF EXCASB,<-1>	;EXEC ALLOWED
   478	030032	777777	777777		$UMODE:	IFNDEF USRASB,<0> IFDEF USRASB,<-1>	;USER ALLOWED
   479	030033	000000	000000		$DSKUP:	IFNDEF DSKUPD,<0> IFDEF DSKUPD,<-1>	;DISK UPDATE MODE
   480	030034	000000	000000		$MMAP:	IFNDEF MEMMAP,<0> IFDEF MEMMAP,<-1>	;ALLOW MEMORY RTNS
   481	030035	000000	000000		PAREA7:	PAREA5		;OPTIONAL PARAMETER
   482	030036	000000	000000		PAREA8:	PAREA6		;OPTIONAL PARAMETER
   483
   484					S^;*********************************************************************^
   485					;*PROGRAM VARIABLE PARAMETER AREA
   486					S^;*********************************************************************^
   487
   488	030037	000000	000000		USER:	0		; 0 = EXEC, -1 = USER MODE FLAG
   489	030040	000000	000000		KAIFLG:	0		;PROCESSOR TYPE, 0 = KA10, -1 = KI10
   490	030041	000000	000000		KLFLG:	0		;PROCESSOR TYPE, 0 = KA/KI, -1 = KL10
   491	030042	777777	777777		MONFLG:	-1		;DIAG MONITOR SPECIAL USER FLAG
   492	030043	000000	000000		MONCTL:	0		;DIAG MON/SYS EXR FLAG
   493	030044	000000	000000		MONTEN:	0		;-1= LOADED BY 10
   494	030045	000000	000000		CLOCKF:	0		;CLOCK TICKED FLAG
   495	030046	000000	000000		CONSW:	0		;CONSOLE SWITCH SETTINGS
   496	030047	000000	000000		PASCNT:	0		;PROGRAM PASS COUNT
   497	030050	000000	000000		RUNFLG:	0		;PROGRAM RUN FLAG
   498	030051	000000	000000		TESTPC:	0		;SUBTEST PC
   499	030052	000000	000000		ERRPC:	0		;ERROR PC
   500	030053	000000	000000		ERRTLS:	0		;ERROR TOTALS
   501	030054	000000	000000		TICKS:	0		;PROGRAM RUNNING TIME
   502	030055	000000	000000		MARGIN:	0		;KI10 MARGIN WORD VALUE
   503	030056	000000	000000		$ONETM:	0		;SUBROUTINE INITIALIZATION FLAG
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 3
FIXED	KLM	26-FEB-76 08:31		*FIXED* FIXED CONTROL AND DISPATCH STORAGE, FEB 26,1976                        *** SEQ 0046

   504					S^;*********************************************************************^
   505					;*SPECIAL PROGRAM DISPATCH ADDRESSES
   506					S^;*********************************************************************^
   507
   508	030057	037 12 0 00 000004 	BEGEND:	ENDUUO		;END OF PASS
   509	030060	254 00 0 00 030010 	$BEND1:	JRST	BEGIN1	;KEEP RUNNING PROGRAM
   510	030061	037 16 0 00 000004 	$BEND2:	EOPUUO		;END OF PROGRAM - NO RETURN
   511	030062	000000	030000		CNTLC:	SADR5		;CONTROL C XFER ADDRESS
   512	030063	000000	030007		ALTMGO:	SADR6		;ALTMODE XFER ADDRESS
   513	030064				CPOPJ1:			;SKIP RETURN
   514	030064	350 00 0 17 000000 	UUOSKP:	AOS	(P)	;SKIP RETURN FROM UUO
   515	030065				CPOPJ:			;NON-SKIP REGULAR RETURN
   516	030065	263 17 0 00 000000 	UUOEXT:	RTN		;UUO RETURN
   517	030066	255 00 0 00 000000 	UUORTN:	JFCL		;ADDITIONAL USERS UUO ROUTINE
   518	030067	255 00 0 00 000000 	$UORTX:	JFCL		;ADDITIONAL UUO LINKAGE
   519	030070	255 00 0 00 000000 	$UUOER:	JFCL		;INITED AS (JRST $UOERX)
   520	030071	255 00 0 00 000000 	$ITRHL:	JFCL		;ADDITIONAL INTERRUPT LINKAGE
   521	030072	255 00 0 00 000000 	$ITRX1:	JFCL		; "
   522	030073	255 00 0 00 000000 	$USRHL:	JFCL		; "
   523	030074	255 00 0 00 000000 	$RSRTX:	JFCL		;ADDITIONAL POWER FAIL LINKAGE
   524	030075	255 00 0 00 000000 	$RSRTY:	JFCL		; "
   525	030076	255 00 0 00 000000 	RESRT1:	JFCL		; INITED AS (JRST RESRTX)
   526	030077	255 00 0 00 000000 	RESRT2:	JFCL		; "
   527	030100	255 00 0 00 000000 	$PARER:	JFCL		;ADDITIONAL PARITY ERROR LINKAGE
   528	030101	255 00 0 00 000000 	ERMORE:	JFCL		;ADDITIONAL ERROR HANDLER LINKAGE
   529	030102	254 04 0 00 030102 		HALT	.	;IMPROPER TRANSFER HALT
   530
   531	030103	000000	000000		$PSHER:	0		;INITED AS (JRST PSHERR)
   532	030104	000000	000000		ITRCH1:	0		;PC & FLAGS OF CURRENT INTERRUPT
   533	030105	000000	000000			0		;INITED AS (JRST $ITRC1)
   534
   535					S^;*********************************************************************^
   536					;*PROCESSOR CONTROL STORAGE
   537					S^;*********************************************************************^
   538
   539	030106	000000	000000		$ACC0:	0		;INTERRUPT SAVED AC0
   540	030107	000000	000000		$SVPI:	0		;INTERRUPT SAVED PI
   541	030110	000000	000000		$SVAPR:	0		;INTERRUPT SAVED APR
   542	030111	000000	000000		$SVPAG:	0		;INTERRUPT SAVED PAG (DATAI)
   543	030112	000000	000000		$SPAG1:	0		;INTERRUPT SAVED PAG (CONI)
   544
   545	030113	000000	000000		$SVUUO:	0		;CURRENT USERS UUO
   546	030114	000000	000000		$SVUPC:	0		;PC OF CURRENT USERS UUO
   547
   548	030115	000000	000000		REPTU:	0		;REPEAT UUO ITERATIONS
   549	030116	000000	000000		SCOPE:	0		;ERROR HANDLER SCOPE LOOP FLAG
   550	030117	000000	000000		%CORFLG:0		; " CORRECT FLAG
   551	030120	000000	000000		%COREC:	0		; " CORRECT DATA
   552	030121	000000	000000		%ACTFL:	0		; " ACTUAL FLAG
   553	030122	000000	000000		%ACTUL:	0		; " ACTUAL DATA
   554	030123	000000	000000		%DISCR:	0		; " DISCREPENCY DATA
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 4
FIXED	KLM	26-FEB-76 08:31		*FIXED* FIXED CONTROL AND DISPATCH STORAGE, FEB 26,1976                        *** SEQ 0047

   555					S^;*********************************************************************^
   556					;*UUO DISPATCH TABLE
   557					S^;*********************************************************************^
   558						XLIST
   559						LIST
   560	030124	030070	030070		UUODIS:	LUUO1,,$UUOER
   561	030125	030070	030070			LUUO3,,LUUO2
   562	030126	030070	030070			LUUO5,,LUUO4
   563	030127	030070	030070			LUUO7,,LUUO6
   564	030130	030070	030070			LUUO11,,LUUO10
   565	030131	030070	030070			LUUO13,,LUUO12
   566	030132	030070	030070			LUUO15,,LUUO14
   567	030133	030070	030070			LUUO17,,LUUO16
   568	030134	030070	030070			LUUO21,,LUUO20
   569	030135	030070	030070			LUUO23,,LUUO22
   570	030136	030070	030070			LUUO25,,LUUO24
   571	030137	030070	030070			LUUO27,,LUUO26
   572	030140	030070	030070			LUUO31,,LUUO30
   573	030141	030070	030070			LUUO33,,LUUO32
   574
   575					S^;*********************************************************************^
   576					;*MEMORY MANAGMENT STORAGE
   577					S^;*********************************************************************^
   578
   579	030142	000000	000000		DF22F:	0		;DF10 CONTROL FLAG, 0 = 18, -1 = 22 BIT
   580	030143	000000	000000		MAPNEW:	0		;MEMORY MAPPING CONTROL FLAG, -1 = 4096K MAPPING
   581	030144	000000	000000		MEMTOT:	0		;TOTAL MEMORY SIZE IN K (1024.)
   582	030145	000000	000000		MEMLOW:	0		;LOWEST USABLE MEMORY
   583	030146				MEMSIZ:	BLOCK ^D41	;MEMORY SEGMENT POINTER TABLE
   584
   585					S^;*********************************************************************^
   586					;*PRINT CONTROL STORAGE
   587					S^;*********************************************************************^
   588
   589	030217	000000	000000		PNTFLG:	0		;PRINT FLAG, -1 WHILE IN PRINT ROUTINE
   590	030220	000000	000000		PNTENB:	0		;PRINT ENABLE
   591	030221	000000	000000		PDISF:	0		;PRINT DISABLED FLAG
   592	030222	000000	000000		PNTINH:	0		;INHIBIT PRINT INPUT CHECKS
   593	030223	000000	000000		PNTSPC:	0		;PRINT SPACE CONTROL
   594	030224	000000	000000		OPTIME:	0		;TYPE-IN WAIT TIME
   595	030225	000000	000000		$TWCNT:	0		;TIME WAITED
   596	030226	000000	000000		$DVOFF:	0		;LOGICAL DEVICE INITED FLAG
   597	030227	000000	000000		TTYFIL:	0		;TTY EXEC FILLERS FLAG
   598	030230	000000	000000		TTYSPD:	0		;TTY EXEC BAUD RATE
   599	030231	000000	000000		$TTCHR:	0		;ACTUAL TYPED IN CHAR
   600	030232	000000	000000		$CHRIN:	0		;UPPER CASED & PARITY STRIPPED CHAR
   601	030233	000000	000000		$TYPNB:	0		;TYPED IN NUMBER
   602	030234	000000	000000		$CRLF:	0		;FREE CR/LF FLAG
   603	030235	000000	000000		$TABF:	0		;TAB CONVERSION FLAG
   604	030236	000000	000000		$FFF:	0		;FORM FEED CONVERSION FLAG
   605	030237	000000	000000		$VTF:	0		;VERTICAL TAB CONVERSION FLAG
   606	030240	000000	000000		USRLFF:	0		;USER LF FILLERS
   607	030241	000000	000000		USRCRF:	0		;USER CR FILLERS
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 5
FIXED	KLM	26-FEB-76 08:31		*FIXED* FIXED CONTROL AND DISPATCH STORAGE, FEB 26,1976                        *** SEQ 0048

   608					S^;*********************************************************************^
   609					;*THE FOLLOWING MISCELLANEOUS PRINT CHARACTERS ARE INCLUDED
   610					;*TO FACILITATE PRINTING AND ARE CALLED AS FOLLOWS:
   611					;*	MOVEI	NAME
   612					;*	PNTA		;OR PNTAF
   613					S^;*********************************************************************^
   614
   615	030242				CRLF:	ASCII/
   616	030242	015 012 000 000 000 	/
   617	030243				CRLF2:	ASCII/
   618
   619	030243	015 012 015 012 000 	/
   620	030244	054 000 000 000 000 	COMMA:	ASCII/,/
   621	030245	056 000 000 000 000 	PERIOD:	ASCII/./
   622	030246	040 000 000 000 000 	SPACE:	ASCII/ /
   623	030247	011 000 000 000 000 	TAB:	ASCII/	/
   624	030250				MINUS:
   625	030250	055 000 000 000 000 	HYPEN:	ASCII/-/
   626	030251	053 000 000 000 000 	PLUS:	ASCII/+/
   627	030252	052 000 000 000 000 	AST:	ASCII/*/
   628	030253	100 000 000 000 000 	ATSIN:	ASCII/@/
   629	030254	050 000 000 000 000 	LFP:	ASCII/(/
   630	030255	051 000 000 000 000 	RTP:	ASCII/)/
   631	030256	007 0000000000 		BELL:	BYTE (7) 007
   632	030257	077 000 000 000 000 	QUEST:	ASCII/?/
   633	030260	057 000 000 000 000 	SLASH:	ASCII!/!
   634	030261	044 000 000 000 000 	DOLLAR:	ASCII/$/
   635	030262	000000	000012		RADIX:	^D10			;DECIMAL PRINT RADIX
   636	030263	000000	000040		RADLSP:	40			;DECIMAL PRINT LEADING CHAR
   637	030264	000000	000012		RADLSC:	^D10			;DECIMAL PRINT LEADING CHAR COUNT
   638
   639					S^;*********************************************************************^
   640					;*USER MODE OUTPUT FILE INFORMATION
   641					S^;*********************************************************************^
   642
   643	030265				$OBUF:	BLOCK	3		;LOGICAL FILE OUTPUT BUFFER HEADER
   644	030270	60 62 51 56 64 00 	$OUTNM:	SIXBIT	/PRINT/		;FILE NAME
   645	030271	60 56 64 00 00 00 	$OUTEX:	SIXBIT	/PNT/		;FILE NAME EXTENSION
   646	030272					BLOCK	2
   647
   648					S^;*********************************************************************^
   649					;*DISK UPDATE MODE FILE INFORMATION
   650					S^;*********************************************************************^
   651
   652	030274				$IBUF:	BLOCK	3
   653	030277	60 62 51 56 64 00 	$INNM:	SIXBIT	/PRINT/
   654	030300	60 56 64 00 00 00 	$INEXT:	SIXBIT	/PNT/
   655	030301					BLOCK	2
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 6
FIXED	KLM	26-FEB-76 08:31		*FIXED* FIXED CONTROL AND DISPATCH STORAGE, FEB 26,1976                        *** SEQ 0049

   656					S^;*********************************************************************^
   657					;*PUSHDOWN LIST CONTROL INFORMATION
   658					S^;*********************************************************************^
   659
   660	030303	777577	030303		PLIST:	PLIST-PLISTE,,PLIST
   661	030304				PLISTS:	BLOCK	200
   662	030504	000000	000000		PLISTE:	0		;END OF PUSHDOWN LIST
   663
   664					S^;*********************************************************************^
   665					;*POWER LINE CLOCK FREQUENCY FLAG
   666					S^;*********************************************************************^
   667
   668	030505	000000	000000		CYCL60:	0	;0 = 60, -1 = 50 CYCLE
   669
   670					S^;*********************************************************************^
   671					;*KL10 CACHE CONTROL FLAGS
   672					S^;*********************************************************************^
   673
   674	030506	000000	000000		CSHFLG:	0	;ALLOW CACHE IF 0
   675	030507	000000	000000		CSHMEM:	0	;CACHE MEMORY SEGMENTS IF 0
   676
   677					S^;*********************************************************************^
   678					;*NUMBER INPUT DIGIT FLAG
   679					S^;*********************************************************************^
   680
   681	030510	000000	000000		TTNBRF:	0	;-1 IF ANY DIGIT TYPED
   682
   683					S^;*********************************************************************^
   684					;*KL10 & KI10 "INHPAG" SWITCH PAGING PREVENTION
   685					S^;*********************************************************************^
   686
   687	030511	000000	000000		PVPAGI:	0	;IF NON-ZERO, OVERRIDE "INHPAG" SWITCH ACTION
   688
   689					S^;*********************************************************************^
   690					;*ERROR REPORTING ROUTINE ADDITIONAL USERS CONTROL INSTRUCTIONS
   691					S^;*********************************************************************^
   692
   693	030512	000000	000000		%ERHI1:	0	;IF NON-ZERO, XCT'D AT START OF %ERUUO
   694	030513	000000	000000		%ERHI2:	0	;IF NON-ZERO, XCT'D AT END OF %ERUUO
   695	030514	000000	000000		%ERHI3:	0	;IF NON-ZERO, XCT'D AFTER "PC" OF %ERUUO
   696
   697					S^;*********************************************************************^
   698					;*SPECIAL USERS UUO INTERCEPT INSTRUCTION
   699					S^;*********************************************************************^
   700
   701	030515	000000	000000		$$UUO:	0	;IF NON-ZERO, XCT'D AT START OF $UORTN
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 7
FIXED	KLM	26-FEB-76 08:31		*FIXED* FIXED CONTROL AND DISPATCH STORAGE, FEB 26,1976                        *** SEQ 0050

   702					S^;*********************************************************************^
   703					;*KL10 PROCESSOR TYPE FLAG, 0=P0, 1=BBD NEW, 2=BBD OLD
   704					S^;*********************************************************************^
   705
   706	030516	000000	000000		KLTYP:	0
   707
   708					S^;*********************************************************************^
   709					;*SPECIAL USERS MUUO INTERCEPT INSTRUCTION
   710					S^;*********************************************************************^
   711
   712	030517	000000	000000		$$MUUO:	0	;IF NON-ZERO, XCT'D AT START OF MUUOER
   713
   714					S^;*********************************************************************^
   715					;*SPECIAL USERS USER MODE OUTPUT ERROR INTERCEPT INSTUCTION
   716					S^;*********************************************************************^
   717
   718	030520	000000	000000		$$OUTER:0	;IF NON-ZERO, XCT'D AT END OF USER MODE ERROR
   719
   720					S^;*********************************************************************^
   721					;*"SWITCH" CALL USAGE CONTROL
   722					S^;*********************************************************************^
   723
   724	030521	000000	000000		$$TOGGLE:0	;IF NON-ZERO, USE C(CONSW) FOR SWITCHES
   725
   726					S^;*********************************************************************^
   727					;*SPECIAL USERS ALTMODE SWITCH CALL INTERCEPT INSTRUCTIONS
   728					S^;*********************************************************************^
   729
   730	030522	000000	000000		$$TAX1:	0	;IF NON-ZERO, XCT'D AT START OF ALTMODE SWITCH CALL
   731	030523	000000	000000		$$TAX2:	0	;IF NON-ZERO, XCT'D AT END OF ALTMODE SWITCH CALL
   732
   733					S^;*********************************************************************^
   734					;*SPECIAL FUTURE EXPANSION ROOM
   735					;*IF ANY FIXED AREA TAGS ARE ADDED, REDUCE THE SIZE OF
   736					;*THIS BLOCK STATEMENT ACCORDINGLY.  THIS MUST BE DONE
   737					;*SO THAT PREVIOUS FIXED ASSIGNMENTS DO NOT CHANGE.
   738					S^;*********************************************************************^
   739
   740	030524					BLOCK	53	;HOPEFULLY THIS IS ENOUGH FOREVER
   741
   742					S^;*********************************************************************^
   743					;*END OF FIXED STORAGE
   744					S^;*********************************************************************^
   745
   746			030577			$ENDFX=<PLISTE+100>&<777700>-1
   747	030577					LOC	$ENDFX
   748	030577	000000	000000		ENDFIX:	0		;END OF FIXED STORAGE
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 1
DBKDBM	MAC	 9-JUN-76 16:19		TEST CONTROL                                                                   *** SEQ 0051

   749					SUBTTL	TEST CONTROL
   750
   751	030600				PGMNAM:	ASCIZ/
   752	030600	015 012 104 105 103 	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST (DBKDB)
   753	030601	123 131 123 124 105 
   754	030602	115 061 060 040 113 
   755	030603	111 061 060 040 122 
   756	030604	101 116 104 117 115 
   757	030605	040 116 125 115 102 
   758	030606	105 122 040 111 116 
   759	030607	123 124 122 125 103 
   760	030610	124 111 117 116 040 
   761	030611	124 105 123 124 040 
   762	030612	050 104 102 113 104 
   763	030613	102 051 015 012 000 	/
   764					;*SIMULATOR -DDT- INITIALIZATION SEQUENCE
   765
   766	030614	254 00 0 00 032110 	SIMDDT:	JRST	SENTRY		;GO TO SIMULATOR
   767
   768					;*PROGRAM INITIALIZATION
   769
   770	030615	402 00 0 00 030053 	SFSRT1:	SETZM	ERRTLS
   771	030616	402 00 0 00 030054 		SETZM	TICKS
   772	030617	402 00 0 00 046304 		SETZM	TSTIMR#
   773	030620	254 00 0 00 030000 		JRST	BEGIN
   774
   775	030621	265 00 0 00 030011 	START:	PGMINT			;INITIALIZE SUBROUTINES
   776	030622	264 00 0 00 031601 		JSR	MGNCLR
   777	030623	037 10 0 00 000002 		SWITCH
   778	030624	336 00 0 00 030037 		SKIPN	USER		;IF USER, USE TIME OF DAY IN JIFFIES
   779	030625	254 00 0 00 030630 		JRST	.+3
   780	030626	040 01 0 00 044777 		CALL	1,[SIXBIT/TIMER/]
   781	030627	202 01 0 00 030022 		MOVEM	1,RANDBS	;INIT RANDOM NUMBER GENERATOR
   782	030630	606 00 0 00 200000 		TRNN	RANBAS		;SPECIFY RANDOM NUMBER BASE ?
   783	030631	254 00 0 00 030637 		JRST	STARTA		;NO
   784						MOVEI	[ASCIZ/
   785	030632	201 00 0 00 045000 	SPECIFY BASE RANDOM NUMBER - /]
   786	030633	037 17 0 00 000001 		PNTALF
   787	030634	037 03 0 00 000003 		TTIOCT			;INPUT OCTAL NUMBER
   788	030635	254 00 0 00 030632 		JRST	.-3		;ERROR
   789	030636	202 00 0 00 030022 		MOVEM	0,RANDBS	;INIT RANDOM NUMBER GENERATOR
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 2
DBKDBM	MAC	 9-JUN-76 16:19		TEST CONTROL                                                                   *** SEQ 0052

   790	030637	476 00 0 00 046242 	STARTA:	SETOM	SIMFLG#		;SETUP CONTROL FLAGS
   791	030640	476 00 0 00 046206 		SETOM	NEWFLG#
   792	030641	402 00 0 00 030223 		SETZM	PNTSPC
   793	030642	037 10 0 00 000002 		SWITCH
   794	030643	602 00 0 00 000001 		TRNE	INHNEW		;INHIBIT NEW INST'S ?
   795	030644	402 00 0 00 046206 		SETZM	NEWFLG		;YES
   796	030645	602 00 0 00 000002 		TRNE	INHSIM		;INHIBIT SIMULATION ?
   797	030646	402 00 0 00 046242 		SETZM	SIMFLG		;YES
   798	030647	201 01 0 00 000012 		MOVEI	1,^D10
   799	030650	602 00 0 00 000004 		TRNE	SNGFL		;SINGLE FAST LOOP ?
   800	030651	201 01 0 00 000001 		MOVEI	1,1		;YES
   801	030652	202 01 0 00 046121 		MOVEM	1,FLCNT#
   802	030653	602 00 0 00 400000 		TRNE	ENTDDT		;ENTER DDT SWITCH SET ?
   803	030654	254 00 0 00 030007 		JRST	DDTSRT		;YES
   804	030655	332 00 0 00 030037 		SKIPE	USER		;USER MODE ?
   805	030656	254 00 0 00 030705 		JRST	BEG		;YES
   806
   807	030657	602 00 0 00 000200 	STARTB:	TRNE	INHCLK		;EXEC, INHIBIT CLOCK INTERRUPTS ?
   808	030660	254 00 0 00 030701 		JRST	STARTC		;YES
   809	030661	200 01 0 00 045007 		MOVE	1,[JSR ITRCLK]	;SETUP INTERRUPT ROUTINE
   810	030662	202 01 0 00 030071 		MOVEM	1,$ITRHL	;TO ALLOW FOR CLOCK
   811	030663	201 01 0 00 000074 		MOVEI	1,^D60		;50 OR 60 HZ. ?
   812	030664	332 00 0 00 030505 		SKIPE	CYCL60
   813	030665	201 01 0 00 000062 		MOVEI	1,^D50		;50 HZ.
   814	030666	202 01 0 00 046130 		MOVEM	1,HERTZ#
   815	030667	200 00 0 00 045010 		MOVE	[JSR ITRCH1]	;SETUP FOR ALL CHANNELS
   816	030670	202 00 0 00 000044 		MOVEM	44
   817	030671	202 00 0 00 000046 		MOVEM	46
   818	030672	202 00 0 00 000050 		MOVEM	50
   819	030673	202 00 0 00 000052 		MOVEM	52
   820	030674	202 00 0 00 000054 		MOVEM	54
   821	030675	202 00 0 00 000056 		MOVEM	56
   822	030676	7 000 20 0 00 003011 		CONO	APR,CLKENB!CLKCLR!IAPRE1!IAPRC1	;TURN ON CLOCK
   823	030677	7 004 20 0 00 042377 		CONO	PI,PARENB!CHNON!PION!PICHNA
   824	030700	254 00 0 00 030705 		JRST	BEG
   825
   826	030701	7 004 20 0 00 011400 	STARTC:	CONO	PI,PICLR!CHNOFF!PIOFF	;CLEAR INTERRUPTS
   827	030702	7 000 20 0 00 000010 		CONO	APR,IAPRE1	;TURN ON ERROR CHANNEL 1
   828	030703	7 004 20 0 00 002300 		CONO	PI,CHNON!PION!PICHN1
   829	030704	254 00 0 00 030705 		JRST	BEG
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 3
DBKDBM	MAC	 9-JUN-76 16:19		DIAGNOSTIC SECTION                                                             *** SEQ 0053

   830					SUBTTL	DIAGNOSTIC SECTION
   831
   832	030705	402 00 0 00 046114 	BEG:	SETZM	ERRCNT#		;ERROR COUNT
   833	030706	402 00 0 00 030047 		SETZM	PASCNT#
   834	030707	200 00 0 00 030022 	CONTNU:	MOVE	RANDBS
   835	030710	202 00 0 00 046157 		MOVEM	K1#
   836	030711	200 10 0 00 046121 		MOVE	10,FLCNT
   837	030712	202 10 0 00 046160 		MOVEM	10,K2#		;ITR COUNT
   838	030713	402 00 0 00 046221 		SETZM	PRNT#		;PRINT FLAG
   839	030714	400 12 0 00 000000 		SETZ	12,0
   840	030715	204 10 0 00 046157 		MOVS	10,K1		;RESTART TO CONTINUE RANDOM NUMBERS
   841	030716	225 10 0 00 006065 		MULI	10,6065		
   842	030717	234 10 0 00 045011 		DIV	10,[XWD 377777,777741]
   843	030720	202 11 0 00 046157 		MOVEM	11,K1
   844	030721	202 11 0 12 000000 		MOVEM	11,0(12)
   845	030722	350 12 0 00 000012 		AOS	12,12
   846	030723	302 12 0 00 000010 		CAIE	12,10
   847	030724	254 00 0 00 030715 		JRST	CONTNU+6
   848	030725	541 12 0 00 031761 		HRRI	12,RAND		;STOR NUM IN RAND TO RAND+7 AND AC 0-7
   849	030726	505 12 0 00 000000 		HRLI	12,0
   850	030727	251 12 0 00 031770 		BLT	12,RAND+7
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 4
DBKDBM	MAC	 9-JUN-76 16:19		DIAGNOSTIC SECTION                                                             *** SEQ 0054

   851	030730	400 12 0 00 000000 	VIT:	SETZ	12,0		;TEST FOR VALID INST
   852	030731	200 11 1 00 000012 		MOVE	11,@12
   853	030732	404 11 0 00 045012 		AND	11,[XWD 770000,0]
   854	030733	241 11 0 00 000006 		ROT	11,6
   855	030734	305 11 0 00 000011 		CAIGE	11,11		;LESS THAN 110
   856	030735	254 00 0 00 031046 		JRST	XCONVT		;YES, MAKE NEW INST
   857	030736	305 11 0 00 000013 		CAIGE	11,13		;LESS THAN 130
   858	030737	254 00 0 00 031061 		JRST	NWINST		;YES, MAKE NEW KI INSTRUCTIONS
   859	030740	305 11 0 00 000014 		CAIGE	11,14		;LESS THAN 140
   860	030741	254 00 0 00 030772 		JRST	BYTTST		;YES GO CHECK FOR POSSIBLE BYTE OR FSC
   861	030742	306 11 0 00 000026 		CAIN	11,26		;CHECK FOR PUSH,POP
   862	030743	254 00 0 00 031021 		JRST	XIMUL		;GO MAKE NEW INST (IMUL)
   863	030744	306 11 0 00 000025 		CAIN	11,25		;CHECK FOR JMP INST
   864	030745	254 00 0 00 030776 		JRST	ECHTST		;GO CHECK FOR POSSIBLE EXCH
   865	030746	242 11 0 00 777775 		LSH	11,-3
   866	030747	306 11 0 00 000003 		CAIN	11,3		;CHECK FOR SKIPS & JMPS
   867	030750	254 00 0 00 031027 		JRST	XFSBR		;GO MAKE NEW INST(FSBR)
   868	030751	306 11 0 00 000006 		CAIN	11,6		;CHECK FOR TST INST
   869	030752	254 00 0 00 031002 		JRST	TSTTST		;GO CHECK FOR LAST INST IN GROUP
   870	030753	306 11 0 00 000007 		CAIN	11,7		;CHECK FOR IOT
   871	030754	254 00 0 00 031025 		JRST	XFMPR		;GO MAKE NEW INST(FMPR)
   872	030755	302 11 0 00 000002 		CAIE	11,2		;CHECK FOR JFFO
   873	030756	254 00 0 00 031043 		JRST	MASKX		;NO
   874	030757	264 00 0 00 030765 		JSR	ARANGE		;YES, POSSIBLE
   875	030760	306 13 0 00 000243 		CAIN	13,243
   876	030761	254 00 0 00 031021 		JRST	XIMUL		;GO MAKE NEW INST (IMUL)
   877	030762	306 13 0 00 000247 		CAIN	13,247		;MAP INSTRUCTION
   878	030763	254 00 0 00 031021 		JRST	XIMUL		;MAKE IMUL
   879	030764	254 00 0 00 031043 		JRST	MASKX		;GO MASKX OUT UNWANTED BITS
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 5
DBKDBM	MAC	 9-JUN-76 16:19		DIAGNOSTIC SECTION                                                             *** SEQ 0055

   880	030765	000000	000000		ARANGE: 0			;GET OPERATION CODE OF OPERAND
   881	030766	200 13 1 00 000012 		MOVE	13,@12
   882	030767	404 13 0 00 045013 		AND	13,[XWD 777000,0]
   883	030770	241 13 0 00 000011 		ROT	13,9
   884	030771	254 00 1 00 030765 		JRST	@ARANGE
   885
   886	030772	264 00 0 00 030765 	BYTTST:	JSR	ARANGE
   887	030773	303 13 0 00 000132 		CAILE	13,132		;CHECK FOR FSC OR BYTE
   888	030774	254 00 0 00 031031 		JRST	XASHC		;NO,MAKE NEW INST (ASHC)
   889	030775	254 00 0 00 031043 		JRST	MASKX		;YES,GO MASKX OUT UNWANTED BITS
   890
   891
   892	030776	264 00 0 00 030765 	ECHTST:	JSR	ARANGE		;GO GET OP CODE
   893	030777	302 13 0 00 000250 		CAIE	13,250		;POSSIBLE EXCHANGE INST
   894	031000	254 00 0 00 031021 		JRST	XIMUL		;NO,MAKE NEW INST (IMUL)
   895	031001	254 00 0 00 031043 		JRST	MASKX		;YES,GO MASKX OUT UNWANTED BITS
   896
   897	031002	303 12 0 00 000004 	TSTTST:	CAILE	12,4		;POSSIBLE TST INST IF NOT LAST IN GROUP
   898	031003	254 00 0 00 031023 		JRST	XFDVR		;NO,GO MAKE NEW INST (FDVR)
   899	031004	254 00 0 00 031043 		JRST	MASKX		;YES,GO MASKX OUT UNWANTED BITS
   900
   901	031005	350 00 0 00 000012 	VITEXT:	AOS	12
   902	031006	202 11 0 12 031770 		MOVEM	11,INSBLK-1(12)	;STOR VALID INST IN INSBLK TO INS BLK+7
   903	031007	306 12 0 00 000007 		CAIN	12,7
   904	031010	254 00 0 00 031075 		JRST	SLO		;GO SET UP SLOW LOOP
   905	031011	254 00 0 00 030731 		JRST	VIT+1		;GO TEST MORE
   906
   907	031012	000000	000000		MMASKX:	0			;MAKE NEW INST
   908	031013	200 11 1 00 000012 		MOVE	11,@12
   909	031014	621 11 0 00 777000 		TLZ	11,777000
   910	031015	256 00 1 00 031012 		XCT	@MMASKX
   911	031016	254 00 0 00 031044 		JRST	MASKX+1
   912
   913	031017	264 00 0 00 031012 	XROTC:	JSR	MMASKX
   914	031020	270 11 0 00 045014 		ADD	11,[XWD 245000,0]	;MAKE IT A ROTC
   915
   916	031021	264 00 0 00 031012 	XIMUL:	JSR	MMASKX
   917	031022	270 11 0 00 045015 		ADD	11,[XWD 220000,0]	;MAKE IT A IMUL
   918
   919	031023	264 00 0 00 031012 	XFDVR:	JSR	MMASKX		;MAKE IT A FDVR
   920	031024	270 11 0 00 045016 		ADD	11,[XWD 174000,0]
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 6
DBKDBM	MAC	 9-JUN-76 16:19		DIAGNOSTIC SECTION                                                             *** SEQ 0056

   921	031025	264 00 0 00 031012 	XFMPR:	JSR	MMASKX
   922	031026	270 11 0 00 045017 		ADD	11,[XWD 164000,0]	;MAKE IT A FMPR
   923
   924	031027	264 00 0 00 031012 	XFSBR:	JSR	MMASKX
   925	031030	270 11 0 00 045020 		ADD	11,[XWD 154000,0]	;MAKE IT A FSBR
   926
   927	031031	264 00 0 00 031012 	XASHC:	JSR	MMASKX
   928	031032	270 11 0 00 045021 		ADD	11,[XWD 244000,0]	;MAKE IT A ASHC
   929
   930	031033	264 00 0 00 031012 	XDFAD:	JSR	MMASKX
   931	031034	270 11 0 00 045022 		ADD	11,[XWD	110000,0]	;MAKE DFAD
   932
   933	031035	264 00 0 00 031012 	XDFSB:	JSR	MMASKX
   934	031036	270 11 0 00 045023 		ADD	11,[XWD 111000,0]	;MAKE DFSB
   935
   936	031037	264 00 0 00 031012 	XDFMP:	JSR	MMASKX
   937	031040	270 11 0 00 045024 		ADD	11,[XWD 112000,0]	;MAKE DFMP
   938
   939	031041	264 00 0 00 031012 	XDFDV:	JSR	MMASKX
   940	031042	270 11 0 00 045025 		ADD	11,[XWD 113000,0]	;MAKE DFDV
   941
   942	031043	200 11 1 00 000012 	MASKX:	MOVE	11,@12		;MASK OUT INDEX REG & HIGH ORDER E FIELD
   943	031044	404 11 0 00 045026 		AND	11,[XWD 777340,7]
   944	031045	254 00 0 00 031005 		JRST	VITEXT
   945
   946	031046	336 00 0 00 046206 	XCONVT:	SKIPN	NEWFLG		;MAKE NEW INST'S
   947	031047	254 00 0 00 031017 		JRST	XROTC		;NO
   948	031050	305 11 0 00 000002 		CAIGE	11,02
   949	031051	254 00 0 00 031033 		JRST	XDFAD		;0-17 MAKE DFAD
   950	031052	305 11 0 00 000004 		CAIGE	11,04
   951	031053	254 00 0 00 031035 		JRST	XDFSB		;20-37 MAKE DFSB
   952	031054	305 11 0 00 000006 		CAIGE	11,06
   953	031055	254 00 0 00 031037 		JRST	XDFMP		;40-57 MAKE DFMP
   954	031056	305 11 0 00 000010 		CAIGE	11,10
   955	031057	254 00 0 00 031041 		JRST	XDFDV		;60-77 MAKE DFDV
   956	031060	254 00 0 00 031017 		JRST	XROTC		;100-107 MAKE ROTC
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 7
DBKDBM	MAC	 9-JUN-76 16:19		DIAGNOSTIC SECTION                                                             *** SEQ 0057

   957	031061	336 00 0 00 046206 	NWINST:	SKIPN	NEWFLG		;MAKE NEW INST'S
   958	031062	254 00 0 00 031017 		JRST	XROTC		;NO
   959	031063	264 00 0 00 030765 		JSR	ARANGE
   960	031064	307 13 0 00 000113 		CAIG	13,113
   961	031065	254 00 0 00 031043 		JRST	MASKX		;DOUBLE FP
   962	031066	305 13 0 00 000120 		CAIGE	13,120
   963	031067	254 00 0 00 031041 		JRST	XDFDV		;MAKE NEW INST (DFDV)
   964	031070	307 13 0 00 000122 		CAIG	13,122
   965	031071	254 00 0 00 031043 		JRST	MASKX		;DOUBLE MOVES
   966	031072	306 13 0 00 000123 		CAIN	13,123
   967	031073	254 00 0 00 031041 		JRST	XDFDV		;MAKE NEW INST (DFDV)
   968	031074	254 00 0 00 031043 		JRST	MASKX		;DBL MOVES MEM, FIX, FLT
   969
   970	031075	200 10 0 00 031771 	SLO:	MOVE	10,INSBLK	;GO STORE INSTRUCTIONS
   971	031076	202 10 0 00 031134 		MOVEM	10,CORIN1	;IN CORE LOOP
   972	031077	200 10 0 00 031772 		MOVE	10,INSBLK+1
   973	031100	202 10 0 00 031137 		MOVEM	10,CORIN2
   974	031101	200 10 0 00 031773 		MOVE	10,INSBLK+2
   975	031102	202 10 0 00 031142 		MOVEM	10,CORIN3
   976	031103	200 10 0 00 031774 		MOVE	10,INSBLK+3
   977	031104	202 10 0 00 031145 		MOVEM	10,CORIN4
   978	031105	200 10 0 00 031775 		MOVE	10,INSBLK+4
   979	031106	202 10 0 00 031150 		MOVEM	10,CORIN5
   980	031107	200 10 0 00 031776 		MOVE	10,INSBLK+5
   981	031110	202 10 0 00 031153 		MOVEM	10,CORIN6
   982	031111	402 00 0 00 046265 		SETZM	SVINPC#		;CLEAR SVINPC FOR ERROR
   983	031112	202 00 0 00 046227 	SLO1:	MOVEM	0,SAC0
   984	031113	037 07 0 00 000003 		TTALTM			;ALTMODE CHECK
   985	031114	334 00 0 00 000000 		SKIPA			;NONE
   986	031115	254 00 0 00 032161 		JRST	DDTEX+1		;YES, GO TO DDT
   987	031116	200 00 0 00 046227 		MOVE	0,SAC0
   988	031117	402 00 0 00 031157 		SETZM	COREXF		;CLEAR FLAG FOR SIMULATION
   989	031120	205 10 0 00 031761 		MOVSI	10,RAND
   990	031121	251 10 0 00 000007 		BLT	10,7		;SETUP AC OPERANDS
   991	031122	200 10 0 00 045027 		MOVE	10,[RAND,,ACS]
   992	031123	251 10 0 00 032202 		BLT	10,ACS+7	;SETUP SIMULATOR OPERANDS
   993	031124	403 10 0 00 032203 		SETZB	10,ACS+10	;AC10 IS 0 IN BOTH
   994	031125	254 02 1 00 031126 		JRSTF	@.+1		;CLEAR FLAGS
   995	031126	000000	031127				.+1
   996	031127	336 00 0 00 046176 		SKIPN	MGNFLG		;MARGIN ALL ?
   997	031130	254 00 0 00 031133 		JRST	.+3
   998	031131	332 00 0 00 030055 		SKIPE	MARGIN
   999	031132	7 000 14 0 00 030055 		DATAO	APR,MARGIN	;NO, SET MARGINS FOR SLOW LOOP
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 8
DBKDBM	MAC	 9-JUN-76 16:19		DIAGNOSTIC SECTION                                                             *** SEQ 0058

  1000	031133	402 00 0 00 031160 	CORLOP:	SETZM	NOSKPF		;CLEAR NO SKIP FLAG
  1001	031134	000000	000000		CORIN1:	0			;1ST INSTRUCTION
  1002	031135	476 00 0 00 031160 		SETOM	NOSKPF		;NO SKIP
  1003	031136	264 00 0 00 031275 		JSR	COREX		;GO TO SIMULATION
  1004	031137	000000	000000		CORIN2:	0			;2ND INST
  1005	031140	476 00 0 00 031160 		SETOM	NOSKPF
  1006	031141	264 00 0 00 031275 		JSR	COREX
  1007	031142	000000	000000		CORIN3:	0			;3RD INST
  1008	031143	476 00 0 00 031160 		SETOM	NOSKPF
  1009	031144	264 00 0 00 031275 		JSR	COREX
  1010	031145	000000	000000		CORIN4:	0			;4TH INST
  1011	031146	476 00 0 00 031160 		SETOM	NOSKPF
  1012	031147	264 00 0 00 031275 		JSR	COREX
  1013	031150	000000	000000		CORIN5:	0			;5TH INST
  1014	031151	476 00 0 00 031160 		SETOM	NOSKPF
  1015	031152	264 00 0 00 031275 		JSR	COREX
  1016	031153	000000	000000		CORIN6:	0			;6TH INST
  1017	031154	476 00 0 00 031160 		SETOM	NOSKPF
  1018	031155	264 00 0 00 031275 		JSR	COREX
  1019	031156	254 00 0 00 031161 		JRST	.+3
  1020	031157	000000	000000		COREXF:	0			;SIMULATION FLAG
  1021	031160	000000	000000		NOSKPF:	0			;NO SKIP FLAG
  1022	031161	336 00 0 00 046176 		SKIPN	MGNFLG		;MARGIN ALL ?
  1023	031162	254 00 0 00 031165 		JRST	.+3
  1024	031163	332 00 0 00 030055 		SKIPE	MARGIN
  1025	031164	7 000 14 0 00 045030 		DATAO	APR,[IMGNOF,,ISPDOF] ;NO, CLEAR MARGINS
  1026	031165	335 00 0 00 046160 		SKIPGE	K2		;PREVIOUS FAILURE, BUT NONE THIS TIME ?
  1027	031166	254 00 0 00 031351 		JRST	CORER1		;YES
  1028	031167	201 10 0 00 032001 		MOVEI	10,ANSBLK
  1029	031170	251 10 0 00 032010 		BLT	10,ANSBLK+7	;SAVE ANSWERS
  1030	031171	200 10 0 00 046121 		MOVE	10,FLCNT
  1031	031172	202 10 0 00 046160 		MOVEM	10,K2		;SETUP FAST LOOP COUNT
  1032	031173	402 00 0 00 031157 		SETZM	COREXF		;CLEAR SIMULATION FLAG
  1033
  1034	031174	202 00 0 00 046227 	FAST:	MOVEM	0,SAC0
  1035	031175	037 07 0 00 000003 		TTALTM			;ALTMODE CHECK
  1036	031176	334 00 0 00 000000 		SKIPA			;NONE
  1037	031177	254 00 0 00 032161 		JRST	DDTEX+1		;YES, GO TO DDT
  1038	031200	200 00 0 00 046227 		MOVE	SAC0
  1039	031201	200 10 0 00 045031 		MOVE	10,[INSBLK,,11]
  1040	031202	251 10 0 00 000017 		BLT	10,17		;LOAD FAST LOOP INSTRUCTIONS
  1041	031203	205 10 0 00 031761 		MOVSI	10,RAND
  1042	031204	251 10 0 00 000007 		BLT	10,7		;LOAD OPERANDS
  1043	031205	402 00 0 00 000010 		SETZM	10
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 9
DBKDBM	MAC	 9-JUN-76 16:19		DIAGNOSTIC SECTION                                                             *** SEQ 0059

  1044					;*EXECUTE FAST LOOP
  1045
  1046	031206	200 17 0 00 045032 	EXFAST:	MOVE	17,[JRST CHEC]	;SETUP EXIT INST
  1047	031207	254 02 1 00 031210 		JRSTF	@.+1		;CLEAR FLAGS
  1048	031210	000000	031211				.+1
  1049	031211	336 00 0 00 046176 		SKIPN	MGNFLG		;MARGIN ALL ?
  1050	031212	254 00 0 00 031215 		JRST	.+3
  1051	031213	332 00 0 00 030055 		SKIPE	MARGIN
  1052	031214	7 000 14 0 00 030055 		DATAO	APR,MARGIN	;NO, SET MARGINS FOR FAST LOOP
  1053	031215	254 00 0 00 000011 		JRST	11		;GO TO FAST LOOP
  1054
  1055	031216	202 00 0 00 046055 	CHEC:	MOVEM	0,ANSSV0#
  1056	031217	200 17 0 00 030303 		MOVE	P,PLIST
  1057	031220	201 00 0 00 030103 		MOVEI	$PSHER
  1058	031221	261 17 0 00 000000 		PUT	0
  1059	031222	200 00 0 00 046055 		MOVE	0,ANSSV0
  1060	031223	336 00 0 00 046176 		SKIPN	MGNFLG		;MARGIN ALL ?
  1061	031224	254 00 0 00 031227 		JRST	.+3
  1062	031225	332 00 0 00 030055 		SKIPE	MARGIN
  1063	031226	7 000 14 0 00 045030 		DATAO	APR,[IMGNOF,,ISPDOF] ;NO, CLEAR MARGINS
  1064	031227	312 00 0 00 032001 		CAME	0,ANSBLK	;CHECK FAST LOOP AND SLOW LOOP ANS
  1065	031230	264 00 0 00 031355 		JSR	ERRX
  1066	031231	312 01 0 00 032002 		CAME	1,ANSBLK+1
  1067	031232	264 00 0 00 031355 		JSR	ERRX
  1068	031233	312 02 0 00 032003 		CAME	2,ANSBLK+2
  1069	031234	264 00 0 00 031355 		JSR	ERRX
  1070	031235	312 03 0 00 032004 		CAME	3,ANSBLK+3
  1071	031236	264 00 0 00 031355 		JSR	ERRX
  1072	031237	312 04 0 00 032005 		CAME	4,ANSBLK+4
  1073	031240	264 00 0 00 031355 		JSR	ERRX
  1074	031241	312 05 0 00 032006 		CAME	5,ANSBLK+5
  1075	031242	264 00 0 00 031355 		JSR	ERRX
  1076	031243	312 06 0 00 032007 		CAME	6,ANSBLK+6
  1077	031244	264 00 0 00 031355 		JSR	ERRX
  1078	031245	312 07 0 00 032010 		CAME	7,ANSBLK+7
  1079	031246	264 00 0 00 031355 		JSR	ERRX
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 10
DBKDBM	MAC	 9-JUN-76 16:19		DIAGNOSTIC SECTION                                                             *** SEQ 0060

  1080	031247	335 00 0 00 046160 	CHEC1:	SKIPGE	K2		;FAILURE ?
  1081	031250	254 00 0 00 031271 		JRST	FSTER1		;YES
  1082	031251	372 00 0 00 046160 		SOSE	K2		;REPEAT FAST LOOP ?
  1083	031252	254 00 0 00 031174 		JRST	FAST		;YES
  1084
  1085	031253	200 00 0 00 046157 	CHEC2:	MOVE	K1
  1086	031254	202 00 0 00 030022 		MOVEM	RANDBS		;UPDATE RANDOM BASE
  1087	031255	037 10 0 00 000002 		SWITCH
  1088	031256	603 00 0 00 300000 		TLNE	RSTART!TOTALS
  1089	031257	264 00 0 00 031640 		JSR	PNTTOT		;GO PRINT TOTALS
  1090	031260	350 16 0 00 030047 		AOS	16,PASCNT
  1091	031261	603 00 0 00 000400 		TLNE	RELIAB
  1092	031262	254 00 0 00 031266 		JRST	.+4
  1093	031263	602 16 0 00 000003 		TRNE	16,3
  1094	031264	254 00 0 00 030707 		JRST	CONTNU
  1095	031265	254 00 0 00 030057 		JRST	BEGEND
  1096	031266	602 16 0 00 000037 		TRNE	16,37
  1097	031267	254 00 0 00 030707 		JRST	CONTNU
  1098	031270	254 00 0 00 030057 		JRST	BEGEND
  1099
  1100	031271	037 10 0 00 000002 	FSTER1:	SWITCH
  1101	031272	607 00 0 00 004000 		TLNN	LOOPER		;STAY IN ERROR LOOP
  1102	031273	254 00 0 00 031253 		JRST	CHEC2		;NO
  1103	031274	254 00 0 00 031174 		JRST	FAST		;YES, REPEAT FAILING LOOP
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 11
DBKDBM	MAC	 9-JUN-76 16:19		DIAGNOSTIC SECTION                                                             *** SEQ 0061

  1104	031275	000000	000000		COREX:	0
  1105	031276	202 10 0 00 046230 		MOVEM	10,SAC10#
  1106	031277	200 10 0 00 031275 		MOVE	10,COREX	;GET CALL PC
  1107	031300	275 10 0 00 000003 		SUBI	10,3		;-3, POINTS TO INST
  1108	031301	202 10 0 00 032165 		MOVEM	10,INPC		;SAVE AS SIM PC
  1109	031302	271 10 0 00 000003 		ADDI	10,3
  1110	031303	336 00 0 00 031160 		SKIPN	NOSKPF		;DID INST SKIP ?
  1111	031304	271 10 0 00 000003 		ADDI	10,3		;YES, SET RETURN TO SKIP NEXT INST
  1112	031305	202 10 0 00 031275 		MOVEM	10,COREX
  1113	031306	402 00 0 00 031160 		SETZM	NOSKPF
  1114	031307	200 10 0 00 046230 		MOVE	10,SAC10
  1115	031310	336 00 0 00 046242 		SKIPN	SIMFLG		;SIMULATE INSTRUCTION ?
  1116	031311	254 00 1 00 031275 		JRST	@COREX		;NO
  1117
  1118	031312	336 00 0 00 046176 	COREX1:	SKIPN	MGNFLG		;MARGIN ALL ?
  1119	031313	254 00 0 00 031316 		JRST	.+3
  1120	031314	332 00 0 00 030055 		SKIPE	MARGIN
  1121	031315	7 000 14 0 00 045030 		DATAO	APR,[IMGNOF,,ISPDOF] ;NO, CLEAR MARGINS
  1122	031316	476 00 0 00 031157 		SETOM	COREXF
  1123	031317	200 10 0 00 045033 		MOVE	10,[ACS,,SIMBLK]
  1124	031320	251 10 0 00 032051 		BLT	10,SIMBLK+10	;SAVE ORIG SIM AC'S FOR ERROR
  1125	031321	476 00 0 00 032166 		SETOM	MASK
  1126	031322	264 00 0 00 031734 		JSR	SIMNST		;SIMULATE INSTRUCTION
  1127	031323	312 00 0 00 032173 		CAME	0,ACS+0		;COMPARE AC RESULTS & SIM RESULTS
  1128	031324	264 00 0 00 031355 		JSR	ERRX		;ERROR
  1129	031325	312 01 0 00 032174 		CAME	1,ACS+1
  1130	031326	264 00 0 00 031355 		JSR	ERRX
  1131	031327	312 02 0 00 032175 		CAME	2,ACS+2
  1132	031330	264 00 0 00 031355 		JSR	ERRX
  1133	031331	312 03 0 00 032176 		CAME	3,ACS+3
  1134	031332	264 00 0 00 031355 		JSR	ERRX
  1135	031333	312 04 0 00 032177 		CAME	4,ACS+4
  1136	031334	264 00 0 00 031355 		JSR	ERRX
  1137	031335	312 05 0 00 032200 		CAME	5,ACS+5
  1138	031336	264 00 0 00 031355 		JSR	ERRX
  1139	031337	312 06 0 00 032201 		CAME	6,ACS+6
  1140	031340	264 00 0 00 031355 		JSR	ERRX
  1141	031341	312 07 0 00 032202 		CAME	7,ACS+7
  1142	031342	264 00 0 00 031355 		JSR	ERRX
  1143	031343	200 10 0 00 046230 		MOVE	10,SAC10
  1144	031344	336 00 0 00 046176 		SKIPN	MGNFLG		;MARGIN ALL ?
  1145	031345	254 00 0 00 031350 		JRST	.+3
  1146	031346	332 00 0 00 030055 		SKIPE	MARGIN
  1147	031347	7 000 14 0 00 030055 		DATAO	APR,MARGIN	;NO, RESET MARGINS
  1148	031350	254 00 1 00 031275 		JRST	@COREX		;EXIT
  1149
  1150	031351	037 10 0 00 000002 	CORER1:	SWITCH
  1151	031352	607 00 0 00 004000 		TLNN	LOOPER		;LOOP ON ERROR ?
  1152	031353	254 00 0 00 031253 		JRST	CHEC2		;NO
  1153	031354	254 00 0 00 031112 		JRST	SLO1		;YES, STAY IN SLOW LOOP
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 12
DBKDBM	MAC	 9-JUN-76 16:19		DIAGNOSTIC SECTION                                                             *** SEQ 0062

  1154					;*ERROR ROUTINES
  1155
  1156	031355	000000	000000		ERRX:	0
  1157	031356	332 00 0 00 030037 		SKIPE	USER
  1158	031357	254 00 0 00 031362 		JRST	.+3
  1159	031360	332 00 0 00 030055 		SKIPE	MARGIN
  1160	031361	7 000 14 0 00 045030 		DATAO	APR,[IMGNOF,,ISPDOF] ;CLEAR MARGINS
  1161	031362	202 00 0 00 046232 		MOVEM	0,SAV0#
  1162	031363	037 10 0 00 000002 		SWITCH
  1163	031364	202 00 0 00 000010 		MOVEM	0,10
  1164	031365	200 00 0 00 046232 		MOVE	0,SAV0
  1165	031366	332 00 0 00 046221 		SKIPE	PRNT		;FIRST OUTPUT
  1166	031367	603 10 0 00 001000 		TLNE	10,PALERS	;PRINT ALL ERRORS ?
  1167	031370	264 00 0 00 031424 		JSR	OUT		;GO OUTPUT
  1168
  1169	031371	350 00 0 00 046114 	ERRX1:	AOS	ERRCNT
  1170	031372	350 00 0 00 030053 		AOS	ERRTLS
  1171	031373	037 10 0 00 000002 		SWITCH
  1172	031374	603 00 0 00 002000 		TLNE	ERSTOP		;HALT ON ERROR ?
  1173	031375	264 00 0 00 031417 		JSR	GOING		;YES
  1174	031376	603 00 0 00 004000 		TLNE	0,LOOPER	;LOOP ON ERROR ?
  1175	031377	476 00 0 00 046160 		SETOM	K2		;YES, MAKES LOOP EFF FOREVER
  1176	031400	336 00 0 00 030037 		SKIPN	USER
  1177	031401	7 004 14 0 00 046114 		DATAO	PI,ERRCNT	;DISPLAY
  1178	031402	607 00 0 00 010000 		TLNN	DING		;RING TTY BELL ?
  1179	031403	254 00 0 00 031406 		JRST	.+3		;NO
  1180	031404	201 00 0 00 030256 		MOVEI	BELL		;YES
  1181	031405	037 00 0 00 000001 		PNTAF
  1182	031406	332 00 0 00 030037 		SKIPE	USER		;USER MODE ?
  1183	031407	254 00 0 00 031414 		JRST	ERRX2		;YES
  1184	031410	332 00 0 00 046176 		SKIPE	MGNFLG		;EXEC - MARGIN ALL ?
  1185	031411	254 00 0 00 031414 		JRST	.+3
  1186	031412	332 00 0 00 030055 		SKIPE	MARGIN
  1187	031413	7 000 14 0 00 030055 		DATAO	APR,MARGIN	;YES
  1188	031414	332 00 0 00 031157 	ERRX2:	SKIPE	COREXF		;IN SIMULATION ?
  1189	031415	254 00 0 00 031351 		JRST	CORER1		;YES
  1190	031416	254 00 0 00 031271 		JRST	FSTER1		;NO
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 13
DBKDBM	MAC	 9-JUN-76 16:19		DIAGNOSTIC SECTION                                                             *** SEQ 0063

  1191					;*ERROR STOP
  1192
  1193	031417	000000	000000		GOING:	0
  1194	031420	7 000 24 0 00 030110 		CONI	APR,$SVAPR
  1195	031421	7 004 24 0 00 030107 		CONI	PI,$SVPI
  1196	031422	7 004 20 0 00 000400 		CONO	PI,PIOFF
  1197	031423	254 04 1 00 031417 		HALT	@GOING
  1198
  1199					;*PRINT INSTRUCTION FAILURE
  1200
  1201	031424	000000	000000		OUT:	0
  1202	031425	402 00 0 00 046115 		SETZM	EXIT1#		;CLEAR EXIT FLAG
  1203	031426	201 10 0 00 032011 		MOVEI	10,FSTANS	;SAVE FAST LOOP ANSWERS
  1204	031427	251 10 0 00 032020 		BLT	10,FSTANS+7
  1205	031430	201 00 0 00 000007 		MOVEI	0,7		;INIT INST CNT,
  1206	031431	202 00 0 00 046151 		MOVEM	0,INTCNT#
  1207	031432	202 00 0 00 046040 		MOVEM	0,ACCNT#	;AND AC CNT
  1208	031433	037 04 0 00 000002 		PNTNM
  1209						MOVEI	[ASCIZ/
  1210	031434	201 00 0 00 045034 	**********/]
  1211	031435	037 17 0 00 000000 		PNTAL
  1212	031436	332 00 0 00 030037 		SKIPE	USER
  1213	031437	254 00 0 00 031446 		JRST	OUTX
  1214	031440	200 00 0 00 030046 		MOVE	0,CONSW
  1215	031441	602 00 0 00 000200 		TRNE	INHCLK
  1216	031442	254 00 0 00 031446 		JRST	OUTX
  1217	031443	200 00 0 00 030054 		MOVE	0,TICKS
  1218	031444	301 00 0 00 106240 		CAIL	^D<60*60*10>	;BEEN RUNNING TEN MINUTES ?
  1219	031445	264 00 0 00 031614 		JSR	RUNTIM		;YES, PRINT RUN TIME
  1220	031446	037 16 0 00 000002 	OUTX:	PNTMGN			;PRINT MARGINS
  1221						MOVEI	0,[ASCIZ/
  1222					RANDOM INSTRUCTION FAILURE
  1223	031447	201 00 0 00 045037 	    INST GROUP        OPERANDS           /]
  1224	031450	037 17 0 00 000000 		PNTAL
  1225	031451	201 00 0 00 045056 		MOVEI	[ASCIZ/SLOW ANS          SIM ANS/]
  1226	031452	336 00 0 00 031157 		SKIPN	COREXF
  1227	031453	201 00 0 00 045064 		MOVEI	[ASCIZ/FAST ANS          SLOW ANS/]
  1228	031454	037 17 0 00 000000 		PNTAL			;PRINT HEADER
  1229	031455	402 00 0 00 030223 		SETZM	PNTSPC
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 14
DBKDBM	MAC	 9-JUN-76 16:19		DIAGNOSTIC SECTION                                                             *** SEQ 0064

  1230	031456	200 10 0 00 046151 	OUT1:	MOVE	10,INTCNT
  1231	031457	362 10 0 00 031570 		SOJE	10,LOOP		;MONITOR CNT
  1232	031460	202 10 0 00 046151 		MOVEM	10,INTCNT
  1233	031461	450 10 0 00 000000 		SETCA	10,0
  1234	031462	405 10 0 00 000007 		ANDI	10,7
  1235	031463	201 00 0 00 030242 		MOVEI	CRLF
  1236	031464	037 00 0 00 000000 		PNTA
  1237	031465	402 00 0 00 030223 		SETZM	PNTSPC
  1238	031466	201 00 0 00 000001 		MOVEI	0,1		;PRINT FIRST DIGIT
  1239	031467	037 01 0 00 000000 		PNT1			;OF INST GROUP AND,
  1240	031470	200 00 0 00 000010 		MOVE	0,10
  1241	031471	037 01 0 00 000000 		PNT1			;2ND DIGIT
  1242	031472	264 00 0 00 031551 		JSR	SLSHSP		;PRINT / SPACE 
  1243	031473	200 00 0 10 031770 		MOVE	0,INSBLK-1(10)
  1244	031474	037 13 0 00 000000 		PNTHW			;PRINT INST
  1245
  1246	031475	264 00 0 00 031555 	OUT2:	JSR	ACPNT1		;PRINT AC
  1247	031476	200 00 0 10 031761 		MOVE	0,RAND(10)
  1248	031477	037 13 0 00 000000 		PNTHW			;PRINT OPERANDS
  1249	031500	264 00 0 00 031555 		JSR	ACPNT1		;PRINT AC
  1250	031501	200 00 0 10 032011 		MOVE	0,FSTANS(10)	;PRINT FAST ANS/SIM - SLOW ANS
  1251	031502	037 13 0 00 000000 		PNTHW			;PRINT AC
  1252	031503	264 00 0 00 031555 		JSR	ACPNT1		;PRINT AC NUMBER
  1253	031504	200 00 0 10 032173 		MOVE	0,ACS(10)
  1254	031505	336 00 0 00 031157 		SKIPN	COREXF
  1255	031506	200 00 0 10 032001 		MOVE	0,ANSBLK(10)
  1256	031507	037 13 0 00 000000 		PNTHW			;PRINT SLOW ANS/SIM - SIM ANS
  1257	031510	373 00 0 00 046040 		SOSLE	ACCNT
  1258	031511	254 00 0 00 031456 		JRST	OUT1
  1259
  1260	031512	332 00 0 00 046115 	OUT3:	SKIPE	EXIT1
  1261	031513	254 00 0 00 031520 		JRST	OUT4
  1262						MOVEI	0,[ASCIZ /
  1263	031514	201 00 0 00 045072 	                  / ]		;PRINT MARGIN
  1264	031515	037 17 0 00 000000 		PNTAL
  1265	031516	476 00 0 00 046115 		SETOM	EXIT1
  1266	031517	254 00 0 00 031475 		JRST	OUT2
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 15
DBKDBM	MAC	 9-JUN-76 16:19		DIAGNOSTIC SECTION                                                             *** SEQ 0065

  1267	031520	476 00 0 00 046221 	OUT4:	SETOM	PRNT
  1268	031521	201 00 0 00 030242 		MOVEI	CRLF
  1269	031522	037 00 0 00 000000 		PNTA
  1270						MOVEI	[ASCIZ/
  1271	031523	201 00 0 00 045077 	BASE RANDOM NUMBER = /]
  1272	031524	037 17 0 00 000000 		PNTAL
  1273	031525	200 00 0 00 030022 		MOVE	0,RANDBS
  1274	031526	037 13 0 00 000000 		PNTHW			;PRINT RANDOM BASE
  1275	031527	201 00 0 00 030242 		MOVEI	CRLF
  1276	031530	037 00 0 00 000000 		PNTA
  1277	031531	336 00 0 00 046242 	OUT5:	SKIPN	SIMFLG		;SIMULATION INHIBITED ?
  1278	031532	254 00 1 00 031424 		JRST	@OUT		;YES
  1279	031533	336 00 0 00 031157 		SKIPN	COREXF		;SLOW LOOP FAILURE ?
  1280	031534	254 00 0 00 032054 		JRST	SIMFST		;NO
  1281						MOVEI	[ASCIZ/
  1282
  1283	031535	201 00 0 00 045104 	INSTRUCTION SIMULATION - CORE LOOP INST # /]
  1284	031536	037 17 0 00 000000 		PNTAL
  1285	031537	550 00 0 00 032165 		HRRZ	INPC		;COMPUTE INST NUMBER
  1286	031540	275 00 0 00 031134 		SUBI	CORIN1
  1287	031541	231 00 0 00 000003 		IDIVI	3
  1288	031542	271 00 0 00 000001 		ADDI	1
  1289	031543	037 01 0 00 000000 		PNT1			;PRINT
  1290						MOVEI	[ASCIZ/
  1291					----------
  1292	031544	201 00 0 00 045116 	/]
  1293	031545	037 17 0 00 000000 		PNTAL
  1294	031546	204 10 0 00 045033 		MOVS	10,[ACS,,SIMBLK]
  1295	031547	251 10 0 00 032203 		BLT	10,ACS+10	;RESTORE SIM OPERANDS
  1296	031550	254 00 0 00 031754 		JRST	SIMMT		;SIM & PRINT INSTRUCTION
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 16
DBKDBM	MAC	 9-JUN-76 16:19		DIAGNOSTIC SECTION                                                             *** SEQ 0066

  1297	031551	000000	000000		SLSHSP:	0			;PRINT / SPACE  
  1298	031552	201 00 0 00 045121 		MOVEI	0,[ASCIZ X/ X]
  1299	031553	037 17 0 00 000000 		PNTAL
  1300	031554	254 00 1 00 031551 		JRST	@SLSHSP
  1301
  1302	031555	000000	000000		ACPNT1:	0			;PRINT SPACE
  1303	031556	201 00 0 00 030246 		MOVEI	0,SPACE
  1304	031557	037 00 0 00 000000 		PNTA
  1305	031560	200 10 0 00 046040 		MOVE	10,ACCNT	;GET AC NUMBER
  1306	031561	450 10 0 00 000000 		SETCA	10,0
  1307	031562	405 10 0 00 000007 		ANDI	10,7
  1308	031563	200 00 0 00 000010 		MOVE	0,10
  1309	031564	402 00 0 00 030223 		SETZM	PNTSPC
  1310	031565	037 01 0 00 000000 		PNT1			;PRINT IT
  1311	031566	264 00 0 00 031551 		JSR	SLSHSP
  1312	031567	254 00 1 00 031555 		JRST	@ACPNT1
  1313
  1314	031570	201 00 0 00 030242 	LOOP:	MOVEI	CRLF
  1315	031571	037 00 0 00 000000 		PNTA
  1316	031572	201 00 0 00 000017 		MOVEI	0,17		;PRINT 17
  1317	031573	402 00 0 00 030223 		SETZM	PNTSPC
  1318	031574	037 02 0 00 000000 		PNT2
  1319	031575	264 00 0 00 031551 		JSR	SLSHSP
  1320	031576	201 00 0 00 045122 		MOVEI	0,[ASCIZ/   EXIT       /]		;PRINT EXIT
  1321	031577	037 17 0 00 000000 		PNTAL
  1322	031600	254 00 0 00 031475 		JRST	OUT2
  1323
  1324					;*SETUP MARGINS FOR ALL OR JUST FAST & SLOW LOOP
  1325
  1326	031601	000000	000000		MGNCLR:	0
  1327	031602	402 00 0 00 046176 		SETZM	MGNFLG#		;CLEAR CONTROL FLAG
  1328	031603	332 00 0 00 030037 		SKIPE	USER		;USER MODE ?
  1329	031604	254 00 1 00 031601 		JRST	@MGNCLR		;YES
  1330	031605	200 00 0 00 030046 		MOVE	0,CONSW		;GET SWITCHES
  1331	031606	606 00 0 00 100000 		TRNN	MGNTST		;MARGIN SLOW & FAST ONLY ?
  1332	031607	254 00 1 00 031601 		JRST	@MGNCLR		;NO, MARGIN ALL
  1333	031610	476 00 0 00 046176 		SETOM	MGNFLG		;YES, SET CONTROL FLAG
  1334	031611	332 00 0 00 030055 		SKIPE	MARGIN
  1335	031612	7 000 14 0 00 045030 		DATAO	APR,[IMGNOF,,ISPDOF] ;CLEAR MARGINS
  1336	031613	254 00 1 00 031601 		JRST	@MGNCLR
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 17
DBKDBM	MAC	 9-JUN-76 16:19		DIAGNOSTIC SECTION                                                             *** SEQ 0067

  1337	031614	000000	000000		RUNTIM:	0
  1338	031615	7 000 20 0 00 004010 		CONO	APR,CLKDIS!IAPRE1	;DISABLE CLOCK
  1339	031616	264 00 0 00 031677 		JSR	TSTIMA		;PRINT RUN TIME
  1340	031617	7 000 20 0 00 003011 		CONO	APR,CLKENB!CLKCLR!IAPRE1!IAPRC1	;ENABLE CLOCK
  1341	031620	254 00 1 00 031614 		JRST	@RUNTIM
  1342
  1343					;*CLOCK SERVICE ROUTINE
  1344
  1345	031621	000000	000000		ITRCLK:	0
  1346	031622	7 000 34 0 00 001000 		CONSO	APR,CLK
  1347	031623	254 02 1 00 031621 		JRSTF	@ITRCLK		;NOT CLOCK
  1348	031624	350 00 0 00 030054 		AOS	TICKS		;INC CLOCK COUNTER
  1349	031625	202 00 0 00 046102 		MOVEM	0,CLKAC0#	;SAVE AC'S
  1350	031626	202 01 0 00 046103 		MOVEM	1,CLKAC1#
  1351	031627	264 00 0 00 031664 		JSR	TSTIME		;CHECK AND PRINT TIME
  1352	031630	200 01 0 00 046157 		MOVE	1,K1		;GET RANDOM NUMBER
  1353	031631	405 01 0 00 000007 		ANDI	1,7
  1354	031632	336 00 0 00 000001 		SKIPN	1		;IF 0, MAKE 1
  1355	031633	350 00 0 00 000001 		AOS	1		;SETUP CLOCK ON RANDOM CHANNEL
  1356	031634	7 000 20 0 01 003010 		CONO	APR,CLKENB!CLKCLR!IAPRE1(1)
  1357	031635	200 00 0 00 046102 		MOVE	0,CLKAC0
  1358	031636	200 01 0 00 046103 		MOVE	1,CLKAC1
  1359	031637	254 12 1 00 030104 		JEN	@ITRCH1		;RETURN
  1360
  1361	031640	000000	000000		PNTTOT:	0
  1362	031641	332 00 0 00 030037 		SKIPE	USER		;NO TIME IF USER
  1363	031642	254 00 0 00 031646 		JRST	.+4
  1364	031643	602 00 0 00 000200 		TRNE	INHCLK		;NO TIME IF CLOCK INHIBITED
  1365	031644	254 00 0 00 031646 		JRST	.+2
  1366	031645	264 00 0 00 031614 		JSR	RUNTIM		;PRINT RUN TIME
  1367						MOVEI	[ASCIZ/
  1368	031646	201 00 0 00 045125 	TOTAL ERRORS = /]
  1369	031647	037 17 0 00 000000 		PNTAL
  1370	031650	200 00 0 00 030053 		MOVE	ERRTLS
  1371	031651	037 15 0 00 000000 		PNTDEC			;PRINT TOTAL ERRORS
  1372						MOVEI	[ASCIZ/
  1373	031652	201 00 0 00 045077 	BASE RANDOM NUMBER = /]
  1374	031653	037 17 0 00 000000 		PNTAL
  1375	031654	200 00 0 00 030022 		MOVE	0,RANDBS
  1376	031655	037 13 0 00 000000 		PNTHW			;PRINT RANDOM BASE
  1377	031656	201 00 0 00 030243 		MOVEI	CRLF2
  1378	031657	037 00 0 00 000000 		PNTA
  1379	031660	037 10 0 00 000002 		SWITCH
  1380	031661	607 00 0 00 200000 		TLNN	RSTART		;RESTART PROGRAM ?
  1381	031662	254 00 1 00 031640 		JRST	@PNTTOT		;NO, CONTINUE
  1382	031663	254 00 0 00 030004 		JRST	SFSTRT		;YES, RESTART AS STAND-ALONE
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 18
DBKDBM	MAC	 9-JUN-76 16:19		DIAGNOSTIC SECTION                                                             *** SEQ 0068

  1383					;*TEST RUN TIME SUBROUTINE
  1384					;*PRINTS TIME AT HALF HOUR INTERVALS OR WHEN REQUESTED
  1385
  1386	031664	000000	000000		TSTIME:	0
  1387	031665	200 00 0 00 030054 		MOVE	TICKS		;HAS HALF HOUR PASSED ?
  1388	031666	274 00 0 00 046304 		SUB	TSTIMR
  1389	031667	200 01 0 00 046130 		MOVE	1,HERTZ
  1390	031670	302 01 0 00 000074 		CAIE	1,^D60		;60 HZ. ?
  1391	031671	254 00 0 00 031731 		JRST	TSTIMB		;NO, 50
  1392	031672	305 00 0 00 322740 		CAIGE	^D<60*60*30>
  1393	031673	254 00 1 00 031664 		JRST	@TSTIME		;NOT HALF HOUR YET
  1394	031674	476 00 0 00 046277 	TSTIMC:	SETOM	TIMFRC
  1395	031675	264 00 0 00 031677 		JSR	TSTIMA
  1396	031676	254 00 1 00 031664 		JRST	@TSTIME
  1397
  1398	031677	000000	000000		TSTIMA:	0
  1399	031700	332 00 0 00 030217 		SKIPE	PNTFLG		;INTERRUPTED OUT OF PRINT ROUTINE
  1400	031701	254 00 1 00 031677 		JRST	@TSTIMA		;YES, DO NEXT CLOCK
  1401						MOVEI	[ASCIZ/
  1402	031702	201 00 0 00 045131 	RUN TIME = /]
  1403	031703	037 17 0 00 000001 		PNTALF
  1404	031704	200 00 0 00 030054 		MOVE	TICKS		;GET TIME
  1405	031705	332 00 0 00 046277 		SKIPE	TIMFRC#		;REQUESTED TIME, IF SO DON'T
  1406	031706	202 00 0 00 046304 		MOVEM	TSTIMR		;UPDATE HALF HOUR COMPARE
  1407	031707	230 00 0 00 046130 		IDIV	HERTZ		;CONVERT TO SECONDS
  1408	031710	231 00 0 00 007020 		IDIVI	^D<60*60>	;CONVERT TO HOURS
  1409	031711	202 01 0 00 046275 		MOVEM	1,TIMAC1#	;SAVE MIN:SEC
  1410	031712	037 15 0 00 000001 		PNTDCF			;PRINT HOURS
  1411	031713	201 00 0 00 045134 		MOVEI	[ASCIZ/:/]
  1412	031714	037 00 0 00 000001 		PNTAF
  1413	031715	200 00 0 00 046275 		MOVE	0,TIMAC1	;RETURN MIN:SEC
  1414	031716	231 00 0 00 000074 		IDIVI	^D60		;CONVERT TO MINUTES
  1415	031717	202 01 0 00 046275 		MOVEM	1,TIMAC1	;SAVE :SEC
  1416	031720	037 15 0 00 000001 		PNTDCF			;PRINT MINUTES
  1417	031721	201 00 0 00 045134 		MOVEI	[ASCIZ/:/]
  1418	031722	037 00 0 00 000001 		PNTAF
  1419	031723	200 00 0 00 046275 		MOVE	0,TIMAC1	;RETURN :SEC
  1420	031724	037 15 0 00 000001 		PNTDCF			;PRINT SECONDS
  1421	031725	201 00 0 00 030242 		MOVEI	CRLF
  1422	031726	037 00 0 00 000001 		PNTAF
  1423	031727	402 00 0 00 046277 		SETZM	TIMFRC
  1424	031730	254 00 1 00 031677 		JRST	@TSTIMA
  1425
  1426	031731	305 00 0 00 257620 	TSTIMB:	CAIGE	^D<60*60*25>	;50 HZ HALF HOUR
  1427	031732	254 00 1 00 031664 		JRST	@TSTIME		;NO
  1428	031733	254 00 0 00 031674 		JRST	TSTIMC
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 19
DBKDBM	MAC	 9-JUN-76 16:19		DIAGNOSTIC SECTION                                                             *** SEQ 0069

  1429					;*SIMULATE INSTRUCTION
  1430
  1431	031734	000000	000000		SIMNST:	0
  1432	031735	202 00 0 00 032021 		MOVEM	0,SAVAC
  1433	031736	200 00 0 00 045135 		MOVE	[1,,SAVAC+1]
  1434	031737	251 00 0 00 032040 		BLT	SAVAC+17	;SAVE AC'S
  1435	031740	402 00 0 00 032167 		SETZM	INSTR
  1436	031741	402 00 0 00 032170 		SETZM	CNTLPC
  1437	031742	476 00 0 00 046245 		SETOM	SNGLIN		;SET SINGLE INSTRUCTION CONTROL
  1438	031743	402 00 0 00 046244 		SETZM	SNGL2		;SET FOR FIRST INST
  1439	031744	200 17 0 00 030303 		MOVE	P,PLIST
  1440	031745	201 00 0 00 030103 		MOVEI	$PSHER
  1441	031746	261 17 0 00 000000 		PUSH	P,0
  1442	031747	260 17 0 00 032110 		GO	SENTRY		;GO TO SIMULATOR
  1443
  1444	031750	204 00 0 00 045135 		MOVS	[1,,SAVAC+1]
  1445	031751	251 00 0 00 000017 		BLT	17		;RESTORE AC'S
  1446	031752	200 00 0 00 032021 		MOVE	0,SAVAC
  1447	031753	254 00 1 00 031734 		JRST	@SIMNST
  1448
  1449					;*SIMULATE INSTRUCTION, PRINT
  1450
  1451	031754	402 00 0 00 032166 	SIMMT:	SETZM	MASK		;ALLOW PRINTOUT
  1452	031755	264 00 0 00 031734 		JSR	SIMNST		;GO SIMULATE
  1453	031756	201 00 0 00 030242 		MOVEI	CRLF
  1454	031757	037 00 0 00 000000 		PNTA
  1455	031760	254 00 1 00 031424 		JRST	@OUT
  1456
  1457	031761				RAND:	BLOCK	10
  1458	031771				INSBLK:	BLOCK	10
  1459	032001				ANSBLK:	BLOCK	10
  1460	032011				FSTANS:	BLOCK	10
  1461	032021				SAVAC:	BLOCK	20
  1462	032041				SIMBLK:	BLOCK	^D10
  1463	032053	000000	045776		VMEM:	ENDSLD
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 20
DBKDBM	MAC	 9-JUN-76 16:19		DIAGNOSTIC SECTION                                                             *** SEQ 0070

  1464					;*SIMULATE AND PRINT ALL INSTRUCTIONS
  1465					;*FAST LOOP RELIABILITY/SPEED FAILURE
  1466
  1467	032054				SIMFST:	MOVEI	[ASCIZ/
  1468
  1469					INSTRUCTION SIMULATION - FAST LOOP FAILURE
  1470					----------
  1471	032054	201 00 0 00 045136 	/]
  1472	032055	037 17 0 00 000000 		PNTAL
  1473	032056	402 00 0 00 032166 		SETZM	MASK
  1474	032057	200 00 0 00 045135 		MOVE	[1,,SAVAC+1]
  1475	032060	251 00 0 00 032040 		BLT	SAVAC+17	;SAVE AC'S
  1476	032061	200 00 0 00 045153 		MOVE	[INSBLK,,ACS+11]
  1477	032062	251 00 0 00 032212 		BLT	ACS+17		;SETUP INSTRUCTIONS
  1478	032063	200 00 0 00 045027 		MOVE	[RAND,,ACS]
  1479	032064	251 00 0 00 032202 		BLT	ACS+7
  1480	032065	402 00 0 00 032203 		SETZM	ACS+10		;SETUP OPEARANDS
  1481	032066	201 00 0 00 000011 		MOVEI	11
  1482	032067	202 00 0 00 032165 	SIMFS1:	MOVEM	INPC		;SET INPC TO FIRST INSTRUCTION
  1483	032070	402 00 0 00 032167 		SETZM	INSTR
  1484	032071	402 00 0 00 032170 		SETZM	CNTLPC
  1485	032072	476 00 0 00 046245 		SETOM	SNGLIN		;SET SINGLE INSTRUCTION CONTROL
  1486	032073	402 00 0 00 046244 		SETZM	SNGL2		;SET FOR FIRST INST
  1487	032074	200 17 0 00 030303 		MOVE	P,PLIST
  1488	032075	201 00 0 00 030103 		MOVEI	$PSHER
  1489	032076	261 17 0 00 000000 		PUSH	P,0
  1490	032077	260 17 0 00 032110 		GO	SENTRY		;GO TO SIMULATOR
  1491
  1492	032100	550 00 0 00 000013 		HRRZ	PC
  1493	032101	302 00 0 00 000017 		CAIE	17		;COMPLETED SIM ?
  1494	032102	254 00 0 00 032067 		JRST	SIMFS1		;NO
  1495	032103	204 00 0 00 045135 		MOVS	[1,,SAVAC+1]
  1496	032104	251 00 0 00 000017 		BLT	17		;RESTORE AC'S
  1497	032105	201 00 0 00 030242 		MOVEI	CRLF
  1498	032106	037 00 0 00 000000 		PNTA
  1499	032107	254 00 1 00 031424 		JRST	@OUT
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 1
KIPNT	MAC	 9-JUN-76 13:30		SIMULATOR MACHINE REGISTER PRINT                                               *** SEQ 0071

  1500					SUBTTL	SIMULATOR MACHINE REGISTER PRINT
  1501
  1502					;*PROGRAM INITIALIZATION AND BREAK SETUP
  1503
  1504	032110	402 00 0 00 046220 	SENTRY:	SETZM	PNTCTL#		;CLEAR PRINT CONTROL
  1505	032111	201 00 0 00 000000 		MOVEI	0
  1506	032112	332 00 0 00 030037 		SKIPE	USER		;USER MODE ?
  1507	032113	040 00 0 00 045154 		CALL	[SIXBIT/SETUWP/]
  1508	032114	255 00 0 00 000000 		JFCL
  1509	032115	332 00 0 00 046212 		SKIPE	ONETIM#		;SET BREAK ONLY ON LOAD
  1510	032116	254 00 0 00 032126 		JRST	SX1
  1511	032117	200 00 0 00 037716 		MOVE	0,SIMBRK	;PATCH TO SIMULATOR FOR PRINTOUT
  1512	032120	202 00 0 00 032153 		MOVEM	0,SIMPN1+1
  1513	032121	200 00 0 00 045155 		MOVE	0,[JRST SIMPN1]
  1514	032122	202 00 0 00 037716 		MOVEM	0,SIMBRK
  1515	032123	200 00 0 00 045156 		MOVE	0,[JRST	ERRPNT]
  1516	032124	202 00 0 00 043163 		MOVEM	0,ERR+1
  1517	032125	476 00 0 00 046212 		SETOM	ONETIM
  1518
  1519	032126	403 06 0 00 046260 	SX1:	SETZB	AR,SVAR#	;CLEAR PSEUDO REGISTERS
  1520	032127	403 07 0 00 046270 		SETZB	MQ,SVMQ#
  1521	032130	403 10 0 00 046262 		SETZB	BR,SVBR#
  1522	032131	403 11 0 00 046256 		SETZB	AD,SVAD#
  1523	032132	403 12 0 00 046267 		SETZB	MB,SVMB#
  1524	032133	403 13 0 00 046271 		SETZB	PC,SVPC#
  1525	032134	403 14 0 00 046266 		SETZB	MA,SVMA#
  1526	032135	403 15 0 00 046274 		SETZB	SC,SVSC#
  1527	032136	402 00 0 00 046067 		SETZM	ARX
  1528	032137	402 00 0 00 046120 		SETZM	FE
  1529	032140	402 00 0 00 046226 		SETZM	SA
  1530	032141	402 00 0 00 046037 		SETZM	AB
  1531	032142	402 00 0 00 046052 		SETZM	ADX
  1532	032143	402 00 0 00 046257 		SETZM	SVADX#
  1533	032144	402 00 0 00 046264 		SETZM	SVFM#
  1534	032145	402 00 0 00 046261 		SETZM	SVARX#
  1535	032146	402 00 0 00 046263 		SETZM	SVFE#
  1536	032147	402 00 0 00 046273 		SETZM	SVSA#
  1537	032150	402 00 0 00 046252 		SETZM	SVAB#
  1538	032151	254 00 0 00 037603 		JRST	SIMGO		;GO TO SIMULATOR
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 2
KIPNT	MAC	 9-JUN-76 13:30		SIMULATOR MACHINE REGISTER PRINT                                               *** SEQ 0072

  1539	032152	260 17 0 00 032213 	SIMPN1:	GO	MRPNT
  1540	032153	000000	000000			0
  1541	032154	254 00 0 00 037717 		JRST	SIMBRK+1
  1542
  1543						IFNDEF	SIMASB,<
  1544					;*SPECIAL USER MODE MONITOR UUO EXECUTION
  1545					
  1546					MUOEXC:	777000,,USR424		;MUUO EXECUTE INSTRUCTION
  1547						JRST	2,@USR425	;RETURN TO OBJECT SEQUENCE
  1548					
  1549					USR420:	HALT			;PAGE FAULT TRAP
  1550					USR421:	JFCL			;ARITH TRAP
  1551					USR422:	HALT			;PDL OV TRAP
  1552					USR423:	HALT			;TRP 3 TRAP
  1553					
  1554					USR424:	0			;MUUO STORAGE
  1555					USR425:	0			;C(PC) OF MUUO
  1556					
  1557					USR427:	0			;USER PAGE FAIL WORD
  1558					
  1559					USR436:	MUOEXC			;MUUO EXECUTION ADR, PUBLIC, NO TRAP
  1560					USR437:	MUOEXC			;		     PUBLIC, TRAP
  1561					>
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 3
KIPNT	MAC	 9-JUN-76 13:30		SIMULATOR MACHINE REGISTER PRINT                                               *** SEQ 0073

  1562	032155				RENTR1:	IFDEF	SIMASB,<
  1563	032155	264 00 0 00 031640 		JSR	PNTTOT		;PRINT TOTALS >
  1564	032156	037 05 0 00 000002 		DROPDV			;CLOSE LOGICAL FILE, USER MODE
  1565	032157	040 00 0 00 045157 		CALL	[SIXBIT/EXIT/]	;EXIT TO MONITOR
  1566
  1567	032160	202 00 0 00 046227 	DDTEX:	MOVEM	0,SAC0#
  1568						MOVEI	[ASCIZ/
  1569					**********
  1570	032161	201 00 0 00 045160 	/]
  1571	032162	037 17 0 00 000001 		PNTALF
  1572	032163	200 00 0 00 046227 		MOVE	0,SAC0
  1573	032164	254 00 0 00 030007 		JRST	DDTSRT
  1574
  1575	032165	000000	030000		INPC:	0,,30000		;EXEC MODE, STARTING ADDRESS
  1576	032166	777777	777777		MASK:	-1
  1577	032167	000000	000000		INSTR:	0
  1578	032170	000000	000000		CNTLPC:	0
  1579	032171	000000	777777		UPRPC:	0,,-1
  1580	032172	000000	000000		SWITCH:	0
  1581
  1582	032173				ACS:	BLOCK	20	;SIMULATED AC'S
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 4
KIPNT	MAC	 9-JUN-76 13:30		SIMULATOR MACHINE REGISTER PRINT                                               *** SEQ 0074

  1583					;*MACHINE REGISTER PRINT
  1584					;*THIS ROUTINE PRINTS THE CONTENTS OF THE SEVERAL
  1585					;*PSEUDO MACHINE REGISTERS AT VARIOUS TIMES IN
  1586					;*THE INSTRUCTION CYCLE.
  1587
  1588	032213	261 17 0 00 000000 	MRPNT:	PUSH	P,0		;SAVE 5 AC'S
  1589	032214	261 17 0 00 000001 		PUSH	P,T
  1590	032215	261 17 0 00 000002 		PUSH	P,T1
  1591	032216	261 17 0 00 000003 		PUSH	P,T2
  1592	032217	261 17 0 00 000004 		PUSH	P,T3
  1593	032220	550 01 0 00 046246 		HRRZ	T,STATE		;GET STATE REGISTER
  1594	032221	316 01 0 00 046247 		CAMN	T,STATSV#	;SAME AS PREVIOUS STATE ?
  1595	032222	254 00 0 00 032636 		JRST	HUNGCK		;YES, CHECK FOR HUNG
  1596	032223	202 01 0 00 046247 		MOVEM	T,STATSV
  1597	032224	201 00 0 00 000404 		MOVEI	0,^D260		;SETUP MAXIMUM TIME
  1598	032225	202 00 0 00 046131 		MOVEM	0,HNGCNT#	;FOR ONE TIME STATE
  1599	032226	306 01 0 00 040467 	MRPNT3:	CAIN	T,IT0		;IS STATE IT0
  1600	032227	260 17 0 00 032442 		GO	IRPNT		;YES, PRINT PC AND INSTRUCTION
  1601	032230	336 00 0 00 046220 		SKIPN	PNTCTL		;PRINT CONTROL SET ?
  1602	032231	254 00 0 00 032366 		JRST	MRPNT2		;NO,EXIT
  1603	032232	550 01 0 00 046246 		HRRZ	T,STATE
  1604	032233	306 01 0 00 040530 		CAIN	T,IT1		;IS STATE IT1 ?
  1605	032234	260 17 0 00 033130 		GO	INTPNT		;YES, SAVE INITIAL CONDITIONS
  1606	032235	200 00 0 00 030046 		MOVE	0,CONSW
  1607	032236	602 00 0 00 000100 		TRNE	0,INHMS		;PRINT MACHINE STATES ?
  1608	032237	254 00 0 00 032366 		JRST	MRPNT2		;NO, EXIT
  1609	032240	550 01 0 00 046246 		HRRZ	T,STATE
  1610	032241	302 01 0 00 043005 		CAIE	T,SCT2		;IS STATE SCT2 ?
  1611	032242	254 00 0 00 032245 		JRST	.+3		;NO
  1612	032243	602 00 0 00 000400 		TRNE	0,INHSCT	;INHIBIT SCT2 PRINTOUT ?
  1613	032244	254 00 0 00 032366 		JRST	MRPNT2		;YES, EXIT
  1614	032245	205 02 0 00 777640 		MOVSI	T1,-^D96
  1615						IFNDEF	SIMASB,<
  1616						MOVSI	T1,-^D120	;CONVERT STATE TO SYMBOLIC >
  1617	032246	316 01 0 02 034010 		CAMN	T,STAB(T1)
  1618	032247	254 00 0 00 032374 		JRST	FOUND
  1619	032250	253 02 0 00 032246 		AOBJN	T1,.-2
  1620	032251	201 00 0 00 045163 		MOVEI	0,[ASCII/XXX--/]
  1621	032252	037 00 0 00 000000 	MRPNT1:	PNTA			;PRINT SYMBOLIC STATE
  1622	032253	201 00 0 00 030247 		MOVEI	0,TAB
  1623	032254	037 00 0 00 000000 		PNTA
  1624	032255	476 00 0 00 030223 		SETOM	PNTSPC		;SET PRINT SPACE FLAG
  1625	032256	332 00 0 00 046111 		SKIPE	DBLAF		;DBL ARITH ?
  1626	032257	254 00 0 00 032376 		JRST	MRPNT4		;YES
  1627	032260	200 00 0 00 000013 		MOVE	0,PC
  1628	032261	316 00 0 00 046271 		CAMN	0,SVPC
  1629	032262	260 17 0 00 032430 		GO	DITTO6
  1630	032263	202 00 0 00 046271 		MOVEM	0,SVPC
  1631	032264	037 06 0 00 000000 		PNT6			;PRINT PC
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 5
KIPNT	MAC	 9-JUN-76 13:30		SIMULATOR MACHINE REGISTER PRINT                                               *** SEQ 0075

  1632	032265	200 00 0 00 000014 		MOVE	0,MA
  1633	032266	316 00 0 00 046266 		CAMN	0,SVMA
  1634	032267	260 17 0 00 032430 		GO	DITTO6
  1635	032270	202 00 0 00 046266 		MOVEM	0,SVMA
  1636	032271	037 06 0 00 000000 		PNT6			;PRINT MA
  1637	032272	200 00 0 00 046037 		MOVE	0,AB
  1638	032273	316 00 0 00 046252 		CAMN	0,SVAB
  1639	032274	260 17 0 00 032430 		GO	DITTO6
  1640	032275	202 00 0 00 046252 		MOVEM	0,SVAB
  1641	032276	037 06 0 00 000000 		PNT6			;PRINT AB
  1642	032277	200 00 0 00 000012 		MOVE	0,MB
  1643	032300	316 00 0 00 046267 		CAMN	0,SVMB
  1644	032301	260 17 0 00 032420 		GO	DITTO
  1645	032302	202 00 0 00 046267 		MOVEM	0,SVMB
  1646	032303	037 14 0 00 000000 		PNTOCT			;PRINT MB
  1647	032304	200 00 0 00 000011 	MRPNT5:	MOVE	0,AD
  1648	032305	316 00 0 00 046256 		CAMN	0,SVAD
  1649	032306	260 17 0 00 032420 		GO	DITTO
  1650	032307	202 00 0 00 046256 		MOVEM	0,SVAD
  1651	032310	037 14 0 00 000000 		PNTOCT			;PRINT AD
  1652	032311	200 00 0 00 000006 		MOVE	0,AR
  1653	032312	316 00 0 00 046260 		CAMN	0,SVAR
  1654	032313	260 17 0 00 032420 		GO	DITTO
  1655	032314	202 00 0 00 046260 		MOVEM	0,SVAR
  1656	032315	037 14 0 00 000000 		PNTOCT			;PRINT AR
  1657	032316	200 00 0 00 030046 		MOVE	0,CONSW
  1658	032317	603 00 0 00 020000 		TLNE	PNTLPT
  1659	032320	254 00 0 00 032324 		JRST	.+4
  1660	032321	201 00 0 00 030242 		MOVEI	CRLF
  1661	032322	037 00 0 00 000000 		PNTA
  1662	032323	254 00 0 00 032326 		JRST	.+3
  1663	032324	201 00 0 00 045124 		MOVEI	0,[ASCII/    /]
  1664	032325	037 00 0 00 000000 		PNTA
  1665	032326	200 00 1 00 046124 		MOVE	0,@FMREG
  1666	032327	316 00 0 00 046264 		CAMN	0,SVFM
  1667	032330	260 17 0 00 032420 		GO	DITTO
  1668	032331	202 00 0 00 046264 		MOVEM	0,SVFM
  1669	032332	037 14 0 00 000000 		PNTOCT			;PRINT FM
  1670	032333	200 00 0 00 000010 		MOVE	0,BR
  1671	032334	316 00 0 00 046262 		CAMN	0,SVBR
  1672	032335	260 17 0 00 032420 		GO	DITTO
  1673	032336	202 00 0 00 046262 		MOVEM	0,SVBR
  1674	032337	037 14 0 00 000000 		PNTOCT			;PRINT BR
  1675	032340	200 00 0 00 000007 		MOVE	0,MQ
  1676	032341	316 00 0 00 046270 		CAMN	0,SVMQ
  1677	032342	260 17 0 00 032420 		GO	DITTO
  1678	032343	202 00 0 00 046270 		MOVEM	0,SVMQ
  1679	032344	037 14 0 00 000000 		PNTOCT			;PRINT MQ
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 6
KIPNT	MAC	 9-JUN-76 13:30		SIMULATOR MACHINE REGISTER PRINT                                               *** SEQ 0076

  1680	032345	200 00 0 00 000015 		MOVE	0,SC
  1681	032346	316 00 0 00 046274 		CAMN	0,SVSC
  1682	032347	260 17 0 00 032435 		GO	DITTO3
  1683	032350	202 00 0 00 046274 		MOVEM	0,SVSC
  1684	032351	037 03 0 00 000000 		PNT3			;PRINT SC
  1685	032352	200 00 0 00 046120 		MOVE	0,FE
  1686	032353	316 00 0 00 046263 		CAMN	0,SVFE
  1687	032354	260 17 0 00 032435 		GO	DITTO3
  1688	032355	202 00 0 00 046263 		MOVEM	0,SVFE
  1689	032356	037 03 0 00 000000 		PNT3			;PRINT FE
  1690	032357	200 00 0 00 046226 		MOVE	0,SA
  1691	032360	316 00 0 00 046273 		CAMN	0,SVSA
  1692	032361	260 17 0 00 032435 		GO	DITTO3
  1693	032362	202 00 0 00 046273 		MOVEM	0,SVSA
  1694	032363	037 03 0 00 000000 		PNT3			;PRINT SA
  1695	032364	201 00 0 00 030242 		MOVEI	0,CRLF
  1696	032365	037 00 0 00 000000 		PNTA			;CR-LF
  1697
  1698	032366	262 17 0 00 000004 	MRPNT2:	POP	P,T3		;RESTORE AC'S
  1699	032367	262 17 0 00 000003 		POP	P,T2
  1700	032370	262 17 0 00 000002 		POP	P,T1
  1701	032371	262 17 0 00 000001 		POP	P,T
  1702	032372	262 17 0 00 000000 		POP	P,0
  1703	032373	263 17 0 00 000000 		POPJ	P,		;EXIT
  1704
  1705	032374	201 00 0 02 034150 	FOUND:	MOVEI	0,STAB1(T1)	;GET SYMBOLIC STATE
  1706	032375	254 00 0 00 032252 		JRST	MRPNT1
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 7
KIPNT	MAC	 9-JUN-76 13:30		SIMULATOR MACHINE REGISTER PRINT                                               *** SEQ 0077

  1707	032376	200 00 0 00 046037 	MRPNT4:	MOVE	0,AB
  1708	032377	316 00 0 00 046252 		CAMN	0,SVAB
  1709	032400	260 17 0 00 032430 		GO	DITTO6
  1710	032401	202 00 0 00 046252 		MOVEM	0,SVAB
  1711	032402	037 06 0 00 000000 		PNT6			;PRINT AB
  1712	032403	200 00 0 00 046052 		MOVE	0,ADX
  1713	032404	316 00 0 00 046257 		CAMN	0,SVADX
  1714	032405	260 17 0 00 032420 		GO	DITTO
  1715	032406	202 00 0 00 046257 		MOVEM	0,SVADX
  1716	032407	037 14 0 00 000000 		PNTOCT			;PRINT ADX
  1717	032410	200 00 0 00 046067 		MOVE	0,ARX
  1718	032411	316 00 0 00 046261 		CAMN	0,SVARX
  1719	032412	260 17 0 00 032420 		GO	DITTO
  1720	032413	202 00 0 00 046261 		MOVEM	0,SVARX
  1721	032414	037 14 0 00 000000 		PNTOCT			;PRINT ARX
  1722	032415	201 00 0 00 030246 		MOVEI	SPACE
  1723	032416	037 00 0 00 000000 		PNTA
  1724	032417	254 00 0 00 032304 		JRST	MRPNT5
  1725
  1726	032420	322 00 0 00 032426 	DITTO:	JUMPE	0,DITTO0
  1727	032421	201 00 0 00 045164 		MOVEI	0,[ASCIZ/*            /]
  1728	032422	037 17 0 00 000000 		PNTAL
  1729	032423	350 00 0 17 000000 		AOS	(P)
  1730	032424	350 00 0 17 000000 		AOS	(P)
  1731	032425	263 17 0 00 000000 		POPJ	P,
  1732
  1733	032426	201 00 0 00 045167 	DITTO0:	MOVEI	0,[ASCIZ/0            /]
  1734	032427	254 00 0 00 032422 		JRST	DITTO+2
  1735
  1736	032430	322 00 0 00 032433 	DITTO6:	JUMPE	0,DITT60
  1737	032431	201 00 0 00 045172 		MOVEI	0,[ASCIZ/*      /]
  1738	032432	254 00 0 00 032422 		JRST	DITTO+2
  1739
  1740	032433	201 00 0 00 045174 	DITT60:	MOVEI	0,[ASCIZ/0      /]
  1741	032434	254 00 0 00 032422 		JRST	DITTO+2
  1742
  1743	032435	322 00 0 00 032440 	DITTO3:	JUMPE	0,DITT30
  1744	032436	201 00 0 00 045176 		MOVEI	0,[ASCIZ/*   /]
  1745	032437	254 00 0 00 032422 		JRST	DITTO+2
  1746
  1747	032440	201 00 0 00 045177 	DITT30:	MOVEI	0,[ASCIZ/0   /]
  1748	032441	254 00 0 00 032422 		JRST	DITTO+2
  1749
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 8
KIPNT	MAC	 9-JUN-76 13:30		SIMULATOR MACHINE REGISTER PRINT                                               *** SEQ 0078

  1750					;*INSTRUCTION PRINT
  1751					;*THIS ROUTINE PRINTS THE PC AND THE INSTRUCTION
  1752					;*AT IT0 OF THE INSTRUCTION CYCLE.
  1753
  1754	032442	332 00 0 00 046156 	IRPNT:	SKIPE	IRLTCH		;FIRST IT0
  1755	032443	263 17 0 00 000000 		POPJ	P,		;NO
  1756	032444	332 00 0 00 046220 		SKIPE	PNTCTL		;PREVIOUS INSTRUCTION PRINTED ?
  1757	032445	260 17 0 00 033356 		GO	INTFNL		;YES, PRINT PREVIOUS INIT/FINAL
  1758	032446	336 00 0 00 046245 		SKIPN	SNGLIN#		;SINGLE INSTRUCTION OPERATION ?
  1759	032447	254 00 0 00 032465 		JRST	IRPNT1+1	;NO
  1760	032450	336 00 0 00 046244 		SKIPN	SNGL2#		;START OF SECOND INSTRUCTION ?
  1761	032451	254 00 0 00 032464 		JRST	IRPNT1		;NO
  1762	032452	332 00 0 00 046307 		SKIPE	XCTF		;INST BEING EXECUTED ?
  1763	032453	254 00 0 00 032464 		JRST	IRPNT1		;YES, SIM IT TO.
  1764	032454	262 17 0 00 000000 		POP	P,0		;RETURN TO CALLING PROGRAM
  1765	032455	262 17 0 00 000004 		POP	P,T3
  1766	032456	262 17 0 00 000003 		POP	P,T2
  1767	032457	262 17 0 00 000002 		POP	P,T1
  1768	032460	262 17 0 00 000001 		POP	P,T
  1769	032461	262 17 0 00 000000 		POP	P,0
  1770	032462	262 17 0 00 000000 		POP	P,0
  1771	032463	263 17 0 00 000000 		POPJ	P,
  1772	032464	476 00 0 00 046244 	IRPNT1:	SETOM	SNGL2		;SET FIRST INSTR INDICATION
  1773	032465	402 00 0 00 046220 		SETZM	PNTCTL		;CLEAR PRINT CONTROL
  1774						IFNDEF	SIMASB,<
  1775						MOVE	0,MB		;IS THIS SPECIAL LEAVE SIMULATION INST ?
  1776						CAMN	0,[776000,,SEXIT1]
  1777						JRST	@0		;YES, RETURN TO COMMAND OPERATION
  1778						TTALTM
  1779						JRST	.+2		;IF ALTMODE, GO TO DDT
  1780						JRST	DDTEX5		;CONTINUE WITH "SIMCON$G">
  1781	032466	350 00 0 00 046240 	SIMCON:	AOS	SEQ#
  1782	032467	200 00 0 00 000012 		MOVE	0,MB		;PRINT THIS INSTRUCTION
  1783	032470	404 00 0 00 032166 		AND	MASK
  1784	032471	312 00 0 00 032167 		CAME	INSTR
  1785	032472	263 17 0 00 000000 		POPJ	P,		;NO
  1786	032473	550 00 0 00 000013 		HRRZ	0,PC
  1787	032474	315 00 0 00 032170 		CAMGE	0,CNTLPC	;PC PAST LOWER LIMIT ?
  1788	032475	263 17 0 00 000000 		POPJ	P,		;NO
  1789	032476	313 00 0 00 032171 		CAMLE	0,UPRPC		;PC ABOVE UPPER LIMIT ?
  1790	032477	263 17 0 00 000000 		POPJ	P,		;YES
  1791	032500	476 00 0 00 046220 		SETOM	PNTCTL		;NO, SET PRINT CONTROL
  1792	032501	200 00 0 00 030046 		MOVE	0,CONSW
  1793	032502	606 00 0 00 002000 		TRNN	0,SEQPNT	;PRINT SEQUENCE NUMBERS ?
  1794	032503	254 00 0 00 032510 		JRST	.+5		;NO
  1795						MOVEI	[ASCIZ/
  1796	032504	201 00 0 00 045200 	SEQUENCE # = /]
  1797	032505	037 17 0 00 000000 		PNTAL
  1798	032506	200 00 0 00 046240 		MOVE	0,SEQ
  1799	032507	037 15 0 00 000000 		PNTDEC
  1800	032510	260 17 0 00 032512 		GO	IRPNT2
  1801	032511	254 00 0 00 032572 		JRST	HDPNT
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 9
KIPNT	MAC	 9-JUN-76 13:30		SIMULATOR MACHINE REGISTER PRINT                                               *** SEQ 0079

  1802	032512	037 10 0 00 000002 	IRPNT2:	SWITCH
  1803	032513	602 00 0 00 000000 		TRNE	INHIF		;INHIBIT INITIAL/FINAL RESULTS ?
  1804	032514	254 00 0 00 032517 		JRST	.+3		;YES, DON'T DOUBLE SPACE
  1805	032515	201 00 0 00 030242 		MOVEI	0,CRLF
  1806	032516	037 00 0 00 000000 		PNTA
  1807	032517	201 00 0 00 030252 		MOVEI	0,AST
  1808	032520	037 00 0 00 000000 		PNTA
  1809
  1810	032521	476 00 0 00 030223 		SETOM	PNTSPC
  1811	032522	200 00 0 00 000013 		MOVE	0,PC
  1812	032523	202 00 0 00 046272 		MOVEM	0,SVPC1#
  1813	032524	037 06 0 00 000000 		PNT6
  1814	032525	201 00 0 00 030246 		MOVEI	0,SPACE
  1815	032526	037 00 0 00 000000 		PNTA
  1816	032527	260 17 0 00 032717 		GO	PNTINS		;GO PRINT INSTRUCTION
  1817	032530	201 00 0 00 030247 		MOVEI	0,TAB
  1818	032531	037 00 0 00 000000 		PNTA
  1819	032532	332 00 0 00 046110 	ACPNT:	SKIPE	CONNF#
  1820	032533	254 00 0 00 032631 		JRST	DVCPNT		;I/O PRINT DEVICE CODE
  1821	032534	402 00 0 00 030223 		SETZM	PNTSPC
  1822	032535	200 00 0 00 000012 		MOVE	0,MB
  1823	032536	241 00 0 00 777751 		ROT	0,-^D23
  1824	032537	405 00 0 00 000017 		ANDI	0,17
  1825	032540	202 00 0 00 046255 		MOVEM	0,SVAC#
  1826	032541	037 16 0 00 000003 		PNTOCS
  1827	032542	201 00 0 00 030244 		MOVEI	0,COMMA
  1828	032543	037 00 0 00 000000 		PNTA
  1829
  1830	032544	200 00 0 00 000012 	EFPNT:	MOVE	0,MB
  1831	032545	603 00 0 00 000020 		TLNE	0,20		;INDIRECT BIT ON
  1832	032546	254 00 0 00 032626 		JRST	PNTIND		;YES, PRINT AN AT SIGN
  1833	032547	200 00 0 00 000012 		MOVE	0,MB
  1834	032550	261 17 0 00 030223 		PUT	PNTSPC
  1835	032551	402 00 0 00 030223 		SETZM	PNTSPC
  1836	032552	037 06 0 00 000000 		PNT6
  1837	032553	262 17 0 00 030223 		GET	PNTSPC
  1838
  1839	032554	200 00 0 00 000012 	IDXPNT:	MOVE	0,MB		;LOOK FOR INDEXING
  1840	032555	607 00 0 00 000017 		TLNN	0,17
  1841	032556	254 00 0 00 032567 		JRST	IDXPN1
  1842	032557	201 00 0 00 030254 		MOVEI	0,LFP
  1843	032560	037 00 0 00 000000 		PNTA
  1844	032561	200 00 0 00 000012 		MOVE	0,MB
  1845	032562	242 00 0 00 777756 		LSH	0,-^D18
  1846	032563	405 00 0 00 000017 		ANDI	0,17
  1847	032564	037 16 0 00 000003 		PNTOCS
  1848	032565	201 00 0 00 030255 		MOVEI	0,RTP
  1849	032566	037 00 0 00 000000 		PNTA
  1850	032567	201 00 0 00 030242 	IDXPN1:	MOVEI	0,CRLF
  1851	032570	037 00 0 00 000000 		PNTA
  1852	032571	263 17 0 00 000000 		RTN
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 10
KIPNT	MAC	 9-JUN-76 13:30		SIMULATOR MACHINE REGISTER PRINT                                               *** SEQ 0080

  1853	032572	200 01 0 00 030046 	HDPNT:	MOVE	T,CONSW
  1854	032573	602 01 0 00 000100 		TRNE	T,INHMS		;PRINT MACHINE STATES ?
  1855	032574	263 17 0 00 000000 		POPJ	P,		;NO
  1856	032575	201 00 0 00 032654 		MOVEI	HDER1
  1857	032576	332 00 0 00 046111 		SKIPE	DBLAF		;DBL ARITH ?
  1858	032577	201 00 0 00 032670 		MOVEI	HDER2
  1859	032600	037 17 0 00 000000 		PNTAL			;PRINT HEADER 1ST PART
  1860	032601	201 00 0 00 030242 		MOVEI	CRLF
  1861	032602	603 01 0 00 020000 		TLNE	T,PNTLPT	;PRINT ON LPT
  1862	032603	201 00 0 00 045073 		MOVEI	[ASCIZ/               /]
  1863	032604	037 17 0 00 000000 		PNTAL			;PRINT SEPARATOR
  1864	032605	201 00 0 00 032704 		MOVEI	HDER3
  1865	032606	037 17 0 00 000000 		PNTAL			;PRINT HEADER 2ND PART
  1866	032607	402 00 0 00 046260 		SETZM	SVAR		;SET TO PRINT ALL REGS AT IT0
  1867	032610	402 00 0 00 046257 		SETZM	SVADX
  1868	032611	402 00 0 00 046264 		SETZM	SVFM
  1869	032612	402 00 0 00 046270 		SETZM	SVMQ
  1870	032613	402 00 0 00 046262 		SETZM	SVBR
  1871	032614	402 00 0 00 046256 		SETZM	SVAD
  1872	032615	402 00 0 00 046267 		SETZM	SVMB
  1873	032616	402 00 0 00 046271 		SETZM	SVPC
  1874	032617	402 00 0 00 046266 		SETZM	SVMA
  1875	032620	402 00 0 00 046274 		SETZM	SVSC
  1876	032621	402 00 0 00 046261 		SETZM	SVARX
  1877	032622	402 00 0 00 046263 		SETZM	SVFE
  1878	032623	402 00 0 00 046273 		SETZM	SVSA
  1879	032624	402 00 0 00 046252 		SETZM	SVAB
  1880	032625	263 17 0 00 000000 		POPJ	P,		;RETURN TO MRPNT
  1881
  1882	032626	201 00 0 00 030253 	PNTIND:	MOVEI	0,ATSIN
  1883	032627	037 00 0 00 000000 		PNTA
  1884	032630	254 00 0 00 032547 		JRST	EFPNT+3
  1885
  1886	032631	200 00 0 00 000012 	DVCPNT:	MOVE	0,MB		;I/O, PRINT DEVICE CODE
  1887	032632	241 00 0 00 777750 		ROT	0,-^D24
  1888	032633	405 00 0 00 000774 		ANDI	0,774
  1889	032634	037 16 0 00 000003 		PNTOCS
  1890	032635	254 00 0 00 032542 		JRST	EFPNT-2
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 11
KIPNT	MAC	 9-JUN-76 13:30		SIMULATOR MACHINE REGISTER PRINT                                               *** SEQ 0081

  1891	032636	372 00 0 00 046131 	HUNGCK:	SOSE	HNGCNT		;IS SIMULATOR HUNG ?
  1892	032637	254 00 0 00 032226 		JRST	MRPNT3		;NO, NOT YET
  1893						MOVEI	[ASCIZ/
  1894	032640	201 00 0 00 045204 	INSTRUCTION HUNG UP/]
  1895	032641	037 17 0 00 000001 		PNTALF
  1896	032642	254 00 0 00 032647 		JRST	ERRPNT+4
  1897
  1898	032643				ERRPNT:	MOVEI	[ASCIZ/
  1899	032643	201 00 0 00 045211 	SIMULATOR ERROR AT PC = /]
  1900	032644	037 17 0 00 000001 		PNTALF
  1901	032645	200 00 0 00 043162 		MOVE	0,ERR
  1902	032646	037 06 0 00 000001 		PNT6F
  1903						MOVEI	[ASCIZ/
  1904	032647	201 00 0 00 045217 	SIMULATED INSTRUCTION/]
  1905	032650	037 17 0 00 000001 		PNTALF
  1906	032651	260 17 0 00 032512 		GO	IRPNT2
  1907						IFNDEF	SIMASB,<
  1908						JRST	VMHALT+4>
  1909						IFDEF	SIMASB,<
  1910	032652	037 14 0 00 000004 		ERRHLT
  1911	032653	254 00 0 00 030000 		JRST	BEGIN>
  1912
  1913	032654				HDER1:	ASCIZ?
  1914	032654	015 012 123 124 101 	STATE   PC     MA     AB     MB           AD           AR?
  1915	032655	124 105 040 040 040 
  1916	032656	120 103 040 040 040 
  1917	032657	040 040 115 101 040 
  1918	032660	040 040 040 040 101 
  1919	032661	102 040 040 040 040 
  1920	032662	040 115 102 040 040 
  1921	032663	040 040 040 040 040 
  1922	032664	040 040 040 040 101 
  1923	032665	104 040 040 040 040 
  1924	032666	040 040 040 040 040 
  1925	032667	040 040 101 122 000 
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 12
KIPNT	MAC	 9-JUN-76 13:30		SIMULATOR MACHINE REGISTER PRINT                                               *** SEQ 0082

  1926
  1927	032670				HDER2:	ASCIZ?
  1928	032670	015 012 123 124 101 	STATE   AB     ADX          ARX           AD           AR?
  1929	032671	124 105 040 040 040 
  1930	032672	101 102 040 040 040 
  1931	032673	040 040 101 104 130 
  1932	032674	040 040 040 040 040 
  1933	032675	040 040 040 040 040 
  1934	032676	101 122 130 040 040 
  1935	032677	040 040 040 040 040 
  1936	032700	040 040 040 040 101 
  1937	032701	104 040 040 040 040 
  1938	032702	040 040 040 040 040 
  1939	032703	040 040 101 122 000 
  1940
  1941	032704	106 115 040 040 040 	HDER3:	ASCIZ?FM           BR           MQ           SC  FE  SA
  1942	032705	040 040 040 040 040 
  1943	032706	040 040 040 102 122 
  1944	032707	040 040 040 040 040 
  1945	032710	040 040 040 040 040 
  1946	032711	040 115 121 040 040 
  1947	032712	040 040 040 040 040 
  1948	032713	040 040 040 040 123 
  1949	032714	103 040 040 106 105 
  1950	032715	040 040 123 101 015 
  1951	032716	012 000 000 000 000 	?
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 13
KIPNT	MAC	 9-JUN-76 13:30		SIMULATOR MACHINE REGISTER PRINT                                               *** SEQ 0083

  1952					;*INSTRUCTION SYMBOLIC CONVERSION
  1953					;*THIS ROUTINE CONVERTS THE INSTRUCTION TO SYMBOLIC
  1954					;*AND PRINTS IT OUT.
  1955
  1956	032717	402 00 0 00 046110 	PNTINS:	SETZM	CONNF#
  1957	032720	402 00 0 00 046111 		SETZM	DBLAF#		;CLEAR DOUBLE ARITHMETIC FLAG
  1958	032721	554 01 0 00 000012 		HLRZ	T,MB		;MOVE THE INSTRUCTION CODE TO RH OF T
  1959	032722	242 01 0 00 777767 		LSH	T,-^D9		;CLEAR AC,I,X
  1960	032723	200 02 0 00 000001 		MOVE	T1,T
  1961	032724	405 01 0 00 000077 		ANDI	T,77
  1962	032725	306 02 0 00 000777 		CAIN	T1,777
  1963	032726	254 00 0 00 033125 		JRST	MUOXT		;MONITOR UUO EXECUTE INST
  1964	032727	301 02 0 00 000700 		CAIL	T1,700
  1965	032730	254 00 0 00 032757 		JRST	CONN		;I/O INSTRUCTIONS
  1966	032731	301 02 0 00 000600 		CAIL	T1,600
  1967	032732	254 00 0 00 033070 		JRST	TTTST		;TEST INSTRUCTIONS
  1968	032733	301 02 0 00 000500 		CAIL	T1,500
  1969	032734	254 00 0 00 033056 		JRST	HTST		;HALF WORD INSTRUCTION
  1970	032735	301 02 0 00 000400 		CAIL	T1,400
  1971	032736	254 00 0 00 033046 		JRST	BOTST		;BOOLE INSTRUCTIONS
  1972	032737	301 02 0 00 000300 		CAIL	T1,300
  1973	032740	254 00 0 00 033036 		JRST	COMTST		;COMPARE INSTRUCTIONS
  1974	032741	301 02 0 00 000200 		CAIL	T1,200
  1975	032742	254 00 0 00 033000 		JRST	MOVTST		;MOVE INSTRUCTIONS
  1976	032743	301 02 0 00 000140 		CAIL	T1,140
  1977	032744	254 00 0 00 032761 		JRST	FLTTST		;FLOATING INSTRUCTIONS
  1978	032745	301 02 0 00 000130 		CAIL	T1,130
  1979	032746	254 00 0 00 032774 		JRST	BYTST		;BYTE INSTRUCTIONS
  1980	032747	301 02 0 00 000100 		CAIL	T1,100
  1981	032750	254 00 0 00 033111 		JRST	NEWTST		;NEW INSTRUCTIONS
  1982	032751	301 02 0 00 000040 		CAIL	T1,40
  1983	032752	254 00 0 00 033122 		JRST	MUOTST		;MONITOR UUO'S
  1984	032753	302 02 0 00 000000 		CAIE	T1,0
  1985	032754	254 00 0 00 033117 		JRST	UUOTST		;LOCAL UUO'S
  1986	032755	254 00 0 00 033122 		JRST	MUOTST		; 0 - ILLEGAL INSTRUCTION
  1987	032756	263 17 0 00 000000 	PTINS1:	POPJ	P,
  1988
  1989						IFDEF	SIMASB,<
  1990	032757	037 14 0 00 000004 	CONN:	ERRHLT
  1991	032760	254 00 0 00 030000 		JRST	BEGIN >
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 14
KIPNT	MAC	 9-JUN-76 13:30		SIMULATOR MACHINE REGISTER PRINT                                               *** SEQ 0084

  1992	032761	405 01 0 00 000037 	FLTTST:	ANDI	T,37		;FLOATING POINT
  1993	032762	241 01 0 00 777776 		ROT	T,-2
  1994	032763	201 00 0 01 033561 		MOVEI	0,TBLFLT(T)
  1995	032764	037 00 0 00 000000 		PNTA
  1996	032765	241 01 0 00 000002 		ROT	T,2
  1997	032766	405 01 0 00 000007 		ANDI	T,7
  1998	032767	200 03 0 01 033447 		MOVE	T2,FLTTAB(T)
  1999	032770	201 00 0 01 033647 		MOVEI	0,TBLAD1(T)
  2000	032771	037 00 0 00 000000 	INSOUT:	PNTA
  2001	032772	202 03 0 00 046223 		MOVEM	T2,PTINDX#
  2002	032773	263 17 0 00 000000 		POPJ	P,
  2003
  2004	032774	405 01 0 00 000007 	BYTST:	ANDI	T,7		;UFA,DFN,FSC,BYTE
  2005	032775	200 03 0 01 033457 		MOVE	T2,BYTTAB(T)
  2006	032776	201 00 0 01 033571 		MOVEI	0,TBLBYT(T)
  2007	032777	254 00 0 00 032771 		JRST	INSOUT
  2008
  2009	033000	405 01 0 00 000077 	MOVTST:	ANDI	T,77
  2010	033001	305 01 0 00 000070 		CAIGE	T,70
  2011	033002	305 01 0 00 000040 		CAIGE	T,40
  2012	033003	254 00 0 00 033007 		JRST	.+4		;MOVE,ADD,SUB,MUL,+ETC
  2013	033004	200 03 0 01 033427 		MOVE	T2,MOTAB-40(T)
  2014	033005	201 00 0 01 033557 		MOVEI	0,TBLMO-40(T)	;SHIFTS,PUSH,POP,+ETC
  2015	033006	254 00 0 00 032771 		JRST	INSOUT
  2016	033007	400 02 0 00 000000 		SETZ	T1,
  2017	033010	245 01 0 00 777776 		ROTC	T,-2
  2018	033011	301 01 0 00 000010 		CAIL	T,10
  2019	033012	275 01 0 00 000006 		SUBI	T,6		;ADD,SUB
  2020	033013	201 00 0 01 033601 		MOVEI	0,TBLMV(T)
  2021	033014	037 00 0 00 000000 		PNTA
  2022	033015	245 01 0 00 000002 		ROTC	T,2
  2023	033016	301 01 0 00 000020 		CAIL	T,20
  2024	033017	254 00 0 00 033024 		JRST	IMLTST
  2025	033020	405 01 0 00 000003 		ANDI	T,3
  2026	033021	200 03 0 01 033517 		MOVE	T2,MOVTAB(T)
  2027	033022	201 00 0 01 033613 		MOVEI	0,TBLMOV(T)
  2028	033023	254 00 0 00 032771 		JRST	INSOUT
  2029
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 15
KIPNT	MAC	 9-JUN-76 13:30		SIMULATOR MACHINE REGISTER PRINT                                               *** SEQ 0085

  2030	033024	301 01 0 00 000040 	IMLTST:	CAIL	T,40
  2031	033025	254 00 0 00 033032 		JRST	ADDTST
  2032	033026	405 01 0 00 000003 		ANDI	T,3		;IMUL,MUL,IDIV,DIV
  2033	033027	200 03 0 01 033523 		MOVE	T2,MULTAB(T)
  2034	033030	201 00 0 01 033653 		MOVEI	0,TBLAD1+4(T)
  2035	033031	254 00 0 00 032771 		JRST	INSOUT
  2036
  2037	033032	405 01 0 00 000003 	ADDTST:	ANDI	T,3		;ADD, SUB
  2038	033033	200 03 0 01 033453 		MOVE	T2,FLTTAB+4(T)
  2039	033034	201 00 0 01 033653 		MOVEI	0,TBLAD1+4(T)
  2040	033035	254 00 0 00 032771 		JRST	INSOUT
  2041
  2042	033036	241 01 0 00 777775 	COMTST:	ROT	T,-3		;MEM AND AC MOD AND TEST
  2043	033037	200 03 0 01 033527 		MOVE	T2,COMTAB(T)
  2044	033040	201 00 0 01 033657 		MOVEI	0,TBLCOM(T)
  2045	033041	037 00 0 00 000000 		PNTA
  2046	033042	241 01 0 00 000003 		ROT	T,3
  2047	033043	405 01 0 00 000007 		ANDI	T,7
  2048	033044	201 00 0 01 033667 		MOVEI	0,TBLCM(T)
  2049	033045	254 00 0 00 032771 		JRST	INSOUT
  2050
  2051	033046	241 01 0 00 777776 	BOTST:	ROT	T,-2		;BOOLE
  2052	033047	201 00 0 01 033677 		MOVEI	0,TBLBOL(T)
  2053	033050	037 00 0 00 000000 		PNTA
  2054	033051	241 01 0 00 000002 		ROT	T,2
  2055	033052	405 01 0 00 000003 		ANDI	T,3
  2056	033053	200 03 0 01 033453 		MOVE	T2,FLTTAB+4(T)
  2057	033054	201 00 0 01 033653 		MOVEI	0,TBLAD1+4(T)
  2058	033055	254 00 0 00 032771 		JRST	INSOUT
  2059
  2060	033056	201 00 0 00 033717 	HTST:	MOVEI	0,H.		;HALF WORD TRANSFERS
  2061	033057	037 00 0 00 000000 		PNTA
  2062	033060	241 01 0 00 777776 		ROT	T,-2
  2063	033061	201 00 0 01 033720 		MOVEI	0,TBLH(T)
  2064	033062	037 00 0 00 000000 		PNTA
  2065	033063	241 01 0 00 000002 		ROT	T,2
  2066	033064	405 01 0 00 000003 		ANDI	T,3
  2067	033065	200 03 0 01 033517 		MOVE	T2,MOVTAB(T)
  2068	033066	201 00 0 01 033613 		MOVEI	0,TBLMOV(T)
  2069	033067	254 00 0 00 032771 		JRST	INSOUT
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 16
KIPNT	MAC	 9-JUN-76 13:30		SIMULATOR MACHINE REGISTER PRINT                                               *** SEQ 0086

  2070	033070	201 00 0 00 033740 	TTTST:	MOVEI	0,T.		;TEST
  2071	033071	037 00 0 00 000000 		PNTA
  2072	033072	200 03 0 00 045224 		MOVE	T2,[XWD	16,1]
  2073	033073	602 01 0 00 000010 		TRNE	T,10
  2074	033074	200 03 0 00 045225 		MOVE	T2,[XWD	2,1]
  2075	033075	602 01 0 00 000001 		TRNE	T,1
  2076	033076	254 00 0 00 033106 		JRST	TTODD
  2077	033077	241 01 0 00 777775 		ROT	T,-3
  2078	033100	201 00 0 01 033741 		MOVEI	0,TBLTA(T)
  2079	033101	037 00 0 00 000000 	TTSTA:	PNTA
  2080	033102	241 01 0 00 000002 		ROT	T,2
  2081	033103	405 01 0 00 000003 		ANDI	T,3
  2082	033104	201 00 0 01 033751 		MOVEI	0,TBLTA1(T)
  2083	033105	254 00 0 00 032771 		JRST	INSOUT
  2084
  2085	033106	241 01 0 00 777775 	TTODD:	ROT	T,-3
  2086	033107	201 00 0 01 033755 		MOVEI	0,TBLTB(T)
  2087	033110	254 00 0 00 033101 		JRST	TTSTA
  2088
  2089						IFNDEF	SIMASB,<
  2090					CONN:	SETOM	CONNF
  2091						HLRZ	T,MB		;I/O
  2092						ROT	T,-5
  2093						ANDI	T,7
  2094						MOVE	T2,CONTAB(T)
  2095						MOVEI	0,TBLCON(T)
  2096						JRST	INSOUT >
  2097
  2098	033111	405 01 0 00 000017 	NEWTST:	ANDI	T,17		;DOUBLE, FIX, + ETC
  2099	033112	301 01 0 00 000010 		CAIL	T,10		;DOUBLE ARITHMETIC ?
  2100	033113	476 00 0 00 046111 		SETOM	DBLAF		;YES
  2101	033114	200 03 0 01 033537 		MOVE	T2,NEWTAB(T)
  2102	033115	201 00 0 01 033765 		MOVEI	0,TBLNEW(T)
  2103	033116	254 00 0 00 032771 		JRST	INSOUT
  2104
  2105	033117	200 03 0 00 033557 	UUOTST:	MOVE	T2,UUOTAB
  2106	033120	201 00 0 00 034005 		MOVEI	0,TBLUUO	;UUO'S
  2107	033121	254 00 0 00 032771 		JRST	INSOUT
  2108
  2109	033122	200 03 0 00 033557 	MUOTST:	MOVE	T2,UUOTAB
  2110	033123	201 00 0 00 034006 		MOVEI	0,TBLMUO	;MONITR UUO'S
  2111	033124	254 00 0 00 032771 		JRST	INSOUT
  2112
  2113	033125	200 03 0 00 033560 	MUOXT:	MOVE	T2,MUOTAB	;MUUO EXECUTE INST
  2114	033126	201 00 0 00 034007 		MOVEI	0,TBLMUX
  2115	033127	254 00 0 00 032771 		JRST	INSOUT
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 17
KIPNT	MAC	 9-JUN-76 13:30		SIMULATOR MACHINE REGISTER PRINT                                               *** SEQ 0087

  2116					;*INITIAL/FINAL AC,E PRINTOUT
  2117
  2118	033130	332 00 0 00 046076 	INTPNT:	SKIPE	BYF5
  2119	033131	254 00 0 00 033143 		JRST	IT12
  2120	033132	550 03 0 00 046037 		HRRZ	T2,AB		;GET E ADDRESS
  2121	033133	202 03 0 00 046253 		MOVEM	T2,SVAB1#
  2122	033134	402 00 0 00 046135 		SETZM	INIT1A#
  2123	033135	402 00 0 00 046137 		SETZM	INIT2A#
  2124	033136	402 00 0 00 046141 		SETZM	INIT3A#
  2125	033137	402 00 0 00 046143 		SETZM	INIT4A#
  2126	033140	554 03 0 00 046223 		HLRZ	T2,PTINDX	;GET PRINT INDEX, INITIAL
  2127	033141	260 17 1 03 033146 		GO	@SETLST(T2)	;SETUP INITIAL CONDITIONS
  2128	033142	263 17 0 00 000000 		POPJ	P,
  2129
  2130	033143	550 04 0 00 046037 	IT12:	HRRZ	T3,AB		;PICKUP C(C(E))
  2131	033144	202 04 0 00 046254 		MOVEM	T3,SVAB2#
  2132	033145	254 00 0 00 033340 		JRST	CCE+1
  2133
  2134	033146	000000	033167		SETLST:	INDX0
  2135	033147	000000	033170			INDX1
  2136	033150	000000	033172			INDX2
  2137	033151	000000	033175			INDX3
  2138	033152	000000	033200			INDX4
  2139	033153	000000	033204			INDX5
  2140	033154	000000	033207			INDX6
  2141	033155	000000	033212			INDX7
  2142	033156	000000	033216			INDX10
  2143	033157	000000	033223			INDX11
  2144	033160	000000	033225			INDX12
  2145	033161	000000	033230			INDX13
  2146	033162	000000	033234			INDX14
  2147	033163	000000	033240			INDX15
  2148	033164	000000	033243			INDX16
  2149	033165	000000	033246			INDX17
  2150	033166	000000	033252			INDX20
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 18
KIPNT	MAC	 9-JUN-76 13:30		SIMULATOR MACHINE REGISTER PRINT                                               *** SEQ 0088

  2151	033167	263 17 0 00 000000 	INDX0:	POPJ	P,		;DON'T PRINT
  2152
  2153	033170	260 17 0 00 033254 	INDX1:	GO	CAC		;PRINT C(AC)
  2154	033171	263 17 0 00 000000 		POPJ	P,
  2155
  2156	033172	260 17 0 00 033254 	INDX2:	GO	CAC		;PRINT C(AC)
  2157	033173	260 17 0 00 033323 		GO	CE		;PRINT C(E)
  2158	033174	263 17 0 00 000000 		POPJ	P,
  2159
  2160	033175	260 17 0 00 033254 	INDX3:	GO	CAC		;PRINT C(AC)
  2161	033176	260 17 0 00 033262 		GO	CAC1		;PRINT C(AC+1)
  2162	033177	263 17 0 00 000000 		POPJ	P,
  2163
  2164	033200	260 17 0 00 033254 	INDX4:	GO	CAC		;PRINT C(AC)
  2165	033201	260 17 0 00 033262 		GO	CAC1		;PRINT C(AC+1)
  2166	033202	260 17 0 00 033323 		GO	CE		;PRINT C(E)
  2167	033203	263 17 0 00 000000 		POPJ	P,
  2168
  2169	033204	260 17 0 00 033254 	INDX5:	GO	CAC		;PRINT C(AC)
  2170	033205	260 17 0 00 033271 		GO	CACR		;PRINT C(C(ACR))
  2171	033206	263 17 0 00 000000 		POPJ	P,
  2172
  2173	033207	260 17 0 00 033254 	INDX6:	GO	CAC		;PRINT C(AC)
  2174	033210	260 17 0 00 033300 		GO	CACR1		;PRINT	C(C(ACR+1))
  2175	033211	263 17 0 00 000000 		POPJ	P,
  2176
  2177	033212	260 17 0 00 033254 	INDX7:	GO	CAC		;PRINT C(AC)
  2178	033213	260 17 0 00 033323 		GO	CE		;PRINT C(E)
  2179	033214	260 17 0 00 033337 		GO	CCE		;PRINT C(C(E))
  2180	033215	263 17 0 00 000000 		POPJ	P,
  2181
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 19
KIPNT	MAC	 9-JUN-76 13:30		SIMULATOR MACHINE REGISTER PRINT                                               *** SEQ 0089

  2182	033216	260 17 0 00 033254 	INDX10:	GO	CAC		;PRINT C(AC)
  2183	033217	260 17 0 00 033262 		GO	CAC1		;PRINT C(AC+1)
  2184	033220	260 17 0 00 033323 		GO	CE		;PRINT C(E)
  2185	033221	260 17 0 00 033332 		GO	CE1		;PRINT C(E+1)
  2186	033222	263 17 0 00 000000 		POPJ	P,
  2187
  2188	033223	260 17 0 00 033323 	INDX11:	GO	CE		;PRINT C(E)
  2189	033224	263 17 0 00 000000 		POPJ	P,
  2190
  2191	033225	260 17 0 00 033323 	INDX12:	GO	CE		;PRINT C(E)
  2192	033226	260 17 0 00 033332 		GO	CE1		;PRINT C(E+1)
  2193	033227	263 17 0 00 000000 		POPJ	P,
  2194
  2195	033230	260 17 0 00 033254 	INDX13:	GO	CAC		;PRINT C(AC)
  2196	033231	260 17 0 00 033271 		GO	CACR		;PRINT C(C(ACR))
  2197	033232	260 17 0 00 033323 		GO	CE		;PRINT C(E)
  2198	033233	263 17 0 00 000000 		POPJ	P,
  2199
  2200	033234	260 17 0 00 033254 	INDX14:	GO	CAC		;PRINT C(AC)
  2201	033235	260 17 0 00 033300 		GO	CACR1		;PRINT C(C(ACR+1))
  2202	033236	260 17 0 00 033323 		GO	CE		;PRINT C(E)
  2203	033237	263 17 0 00 000000 		POPJ	P,
  2204
  2205	033240	260 17 0 00 033254 	INDX15:	GO	CAC		;PRINT C(AC)
  2206	033241	260 17 0 00 033307 		GO	CACL		;PRINT C(C(ACL))
  2207	033242	263 17 0 00 000000 		POPJ	P,
  2208
  2209	033243	260 17 0 00 033254 	INDX16:	GO	CAC		;PRINT C(AC)
  2210	033244	260 17 0 00 033316 		GO	E		;PRINT E
  2211	033245	263 17 0 00 000000 		POPJ	P,
  2212
  2213	033246	260 17 0 00 033254 	INDX17:	GO	CAC		;PRINT C(AC)
  2214	033247	260 17 0 00 033262 		GO	CAC1		;PRINT C(AC+1)
  2215	033250	260 17 0 00 033316 		GO	E		;PRINT E
  2216	033251	263 17 0 00 000000 		POPJ	P,
  2217
  2218	033252	260 17 0 00 033316 	INDX20:	GO	E		;PRINT E
  2219	033253	263 17 0 00 000000 		POPJ	P,
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 20
KIPNT	MAC	 9-JUN-76 13:30		SIMULATOR MACHINE REGISTER PRINT                                               *** SEQ 0090

  2220	033254	200 04 0 00 046255 	CAC:	MOVE	T3,SVAC
  2221	033255	200 00 0 04 032173 		MOVE	0,ACS(T3)
  2222	033256	202 00 0 00 046134 		MOVEM	0,INIT1#
  2223	033257	201 00 0 00 045226 		MOVEI	[ASCIZ/C(AC)=/]
  2224	033260	202 00 0 00 046135 		MOVEM	INIT1A
  2225	033261	263 17 0 00 000000 		POPJ	P,
  2226
  2227	033262	271 04 0 00 000001 	CAC1:	ADDI	T3,1
  2228	033263	405 04 0 00 000017 		ANDI	T3,17
  2229	033264	200 00 0 04 032173 		MOVE	0,ACS(T3)
  2230	033265	202 00 0 00 046136 		MOVEM	0,INIT2#
  2231	033266	201 00 0 00 045230 		MOVEI	[ASCIZ/C(AC+1)=/]
  2232	033267	202 00 0 00 046137 		MOVEM	INIT2A
  2233	033270	263 17 0 00 000000 		POPJ	P,
  2234
  2235	033271	550 04 0 00 046134 	CACR:	HRRZ	T3,INIT1
  2236	033272	260 17 0 00 033350 		GO	CADR
  2237	033273	200 00 0 04 000000 		MOVE	0,0(T3)
  2238	033274	202 00 0 00 046136 		MOVEM	0,INIT2
  2239	033275	201 00 0 00 045232 		MOVEI	[ASCIZ/C(C(ACR))=/]
  2240	033276	202 00 0 00 046137 		MOVEM	INIT2A
  2241	033277	263 17 0 00 000000 		POPJ	P,
  2242
  2243	033300	550 04 0 00 046134 	CACR1:	HRRZ	T3,INIT1
  2244	033301	260 17 0 00 033350 		GO	CADR
  2245	033302	200 00 0 04 000001 		MOVE	0,1(T3)
  2246	033303	202 00 0 00 046136 		MOVEM	0,INIT2
  2247	033304	201 00 0 00 045235 		MOVEI	[ASCIZ/C(C(ACR+1))=/]
  2248	033305	202 00 0 00 046137 		MOVEM	INIT2A
  2249	033306	263 17 0 00 000000 		POPJ	P,
  2250
  2251	033307	554 04 0 00 046134 	CACL:	HLRZ	T3,INIT1
  2252	033310	260 17 0 00 033350 		GO	CADR
  2253	033311	200 00 0 04 000000 		MOVE	0,0(T3)
  2254	033312	202 00 0 00 046136 		MOVEM	0,INIT2
  2255	033313	201 00 0 00 045240 		MOVEI	[ASCIZ/C(C(ACL))=/]
  2256	033314	202 00 0 00 046137 		MOVEM	INIT2A
  2257	033315	263 17 0 00 000000 		POPJ	P,
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 21
KIPNT	MAC	 9-JUN-76 13:30		SIMULATOR MACHINE REGISTER PRINT                                               *** SEQ 0091

  2258	033316	200 00 0 00 046253 	E:	MOVE	0,SVAB1
  2259	033317	202 00 0 00 046140 		MOVEM	0,INIT3
  2260	033320	201 00 0 00 045243 		MOVEI	[ASCIZ/E    =/]
  2261	033321	202 00 0 00 046141 		MOVEM	INIT3A
  2262	033322	263 17 0 00 000000 		POPJ	P,
  2263
  2264	033323	200 04 0 00 046253 	CE:	MOVE	T3,SVAB1
  2265	033324	260 17 0 00 033350 		GO	CADR
  2266	033325	200 00 0 04 000000 		MOVE	0,0(T3)
  2267	033326	202 00 0 00 046140 		MOVEM	0,INIT3#
  2268	033327	201 00 0 00 045245 		MOVEI	[ASCIZ/C(E) =/]
  2269	033330	202 00 0 00 046141 		MOVEM	INIT3A
  2270	033331	263 17 0 00 000000 		POPJ	P,
  2271
  2272	033332	200 00 0 04 000001 	CE1:	MOVE	0,1(T3)
  2273	033333	202 00 0 00 046142 		MOVEM	0,INIT4#
  2274	033334	201 00 0 00 045247 		MOVEI	[ASCIZ/C(E+1) =/]
  2275	033335	202 00 0 00 046143 		MOVEM	INIT4A
  2276	033336	263 17 0 00 000000 		POPJ	P,
  2277
  2278	033337	550 04 0 00 046254 	CCE:	HRRZ	T3,SVAB2
  2279	033340	311 04 0 00 032053 		CAML	T3,VMEM
  2280	033341	263 17 0 00 000000 		POPJ	P,
  2281	033342	260 17 0 00 033350 		GO	CADR
  2282	033343	200 00 0 04 000000 		MOVE	0,0(T3)
  2283	033344	202 00 0 00 046142 		MOVEM	0,INIT4
  2284	033345	201 00 0 00 045251 		MOVEI	[ASCIZ/C(C(E))=/]
  2285	033346	202 00 0 00 046143 		MOVEM	INIT4A
  2286	033347	263 17 0 00 000000 		POPJ	P,
  2287
  2288	033350	307 04 0 00 000017 	CADR:	CAIG	T3,17		;IF GREATER THAN 17
  2289	033351	254 00 0 00 033354 		JRST	.+3
  2290	033352	271 04 0 00 000000 		ADDI	T3,OFFSET	;ADD IN OFFSET, PROG IN HIGH SEGMENT
  2291	033353	263 17 0 00 000000 		RTN
  2292	033354	271 04 0 00 032173 		ADDI	T3,ACS		;IF NOT, POINT TO SIM AC'S
  2293	033355	263 17 0 00 000000 		RTN
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 22
KIPNT	MAC	 9-JUN-76 13:30		SIMULATOR MACHINE REGISTER PRINT                                               *** SEQ 0092

  2294	033356	037 10 0 00 000002 	INTFNL:	SWITCH
  2295	033357	602 00 0 00 000000 		TRNE	INHIF		;INHIBIT INITIAL/FINAL RESULTS ?
  2296	033360	263 17 0 00 000000 		POPJ	P,		;YES
  2297						MOVEI	[ASCIZ?
  2298	033361	201 00 0 00 045253 	FLAGS - INT/FINAL   ?]
  2299	033362	037 17 0 00 000000 		PNTAL
  2300	033363	200 00 0 00 046272 		MOVE	0,SVPC1
  2301	033364	544 00 0 00 000013 		HLR	0,PC
  2302	033365	037 13 0 00 000000 		PNTHW
  2303	033366	201 00 0 00 030242 		MOVEI	CRLF
  2304	033367	037 00 0 00 000000 		PNTA
  2305					INTFN1:	MOVEI	[ASCIZ/INITIAL
  2306	033370	201 00 0 00 045260 	/]
  2307	033371	037 17 0 00 000000 		PNTAL
  2308	033372	476 00 0 00 030223 		SETOM	PNTSPC		;SET PRINT SPACE AFTER OCTALS CONTROL
  2309	033373	260 17 0 00 033411 		GO	IFPNT		;PRINT INITIAL CONDITIONS
  2310	033374	402 00 0 00 046135 		SETZM	INIT1A
  2311	033375	402 00 0 00 046137 		SETZM	INIT2A
  2312	033376	402 00 0 00 046141 		SETZM	INIT3A
  2313	033377	402 00 0 00 046143 		SETZM	INIT4A
  2314	033400	550 03 0 00 046223 		HRRZ	T2,PTINDX	;GET PRINT INDEX, FINAL
  2315	033401	322 03 0 00 033406 		JUMPE	T2,INTFN2	;IF ZERO, NO FINAL
  2316						MOVEI	[ASCIZ/
  2317					FINAL
  2318	033402	201 00 0 00 045262 	/]
  2319	033403	037 17 0 00 000000 		PNTAL
  2320	033404	260 17 1 03 033146 		GO	@SETLST(T2)	;SETUP FINAL CONDITIONS
  2321	033405	260 17 0 00 033411 		GO	IFPNT		;PRINT
  2322	033406				INTFN2:	MOVEI	[ASCIZ/
  2323					----------
  2324	033406	201 00 0 00 045116 	/]
  2325	033407	037 17 0 00 000000 		PNTAL
  2326	033410	263 17 0 00 000000 		POPJ	P,
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 23
KIPNT	MAC	 9-JUN-76 13:30		SIMULATOR MACHINE REGISTER PRINT                                               *** SEQ 0093

  2327	033411	336 00 0 00 046135 	IFPNT:	SKIPN	INIT1A
  2328	033412	254 00 0 00 033417 		JRST	.+5
  2329	033413	200 00 0 00 046135 		MOVE	INIT1A
  2330	033414	037 17 0 00 000000 		PNTAL
  2331	033415	200 00 0 00 046134 		MOVE	INIT1
  2332	033416	037 13 0 00 000000 		PNTHW			;PRINT C(AC)
  2333	033417	336 00 0 00 046137 		SKIPN	INIT2A
  2334	033420	254 00 0 00 033425 		JRST	.+5
  2335	033421	200 00 0 00 046137 		MOVE	INIT2A
  2336	033422	037 17 0 00 000000 		PNTAL
  2337	033423	200 00 0 00 046136 		MOVE	INIT2
  2338	033424	037 13 0 00 000000 		PNTHW			;PRINT C(AC+1), C(C(ACR)), C(C(ACR+1)), C(C(ACL))
  2339	033425	200 00 0 00 030046 		MOVE	0,CONSW
  2340	033426	603 00 0 00 020000 		TLNE	PNTLPT
  2341	033427	254 00 0 00 033432 		JRST	.+3
  2342	033430	201 00 0 00 030242 		MOVEI	CRLF
  2343	033431	037 00 0 00 000000 		PNTA
  2344	033432	336 00 0 00 046141 		SKIPN	INIT3A
  2345	033433	254 00 0 00 033440 		JRST	.+5
  2346	033434	200 00 0 00 046141 		MOVE	INIT3A
  2347	033435	037 17 0 00 000000 		PNTAL
  2348	033436	200 00 0 00 046140 		MOVE	INIT3
  2349	033437	037 13 0 00 000000 		PNTHW			;PRINT C(E), E
  2350	033440	336 00 0 00 046143 		SKIPN	INIT4A
  2351	033441	254 00 0 00 033446 		JRST	.+5
  2352	033442	200 00 0 00 046143 		MOVE	INIT4A
  2353	033443	037 17 0 00 000000 		PNTAL
  2354	033444	200 00 0 00 046142 		MOVE	INIT4
  2355	033445	037 13 0 00 000000 		PNTHW			;PRINT C(E+1), C(C(E))
  2356	033446	263 17 0 00 000000 		RTN
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 24
KIPNT	MAC	 9-JUN-76 13:30		SIMULATOR MACHINE REGISTER PRINT                                               *** SEQ 0094

  2357					;*THE INDEX NUMBERS IN THE FOLLOWING TABLE
  2358					;*INFORM THE PROGRAM WHICH REGISTERS TO PRINT
  2359					;*THE NUMBERS HAVE THE FOLLOWING SIGNIFICANCE.
  2360
  2361					;*INDEX	REGISTERS
  2362					;*0	NONE
  2363					;*1	C(AC)
  2364					;*2	C(AC)			C(E)
  2365					;*3	C(AC)	C(AC+1)
  2366					;*4	C(AC)	C(AC+1)		C(E)
  2367					;*5	C(AC)	C(C(ACR))
  2368					;*6	C(AC)	C(C(ACR+1))
  2369					;*7	C(AC)			C(E)	C(C(E))
  2370					;*10	C(AC)	C(AC+1)		C(E)	C(E+1)
  2371					;*11				C(E)
  2372					;*12				C(E)	C(E+1)
  2373					;*13	C(AC)	C(C(ACR))	C(E)
  2374					;*14	C(AC)	C(C(ACR+1))	C(E)
  2375					;*15	C(AC)	C(C(ACL))
  2376					;*16	C(AC)						E
  2377					;*17	C(AC)	C(AC+1)					E
  2378					;*20							E
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 25
KIPNT	MAC	 9-JUN-76 13:30		SIMULATOR MACHINE REGISTER PRINT                                               *** SEQ 0095

  2379	033447	000002	000001		FLTTAB:	XWD	2,1		;FAD
  2380	033450	000004	000003			XWD	4,3		;FADL
  2381	033451	000002	000011			XWD	2,11		;FADM
  2382	033452	000002	000002			XWD	2,2		;FADB
  2383	033453	000002	000001			XWD	2,1		; -
  2384	033454	000016	000001			XWD	16,1		; I
  2385	033455	000002	000011			XWD	2,11		; M
  2386	033456	000002	000002			XWD	2,2		; B
  2387
  2388	033457	000004	000004		BYTTAB:	XWD	4,4		;UFA
  2389	033460	000002	000002			XWD	2,2		;DFN
  2390	033461	000016	000001			XWD	16,1		;FSC
  2391	033462	000011	000011			XWD	11,11		;BYTES
  2392	033463	000007	000007			XWD	7,7
  2393	033464	000007	000007			XWD	7,7
  2394	033465	000007	000007			XWD	7,7
  2395	033466	000007	000007			XWD	7,7
  2396
  2397	033467	000016	000001		MOTAB:	XWD	16,1		;ASH
  2398	033470	000016	000001			XWD	16,1		;ROT
  2399	033471	000016	000001			XWD	16,1		;LSH
  2400	033472	000003	000003			XWD	3,3		;JFFO
  2401	033473	000017	000003			XWD	17,3		;ASHC
  2402	033474	000017	000003			XWD	17,3		;ROTC
  2403	033475	000017	000003			XWD	17,3		;LSHC
  2404	033476	000000	000000			XWD	0,0		;ERR
  2405	033477	000002	000002			XWD	2,2		;EXCH
  2406	033500	000016	000001			XWD	16,1		;BLT
  2407	033501	000016	000001			XWD	16,1		;AOBJP
  2408	033502	000016	000001			XWD	16,1		;AOBJN
  2409	033503	000020	000000			XWD	20,0		;JRST
  2410	033504	000020	000000			XWD	20,0		;JFCL
  2411	033505	000020	000011			XWD	20,11		;XCT
  2412	033506	000016	000001			XWD	16,1		;MAP
  2413	033507	000006	000005			XWD	6,5		;PUSHJ
  2414	033510	000014	000005			XWD	14,5		;PUSH
  2415	033511	000013	000002			XWD	13,2		;POP
  2416	033512	000005	000001			XWD	5,1		;POPJ
  2417	033513	000011	000011			XWD	11,11		;JSR
  2418	033514	000016	000001			XWD	16,1		;JSP
  2419	033515	000002	000002			XWD	2,2		;JSA
  2420	033516	000015	000001			XWD	15,1		;JRA
  2421
  2422	033517	000002	000001		MOVTAB:	XWD	2,1		; -
  2423	033520	000016	000001			XWD	16,1		; I
  2424	033521	000002	000011			XWD	2,11		; M
  2425	033522	000002	000002			XWD	2,2		; S
  2426
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 26
KIPNT	MAC	 9-JUN-76 13:30		SIMULATOR MACHINE REGISTER PRINT                                               *** SEQ 0096

  2427	033523	000004	000003		MULTAB:	XWD	4,3		; -
  2428	033524	000017	000003			XWD	17,3		; I
  2429	033525	000004	000011			XWD	4,11		; M
  2430	033526	000004	000004			XWD	4,4		; B
  2431
  2432	033527	000016	000000		COMTAB:	XWD	16,0		;CAI
  2433	033530	000002	000000			XWD	2,0		;CAM
  2434	033531	000016	000000			XWD	16,0		;JUMP
  2435	033532	000002	000001			XWD	2,1		;SKIP
  2436	033533	000016	000001			XWD	16,1		;AOJ
  2437	033534	000002	000002			XWD	2,2		;AOS
  2438	033535	000016	000001			XWD	16,1		;SOJ
  2439	033536	000002	000002			XWD	2,2		;SOS
  2440
  2441	033537	000010	000003		NEWTAB:	XWD	10,3		;DMOVE
  2442	033540	000010	000003			XWD	10,3		;DMOVN
  2443	033541	000002	000001			XWD	2,1		;FIX
  2444	033542	000000	000000			0
  2445	033543	000010	000012			XWD	10,12		;DMOVM
  2446	033544	000010	000012			XWD	10,12		;DMNNM
  2447	033545	000002	000001			XWD	2,1		;FIXR
  2448	033546	000002	000001			XWD	2,1		;FLTR
  2449	033547	000010	000003			XWD	10,3		;DFAD
  2450	033550	000010	000003			XWD	10,3		;DFSB
  2451	033551	000010	000003			XWD	10,3		;DFMP
  2452	033552	000010	000003			XWD	10,3		;DFDV
  2453	033553	000000	000000			0
  2454	033554	000000	000000			0
  2455	033555	000000	000000			0
  2456	033556	000000	000000			0
  2457
  2458	033557	000020	000000		UUOTAB:	XWD	20,0		;LUUO
  2459
  2460	033560	000012	000012		MUOTAB:	XWD	12,12		;MUUO EXECUTION
  2461						IFNDEF	SIMASB,<
  2462					CONTAB:	XWD	7,7		;BLKI
  2463						XWD	11,11		;DATAI
  2464						XWD	7,7		;BLKO
  2465						XWD	11,0		;DATAO
  2466						XWD	20,0		;CONO
  2467						XWD	11,11		;CONI
  2468						XWD	20,0		;CONSZ
  2469						XWD	20,0		;CONSO
  2470					>
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 27
KIPNT	MAC	 9-JUN-76 13:30		SIMULATOR MACHINE REGISTER PRINT                                               *** SEQ 0097

  2471					;*SIMULATOR SYMBOL TABLE
  2472
  2473					DEFINE	INX	(A)<
  2474						ASCII /A/>
  2475
  2476	033561				TBLFLT:	INX	FAD^;	;140
  2477	033561	106 101 104 000 000 		ASCII /FAD/
  2478						INX	FADR^;	;144
  2479	033562	106 101 104 122 000 		ASCII /FADR/
  2480						INX	FSB^;	;150
  2481	033563	106 123 102 000 000 		ASCII /FSB/
  2482						INX	FSBR^;	;154
  2483	033564	106 123 102 122 000 		ASCII /FSBR/
  2484						INX	FMP^;	;160
  2485	033565	106 115 120 000 000 		ASCII /FMP/
  2486						INX	FMPR^;	;164
  2487	033566	106 115 120 122 000 		ASCII /FMPR/
  2488						INX	FDV^;	;170
  2489	033567	106 104 126 000 000 		ASCII /FDV/
  2490						INX	FDVR^;	;174
  2491	033570	106 104 126 122 000 		ASCII /FDVR/
  2492
  2493	033571				TBLBYT:	INX	UFA^;	;130
  2494	033571	125 106 101 000 000 		ASCII /UFA/
  2495						INX	DFN^;	;131
  2496	033572	104 106 116 000 000 		ASCII /DFN/
  2497						INX	FSC^;	;132
  2498	033573	106 123 103 000 000 		ASCII /FSC/
  2499						INX	IBP^;	;133
  2500	033574	111 102 120 000 000 		ASCII /IBP/
  2501						INX	ILDB^;	;134
  2502	033575	111 114 104 102 000 		ASCII /ILDB/
  2503						INX	LDB^;	;135
  2504	033576	114 104 102 000 000 		ASCII /LDB/
  2505						INX	IDPB^;	;136
  2506	033577	111 104 120 102 000 		ASCII /IDPB/
  2507						INX	DPB^;	;137
  2508	033600	104 120 102 000 000 		ASCII /DPB/
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 28
KIPNT	MAC	 9-JUN-76 13:30		SIMULATOR MACHINE REGISTER PRINT                                               *** SEQ 0098

  2509	033601				TBLMV:	INX	MOVE^;	;200
  2510	033601	115 117 126 105 000 		ASCII /MOVE/
  2511						INX	MOVS^;	;204
  2512	033602	115 117 126 123 000 		ASCII /MOVS/
  2513						INX	MOVN^;	;210
  2514	033603	115 117 126 116 000 		ASCII /MOVN/
  2515						INX	MOVM^;	;214
  2516	033604	115 117 126 115 000 		ASCII /MOVM/
  2517						INX	IMUL^;	;220
  2518	033605	111 115 125 114 000 		ASCII /IMUL/
  2519						INX	MUL^;	;224
  2520	033606	115 125 114 000 000 		ASCII /MUL/
  2521						INX	IDIV^;	;230
  2522	033607	111 104 111 126 000 		ASCII /IDIV/
  2523						INX	DIV^;	;234
  2524	033610	104 111 126 000 000 		ASCII /DIV/
  2525						INX	ADD^;	;270
  2526	033611	101 104 104 000 000 		ASCII /ADD/
  2527						INX	SUB^;	;274
  2528	033612	123 125 102 000 000 		ASCII /SUB/
  2529
  2530	033613	040 000 000 000 000 	TBLMOV:	ASCII / /	;0,4
  2531						INX	I^;	;1,5
  2532	033614	111 000 000 000 000 		ASCII /I/
  2533						INX	M^;	;2,6
  2534	033615	115 000 000 000 000 		ASCII /M/
  2535						INX	S^;	;3,7
  2536	033616	123 000 000 000 000 		ASCII /S/
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 29
KIPNT	MAC	 9-JUN-76 13:30		SIMULATOR MACHINE REGISTER PRINT                                               *** SEQ 0099

  2537	033617				TBLMO:	INX	ASH^;	;240
  2538	033617	101 123 110 000 000 		ASCII /ASH/
  2539						INX	ROT^;	;241
  2540	033620	122 117 124 000 000 		ASCII /ROT/
  2541						INX	LSH^;	;242
  2542	033621	114 123 110 000 000 		ASCII /LSH/
  2543						INX	JFFO^;	;243
  2544	033622	112 106 106 117 000 		ASCII /JFFO/
  2545						INX	ASHC^;	;244
  2546	033623	101 123 110 103 000 		ASCII /ASHC/
  2547						INX	ROTC^;	;245
  2548	033624	122 117 124 103 000 		ASCII /ROTC/
  2549						INX	LSHC^;	;246
  2550	033625	114 123 110 103 000 		ASCII /LSHC/
  2551
  2552						INX	ERR^;	;247
  2553	033626	105 122 122 000 000 		ASCII /ERR/
  2554						INX	EXCH^;	;250
  2555	033627	105 130 103 110 000 		ASCII /EXCH/
  2556						INX	BLT^;	;251
  2557	033630	102 114 124 000 000 		ASCII /BLT/
  2558						INX	AOBJP^;	;252
  2559	033631	101 117 102 112 120 		ASCII /AOBJP/
  2560						INX	AOBJN^;	;253
  2561	033632	101 117 102 112 116 		ASCII /AOBJN/
  2562						INX	JRST^;	;254
  2563	033633	112 122 123 124 000 		ASCII /JRST/
  2564						INX	JFCL^;	;255
  2565	033634	112 106 103 114 000 		ASCII /JFCL/
  2566						INX	XCT^;	;256
  2567	033635	130 103 124 000 000 		ASCII /XCT/
  2568						INX	MAP^;	;257
  2569	033636	115 101 120 000 000 		ASCII /MAP/
  2570						INX	PUSHJ^;	;260
  2571	033637	120 125 123 110 112 		ASCII /PUSHJ/
  2572						INX	PUSH^;	;261
  2573	033640	120 125 123 110 000 		ASCII /PUSH/
  2574						INX	POP^;	;262
  2575	033641	120 117 120 000 000 		ASCII /POP/
  2576						INX	POPJ^;	;263
  2577	033642	120 117 120 112 000 		ASCII /POPJ/
  2578						INX	JSR^;	;264
  2579	033643	112 123 122 000 000 		ASCII /JSR/
  2580						INX	JSP^;	;265
  2581	033644	112 123 120 000 000 		ASCII /JSP/
  2582						INX	JSA^;	;266
  2583	033645	112 123 101 000 000 		ASCII /JSA/
  2584						INX	JRA^;	;267
  2585	033646	112 122 101 000 000 		ASCII /JRA/
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 30
KIPNT	MAC	 9-JUN-76 13:30		SIMULATOR MACHINE REGISTER PRINT                                               *** SEQ 0100

  2586	033647	040 000 000 000 000 	TBLAD1:	ASCII / /	;0
  2587						INX	L^;	;1
  2588	033650	114 000 000 000 000 		ASCII /L/
  2589						INX	M^;	;2
  2590	033651	115 000 000 000 000 		ASCII /M/
  2591						INX	B^;	;3
  2592	033652	102 000 000 000 000 		ASCII /B/
  2593	033653	040 000 000 000 000 		ASCII / /	;0,4
  2594						INX	I^;	;1,5
  2595	033654	111 000 000 000 000 		ASCII /I/
  2596						INX	M^;	;2,6
  2597	033655	115 000 000 000 000 		ASCII /M/
  2598						INX	B^;	;3,7
  2599	033656	102 000 000 000 000 		ASCII /B/
  2600
  2601	033657				TBLCOM:	INX	CAI^;	;300
  2602	033657	103 101 111 000 000 		ASCII /CAI/
  2603						INX	CAM^;	;310
  2604	033660	103 101 115 000 000 		ASCII /CAM/
  2605						INX	JUMP^;	;320
  2606	033661	112 125 115 120 000 		ASCII /JUMP/
  2607						INX	SKIP^;	;330
  2608	033662	123 113 111 120 000 		ASCII /SKIP/
  2609						INX	AOJ^;	;340
  2610	033663	101 117 112 000 000 		ASCII /AOJ/
  2611						INX	AOS^;	;350
  2612	033664	101 117 123 000 000 		ASCII /AOS/
  2613						INX	SOJ^;	;360
  2614	033665	123 117 112 000 000 		ASCII /SOJ/
  2615						INX	SOS^;	;370
  2616	033666	123 117 123 000 000 		ASCII /SOS/
  2617
  2618	033667	040 000 000 000 000 	TBLCM:	ASCII / /	;0
  2619						INX	L^;	;1
  2620	033670	114 000 000 000 000 		ASCII /L/
  2621						INX	E^;	;1
  2622	033671	105 000 000 000 000 		ASCII /E/
  2623						INX	LE^;	;3
  2624	033672	114 105 000 000 000 		ASCII /LE/
  2625						INX	A^;	;4
  2626	033673	101 000 000 000 000 		ASCII /A/
  2627						INX	GE^;	;5
  2628	033674	107 105 000 000 000 		ASCII /GE/
  2629						INX	N^;	;6
  2630	033675	116 000 000 000 000 		ASCII /N/
  2631						INX	G^;	;7
  2632	033676	107 000 000 000 000 		ASCII /G/
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 31
KIPNT	MAC	 9-JUN-76 13:30		SIMULATOR MACHINE REGISTER PRINT                                               *** SEQ 0101

  2633	033677				TBLBOL:	INX	SETZ^;	;400
  2634	033677	123 105 124 132 000 		ASCII /SETZ/
  2635						INX	AND^;	;404
  2636	033700	101 116 104 000 000 		ASCII /AND/
  2637						INX	ANDCA^;	;410
  2638	033701	101 116 104 103 101 		ASCII /ANDCA/
  2639						INX	SETM^;	;414
  2640	033702	123 105 124 115 000 		ASCII /SETM/
  2641						INX	ANDCM^;	;420
  2642	033703	101 116 104 103 115 		ASCII /ANDCM/
  2643						INX	SETA^;	;424
  2644	033704	123 105 124 101 000 		ASCII /SETA/
  2645						INX	XOR^;	;430
  2646	033705	130 117 122 000 000 		ASCII /XOR/
  2647						INX	IOR^;	;434
  2648	033706	111 117 122 000 000 		ASCII /IOR/
  2649						INX	ANDCB^;	;440
  2650	033707	101 116 104 103 102 		ASCII /ANDCB/
  2651						INX	EQV^;	;444
  2652	033710	105 121 126 000 000 		ASCII /EQV/
  2653						INX	SETCA^;	;450
  2654	033711	123 105 124 103 101 		ASCII /SETCA/
  2655						INX	ORCA^;	;454
  2656	033712	117 122 103 101 000 		ASCII /ORCA/
  2657						INX	SETCM^;	;460
  2658	033713	123 105 124 103 115 		ASCII /SETCM/
  2659						INX	ORCM^;	;464
  2660	033714	117 122 103 115 000 		ASCII /ORCM/
  2661						INX	ORCB^;	;470
  2662	033715	117 122 103 102 000 		ASCII /ORCB/
  2663						INX	SETO^;	;474
  2664	033716	123 105 124 117 000 		ASCII /SETO/
  2665
  2666	033717				H.:	INX	H^;	;5XX
  2667	033717	110 000 000 000 000 		ASCII /H/
  2668	033720				TBLH:	INX	LL^;	;500
  2669	033720	114 114 000 000 000 		ASCII /LL/
  2670						INX	RL^;	;504
  2671	033721	122 114 000 000 000 		ASCII /RL/
  2672						INX	LLZ^;	;510
  2673	033722	114 114 132 000 000 		ASCII /LLZ/
  2674						INX	RLZ^;	;514
  2675	033723	122 114 132 000 000 		ASCII /RLZ/
  2676						INX	LLO^;	;520
  2677	033724	114 114 117 000 000 		ASCII /LLO/
  2678						INX	RLO^;	;524
  2679	033725	122 114 117 000 000 		ASCII /RLO/
  2680						INX	LLE^;	;530
  2681	033726	114 114 105 000 000 		ASCII /LLE/
  2682						INX	RLE^;	;534
  2683	033727	122 114 105 000 000 		ASCII /RLE/
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 32
KIPNT	MAC	 9-JUN-76 13:30		SIMULATOR MACHINE REGISTER PRINT                                               *** SEQ 0102

  2684						INX	RR^;	;540
  2685	033730	122 122 000 000 000 		ASCII /RR/
  2686						INX	LR^;	;544
  2687	033731	114 122 000 000 000 		ASCII /LR/
  2688						INX	RRZ^;	;550
  2689	033732	122 122 132 000 000 		ASCII /RRZ/
  2690						INX	LRZ^;	;554
  2691	033733	114 122 132 000 000 		ASCII /LRZ/
  2692						INX	RRO^;	;560
  2693	033734	122 122 117 000 000 		ASCII /RRO/
  2694						INX	LRO^;	;564
  2695	033735	114 122 117 000 000 		ASCII /LRO/
  2696						INX	RRE^;	;570
  2697	033736	122 122 105 000 000 		ASCII /RRE/
  2698						INX	LRE^;	;574
  2699	033737	114 122 105 000 000 		ASCII /LRE/
  2700	033740				T.:	INX	T^;	;6XX
  2701	033740	124 000 000 000 000 		ASCII /T/
  2702	033741				TBLTA:	INX	RN^;	;600
  2703	033741	122 116 000 000 000 		ASCII /RN/
  2704						INX	DN^;	;610
  2705	033742	104 116 000 000 000 		ASCII /DN/
  2706						INX	RZ^;	;620
  2707	033743	122 132 000 000 000 		ASCII /RZ/
  2708						INX	DZ^;	;630
  2709	033744	104 132 000 000 000 		ASCII /DZ/
  2710						INX	RC^;	;640
  2711	033745	122 103 000 000 000 		ASCII /RC/
  2712						INX	DC^;	;650
  2713	033746	104 103 000 000 000 		ASCII /DC/
  2714						INX	RO^;	;660
  2715	033747	122 117 000 000 000 		ASCII /RO/
  2716						INX	DO^;	;670
  2717	033750	104 117 000 000 000 		ASCII /DO/
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 33
KIPNT	MAC	 9-JUN-76 13:30		SIMULATOR MACHINE REGISTER PRINT                                               *** SEQ 0103

  2718	033751	040 000 000 000 000 	TBLTA1:	ASCII / /	;0,1
  2719						INX	E^;	;2,3
  2720	033752	105 000 000 000 000 		ASCII /E/
  2721						INX	A^;	;4,5
  2722	033753	101 000 000 000 000 		ASCII /A/
  2723						INX	N^;	;6,7
  2724	033754	116 000 000 000 000 		ASCII /N/
  2725
  2726
  2727	033755				TBLTB:	INX	LN^;	;601
  2728	033755	114 116 000 000 000 		ASCII /LN/
  2729						INX	SN^;	;611
  2730	033756	123 116 000 000 000 		ASCII /SN/
  2731						INX	LZ^;	;621
  2732	033757	114 132 000 000 000 		ASCII /LZ/
  2733						INX	SZ^;	;631
  2734	033760	123 132 000 000 000 		ASCII /SZ/
  2735						INX	LC^;	;641
  2736	033761	114 103 000 000 000 		ASCII /LC/
  2737						INX	SC^;	;651
  2738	033762	123 103 000 000 000 		ASCII /SC/
  2739						INX	LO^;	;661
  2740	033763	114 117 000 000 000 		ASCII /LO/
  2741						INX	SO^;	;671
  2742	033764	123 117 000 000 000 		ASCII /SO/
  2743						IFNDEF	SIMASB,<
  2744					TBLCON:	INX	BLKI;	;70000
  2745						INX	DATAI;	;70004
  2746						INX	BLKO;	;70010
  2747						INX	DATAO;	;70014
  2748						INX	CONO;	;70020
  2749						INX	CONI;	;70024
  2750						INX	CONSZ;	;70030
  2751						INX	CONSO;	;70034
  2752					>
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 34
KIPNT	MAC	 9-JUN-76 13:30		SIMULATOR MACHINE REGISTER PRINT                                               *** SEQ 0104

  2753	033765				TBLNEW:	INX	DMOVE^;	;120
  2754	033765	104 115 117 126 105 		ASCII /DMOVE/
  2755						INX	DMOVN^;	;121
  2756	033766	104 115 117 126 116 		ASCII /DMOVN/
  2757						INX	FIX^;	;122
  2758	033767	106 111 130 000 000 		ASCII /FIX/
  2759						INX	ERR^;	;123
  2760	033770	105 122 122 000 000 		ASCII /ERR/
  2761						INX	DMOVM^;	;124
  2762	033771	104 115 117 126 115 		ASCII /DMOVM/
  2763						INX	DMVNM^;	;125
  2764	033772	104 115 126 116 115 		ASCII /DMVNM/
  2765						INX	FIXR^;	;126
  2766	033773	106 111 130 122 000 		ASCII /FIXR/
  2767						INX	FLTR^;	;127
  2768	033774	106 114 124 122 000 		ASCII /FLTR/
  2769						INX	DFAD^;	;110
  2770	033775	104 106 101 104 000 		ASCII /DFAD/
  2771						INX	DFSB^;	;111
  2772	033776	104 106 123 102 000 		ASCII /DFSB/
  2773						INX	DFMP^;	;112
  2774	033777	104 106 115 120 000 		ASCII /DFMP/
  2775						INX	DFDV^;	;113
  2776	034000	104 106 104 126 000 		ASCII /DFDV/
  2777						INX	ERR^;	;114
  2778	034001	105 122 122 000 000 		ASCII /ERR/
  2779						INX	ERR^;	;115
  2780	034002	105 122 122 000 000 		ASCII /ERR/
  2781						INX	ERR^;	;116
  2782	034003	105 122 122 000 000 		ASCII /ERR/
  2783						INX	ERR^;	;117
  2784	034004	105 122 122 000 000 		ASCII /ERR/
  2785
  2786
  2787
  2788	034005				TBLUUO:	INX	LUUO^;	;001-037
  2789	034005	114 125 125 117 000 		ASCII /LUUO/
  2790
  2791	034006				TBLMUO:	INX	MUUO^;	;0, 040-077
  2792	034006	115 125 125 117 000 		ASCII /MUUO/
  2793
  2794	034007				TBLMUX:	INX	MUOEX^;	;MUUO EXECUTION
  2795	034007	115 125 117 105 130 		ASCII /MUOEX/
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 35
KIPNT	MAC	 9-JUN-76 13:30		SIMULATOR MACHINE REGISTER PRINT                                               *** SEQ 0105

  2796					;*MACHINE STATES, K1-10
  2797					;*
  2798	034010	000000	040467		STAB:	IT0			;INSTRUCTION TIME
  2799	034011	000000	040530			IT1
  2800	034012	000000	040774			IT2
  2801	034013	000000	041144			ET0S			;EXECUTE TIME
  2802	034014	000000	041172			ET1S	
  2803	034015	000000	041204			ET2S
  2804	034016	000000	041016			FT1			;FETCH TIME
  2805	034017	000000	041020			FT2
  2806	034020	000000	041022			FT3
  2807	034021	000000	041063			FT4
  2808	034022	000000	041065			FT5
  2809	034023	000000	041111			FT6
  2810	034024	000000	041102			FT7
  2811	034025	000000	041243			ST1			;STORE TIME
  2812	034026	000000	041340			ST2
  2813	034027	000000	041377			ST3	
  2814	034030	000000	041400			ST4
  2815	034031	000000	041412			ST5
  2816	034032	000000	042613			FAT1			;FLOATING ADD TIME
  2817	034033	000000	042621			FAT2
  2818	034034	000000	042636			FAT3
  2819	034035	000000	042662			FAT4
  2820	034036	000000	041653			FMT1			;FLOATING MULTIPLY TIME
  2821	034037	000000	041660			FMT2
  2822	034040	000000	041552			FDT0			;FLOATING DIVIDE TIME
  2823	034041	000000	041573			FDT1	
  2824	034042	000000	041577			FDT2
  2825	034043	000000	041604			FDT3
  2826	034044	000000	041614			FDT4
  2827	034045	000000	041624			FDT5
  2828	034046	000000	041632			FDT6
  2829	034047	000000	041643			FDT7
  2830	034050	000000	042302			FIXT1			;FIX TIME
  2831	034051	000000	042322			FIXT2
  2832	034052	000000	042746			SCT1			;SHIFT COUNT TIME
  2833	034053	000000	043005			SCT2
  2834	034054	000000	042675			SRT1			;SHIFT ROUTINE TIME
  2835	034055	000000	041447			DST1			;DIVIDE SUBROUTINE TIME
  2836	034056	000000	041455			DST2
  2837	034057	000000	041466			DST3
  2838	034060	000000	041502			DST4
  2839	034061	000000	041511			DST5
  2840	034062	000000	041540			DST6
  2841	034063	000000	041666			NRT1			;NORMALIZE ROUTINE TIME
  2842	034064	000000	041773			NRT2
  2843	034065	000000	042054			NRT3
  2844	034066	000000	042073			NRT4
  2845	034067	000000	042127			NRT5
  2846	034070	000000	042134			NRT6
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 36
KIPNT	MAC	 9-JUN-76 13:30		SIMULATOR MACHINE REGISTER PRINT                                               *** SEQ 0106

  2847	034071	000000	042730			DMOVT1			;DOUBLE MOVE TIME
  2848	034072	000000	042732			DMVNT1
  2849	034073	000000	042735			DMVNT2
  2850	034074	000000	042744			DMVNT3
  2851	034075	000000	042333			DFAT1			;DOUBLE FLOATING ADD TIME
  2852	034076	000000	042377			DFAT2
  2853	034077	000000	042420			DFAT3
  2854	034100	000000	042424			DFAT4
  2855	034101	000000	042436			DFAT5
  2856	034102	000000	042441			DFMT1			;DOUBLE FLOATING MULTIPLY TIME
  2857	034103	000000	042453			DFMT2			
  2858	034104	000000	042460			DFMT3
  2859	034105	000000	042465			DFDT0			;DOUBLE FLOATING DIVIDE TIME
  2860	034106	000000	042467			DFDT1
  2861	034107	000000	042474			DFDT2
  2862	034110	000000	042501			DFDT3
  2863	034111	000000	042506			DFDT4
  2864	034112	000000	042536			DFDT5
  2865	034113	000000	042544			DFDT6
  2866	034114	000000	042556			DFDT7
  2867	034115	000000	042565			DFDT8
  2868	034116	000000	042610			DFDT9
  2869	034117	000000	042523			DFDT10
  2870	034120	000000	042527			DFDT11
  2871	034121	000000	042532			DFDT12
  2872	034122	000000	042151			DNT1			;DOUBLE NORMALIZE TIME
  2873	034123	000000	042170			DNT2	
  2874	034124	000000	042174			DNT3
  2875	034125	000000	042221			DNT4
  2876	034126	000000	042212			DNT5
  2877	034127	000000	042245			DNT6
  2878	034130	000000	042254			DNT7
  2879	034131	000000	042261			DNT8
  2880	034132	000000	042274			DNT9
  2881	034133	000000	043170			BLTT0
  2882	034134	000000	043174			BLTT1			;BLT TIME
  2883	034135	000000	043212			BLTT2
  2884	034136	000000	043216			BLTT3
  2885	034137	000000	043220			BLTT4
  2886	034140	000000	043227			BLTT5
  2887	034141	000000	043232			BLTT6
  2888	034142	000000	043234			BLTT7
  2889	034143	000000	043244			BLTT8
  2890	034144	000000	043250			BLTT9
  2891	034145	000000	042673			JFFOT1			;JFFO TIME
  2892	034146	000000	044336			MEMST			;MEMORY ROUTINE
  2893	034147	000000	043127			INDONE			;INSTRUCTION DONE TIME
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 37
KIPNT	MAC	 9-JUN-76 13:30		SIMULATOR MACHINE REGISTER PRINT                                               *** SEQ 0107

  2894						IFNDEF	SIMASB,<
  2895						TTYDI			;TTY I/O TIME
  2896						TTYDO
  2897						TTYCO
  2898						TTYCI
  2899						TTYCNZ
  2900						TTYCNO
  2901					
  2902						APRDI			;APR I/O TIME
  2903						APRDO
  2904						APRCO
  2905						APRCI
  2906						APRCNZ
  2907						APRCNO
  2908					
  2909						PIDI			;PI I/O TIME
  2910						PIDO
  2911						PICO
  2912						PICI
  2913						PICNZ
  2914						PICNO
  2915					
  2916						PGDI			;PAG I/O TIME
  2917						PGDO
  2918						PGCO
  2919						PGCI
  2920						PGCNZ
  2921						PGCNO
  2922					>
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 38
KIPNT	MAC	 9-JUN-76 13:30		SIMULATOR MACHINE REGISTER PRINT                                               *** SEQ 0108

  2923					;*SYMBOLIC MACHINE STATES
  2924
  2925	034150				STAB1:	INX	IT0^
  2926	034150	111 124 060 000 000 		ASCII /IT0/^
  2927						INX	IT1^
  2928	034151	111 124 061 000 000 		ASCII /IT1/^
  2929						INX	IT2^
  2930	034152	111 124 062 000 000 		ASCII /IT2/^
  2931						INX	ET0^
  2932	034153	105 124 060 000 000 		ASCII /ET0/^
  2933						INX	ET1^
  2934	034154	105 124 061 000 000 		ASCII /ET1/^
  2935						INX	ET2^
  2936	034155	105 124 062 000 000 		ASCII /ET2/^
  2937						INX	FT1^
  2938	034156	106 124 061 000 000 		ASCII /FT1/^
  2939						INX	FT2^
  2940	034157	106 124 062 000 000 		ASCII /FT2/^
  2941						INX	FT3^
  2942	034160	106 124 063 000 000 		ASCII /FT3/^
  2943						INX	FT4^
  2944	034161	106 124 064 000 000 		ASCII /FT4/^
  2945						INX	FT5^
  2946	034162	106 124 065 000 000 		ASCII /FT5/^
  2947						INX	FT6^
  2948	034163	106 124 066 000 000 		ASCII /FT6/^
  2949						INX	FT7^
  2950	034164	106 124 067 000 000 		ASCII /FT7/^
  2951						INX	ST1^
  2952	034165	123 124 061 000 000 		ASCII /ST1/^
  2953						INX	ST2^
  2954	034166	123 124 062 000 000 		ASCII /ST2/^
  2955						INX	ST3^
  2956	034167	123 124 063 000 000 		ASCII /ST3/^
  2957						INX	ST4^
  2958	034170	123 124 064 000 000 		ASCII /ST4/^
  2959						INX	ST5^
  2960	034171	123 124 065 000 000 		ASCII /ST5/^
  2961						INX	FAT1^
  2962	034172	106 101 124 061 000 		ASCII /FAT1/^
  2963						INX	FAT2^
  2964	034173	106 101 124 062 000 		ASCII /FAT2/^
  2965						INX	FAT3^
  2966	034174	106 101 124 063 000 		ASCII /FAT3/^
  2967						INX	FAT4^
  2968	034175	106 101 124 064 000 		ASCII /FAT4/^
  2969						INX	FMT1^
  2970	034176	106 115 124 061 000 		ASCII /FMT1/^
  2971						INX	FMT2^
  2972	034177	106 115 124 062 000 		ASCII /FMT2/^
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 39
KIPNT	MAC	 9-JUN-76 13:30		SIMULATOR MACHINE REGISTER PRINT                                               *** SEQ 0109

  2973						INX	FDT0^
  2974	034200	106 104 124 060 000 		ASCII /FDT0/^
  2975						INX	FDT1^
  2976	034201	106 104 124 061 000 		ASCII /FDT1/^
  2977						INX	FDT2^
  2978	034202	106 104 124 062 000 		ASCII /FDT2/^
  2979						INX	FDT3^
  2980	034203	106 104 124 063 000 		ASCII /FDT3/^
  2981						INX	FDT4^
  2982	034204	106 104 124 064 000 		ASCII /FDT4/^
  2983						INX	FDT5^
  2984	034205	106 104 124 065 000 		ASCII /FDT5/^
  2985						INX	FDT6^
  2986	034206	106 104 124 066 000 		ASCII /FDT6/^
  2987						INX	FDT7^
  2988	034207	106 104 124 067 000 		ASCII /FDT7/^
  2989						INX	FIXT1^
  2990	034210	106 111 130 124 061 		ASCII /FIXT1/^
  2991						INX	FIXT2^
  2992	034211	106 111 130 124 062 		ASCII /FIXT2/^
  2993						INX	SCT1^
  2994	034212	123 103 124 061 000 		ASCII /SCT1/^
  2995						INX	SCT2^
  2996	034213	123 103 124 062 000 		ASCII /SCT2/^
  2997						INX	SRT1^
  2998	034214	123 122 124 061 000 		ASCII /SRT1/^
  2999						INX	DST1^
  3000	034215	104 123 124 061 000 		ASCII /DST1/^
  3001						INX	DST2^
  3002	034216	104 123 124 062 000 		ASCII /DST2/^
  3003						INX	DST3^
  3004	034217	104 123 124 063 000 		ASCII /DST3/^
  3005						INX	DST4^
  3006	034220	104 123 124 064 000 		ASCII /DST4/^
  3007						INX	DST5^
  3008	034221	104 123 124 065 000 		ASCII /DST5/^
  3009						INX	DST6^
  3010	034222	104 123 124 066 000 		ASCII /DST6/^
  3011						INX	NRT1^
  3012	034223	116 122 124 061 000 		ASCII /NRT1/^
  3013						INX	NRT2^
  3014	034224	116 122 124 062 000 		ASCII /NRT2/^
  3015						INX	NRT3^
  3016	034225	116 122 124 063 000 		ASCII /NRT3/^
  3017						INX	NRT4^
  3018	034226	116 122 124 064 000 		ASCII /NRT4/^
  3019						INX	NRT5^
  3020	034227	116 122 124 065 000 		ASCII /NRT5/^
  3021						INX	NRT6^
  3022	034230	116 122 124 066 000 		ASCII /NRT6/^
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 40
KIPNT	MAC	 9-JUN-76 13:30		SIMULATOR MACHINE REGISTER PRINT                                               *** SEQ 0110

  3023						INX	DMVT1^
  3024	034231	104 115 126 124 061 		ASCII /DMVT1/^
  3025						INX	DMVN1^
  3026	034232	104 115 126 116 061 		ASCII /DMVN1/^
  3027						INX	DMVN2^
  3028	034233	104 115 126 116 062 		ASCII /DMVN2/^
  3029						INX	DMVN3^
  3030	034234	104 115 126 116 063 		ASCII /DMVN3/^
  3031						INX	DFAT1^
  3032	034235	104 106 101 124 061 		ASCII /DFAT1/^
  3033						INX	DFAT2^
  3034	034236	104 106 101 124 062 		ASCII /DFAT2/^
  3035						INX	DFAT3^
  3036	034237	104 106 101 124 063 		ASCII /DFAT3/^
  3037						INX	DFAT4^
  3038	034240	104 106 101 124 064 		ASCII /DFAT4/^
  3039						INX	DFAT5^
  3040	034241	104 106 101 124 065 		ASCII /DFAT5/^
  3041						INX	DFMT1^
  3042	034242	104 106 115 124 061 		ASCII /DFMT1/^
  3043						INX	DFMT2^
  3044	034243	104 106 115 124 062 		ASCII /DFMT2/^
  3045						INX	DFMT3^
  3046	034244	104 106 115 124 063 		ASCII /DFMT3/^
  3047						INX	DFDT0^
  3048	034245	104 106 104 124 060 		ASCII /DFDT0/^
  3049						INX	DFDT1^
  3050	034246	104 106 104 124 061 		ASCII /DFDT1/^
  3051						INX	DFDT2^
  3052	034247	104 106 104 124 062 		ASCII /DFDT2/^
  3053						INX	DFDT3^
  3054	034250	104 106 104 124 063 		ASCII /DFDT3/^
  3055						INX	DFDT4^
  3056	034251	104 106 104 124 064 		ASCII /DFDT4/^
  3057						INX	DFDT5^
  3058	034252	104 106 104 124 065 		ASCII /DFDT5/^
  3059						INX	DFDT6^
  3060	034253	104 106 104 124 066 		ASCII /DFDT6/^
  3061						INX	DFDT7^
  3062	034254	104 106 104 124 067 		ASCII /DFDT7/^
  3063						INX	DFDT8^
  3064	034255	104 106 104 124 070 		ASCII /DFDT8/^
  3065						INX	DFDT9^
  3066	034256	104 106 104 124 071 		ASCII /DFDT9/^
  3067						INX	DFD10^
  3068	034257	104 106 104 061 060 		ASCII /DFD10/^
  3069						INX	DFD11^
  3070	034260	104 106 104 061 061 		ASCII /DFD11/^
  3071						INX	DFD12^
  3072	034261	104 106 104 061 062 		ASCII /DFD12/^
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 41
KIPNT	MAC	 9-JUN-76 13:30		SIMULATOR MACHINE REGISTER PRINT                                               *** SEQ 0111

  3073						INX	DNT1^
  3074	034262	104 116 124 061 000 		ASCII /DNT1/^
  3075						INX	DNT2^
  3076	034263	104 116 124 062 000 		ASCII /DNT2/^
  3077						INX	DNT3^
  3078	034264	104 116 124 063 000 		ASCII /DNT3/^
  3079						INX	DNT4^
  3080	034265	104 116 124 064 000 		ASCII /DNT4/^
  3081						INX	DNT5^
  3082	034266	104 116 124 065 000 		ASCII /DNT5/^
  3083						INX	DNT6^
  3084	034267	104 116 124 066 000 		ASCII /DNT6/^
  3085						INX	DNT7^
  3086	034270	104 116 124 067 000 		ASCII /DNT7/^
  3087						INX	DNT8^
  3088	034271	104 116 124 070 000 		ASCII /DNT8/^
  3089						INX	DNT9^
  3090	034272	104 116 124 071 000 		ASCII /DNT9/^
  3091						INX	BLTT0^
  3092	034273	102 114 124 124 060 		ASCII /BLTT0/^
  3093						INX	BLTT1^
  3094	034274	102 114 124 124 061 		ASCII /BLTT1/^
  3095						INX	BLTT2^
  3096	034275	102 114 124 124 062 		ASCII /BLTT2/^
  3097						INX	BLTT3^
  3098	034276	102 114 124 124 063 		ASCII /BLTT3/^
  3099						INX	BLTT4^
  3100	034277	102 114 124 124 064 		ASCII /BLTT4/^
  3101						INX	BLTT5^
  3102	034300	102 114 124 124 065 		ASCII /BLTT5/^
  3103						INX	BLTT6^
  3104	034301	102 114 124 124 066 		ASCII /BLTT6/^
  3105						INX	BLTT7^
  3106	034302	102 114 124 124 067 		ASCII /BLTT7/^
  3107						INX	BLTT8^
  3108	034303	102 114 124 124 070 		ASCII /BLTT8/^
  3109						INX	BLTT9^
  3110	034304	102 114 124 124 071 		ASCII /BLTT9/^
  3111						INX	JFFO1^
  3112	034305	112 106 106 117 061 		ASCII /JFFO1/^
  3113						INX	MEMST^
  3114	034306	115 105 115 123 124 		ASCII /MEMST/^
  3115						INX	INDON^
  3116	034307	111 116 104 117 116 		ASCII /INDON/^
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 42
KIPNT	MAC	 9-JUN-76 13:30		SIMULATOR MACHINE REGISTER PRINT                                               *** SEQ 0112

  3117						IFNDEF	SIMASB,<
  3118						INX	DATAI
  3119						INX	DATAO
  3120						INX	CONO
  3121						INX	CONI
  3122						INX	CONSZ
  3123						INX	CONSO
  3124						INX	DATAI
  3125						INX	DATAO
  3126						INX	CONO
  3127						INX	CONI
  3128						INX	CONSZ
  3129						INX	CONSO
  3130						INX	DATAI
  3131						INX	DATAO
  3132						INX	CONO
  3133						INX	CONI
  3134						INX	CONSZ
  3135						INX	CONSO
  3136						INX	DATAI
  3137						INX	DATAO
  3138						INX	CONO
  3139						INX	CONI
  3140						INX	CONSZ
  3141						INX	CONSO
  3142					>
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 1
KI10A1	MAC	 9-JUN-76 13:52		SIMULATOR PARAMETERS AND DEFINITIONS                                           *** SEQ 0113

  3143					SUBTTL	SIMULATOR PARAMETERS AND DEFINITIONS
  3144
  3145						MLON
  3146
  3147					;*ACCUMULATOR DEFINITIONS
  3148
  3149			000000			F==0		;MISC LOGIC FLIP FLOPS
  3150			000001			T==1		;TEMPORARY REGISTERS
  3151			000002			T1==2
  3152			000003			T2==3
  3153			000004			T3==4
  3154			000005			S==5		;STATE REGISTER
  3155			000006			AR==6		;MACHINE REGISTERS
  3156			000007			MQ==7
  3157			000010			BR==10
  3158			000011			AD==11
  3159			000012			MB==12
  3160			000013			PC==13
  3161			000014			MA==14
  3162			000015			SC==15
  3163			000016			IR==16
  3164			000017			P==17		;PUSH DOWN POINTER
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 2
KI10A1	MAC	 9-JUN-76 13:52		SIMULATOR PARAMETERS AND DEFINITIONS                                           *** SEQ 0114

  3165						DEFINE	BITS (FIRST,PREFIX,LIST)<
  3166						.FOO.==FIRST
  3167						IRP LIST<
  3168						PREFIX'LIST==.FOO.
  3169						.FOO.==.FOO.+.FOO.
  3170					>>
  3171
  3172					;*LEFT HALF BITS
  3173					;*CLOCKS
  3174						BITS (2,,<PCCLK>)^
  3175					;*EXECUTION TIME PULSE SWITCHES
  3176						BITS (1,ET,<0,1>)^
  3177			000004			INFTST==4
  3178					;*AD ENABLES
  3179						BITS (10,AD,<MAGIC,ARRP,ARLP,ARMI,BRRP,BRLP,BRMI^_
  3180					,FMRP,FMLP,FMMI,CR36,ADD,EQV,PL1L,MI1B>)^
  3181			006000			ADFMPL==ADFMRP+ADFMLP
  3182			000060			ADARPL==ADARRP+ADARLP
  3183			000600			ADBRPL==ADBRRP+ADBRLP
  3184			220000			ADPL1B==ADPL1L+ADCR36
  3185
  3186					;*RIGHT HALF BITS
  3187					;*FETCH AND STORE SWITCHES
  3188						BITS (1,,<FCE,PSE,FCCACR,SCE,STORE^_
  3189					,SACINH,SACBR,SAC2,PCCHNG>)^
  3190			000003			FCEPSE==FCE+PSE
  3191			000002			FCE2==PSE
  3192			000006			FCCACL==FCCACR+PSE
  3193			000140			SAIAC0==SACINH+SACBR
  3194					;*MQ ENABLES
  3195						BITS (1,MQ,<SHR2,SHRT,SHLT,ADEN,CLR>)^
  3196					;*AUX AR ENABLES
  3197						BITS (.FOO.,AR,<SHR2,SHRT,SHLT,CLR>)^
  3198					;*BR ENABLES
  3199			001000			BRAREN==1000
  3200					;*AR ENABLES
  3201						BITS (2000,AR,<LTAD,RTAD,RARL,LARR,IREN>)^
  3202			022000			ARFLGS==ARLTAD+ARLARR
  3203			014000			ARPCEN==ARRTAD+ARRARL
  3204			006000			ARADEN==ARLTAD+ARRTAD
  3205			030000			ARSWAP==ARRARL+ARLARR
  3206					;*ADDRESS BUS ENABLES
  3207						BITS (.FOO.,AB,<PCEN,ABEN,ADEN>)^
  3208
  3209			040000			LNGCYC==40000
  3210			000001			ADCLKINH==1
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 3
KI10A1	MAC	 9-JUN-76 13:52		SIMULATOR PARAMETERS AND DEFINITIONS                                           *** SEQ 0115

  3211					;*CONTROL FF'S
  3212						BITS (ABPCEN,AB,<PC,AB,AD>)^
  3213			000001			CLKINH==1
  3214			000002			ABAS==2
  3215			000004			DSF2SET==4
  3216			000010			DSF2CLR==10
  3217			000020			FLAG1==20
  3218			000040			FLAG2==40
  3219			000100			FLAG3==100
  3220			000200			SCP1S==200
  3221			000400			SCP1IN==400
  3222			001000			MUOF1S==1000
  3223			002000			MUOF1C==2000
  3224			004000			MUOF2S==4000
  3225			010000			MUOF2C==10000
  3226
  3227
  3228					;*SCADDER BITS RIGHT HALF
  3229			000001			SAMI22==1
  3230			000002			SAPL44==2
  3231			000003			SAZERO==3
  3232			000004			SAP220==4
  3233			000005			SAP110==5
  3234			000006			SAM110==6
  3235			000007			SAMI42==7
  3236			000010			SAMI16==10
  3237			000011			SAMI33==11
  3238			000012			SAMI32==12
  3239			000013			SAMI4==13
  3240			000014			SAPL10==14
  3241			000015			SAMI43==15
  3242			000016			SAPL43==16
  3243			000017			SAM100==17
  3244						BITS (20,SA,<SCPL,SCMI,ADD,PL1,MSIZ,ARPOS,AREX,EQV,FEEN>)^
  3245						BITS (.FOO.,SC,<SAEN,AREN,SHRT,SCP1>)^
  3246						BITS (.FOO.,FE,<SAEN>)^
  3247
  3248					;*LEFT HALF
  3249						BITS (1,MB,<FMEN,AREN>)^
  3250						BITS (.FOO.,BR,<ARXEN>)^
  3251						BITS (.FOO.,ARX,<SR2,SHR,SHL,ADX,CLR>)^
  3252						BITS (.FOO.,AD,<MSKG,BRP2,MBRE,MBLE>)^
  3253			006000			ADMBEN==ADMBRE+ADMBLE
  3254
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 4
KI10A1	MAC	 9-JUN-76 13:52		SIMULATOR PARAMETERS AND DEFINITIONS                                           *** SEQ 0116

  3255					;*ADX BITS LEFT HALF
  3256						BITS (.FOO.,ADX,<BRM,FM2,FMM,FMP,EQV,ADD>)^
  3257
  3258			000017			MEMREF=FCE!FCEPSE!SCE!FCCACL!FCCACR!FCE2
  3259
  3260			000144			PAGDLY==^D100
  3261			000536			WARNDLY==^D350
  3262
  3263						IFNDEF	SIMASB,<
  3264						OFFSET==400000	;SIMULATED PROGRAMS ARE IN HIGH SEGMENT>
  3265
  3266
  3267					;*FLAGS, LEFT HALF OF PC WORD
  3268
  3269			400000			AROV==400000
  3270			200000			CRY0==200000
  3271			100000			CRY1==100000
  3272			040000			FOV==040000
  3273			020000			BIS==020000
  3274			010000			USERF==010000
  3275			004000			EXIOT==004000
  3276			002000			LIP==002000
  3277			001000			UOLIP==001000
  3278			000400			TN0==400
  3279			000200			TN1==200
  3280			000100			FXU==000100
  3281			000040			DCK==000040
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 5
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		0-37                                   *** SEQ 0117

  3282					SUBTTL	DISPATCH TABLE FOR INSTRUCTIONS		0-37
  3283
  3284	034310				TABLE:
  3285
  3286					;*FORMAT OF DISPATCH TABLE
  3287					;*	FETCH CYCLE ENABLES, SWITCHES
  3288					;*	ET0 ADDRESS,, ET1 ADDRESS
  3289					;*	ET2 ENABLES AND CLOCKS, ET2 DISPATCH
  3290
  3291					;*UUO'S
  3292					DEFINE UUOMAC <
  3293						XWD ET0+ET1,STORE+SACINH
  3294						XWD [MONUUO],[XWD ADARPL,0]
  3295						XWD 0,ARIREN+ARRTAD
  3296					>
  3297						IFNDEF	SIMASB,<
  3298					;*ILLEGAL UUO							0
  3299						UUOMAC
  3300					
  3301					;*USER UUO'S							1-37
  3302						REPEAT 37,
  3303					<	XWD ET0+ET1+ADMAGIC,STORE+SACINH+UUOFD
  3304						[XWD ADMAGIC,ARIREN+ABADEN+UUO1]
  3305						XWD INFTST,0
  3306					>
  3307					
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 6
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		0-37                                   *** SEQ 0118

  3308					SUBTTL	DISPATCH TABLE FOR INSTRUCTIONS		40-107
  3309					
  3310					;*MONITOR UUO'S							40-77
  3311						REPEAT 40,
  3312					<	UUOMAC
  3313					>
  3314					;*UNDEFINED OP CODES						100-107
  3315						REPEAT 10,
  3316					<	UUOMAC
  3317					>
  3318					>
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 7
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		110-111                                *** SEQ 0119

  3319					SUBTTL	DISPATCH TABLE FOR INSTRUCTIONS		110-111
  3320
  3321					;*DFAD, DFSB							110-111
  3322						REPEAT 2,
  3323					<	XWD ET0+ET1+ADFMPL,FCE2+SAC2+DFAFD+PCCHNG
  3324						XWD [XWD ADFMPL,ARADEN+BRAREN+DFA0],[XWD ADBRPL,ARADEN+BRAREN+DFA1]
  3325						ARADEN+BRAREN+DFA2
  3326					>
  3327	034310	006003	017602			XWD ET0+ET1+ADFMPL,FCE2+SAC2+DFAFD+PCCHNG
  3328	034311	045264	045265			XWD [XWD ADFMPL,ARADEN+BRAREN+DFA0],[XWD ADBRPL,ARADEN+BRAREN+DFA1]
  3329	034312	000000	007576			ARADEN+BRAREN+DFA2
  3330
  3331	034313	006003	017602			XWD ET0+ET1+ADFMPL,FCE2+SAC2+DFAFD+PCCHNG
  3332	034314	045264	045265			XWD [XWD ADFMPL,ARADEN+BRAREN+DFA0],[XWD ADBRPL,ARADEN+BRAREN+DFA1]
  3333	034315	000000	007576			ARADEN+BRAREN+DFA2
  3334
  3335					;*DFMP								112
  3336	034316	006003	020602			XWD	ET0+ET1+ADFMPL,FCE2+SAC2+DFMFD+PCCHNG
  3337	034317	045266	045267			XWD [XWD ADFMPL,ARADEN+BRAREN+DFM0],[XWD ADBRPL,ARADEN+DFM1]
  3338	034320	000000	007631			ARADEN+BRAREN+DFM2
  3339					;*DFDV								113
  3340	034321	006003	021702			XWD	ET0+ET1+ADFMPL,FCE2+SAC2+DFDFD+PCCHNG+SACBR
  3341	034322	045270	045271			XWD [XWD ADFMPL,ARADEN+BRAREN+DFD0],[ARADEN+DFD1]
  3342	034323	000000	000654			DFD2
  3343
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 8
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		114-123                                *** SEQ 0120

  3344					SUBTTL	DISPATCH TABLE FOR INSTRUCTIONS		114-123
  3345
  3346					;*UNDEFINED OP CODES						114-117
  3347						REPEAT 4,
  3348					<	UUOMAC
  3349					>
  3350						UUOMAC^
  3351	034324	000003	000060			XWD ET0+ET1,STORE+SACINH
  3352	034325	045272	045273			XWD [MONUUO],[XWD ADARPL,0]
  3353	034326	000000	044000			XWD 0,ARIREN+ARRTAD
  3354
  3355						UUOMAC^
  3356	034327	000003	000060			XWD ET0+ET1,STORE+SACINH
  3357	034330	045272	045273			XWD [MONUUO],[XWD ADARPL,0]
  3358	034331	000000	044000			XWD 0,ARIREN+ARRTAD
  3359
  3360						UUOMAC^
  3361	034332	000003	000060			XWD ET0+ET1,STORE+SACINH
  3362	034333	045272	045273			XWD [MONUUO],[XWD ADARPL,0]
  3363	034334	000000	044000			XWD 0,ARIREN+ARRTAD
  3364
  3365						UUOMAC^
  3366	034335	000003	000060			XWD ET0+ET1,STORE+SACINH
  3367	034336	045272	045273			XWD [MONUUO],[XWD ADARPL,0]
  3368	034337	000000	044000			XWD 0,ARIREN+ARRTAD
  3369
  3370
  3371					;*DMOVE,DMOVN							120-121
  3372						REPEAT 2,
  3373					<	SAC2+FCE2+PCCHNG+SRINST
  3374						0
  3375						DMOV2
  3376					>
  3377	034340	000000	003602			SAC2+FCE2+PCCHNG+SRINST
  3378	034341	000000	000000			0
  3379	034342	000000	000372			DMOV2
  3380
  3381	034343	000000	003602			SAC2+FCE2+PCCHNG+SRINST
  3382	034344	000000	000000			0
  3383	034345	000000	000372			DMOV2
  3384
  3385					;*FIX								122
  3386	034346	000003	010001			XWD	ET0+ET1,FCE+FIXFD
  3387	034347	045274	045275			XWD	[FIX0],[FIX1]
  3388	034350	000000	000524			FIX2
  3389
  3390					;*UNDEFINED OP CODE						123
  3391						UUOMAC^
  3392	034351	000003	000060			XWD ET0+ET1,STORE+SACINH
  3393	034352	045272	045273			XWD [MONUUO],[XWD ADARPL,0]
  3394	034353	000000	044000			XWD 0,ARIREN+ARRTAD
  3395
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 9
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		124-132                                *** SEQ 0121

  3396					SUBTTL	DISPATCH TABLE FOR INSTRUCTIONS		124-132
  3397
  3398					;*DMOVEM								124
  3399	034354	006000	000450			XWD	ADFMPL,SCE+SACINH+PCCHNG
  3400	034355	000000	000000			0
  3401	034356	000000	007000			ARADEN+BRAREN
  3402
  3403					;*DMOVNM								125
  3404	034357	010003	025450			XWD	ADFMMI+ET0+ET1,SCE+SACINH+PCCHNG+DMVMFD
  3405						XWD	[XWD ADADD+ADCR36+ADARPL+ADMAGIC,ARADEN+BRAREN+DMVNM0],^_
  3406	034360	045276	045277		[XWD ADFMMI+ADCR36+ADADD,DMVNM1]
  3407	034361	000000	000403			DMVNM2
  3408
  3409					;*FIXR								126
  3410	034362	000003	010001			XWD	ET0+ET1,FCE+FIXFD
  3411	034363	045274	045275			XWD	[FIX0],[FIX1]
  3412	034364	000000	000524			FIX2
  3413
  3414					;*FLTR								127
  3415	034365	000000	011001			FCE+FLTFD
  3416	034366	000000	000000			0
  3417	034367	000060	000427			XWD	ADARPL,FLT2
  3418
  3419					;*UFA								130
  3420	034370	006000	014001			XWD	ADFMPL,FCE+FADFD
  3421	034371	000000	000000			0
  3422	034372	000000	007553			BRAREN+ARADEN+UFA2
  3423
  3424					;*DFN								131
  3425	034373	000063	052103			XWD	ET0+ET1+ADARPL,FCEPSE+SACBR+LNGCYC+DFNFD
  3426	034374	045300	045301			XWD	[XWD ADFMMI,DFN0],[BRAREN+ARADEN+DFN1]
  3427	034375	000000	007000			BRAREN+ARADEN
  3428
  3429					;*FSC								132
  3430	034376	006001	013000			XWD	ET0+ADFMPL,FSCFD
  3431	034377	045302	000000			XWD	[ARADEN+FSC0],0
  3432	034400	000060	000436			XWD	ADARPL,FSC2
  3433
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 10
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		133-137                                *** SEQ 0122

  3434					SUBTTL	DISPATCH TABLE FOR INSTRUCTIONS		133-137
  3435
  3436					;*IBP								133
  3437	034401					BLOCK 3
  3438
  3439					;*XLDB SECOND PART						134-135
  3440						REPEAT 2,
  3441					<	XWD ET0+ET1,FCE+LDBFD
  3442						XWD [LDB0],[XWD ADARPL+ADBRPL,BRAREN+LDB1]
  3443						ARADEN+LDB2
  3444					>
  3445	034404	000003	007001			XWD ET0+ET1,FCE+LDBFD
  3446	034405	045303	045304			XWD [LDB0],[XWD ADARPL+ADBRPL,BRAREN+LDB1]
  3447	034406	000000	006367			ARADEN+LDB2
  3448
  3449	034407	000003	007001			XWD ET0+ET1,FCE+LDBFD
  3450	034410	045303	045304			XWD [LDB0],[XWD ADARPL+ADBRPL,BRAREN+LDB1]
  3451	034411	000000	006367			ARADEN+LDB2
  3452
  3453
  3454					;*XDPB SECOND PART						136-137
  3455						REPEAT 2,
  3456					<	XWD ADFMPL+ET0+ET1,FCE+SCE+SACINH+DPBFD
  3457						XWD [BRAREN+DPB0],[XWD ADARPL+ADBRPL,BRAREN+DPB1]
  3458						ARADEN+DPB2
  3459					>
  3460	034412	006003	007051			XWD ADFMPL+ET0+ET1,FCE+SCE+SACINH+DPBFD
  3461	034413	045305	045306			XWD [BRAREN+DPB0],[XWD ADARPL+ADBRPL,BRAREN+DPB1]
  3462	034414	000000	006366			ARADEN+DPB2
  3463
  3464	034415	006003	007051			XWD ADFMPL+ET0+ET1,FCE+SCE+SACINH+DPBFD
  3465	034416	045305	045306			XWD [BRAREN+DPB0],[XWD ADARPL+ADBRPL,BRAREN+DPB1]
  3466	034417	000000	006366			ARADEN+DPB2
  3467
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 11
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		140-177                                *** SEQ 0123

  3468					SUBTTL	DISPATCH TABLE FOR INSTRUCTIONS		140-177
  3469
  3470					;*FADXX								140-147
  3471			000000			N==0
  3472						REPEAT 10,
  3473					<	XWD <IFE N-5,<ET0>>+ADFMPL,<IFN N-5,<FCE>>+FADFD^_
  3474					+<IFN N&2,<SCE>>+<IFE N&3-2,<SACINH>>+<IFE N-1,<SAC2>>
  3475						XWD [XWD ADFMPL,ARSWAP+FMP0],0
  3476						BRAREN+ARADEN+FAD2
  3477						N==N+1
  3478					>
  3479						XWD <IFE N-5,<ET0>>+ADFMPL,<IFN N-5,<FCE>>+FADFD+<IFN N&2,<SCE>>+<IFE N&3-2,<SACINH
  3480	034420	006000	014001		>>+<IFE N-1,<SAC2>>
  3481	034421	045307	000000			XWD [XWD ADFMPL,ARSWAP+FMP0],0
  3482	034422	000000	007554			BRAREN+ARADEN+FAD2
  3483			000001			N==N+1
  3484
  3485						XWD <IFE N-5,<ET0>>+ADFMPL,<IFN N-5,<FCE>>+FADFD+<IFN N&2,<SCE>>+<IFE N&3-2,<SACINH
  3486	034423	006000	014201		>>+<IFE N-1,<SAC2>>
  3487	034424	045307	000000			XWD [XWD ADFMPL,ARSWAP+FMP0],0
  3488	034425	000000	007554			BRAREN+ARADEN+FAD2
  3489			000002			N==N+1
  3490
  3491						XWD <IFE N-5,<ET0>>+ADFMPL,<IFN N-5,<FCE>>+FADFD+<IFN N&2,<SCE>>+<IFE N&3-2,<SACINH
  3492	034426	006000	014051		>>+<IFE N-1,<SAC2>>
  3493	034427	045307	000000			XWD [XWD ADFMPL,ARSWAP+FMP0],0
  3494	034430	000000	007554			BRAREN+ARADEN+FAD2
  3495			000003			N==N+1
  3496
  3497						XWD <IFE N-5,<ET0>>+ADFMPL,<IFN N-5,<FCE>>+FADFD+<IFN N&2,<SCE>>+<IFE N&3-2,<SACINH
  3498	034431	006000	014011		>>+<IFE N-1,<SAC2>>
  3499	034432	045307	000000			XWD [XWD ADFMPL,ARSWAP+FMP0],0
  3500	034433	000000	007554			BRAREN+ARADEN+FAD2
  3501			000004			N==N+1
  3502
  3503						XWD <IFE N-5,<ET0>>+ADFMPL,<IFN N-5,<FCE>>+FADFD+<IFN N&2,<SCE>>+<IFE N&3-2,<SACINH
  3504	034434	006000	014001		>>+<IFE N-1,<SAC2>>
  3505	034435	045307	000000			XWD [XWD ADFMPL,ARSWAP+FMP0],0
  3506	034436	000000	007554			BRAREN+ARADEN+FAD2
  3507			000005			N==N+1
  3508
  3509						XWD <IFE N-5,<ET0>>+ADFMPL,<IFN N-5,<FCE>>+FADFD+<IFN N&2,<SCE>>+<IFE N&3-2,<SACINH
  3510	034437	006001	014000		>>+<IFE N-1,<SAC2>>
  3511	034440	045307	000000			XWD [XWD ADFMPL,ARSWAP+FMP0],0
  3512	034441	000000	007554			BRAREN+ARADEN+FAD2
  3513			000006			N==N+1
  3514
  3515						XWD <IFE N-5,<ET0>>+ADFMPL,<IFN N-5,<FCE>>+FADFD+<IFN N&2,<SCE>>+<IFE N&3-2,<SACINH
  3516	034442	006000	014051		>>+<IFE N-1,<SAC2>>
  3517	034443	045307	000000			XWD [XWD ADFMPL,ARSWAP+FMP0],0
  3518	034444	000000	007554			BRAREN+ARADEN+FAD2
  3519			000007			N==N+1
  3520
  3521						XWD <IFE N-5,<ET0>>+ADFMPL,<IFN N-5,<FCE>>+FADFD+<IFN N&2,<SCE>>+<IFE N&3-2,<SACINH
  3522	034445	006000	014011		>>+<IFE N-1,<SAC2>>
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 11-1
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		140-177                                *** SEQ 0124

  3523	034446	045307	000000			XWD [XWD ADFMPL,ARSWAP+FMP0],0
  3524	034447	000000	007554			BRAREN+ARADEN+FAD2
  3525			000010			N==N+1
  3526
  3527
  3528					;*FSBXX								150-157
  3529			000000			N==0
  3530						REPEAT 10,
  3531					<	XWD <IFE N-5,<ET0>>+ADARMI+ADCR36+ADADD+ADMAGIC^_
  3532					+ET1,<IFN N-5,<FCE>>+FSBFD+<IFN N&2,<SCE>>+<IFE N&3-2,<SACINH>>^_
  3533					+<IFE N-1,<SAC2>>
  3534						XWD [XWD ADARMI+ADCR36+ADADD+ADMAGIC,ARSWAP],^_
  3535					[XWD ADFMPL,ARADEN+FMP0]
  3536						BRAREN+ARADEN+FAD2
  3537						N==N+1
  3538					>
  3539						XWD <IFE N-5,<ET0>>+ADARMI+ADCR36+ADADD+ADMAGIC+ET1,<IFN N-5,<FCE>>+FSBFD+<IFN N&2,
  3540	034450	060112	003001		<SCE>>+<IFE N&3-2,<SACINH>>+<IFE N-1,<SAC2>>
  3541	034451	045310	045311			XWD [XWD ADARMI+ADCR36+ADADD+ADMAGIC,ARSWAP],[XWD ADFMPL,ARADEN+FMP0]
  3542	034452	000000	007554			BRAREN+ARADEN+FAD2
  3543			000001			N==N+1
  3544
  3545						XWD <IFE N-5,<ET0>>+ADARMI+ADCR36+ADADD+ADMAGIC+ET1,<IFN N-5,<FCE>>+FSBFD+<IFN N&2,
  3546	034453	060112	003201		<SCE>>+<IFE N&3-2,<SACINH>>+<IFE N-1,<SAC2>>
  3547	034454	045310	045311			XWD [XWD ADARMI+ADCR36+ADADD+ADMAGIC,ARSWAP],[XWD ADFMPL,ARADEN+FMP0]
  3548	034455	000000	007554			BRAREN+ARADEN+FAD2
  3549			000002			N==N+1
  3550
  3551						XWD <IFE N-5,<ET0>>+ADARMI+ADCR36+ADADD+ADMAGIC+ET1,<IFN N-5,<FCE>>+FSBFD+<IFN N&2,
  3552	034456	060112	003051		<SCE>>+<IFE N&3-2,<SACINH>>+<IFE N-1,<SAC2>>
  3553	034457	045310	045311			XWD [XWD ADARMI+ADCR36+ADADD+ADMAGIC,ARSWAP],[XWD ADFMPL,ARADEN+FMP0]
  3554	034460	000000	007554			BRAREN+ARADEN+FAD2
  3555			000003			N==N+1
  3556
  3557						XWD <IFE N-5,<ET0>>+ADARMI+ADCR36+ADADD+ADMAGIC+ET1,<IFN N-5,<FCE>>+FSBFD+<IFN N&2,
  3558	034461	060112	003011		<SCE>>+<IFE N&3-2,<SACINH>>+<IFE N-1,<SAC2>>
  3559	034462	045310	045311			XWD [XWD ADARMI+ADCR36+ADADD+ADMAGIC,ARSWAP],[XWD ADFMPL,ARADEN+FMP0]
  3560	034463	000000	007554			BRAREN+ARADEN+FAD2
  3561			000004			N==N+1
  3562
  3563						XWD <IFE N-5,<ET0>>+ADARMI+ADCR36+ADADD+ADMAGIC+ET1,<IFN N-5,<FCE>>+FSBFD+<IFN N&2,
  3564	034464	060112	003001		<SCE>>+<IFE N&3-2,<SACINH>>+<IFE N-1,<SAC2>>
  3565	034465	045310	045311			XWD [XWD ADARMI+ADCR36+ADADD+ADMAGIC,ARSWAP],[XWD ADFMPL,ARADEN+FMP0]
  3566	034466	000000	007554			BRAREN+ARADEN+FAD2
  3567			000005			N==N+1
  3568
  3569						XWD <IFE N-5,<ET0>>+ADARMI+ADCR36+ADADD+ADMAGIC+ET1,<IFN N-5,<FCE>>+FSBFD+<IFN N&2,
  3570	034467	060113	003000		<SCE>>+<IFE N&3-2,<SACINH>>+<IFE N-1,<SAC2>>
  3571	034470	045310	045311			XWD [XWD ADARMI+ADCR36+ADADD+ADMAGIC,ARSWAP],[XWD ADFMPL,ARADEN+FMP0]
  3572	034471	000000	007554			BRAREN+ARADEN+FAD2
  3573			000006			N==N+1
  3574
  3575						XWD <IFE N-5,<ET0>>+ADARMI+ADCR36+ADADD+ADMAGIC+ET1,<IFN N-5,<FCE>>+FSBFD+<IFN N&2,
  3576	034472	060112	003051		<SCE>>+<IFE N&3-2,<SACINH>>+<IFE N-1,<SAC2>>
  3577	034473	045310	045311			XWD [XWD ADARMI+ADCR36+ADADD+ADMAGIC,ARSWAP],[XWD ADFMPL,ARADEN+FMP0]
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 11-2
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		140-177                                *** SEQ 0125

  3578	034474	000000	007554			BRAREN+ARADEN+FAD2
  3579			000007			N==N+1
  3580
  3581						XWD <IFE N-5,<ET0>>+ADARMI+ADCR36+ADADD+ADMAGIC+ET1,<IFN N-5,<FCE>>+FSBFD+<IFN N&2,
  3582	034475	060112	003011		<SCE>>+<IFE N&3-2,<SACINH>>+<IFE N-1,<SAC2>>
  3583	034476	045310	045311			XWD [XWD ADARMI+ADCR36+ADADD+ADMAGIC,ARSWAP],[XWD ADFMPL,ARADEN+FMP0]
  3584	034477	000000	007554			BRAREN+ARADEN+FAD2
  3585			000010			N==N+1
  3586
  3587
  3588					;*FMPXX								160-167
  3589			000000			N==0
  3590						REPEAT 10,
  3591					<	XWD <IFE N-5,<ET0>>+ET1+ADFMPL,<IFN N-5,<FCE>>+FMPFD^_
  3592					+<IFN N&2,<SCE>>+<IFE N&3-2,<SACINH>>+<IFE N-1,<SAC2>>
  3593						XWD [XWD ADFMPL,ARSWAP+FMP0],[ARADEN+BRAREN+FMP1]
  3594						XWD ADARPL,FMP2
  3595						N==N+1
  3596					>
  3597						XWD <IFE N-5,<ET0>>+ET1+ADFMPL,<IFN N-5,<FCE>>+FMPFD+<IFN N&2,<SCE>>+<IFE N&3-2,<SA
  3598	034500	006002	015001		CINH>>+<IFE N-1,<SAC2>>
  3599	034501	045307	045312			XWD [XWD ADFMPL,ARSWAP+FMP0],[ARADEN+BRAREN+FMP1]
  3600	034502	000060	000545			XWD ADARPL,FMP2
  3601			000001			N==N+1
  3602
  3603						XWD <IFE N-5,<ET0>>+ET1+ADFMPL,<IFN N-5,<FCE>>+FMPFD+<IFN N&2,<SCE>>+<IFE N&3-2,<SA
  3604	034503	006002	015201		CINH>>+<IFE N-1,<SAC2>>
  3605	034504	045307	045312			XWD [XWD ADFMPL,ARSWAP+FMP0],[ARADEN+BRAREN+FMP1]
  3606	034505	000060	000545			XWD ADARPL,FMP2
  3607			000002			N==N+1
  3608
  3609						XWD <IFE N-5,<ET0>>+ET1+ADFMPL,<IFN N-5,<FCE>>+FMPFD+<IFN N&2,<SCE>>+<IFE N&3-2,<SA
  3610	034506	006002	015051		CINH>>+<IFE N-1,<SAC2>>
  3611	034507	045307	045312			XWD [XWD ADFMPL,ARSWAP+FMP0],[ARADEN+BRAREN+FMP1]
  3612	034510	000060	000545			XWD ADARPL,FMP2
  3613			000003			N==N+1
  3614
  3615						XWD <IFE N-5,<ET0>>+ET1+ADFMPL,<IFN N-5,<FCE>>+FMPFD+<IFN N&2,<SCE>>+<IFE N&3-2,<SA
  3616	034511	006002	015011		CINH>>+<IFE N-1,<SAC2>>
  3617	034512	045307	045312			XWD [XWD ADFMPL,ARSWAP+FMP0],[ARADEN+BRAREN+FMP1]
  3618	034513	000060	000545			XWD ADARPL,FMP2
  3619			000004			N==N+1
  3620
  3621						XWD <IFE N-5,<ET0>>+ET1+ADFMPL,<IFN N-5,<FCE>>+FMPFD+<IFN N&2,<SCE>>+<IFE N&3-2,<SA
  3622	034514	006002	015001		CINH>>+<IFE N-1,<SAC2>>
  3623	034515	045307	045312			XWD [XWD ADFMPL,ARSWAP+FMP0],[ARADEN+BRAREN+FMP1]
  3624	034516	000060	000545			XWD ADARPL,FMP2
  3625			000005			N==N+1
  3626
  3627						XWD <IFE N-5,<ET0>>+ET1+ADFMPL,<IFN N-5,<FCE>>+FMPFD+<IFN N&2,<SCE>>+<IFE N&3-2,<SA
  3628	034517	006003	015000		CINH>>+<IFE N-1,<SAC2>>
  3629	034520	045307	045312			XWD [XWD ADFMPL,ARSWAP+FMP0],[ARADEN+BRAREN+FMP1]
  3630	034521	000060	000545			XWD ADARPL,FMP2
  3631			000006			N==N+1
  3632
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 11-3
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		140-177                                *** SEQ 0126

  3633						XWD <IFE N-5,<ET0>>+ET1+ADFMPL,<IFN N-5,<FCE>>+FMPFD+<IFN N&2,<SCE>>+<IFE N&3-2,<SA
  3634	034522	006002	015051		CINH>>+<IFE N-1,<SAC2>>
  3635	034523	045307	045312			XWD [XWD ADFMPL,ARSWAP+FMP0],[ARADEN+BRAREN+FMP1]
  3636	034524	000060	000545			XWD ADARPL,FMP2
  3637			000007			N==N+1
  3638
  3639						XWD <IFE N-5,<ET0>>+ET1+ADFMPL,<IFN N-5,<FCE>>+FMPFD+<IFN N&2,<SCE>>+<IFE N&3-2,<SA
  3640	034525	006002	015011		CINH>>+<IFE N-1,<SAC2>>
  3641	034526	045307	045312			XWD [XWD ADFMPL,ARSWAP+FMP0],[ARADEN+BRAREN+FMP1]
  3642	034527	000060	000545			XWD ADARPL,FMP2
  3643			000010			N==N+1
  3644
  3645
  3646					;*FDVXX								170-177
  3647			000000			N==0
  3648						REPEAT 10,
  3649					<	XWD ET1+ADFMPL+<IFE N-5,<ET0>>,<IFE N-1,<SAC2>>+<IFN N-5,<FCE>>+FDVFD^_
  3650					+<IFN N&2,<SCE>>+<IFE N&3-2,<SACINH>>
  3651						XWD [XWD ADFMPL,ARSWAP+FMP0],[BRAREN+ARADEN+<IFE N-1,<-1>>+FDV1]
  3652						FDV2+<IFE N-1,<-FDV2+FDV2L>>
  3653						N==N+1
  3654					>
  3655						XWD ET1+ADFMPL+<IFE N-5,<ET0>>,<IFE N-1,<SAC2>>+<IFN N-5,<FCE>>+FDVFD+<IFN N&2,<SCE
  3656	034530	006002	016001		>>+<IFE N&3-2,<SACINH>>
  3657	034531	045307	045313			XWD [XWD ADFMPL,ARSWAP+FMP0],[BRAREN+ARADEN+<IFE N-1,<-1>>+FDV1]
  3658	034532	000000	000503			FDV2+<IFE N-1,<-FDV2+FDV2L>>
  3659			000001			N==N+1
  3660
  3661						XWD ET1+ADFMPL+<IFE N-5,<ET0>>,<IFE N-1,<SAC2>>+<IFN N-5,<FCE>>+FDVFD+<IFN N&2,<SCE
  3662	034533	006002	016201		>>+<IFE N&3-2,<SACINH>>
  3663	034534	045307	045314			XWD [XWD ADFMPL,ARSWAP+FMP0],[BRAREN+ARADEN+<IFE N-1,<-1>>+FDV1]
  3664	034535	000000	000476			FDV2+<IFE N-1,<-FDV2+FDV2L>>
  3665			000002			N==N+1
  3666
  3667						XWD ET1+ADFMPL+<IFE N-5,<ET0>>,<IFE N-1,<SAC2>>+<IFN N-5,<FCE>>+FDVFD+<IFN N&2,<SCE
  3668	034536	006002	016051		>>+<IFE N&3-2,<SACINH>>
  3669	034537	045307	045313			XWD [XWD ADFMPL,ARSWAP+FMP0],[BRAREN+ARADEN+<IFE N-1,<-1>>+FDV1]
  3670	034540	000000	000503			FDV2+<IFE N-1,<-FDV2+FDV2L>>
  3671			000003			N==N+1
  3672
  3673						XWD ET1+ADFMPL+<IFE N-5,<ET0>>,<IFE N-1,<SAC2>>+<IFN N-5,<FCE>>+FDVFD+<IFN N&2,<SCE
  3674	034541	006002	016011		>>+<IFE N&3-2,<SACINH>>
  3675	034542	045307	045313			XWD [XWD ADFMPL,ARSWAP+FMP0],[BRAREN+ARADEN+<IFE N-1,<-1>>+FDV1]
  3676	034543	000000	000503			FDV2+<IFE N-1,<-FDV2+FDV2L>>
  3677			000004			N==N+1
  3678
  3679						XWD ET1+ADFMPL+<IFE N-5,<ET0>>,<IFE N-1,<SAC2>>+<IFN N-5,<FCE>>+FDVFD+<IFN N&2,<SCE
  3680	034544	006002	016001		>>+<IFE N&3-2,<SACINH>>
  3681	034545	045307	045313			XWD [XWD ADFMPL,ARSWAP+FMP0],[BRAREN+ARADEN+<IFE N-1,<-1>>+FDV1]
  3682	034546	000000	000503			FDV2+<IFE N-1,<-FDV2+FDV2L>>
  3683			000005			N==N+1
  3684
  3685						XWD ET1+ADFMPL+<IFE N-5,<ET0>>,<IFE N-1,<SAC2>>+<IFN N-5,<FCE>>+FDVFD+<IFN N&2,<SCE
  3686	034547	006003	016000		>>+<IFE N&3-2,<SACINH>>
  3687	034550	045307	045313			XWD [XWD ADFMPL,ARSWAP+FMP0],[BRAREN+ARADEN+<IFE N-1,<-1>>+FDV1]
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 11-4
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		140-177                                *** SEQ 0127

  3688	034551	000000	000503			FDV2+<IFE N-1,<-FDV2+FDV2L>>
  3689			000006			N==N+1
  3690
  3691						XWD ET1+ADFMPL+<IFE N-5,<ET0>>,<IFE N-1,<SAC2>>+<IFN N-5,<FCE>>+FDVFD+<IFN N&2,<SCE
  3692	034552	006002	016051		>>+<IFE N&3-2,<SACINH>>
  3693	034553	045307	045313			XWD [XWD ADFMPL,ARSWAP+FMP0],[BRAREN+ARADEN+<IFE N-1,<-1>>+FDV1]
  3694	034554	000000	000503			FDV2+<IFE N-1,<-FDV2+FDV2L>>
  3695			000007			N==N+1
  3696
  3697						XWD ET1+ADFMPL+<IFE N-5,<ET0>>,<IFE N-1,<SAC2>>+<IFN N-5,<FCE>>+FDVFD+<IFN N&2,<SCE
  3698	034555	006002	016011		>>+<IFE N&3-2,<SACINH>>
  3699	034556	045307	045313			XWD [XWD ADFMPL,ARSWAP+FMP0],[BRAREN+ARADEN+<IFE N-1,<-1>>+FDV1]
  3700	034557	000000	000503			FDV2+<IFE N-1,<-FDV2+FDV2L>>
  3701			000010			N==N+1
  3702
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 12
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		200-237                                *** SEQ 0128

  3703					SUBTTL	DISPATCH TABLE FOR INSTRUCTIONS		200-237
  3704
  3705					;*MOVES, ALIAS FWT						200-217
  3706			000000			N=0
  3707						REPEAT 20,
  3708					<	XWD <IFE N&3-2,<ET0>>+^_
  3709					<IFN N&10,<IFN N&3-2,<ADCR36+ADARMI+ADADD+^_
  3710					ADFMMI>>>+ADFMPL,<IFE N&3,<FCE>>+<IFE N&3-3,<FCEPSE+SAIAC0>>^_
  3711					+<IFE N&3-2,<SCE+SACINH>>
  3712						XWD [XWD <IFN N&10,<ADADD+ADMAGIC+ADCR36+ADARMI>>,ARADEN],0
  3713						<IFE N&14-4,<ARSWAP>>+<IFE N&14-10,<ARADEN+ADSUB>>+<IFE N&14-14,<FWT>>
  3714						N=N+1
  3715					>
  3716						XWD <IFE N&3-2,<ET0>>+<IFN N&10,<IFN N&3-2,<ADCR36+ADARMI+ADADD+ADFMMI>>>+ADFMPL,<I
  3717	034560	006000	000001		FE N&3,<FCE>>+<IFE N&3-3,<FCEPSE+SAIAC0>>+<IFE N&3-2,<SCE+SACINH>>
  3718	034561	045315	000000			XWD [XWD <IFN N&10,<ADADD+ADMAGIC+ADCR36+ADARMI>>,ARADEN],0
  3719	034562	000000	000000			<IFE N&14-4,<ARSWAP>>+<IFE N&14-10,<ARADEN+ADSUB>>+<IFE N&14-14,<FWT>>
  3720			000001			N=N+1
  3721
  3722						XWD <IFE N&3-2,<ET0>>+<IFN N&10,<IFN N&3-2,<ADCR36+ADARMI+ADADD+ADFMMI>>>+ADFMPL,<I
  3723	034563	006000	000000		FE N&3,<FCE>>+<IFE N&3-3,<FCEPSE+SAIAC0>>+<IFE N&3-2,<SCE+SACINH>>
  3724	034564	045315	000000			XWD [XWD <IFN N&10,<ADADD+ADMAGIC+ADCR36+ADARMI>>,ARADEN],0
  3725	034565	000000	000000			<IFE N&14-4,<ARSWAP>>+<IFE N&14-10,<ARADEN+ADSUB>>+<IFE N&14-14,<FWT>>
  3726			000002			N=N+1
  3727
  3728						XWD <IFE N&3-2,<ET0>>+<IFN N&10,<IFN N&3-2,<ADCR36+ADARMI+ADADD+ADFMMI>>>+ADFMPL,<I
  3729	034566	006001	000050		FE N&3,<FCE>>+<IFE N&3-3,<FCEPSE+SAIAC0>>+<IFE N&3-2,<SCE+SACINH>>
  3730	034567	045315	000000			XWD [XWD <IFN N&10,<ADADD+ADMAGIC+ADCR36+ADARMI>>,ARADEN],0
  3731	034570	000000	000000			<IFE N&14-4,<ARSWAP>>+<IFE N&14-10,<ARADEN+ADSUB>>+<IFE N&14-14,<FWT>>
  3732			000003			N=N+1
  3733
  3734						XWD <IFE N&3-2,<ET0>>+<IFN N&10,<IFN N&3-2,<ADCR36+ADARMI+ADADD+ADFMMI>>>+ADFMPL,<I
  3735	034571	006000	000143		FE N&3,<FCE>>+<IFE N&3-3,<FCEPSE+SAIAC0>>+<IFE N&3-2,<SCE+SACINH>>
  3736	034572	045315	000000			XWD [XWD <IFN N&10,<ADADD+ADMAGIC+ADCR36+ADARMI>>,ARADEN],0
  3737	034573	000000	000000			<IFE N&14-4,<ARSWAP>>+<IFE N&14-10,<ARADEN+ADSUB>>+<IFE N&14-14,<FWT>>
  3738			000004			N=N+1
  3739
  3740						XWD <IFE N&3-2,<ET0>>+<IFN N&10,<IFN N&3-2,<ADCR36+ADARMI+ADADD+ADFMMI>>>+ADFMPL,<I
  3741	034574	006000	000001		FE N&3,<FCE>>+<IFE N&3-3,<FCEPSE+SAIAC0>>+<IFE N&3-2,<SCE+SACINH>>
  3742	034575	045315	000000			XWD [XWD <IFN N&10,<ADADD+ADMAGIC+ADCR36+ADARMI>>,ARADEN],0
  3743	034576	000000	030000			<IFE N&14-4,<ARSWAP>>+<IFE N&14-10,<ARADEN+ADSUB>>+<IFE N&14-14,<FWT>>
  3744			000005			N=N+1
  3745
  3746						XWD <IFE N&3-2,<ET0>>+<IFN N&10,<IFN N&3-2,<ADCR36+ADARMI+ADADD+ADFMMI>>>+ADFMPL,<I
  3747	034577	006000	000000		FE N&3,<FCE>>+<IFE N&3-3,<FCEPSE+SAIAC0>>+<IFE N&3-2,<SCE+SACINH>>
  3748	034600	045315	000000			XWD [XWD <IFN N&10,<ADADD+ADMAGIC+ADCR36+ADARMI>>,ARADEN],0
  3749	034601	000000	030000			<IFE N&14-4,<ARSWAP>>+<IFE N&14-10,<ARADEN+ADSUB>>+<IFE N&14-14,<FWT>>
  3750			000006			N=N+1
  3751
  3752						XWD <IFE N&3-2,<ET0>>+<IFN N&10,<IFN N&3-2,<ADCR36+ADARMI+ADADD+ADFMMI>>>+ADFMPL,<I
  3753	034602	006001	000050		FE N&3,<FCE>>+<IFE N&3-3,<FCEPSE+SAIAC0>>+<IFE N&3-2,<SCE+SACINH>>
  3754	034603	045315	000000			XWD [XWD <IFN N&10,<ADADD+ADMAGIC+ADCR36+ADARMI>>,ARADEN],0
  3755	034604	000000	030000			<IFE N&14-4,<ARSWAP>>+<IFE N&14-10,<ARADEN+ADSUB>>+<IFE N&14-14,<FWT>>
  3756			000007			N=N+1
  3757
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 12-1
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		200-237                                *** SEQ 0129

  3758						XWD <IFE N&3-2,<ET0>>+<IFN N&10,<IFN N&3-2,<ADCR36+ADARMI+ADADD+ADFMMI>>>+ADFMPL,<I
  3759	034605	006000	000143		FE N&3,<FCE>>+<IFE N&3-3,<FCEPSE+SAIAC0>>+<IFE N&3-2,<SCE+SACINH>>
  3760	034606	045315	000000			XWD [XWD <IFN N&10,<ADADD+ADMAGIC+ADCR36+ADARMI>>,ARADEN],0
  3761	034607	000000	030000			<IFE N&14-4,<ARSWAP>>+<IFE N&14-10,<ARADEN+ADSUB>>+<IFE N&14-14,<FWT>>
  3762			000010			N=N+1
  3763
  3764						XWD <IFE N&3-2,<ET0>>+<IFN N&10,<IFN N&3-2,<ADCR36+ADARMI+ADADD+ADFMMI>>>+ADFMPL,<I
  3765	034610	076100	000001		FE N&3,<FCE>>+<IFE N&3-3,<FCEPSE+SAIAC0>>+<IFE N&3-2,<SCE+SACINH>>
  3766	034611	045316	000000			XWD [XWD <IFN N&10,<ADADD+ADMAGIC+ADCR36+ADARMI>>,ARADEN],0
  3767	034612	000000	006011			<IFE N&14-4,<ARSWAP>>+<IFE N&14-10,<ARADEN+ADSUB>>+<IFE N&14-14,<FWT>>
  3768			000011			N=N+1
  3769
  3770						XWD <IFE N&3-2,<ET0>>+<IFN N&10,<IFN N&3-2,<ADCR36+ADARMI+ADADD+ADFMMI>>>+ADFMPL,<I
  3771	034613	076100	000000		FE N&3,<FCE>>+<IFE N&3-3,<FCEPSE+SAIAC0>>+<IFE N&3-2,<SCE+SACINH>>
  3772	034614	045316	000000			XWD [XWD <IFN N&10,<ADADD+ADMAGIC+ADCR36+ADARMI>>,ARADEN],0
  3773	034615	000000	006011			<IFE N&14-4,<ARSWAP>>+<IFE N&14-10,<ARADEN+ADSUB>>+<IFE N&14-14,<FWT>>
  3774			000012			N=N+1
  3775
  3776						XWD <IFE N&3-2,<ET0>>+<IFN N&10,<IFN N&3-2,<ADCR36+ADARMI+ADADD+ADFMMI>>>+ADFMPL,<I
  3777	034616	006001	000050		FE N&3,<FCE>>+<IFE N&3-3,<FCEPSE+SAIAC0>>+<IFE N&3-2,<SCE+SACINH>>
  3778	034617	045316	000000			XWD [XWD <IFN N&10,<ADADD+ADMAGIC+ADCR36+ADARMI>>,ARADEN],0
  3779	034620	000000	006011			<IFE N&14-4,<ARSWAP>>+<IFE N&14-10,<ARADEN+ADSUB>>+<IFE N&14-14,<FWT>>
  3780			000013			N=N+1
  3781
  3782						XWD <IFE N&3-2,<ET0>>+<IFN N&10,<IFN N&3-2,<ADCR36+ADARMI+ADADD+ADFMMI>>>+ADFMPL,<I
  3783	034621	076100	000143		FE N&3,<FCE>>+<IFE N&3-3,<FCEPSE+SAIAC0>>+<IFE N&3-2,<SCE+SACINH>>
  3784	034622	045316	000000			XWD [XWD <IFN N&10,<ADADD+ADMAGIC+ADCR36+ADARMI>>,ARADEN],0
  3785	034623	000000	006011			<IFE N&14-4,<ARSWAP>>+<IFE N&14-10,<ARADEN+ADSUB>>+<IFE N&14-14,<FWT>>
  3786			000014			N=N+1
  3787
  3788						XWD <IFE N&3-2,<ET0>>+<IFN N&10,<IFN N&3-2,<ADCR36+ADARMI+ADADD+ADFMMI>>>+ADFMPL,<I
  3789	034624	076100	000001		FE N&3,<FCE>>+<IFE N&3-3,<FCEPSE+SAIAC0>>+<IFE N&3-2,<SCE+SACINH>>
  3790	034625	045316	000000			XWD [XWD <IFN N&10,<ADADD+ADMAGIC+ADCR36+ADARMI>>,ARADEN],0
  3791	034626	000000	000007			<IFE N&14-4,<ARSWAP>>+<IFE N&14-10,<ARADEN+ADSUB>>+<IFE N&14-14,<FWT>>
  3792			000015			N=N+1
  3793
  3794						XWD <IFE N&3-2,<ET0>>+<IFN N&10,<IFN N&3-2,<ADCR36+ADARMI+ADADD+ADFMMI>>>+ADFMPL,<I
  3795	034627	076100	000000		FE N&3,<FCE>>+<IFE N&3-3,<FCEPSE+SAIAC0>>+<IFE N&3-2,<SCE+SACINH>>
  3796	034630	045316	000000			XWD [XWD <IFN N&10,<ADADD+ADMAGIC+ADCR36+ADARMI>>,ARADEN],0
  3797	034631	000000	000007			<IFE N&14-4,<ARSWAP>>+<IFE N&14-10,<ARADEN+ADSUB>>+<IFE N&14-14,<FWT>>
  3798			000016			N=N+1
  3799
  3800						XWD <IFE N&3-2,<ET0>>+<IFN N&10,<IFN N&3-2,<ADCR36+ADARMI+ADADD+ADFMMI>>>+ADFMPL,<I
  3801	034632	006001	000050		FE N&3,<FCE>>+<IFE N&3-3,<FCEPSE+SAIAC0>>+<IFE N&3-2,<SCE+SACINH>>
  3802	034633	045316	000000			XWD [XWD <IFN N&10,<ADADD+ADMAGIC+ADCR36+ADARMI>>,ARADEN],0
  3803	034634	000000	000007			<IFE N&14-4,<ARSWAP>>+<IFE N&14-10,<ARADEN+ADSUB>>+<IFE N&14-14,<FWT>>
  3804			000017			N=N+1
  3805
  3806						XWD <IFE N&3-2,<ET0>>+<IFN N&10,<IFN N&3-2,<ADCR36+ADARMI+ADADD+ADFMMI>>>+ADFMPL,<I
  3807	034635	076100	000143		FE N&3,<FCE>>+<IFE N&3-3,<FCEPSE+SAIAC0>>+<IFE N&3-2,<SCE+SACINH>>
  3808	034636	045316	000000			XWD [XWD <IFN N&10,<ADADD+ADMAGIC+ADCR36+ADARMI>>,ARADEN],0
  3809	034637	000000	000007			<IFE N&14-4,<ARSWAP>>+<IFE N&14-10,<ARADEN+ADSUB>>+<IFE N&14-14,<FWT>>
  3810			000020			N=N+1
  3811
  3812
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 12-2
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		200-237                                *** SEQ 0130

  3813					DEFINE SWCHES
  3814						<XWD ET0+ET1+ADFMPL,<IFN N&3-1,<FCE>>+<IFN N&2,<SCE>>^_
  3815					+<IFE N&3-2,<SACINH>>+<IFN N&4,<IFN N&3-2,<SAC2>>>>
  3816
  3817					;*MULTIPLIES							220-227
  3818			000000			N=0
  3819						REPEAT 10,
  3820					<	SWCHES+LNGCYC+MULFD
  3821						XWD [BRAREN+MUL0],[<IFE N&4,<IMUL1>>+<IFN N&4,<MUL1>>]
  3822						<IFE N&4,<IMUL2>>+<IFN N&4,<MUL2>>
  3823						N=N+1
  3824					>
  3825						SWCHES^XWD ET0+ET1+ADFMPL,<IFN N&3-1,<FCE>>+<IFN N&2,<SCE>>+<IFE N&3-2,<SACINH>>+<I
  3826	034640	006003	041001		FN N&4,<IFN N&3-2,<SAC2>>>^+LNGCYC+MULFD
  3827	034641	045317	045320			XWD [BRAREN+MUL0],[<IFE N&4,<IMUL1>>+<IFN N&4,<MUL1>>]
  3828	034642	000000	000151			<IFE N&4,<IMUL2>>+<IFN N&4,<MUL2>>
  3829			000001			N=N+1
  3830
  3831						SWCHES^XWD ET0+ET1+ADFMPL,<IFN N&3-1,<FCE>>+<IFN N&2,<SCE>>+<IFE N&3-2,<SACINH>>+<I
  3832	034643	006003	041000		FN N&4,<IFN N&3-2,<SAC2>>>^+LNGCYC+MULFD
  3833	034644	045317	045320			XWD [BRAREN+MUL0],[<IFE N&4,<IMUL1>>+<IFN N&4,<MUL1>>]
  3834	034645	000000	000151			<IFE N&4,<IMUL2>>+<IFN N&4,<MUL2>>
  3835			000002			N=N+1
  3836
  3837						SWCHES^XWD ET0+ET1+ADFMPL,<IFN N&3-1,<FCE>>+<IFN N&2,<SCE>>+<IFE N&3-2,<SACINH>>+<I
  3838	034646	006003	041051		FN N&4,<IFN N&3-2,<SAC2>>>^+LNGCYC+MULFD
  3839	034647	045317	045320			XWD [BRAREN+MUL0],[<IFE N&4,<IMUL1>>+<IFN N&4,<MUL1>>]
  3840	034650	000000	000151			<IFE N&4,<IMUL2>>+<IFN N&4,<MUL2>>
  3841			000003			N=N+1
  3842
  3843						SWCHES^XWD ET0+ET1+ADFMPL,<IFN N&3-1,<FCE>>+<IFN N&2,<SCE>>+<IFE N&3-2,<SACINH>>+<I
  3844	034651	006003	041011		FN N&4,<IFN N&3-2,<SAC2>>>^+LNGCYC+MULFD
  3845	034652	045317	045320			XWD [BRAREN+MUL0],[<IFE N&4,<IMUL1>>+<IFN N&4,<MUL1>>]
  3846	034653	000000	000151			<IFE N&4,<IMUL2>>+<IFN N&4,<MUL2>>
  3847			000004			N=N+1
  3848
  3849						SWCHES^XWD ET0+ET1+ADFMPL,<IFN N&3-1,<FCE>>+<IFN N&2,<SCE>>+<IFE N&3-2,<SACINH>>+<I
  3850	034654	006003	041201		FN N&4,<IFN N&3-2,<SAC2>>>^+LNGCYC+MULFD
  3851	034655	045317	045321			XWD [BRAREN+MUL0],[<IFE N&4,<IMUL1>>+<IFN N&4,<MUL1>>]
  3852	034656	000000	000153			<IFE N&4,<IMUL2>>+<IFN N&4,<MUL2>>
  3853			000005			N=N+1
  3854
  3855						SWCHES^XWD ET0+ET1+ADFMPL,<IFN N&3-1,<FCE>>+<IFN N&2,<SCE>>+<IFE N&3-2,<SACINH>>+<I
  3856	034657	006003	041200		FN N&4,<IFN N&3-2,<SAC2>>>^+LNGCYC+MULFD
  3857	034660	045317	045321			XWD [BRAREN+MUL0],[<IFE N&4,<IMUL1>>+<IFN N&4,<MUL1>>]
  3858	034661	000000	000153			<IFE N&4,<IMUL2>>+<IFN N&4,<MUL2>>
  3859			000006			N=N+1
  3860
  3861						SWCHES^XWD ET0+ET1+ADFMPL,<IFN N&3-1,<FCE>>+<IFN N&2,<SCE>>+<IFE N&3-2,<SACINH>>+<I
  3862	034662	006003	041051		FN N&4,<IFN N&3-2,<SAC2>>>^+LNGCYC+MULFD
  3863	034663	045317	045321			XWD [BRAREN+MUL0],[<IFE N&4,<IMUL1>>+<IFN N&4,<MUL1>>]
  3864	034664	000000	000153			<IFE N&4,<IMUL2>>+<IFN N&4,<MUL2>>
  3865			000007			N=N+1
  3866
  3867						SWCHES^XWD ET0+ET1+ADFMPL,<IFN N&3-1,<FCE>>+<IFN N&2,<SCE>>+<IFE N&3-2,<SACINH>>+<I
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 12-3
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		200-237                                *** SEQ 0131

  3868	034665	006003	041211		FN N&4,<IFN N&3-2,<SAC2>>>^+LNGCYC+MULFD
  3869	034666	045317	045321			XWD [BRAREN+MUL0],[<IFE N&4,<IMUL1>>+<IFN N&4,<MUL1>>]
  3870	034667	000000	000153			<IFE N&4,<IMUL2>>+<IFN N&4,<MUL2>>
  3871			000010			N=N+1
  3872
  3873
  3874					;*DIVIDES							230-237
  3875			000000			N=0
  3876						REPEAT 10,
  3877					<	SWCHES!<IFN N&3-2,<SAC2>>+DIVFD
  3878						XWD [BRAREN+<IFN N&4,<ARADEN+DIV0>>+<IFE N&4,<ARADEN+IDIV0>>]^_
  3879					,[<IFN N&4,<DIV1>>+<IFE N&4,<IDIV1>>]
  3880						XWD ADARPL+ADADD,<IFN N&4,<DIV2>>+<IFE N&4,<IDIV2>>
  3881						N=N+1
  3882					>
  3883						SWCHES^XWD ET0+ET1+ADFMPL,<IFN N&3-1,<FCE>>+<IFN N&2,<SCE>>+<IFE N&3-2,<SACINH>>+<I
  3884	034670	006003	002201		FN N&4,<IFN N&3-2,<SAC2>>>^!<IFN N&3-2,<SAC2>>+DIVFD
  3885						XWD [BRAREN+<IFN N&4,<ARADEN+DIV0>>+<IFE N&4,<ARADEN+IDIV0>>],[<IFN N&4,<DIV1>>+<IF
  3886	034671	045322	045323		E N&4,<IDIV1>>]
  3887	034672	040060	000241			XWD ADARPL+ADADD,<IFN N&4,<DIV2>>+<IFE N&4,<IDIV2>>
  3888			000001			N=N+1
  3889
  3890						SWCHES^XWD ET0+ET1+ADFMPL,<IFN N&3-1,<FCE>>+<IFN N&2,<SCE>>+<IFE N&3-2,<SACINH>>+<I
  3891	034673	006003	002200		FN N&4,<IFN N&3-2,<SAC2>>>^!<IFN N&3-2,<SAC2>>+DIVFD
  3892						XWD [BRAREN+<IFN N&4,<ARADEN+DIV0>>+<IFE N&4,<ARADEN+IDIV0>>],[<IFN N&4,<DIV1>>+<IF
  3893	034674	045322	045323		E N&4,<IDIV1>>]
  3894	034675	040060	000241			XWD ADARPL+ADADD,<IFN N&4,<DIV2>>+<IFE N&4,<IDIV2>>
  3895			000002			N=N+1
  3896
  3897						SWCHES^XWD ET0+ET1+ADFMPL,<IFN N&3-1,<FCE>>+<IFN N&2,<SCE>>+<IFE N&3-2,<SACINH>>+<I
  3898	034676	006003	002051		FN N&4,<IFN N&3-2,<SAC2>>>^!<IFN N&3-2,<SAC2>>+DIVFD
  3899						XWD [BRAREN+<IFN N&4,<ARADEN+DIV0>>+<IFE N&4,<ARADEN+IDIV0>>],[<IFN N&4,<DIV1>>+<IF
  3900	034677	045322	045323		E N&4,<IDIV1>>]
  3901	034700	040060	000241			XWD ADARPL+ADADD,<IFN N&4,<DIV2>>+<IFE N&4,<IDIV2>>
  3902			000003			N=N+1
  3903
  3904						SWCHES^XWD ET0+ET1+ADFMPL,<IFN N&3-1,<FCE>>+<IFN N&2,<SCE>>+<IFE N&3-2,<SACINH>>+<I
  3905	034701	006003	002211		FN N&4,<IFN N&3-2,<SAC2>>>^!<IFN N&3-2,<SAC2>>+DIVFD
  3906						XWD [BRAREN+<IFN N&4,<ARADEN+DIV0>>+<IFE N&4,<ARADEN+IDIV0>>],[<IFN N&4,<DIV1>>+<IF
  3907	034702	045322	045323		E N&4,<IDIV1>>]
  3908	034703	040060	000241			XWD ADARPL+ADADD,<IFN N&4,<DIV2>>+<IFE N&4,<IDIV2>>
  3909			000004			N=N+1
  3910
  3911						SWCHES^XWD ET0+ET1+ADFMPL,<IFN N&3-1,<FCE>>+<IFN N&2,<SCE>>+<IFE N&3-2,<SACINH>>+<I
  3912	034704	006003	002201		FN N&4,<IFN N&3-2,<SAC2>>>^!<IFN N&3-2,<SAC2>>+DIVFD
  3913						XWD [BRAREN+<IFN N&4,<ARADEN+DIV0>>+<IFE N&4,<ARADEN+IDIV0>>],[<IFN N&4,<DIV1>>+<IF
  3914	034705	045324	045325		E N&4,<IDIV1>>]
  3915	034706	040060	000232			XWD ADARPL+ADADD,<IFN N&4,<DIV2>>+<IFE N&4,<IDIV2>>
  3916			000005			N=N+1
  3917
  3918						SWCHES^XWD ET0+ET1+ADFMPL,<IFN N&3-1,<FCE>>+<IFN N&2,<SCE>>+<IFE N&3-2,<SACINH>>+<I
  3919	034707	006003	002200		FN N&4,<IFN N&3-2,<SAC2>>>^!<IFN N&3-2,<SAC2>>+DIVFD
  3920						XWD [BRAREN+<IFN N&4,<ARADEN+DIV0>>+<IFE N&4,<ARADEN+IDIV0>>],[<IFN N&4,<DIV1>>+<IF
  3921	034710	045324	045325		E N&4,<IDIV1>>]
  3922	034711	040060	000232			XWD ADARPL+ADADD,<IFN N&4,<DIV2>>+<IFE N&4,<IDIV2>>
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 12-4
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		200-237                                *** SEQ 0132

  3923			000006			N=N+1
  3924
  3925						SWCHES^XWD ET0+ET1+ADFMPL,<IFN N&3-1,<FCE>>+<IFN N&2,<SCE>>+<IFE N&3-2,<SACINH>>+<I
  3926	034712	006003	002051		FN N&4,<IFN N&3-2,<SAC2>>>^!<IFN N&3-2,<SAC2>>+DIVFD
  3927						XWD [BRAREN+<IFN N&4,<ARADEN+DIV0>>+<IFE N&4,<ARADEN+IDIV0>>],[<IFN N&4,<DIV1>>+<IF
  3928	034713	045324	045325		E N&4,<IDIV1>>]
  3929	034714	040060	000232			XWD ADARPL+ADADD,<IFN N&4,<DIV2>>+<IFE N&4,<IDIV2>>
  3930			000007			N=N+1
  3931
  3932						SWCHES^XWD ET0+ET1+ADFMPL,<IFN N&3-1,<FCE>>+<IFN N&2,<SCE>>+<IFE N&3-2,<SACINH>>+<I
  3933	034715	006003	002211		FN N&4,<IFN N&3-2,<SAC2>>>^!<IFN N&3-2,<SAC2>>+DIVFD
  3934						XWD [BRAREN+<IFN N&4,<ARADEN+DIV0>>+<IFE N&4,<ARADEN+IDIV0>>],[<IFN N&4,<DIV1>>+<IF
  3935	034716	045324	045325		E N&4,<IDIV1>>]
  3936	034717	040060	000232			XWD ADARPL+ADADD,<IFN N&4,<DIV2>>+<IFE N&4,<IDIV2>>
  3937			000010			N=N+1
  3938
  3939
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 13
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		240-247                                *** SEQ 0133

  3940					SUBTTL	DISPATCH TABLE FOR INSTRUCTIONS		240-247
  3941
  3942					;*ASH, ROT, LSH							240-241-242
  3943		006003	003000			A0==<ADFMPL+ET0+ET1>B17+SRINST
  3944
  3945						REPEAT 3,
  3946					<	A0
  3947						XWD [ARADEN+BRAREN+SSHFT0],[SHFT1]
  3948						SSHFT2
  3949					>
  3950	034720	006003	003000			A0
  3951	034721	045326	045327			XWD [ARADEN+BRAREN+SSHFT0],[SHFT1]
  3952	034722	000000	000306			SSHFT2
  3953
  3954	034723	006003	003000			A0
  3955	034724	045326	045327			XWD [ARADEN+BRAREN+SSHFT0],[SHFT1]
  3956	034725	000000	000306			SSHFT2
  3957
  3958	034726	006003	003000			A0
  3959	034727	045326	045327			XWD [ARADEN+BRAREN+SSHFT0],[SHFT1]
  3960	034730	000000	000306			SSHFT2
  3961
  3962
  3963					;*JFFO								243
  3964	034731	006003	043400			XWD ADFMPL+ET0+ET1,PCCHNG+LNGCYC+JFFOFD
  3965	034732	045330	045331			XWD [XWD ADBRPL,ARADEN+BRAREN+JFFO0],[XWD ADARPL,ABPCEN+JFFO1]
  3966	034733	000004	000176			XWD INFTST,JFFO2
  3967
  3968					;*ASHC, ROTC, LSHC						244-245-246
  3969						REPEAT 3,
  3970					<	A0+SAC2
  3971						XWD [ARADEN+BRAREN+DSHFT0],[XWD ADFMPL,SHFT1]
  3972						DSHFT2
  3973					>
  3974	034734	006003	003200			A0+SAC2
  3975	034735	045332	045333			XWD [ARADEN+BRAREN+DSHFT0],[XWD ADFMPL,SHFT1]
  3976	034736	000000	000304			DSHFT2
  3977
  3978	034737	006003	003200			A0+SAC2
  3979	034740	045332	045333			XWD [ARADEN+BRAREN+DSHFT0],[XWD ADFMPL,SHFT1]
  3980	034741	000000	000304			DSHFT2
  3981
  3982	034742	006003	003200			A0+SAC2
  3983	034743	045332	045333			XWD [ARADEN+BRAREN+DSHFT0],[XWD ADFMPL,SHFT1]
  3984	034744	000000	000304			DSHFT2
  3985
  3986
  3987					;*UNDEFINED OP CODE						247
  3988						UUOMAC^
  3989	034745	000003	000060			XWD ET0+ET1,STORE+SACINH
  3990	034746	045272	045273			XWD [MONUUO],[XWD ADARPL,0]
  3991	034747	000000	044000			XWD 0,ARIREN+ARRTAD
  3992
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 14
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		250-257                                *** SEQ 0134

  3993					SUBTTL	DISPATCH TABLE FOR INSTRUCTIONS		250-257
  3994
  3995					;*EXCH								250
  3996	034750	006000	000103			XWD ADFMPL,FCEPSE+SACBR
  3997	034751	000000	000000			0
  3998	034752	000000	007000			BRAREN+ARADEN
  3999
  4000					;*BLT								251
  4001	034753	246103	022400			XWD ADARMI+ADFMPL+ADPL1L+ADADD+ET0+ET1,PCCHNG+BLTFD
  4002	034754	045334	045335			XWD [ARADEN+BLT0],[XWD ADADD+ADFMPL,ARRARL+BLT1]
  4003	034755	000062	015423			XWD ADARPL+PCCLK,ARPCEN+BRAREN+BLT2
  4004
  4005					;*AOBJX								252-253
  4006			000000			N=0
  4007						REPEAT 2,
  4008					<	XWD ADFMPL+ADPL1B+ADADD,PCCHNG+LNGCYC+AOBJD
  4009						0
  4010						XWD ADBRPL,BRAREN+ARADEN+AOBJX+N
  4011						N=1
  4012					>
  4013	034756	266000	064400			XWD ADFMPL+ADPL1B+ADADD,PCCHNG+LNGCYC+AOBJD
  4014	034757	000000	000000			0
  4015	034760	000600	007001			XWD ADBRPL,BRAREN+ARADEN+AOBJX+N
  4016			000001			N=1
  4017
  4018	034761	266000	064400			XWD ADFMPL+ADPL1B+ADADD,PCCHNG+LNGCYC+AOBJD
  4019	034762	000000	000000			0
  4020	034763	000600	007002			XWD ADBRPL,BRAREN+ARADEN+AOBJX+N
  4021			000001			N=1
  4022
  4023
  4024					;*JRST								254
  4025	034764	000000	031440			XWD 0,SACINH+PCCHNG+JRSTFD
  4026	034765	000000	000000			0
  4027	034766	000000	014005			ARPCEN+JRST1
  4028
  4029					;*JFCL								255
  4030	034767	000000	030440			XWD 0,SACINH+PCCHNG+JFCLFD
  4031	034770	000000	000000			0
  4032	034771	000000	000006			XWD	0,JFCL1
  4033
  4034					;*XCT								256
  4035	034772	000004	023440			XWD	INFTST,PCCHNG+SACINH+XCTFD
  4036	034773	000000	000000			0
  4037	034774	000000	000043			XCT2
  4038
  4039					;*MAP								257
  4040	034775	000000	000410			XWD	0,SCE+PCCHNG
  4041	034776	000000	000000			0
  4042	034777	000000	100664			ABPCEN+MAP2
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 15
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		260-267                                *** SEQ 0135

  4043					SUBTTL	DISPATCH TABLE FOR INSTRUCTIONS		260-267
  4044
  4045		266000	024000			A0==<ADFMPL+ADPL1B+ADADD>B17+PUSHD
  4046		266003	024120			A1==A0+<ET0+ET1>B17+SACBR+STORE
  4047			007000			A2==ARADEN+BRAREN
  4048		000600	000000			A3==<ADBRPL>B17
  4049
  4050					;*PUSHJ								260
  4051	035000	266003	024120				A1
  4052	035001	045336	045337			XWD	[A2+PUSHES],[A3+ABADEN]
  4053	035002	000002	137110			XWD	PCCLK,ABPCEN+ARFLGS+ARPCEN+BRAREN+PUSHJ1
  4054
  4055					;*PUSH								261
  4056	035003	266003	424121				A1+FCE+ABADEN
  4057	035004	045340	045341			XWD	[A2+PUSH1],[A3]
  4058	035005	000000	007111				ARADEN+BRAREN+PUSH2
  4059
  4060		446000	000004			A0==FCCACRT+<ADFMPL+ADMI1B+ADADD>B17
  4061		000600	007114			A1==BRAREN+ARADEN+POPS+<ADBRPL>B17
  4062
  4063					;*POP								262
  4064	035006	446001	000114				A0+SCE+SACBR+<ET0>B17
  4065	035007	045342	000000			XWD	[A1],0
  4066	035010	000000	007000				BRAREN+ARADEN
  4067
  4068					;*POPJ								263
  4069	035011	446000	000404				A0+PCCHNG
  4070	035012	000000	000000				0
  4071	035013	000600	407114				A1+ABADEN
  4072
  4073					;*JSR								264
  4074	035014	000000	000450				PCCHNG+SCE+SACINH
  4075	035015	000000	000000				0
  4076	035016	000002	136122			XWD 	PCCLK,ARPCEN+ARFLGS+ABPCEN+PCINCL
  4077
  4078					;*JSP								265
  4079	035017	000000	000400			XWD	0,PCCHNG
  4080	035020	000000	000000				0
  4081	035021	000600	037000			XWD	ADBRPL,ARPCEN+ARFLGS+BRAREN
  4082
  4083					;*JSA								266
  4084	035022	000061	400510			XWD	ADARPL+ET0,SACBR+SCE+PCCHNG+ABADEN
  4085	035023	045343	000000			XWD	[XWD ADFMPL+PCCLK,ARLARR+ARPCEN+ABPCEN+PCINCL],0
  4086	035024	000004	007000			XWD	INFTST,BRAREN+ARADEN
  4087
  4088					;*JRA								267
  4089	035025	000600	400406			XWD	ADBRPL,FCCACL+PCCHNG+ABADEN
  4090	035026	000000	000000			0
  4091	035027	000004	000000			XWD	INFTST,0
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 16
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		270-377                                *** SEQ 0136

  4092					SUBTTL	DISPATCH TABLE FOR INSTRUCTIONS		270-377
  4093
  4094					;*ADD-SUBTRACT							 270-277
  4095
  4096			000000			N=0
  4097						REPEAT 10,
  4098					<	XWD ADADD+ADFMPL+<IFE N&4,<ADARPL>>+<IFN N&4^_
  4099					,<ADARMI+ADCR36>>,<IFE N&3,<FCE>>+<IFN N&2,<FCEPSE>>+^_
  4100					<IFE N&3-2,<SACINH>>
  4101						0
  4102						ARADEN+ADSUB
  4103						N=N+1
  4104					>
  4105						XWD ADADD+ADFMPL+<IFE N&4,<ADARPL>>+<IFN N&4,<ADARMI+ADCR36>>,<IFE N&3,<FCE>>+<IFN 
  4106	035030	046060	000001		N&2,<FCEPSE>>+<IFE N&3-2,<SACINH>>
  4107	035031	000000	000000			0
  4108	035032	000000	006011			ARADEN+ADSUB
  4109			000001			N=N+1
  4110
  4111						XWD ADADD+ADFMPL+<IFE N&4,<ADARPL>>+<IFN N&4,<ADARMI+ADCR36>>,<IFE N&3,<FCE>>+<IFN 
  4112	035033	046060	000000		N&2,<FCEPSE>>+<IFE N&3-2,<SACINH>>
  4113	035034	000000	000000			0
  4114	035035	000000	006011			ARADEN+ADSUB
  4115			000002			N=N+1
  4116
  4117						XWD ADADD+ADFMPL+<IFE N&4,<ADARPL>>+<IFN N&4,<ADARMI+ADCR36>>,<IFE N&3,<FCE>>+<IFN 
  4118	035036	046060	000043		N&2,<FCEPSE>>+<IFE N&3-2,<SACINH>>
  4119	035037	000000	000000			0
  4120	035040	000000	006011			ARADEN+ADSUB
  4121			000003			N=N+1
  4122
  4123						XWD ADADD+ADFMPL+<IFE N&4,<ADARPL>>+<IFN N&4,<ADARMI+ADCR36>>,<IFE N&3,<FCE>>+<IFN 
  4124	035041	046060	000003		N&2,<FCEPSE>>+<IFE N&3-2,<SACINH>>
  4125	035042	000000	000000			0
  4126	035043	000000	006011			ARADEN+ADSUB
  4127			000004			N=N+1
  4128
  4129						XWD ADADD+ADFMPL+<IFE N&4,<ADARPL>>+<IFN N&4,<ADARMI+ADCR36>>,<IFE N&3,<FCE>>+<IFN 
  4130	035044	066100	000001		N&2,<FCEPSE>>+<IFE N&3-2,<SACINH>>
  4131	035045	000000	000000			0
  4132	035046	000000	006011			ARADEN+ADSUB
  4133			000005			N=N+1
  4134
  4135						XWD ADADD+ADFMPL+<IFE N&4,<ADARPL>>+<IFN N&4,<ADARMI+ADCR36>>,<IFE N&3,<FCE>>+<IFN 
  4136	035047	066100	000000		N&2,<FCEPSE>>+<IFE N&3-2,<SACINH>>
  4137	035050	000000	000000			0
  4138	035051	000000	006011			ARADEN+ADSUB
  4139			000006			N=N+1
  4140
  4141						XWD ADADD+ADFMPL+<IFE N&4,<ADARPL>>+<IFN N&4,<ADARMI+ADCR36>>,<IFE N&3,<FCE>>+<IFN 
  4142	035052	066100	000043		N&2,<FCEPSE>>+<IFE N&3-2,<SACINH>>
  4143	035053	000000	000000			0
  4144	035054	000000	006011			ARADEN+ADSUB
  4145			000007			N=N+1
  4146
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 16-1
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		270-377                                *** SEQ 0137

  4147						XWD ADADD+ADFMPL+<IFE N&4,<ADARPL>>+<IFN N&4,<ADARMI+ADCR36>>,<IFE N&3,<FCE>>+<IFN 
  4148	035055	066100	000003		N&2,<FCEPSE>>+<IFE N&3-2,<SACINH>>
  4149	035056	000000	000000			0
  4150	035057	000000	006011			ARADEN+ADSUB
  4151			000010			N=N+1
  4152
  4153
  4154					;*COMPARES, JUMPS AND SKIPS					300-377
  4155
  4156			000000			N=0
  4157						REPEAT 20,
  4158					<	XWD ADFMPL+ADARMI+ADCR36+ADADD+ET0,SKPFD+ABPCEN+SACINH+^_
  4159					PCCHNG+<IFN N&10,<FCE>>
  4160						XWD	[ADCLKINH,,0],0
  4161						XWD 0,COMP
  4162						N=N+1
  4163					>
  4164	035060	066101	103440			XWD ADFMPL+ADARMI+ADCR36+ADADD+ET0,SKPFD+ABPCEN+SACINH+PCCHNG+<IFN N&10,<FCE>>
  4165	035061	045344	000000			XWD	[ADCLKINH,,0],0
  4166	035062	000000	000022			XWD 0,COMP
  4167			000001			N=N+1
  4168
  4169	035063	066101	103440			XWD ADFMPL+ADARMI+ADCR36+ADADD+ET0,SKPFD+ABPCEN+SACINH+PCCHNG+<IFN N&10,<FCE>>
  4170	035064	045344	000000			XWD	[ADCLKINH,,0],0
  4171	035065	000000	000022			XWD 0,COMP
  4172			000002			N=N+1
  4173
  4174	035066	066101	103440			XWD ADFMPL+ADARMI+ADCR36+ADADD+ET0,SKPFD+ABPCEN+SACINH+PCCHNG+<IFN N&10,<FCE>>
  4175	035067	045344	000000			XWD	[ADCLKINH,,0],0
  4176	035070	000000	000022			XWD 0,COMP
  4177			000003			N=N+1
  4178
  4179	035071	066101	103440			XWD ADFMPL+ADARMI+ADCR36+ADADD+ET0,SKPFD+ABPCEN+SACINH+PCCHNG+<IFN N&10,<FCE>>
  4180	035072	045344	000000			XWD	[ADCLKINH,,0],0
  4181	035073	000000	000022			XWD 0,COMP
  4182			000004			N=N+1
  4183
  4184	035074	066101	103440			XWD ADFMPL+ADARMI+ADCR36+ADADD+ET0,SKPFD+ABPCEN+SACINH+PCCHNG+<IFN N&10,<FCE>>
  4185	035075	045344	000000			XWD	[ADCLKINH,,0],0
  4186	035076	000000	000022			XWD 0,COMP
  4187			000005			N=N+1
  4188
  4189	035077	066101	103440			XWD ADFMPL+ADARMI+ADCR36+ADADD+ET0,SKPFD+ABPCEN+SACINH+PCCHNG+<IFN N&10,<FCE>>
  4190	035100	045344	000000			XWD	[ADCLKINH,,0],0
  4191	035101	000000	000022			XWD 0,COMP
  4192			000006			N=N+1
  4193
  4194	035102	066101	103440			XWD ADFMPL+ADARMI+ADCR36+ADADD+ET0,SKPFD+ABPCEN+SACINH+PCCHNG+<IFN N&10,<FCE>>
  4195	035103	045344	000000			XWD	[ADCLKINH,,0],0
  4196	035104	000000	000022			XWD 0,COMP
  4197			000007			N=N+1
  4198
  4199	035105	066101	103440			XWD ADFMPL+ADARMI+ADCR36+ADADD+ET0,SKPFD+ABPCEN+SACINH+PCCHNG+<IFN N&10,<FCE>>
  4200	035106	045344	000000			XWD	[ADCLKINH,,0],0
  4201	035107	000000	000022			XWD 0,COMP
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 16-2
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		270-377                                *** SEQ 0138

  4202			000010			N=N+1
  4203
  4204	035110	066101	103441			XWD ADFMPL+ADARMI+ADCR36+ADADD+ET0,SKPFD+ABPCEN+SACINH+PCCHNG+<IFN N&10,<FCE>>
  4205	035111	045344	000000			XWD	[ADCLKINH,,0],0
  4206	035112	000000	000022			XWD 0,COMP
  4207			000011			N=N+1
  4208
  4209	035113	066101	103441			XWD ADFMPL+ADARMI+ADCR36+ADADD+ET0,SKPFD+ABPCEN+SACINH+PCCHNG+<IFN N&10,<FCE>>
  4210	035114	045344	000000			XWD	[ADCLKINH,,0],0
  4211	035115	000000	000022			XWD 0,COMP
  4212			000012			N=N+1
  4213
  4214	035116	066101	103441			XWD ADFMPL+ADARMI+ADCR36+ADADD+ET0,SKPFD+ABPCEN+SACINH+PCCHNG+<IFN N&10,<FCE>>
  4215	035117	045344	000000			XWD	[ADCLKINH,,0],0
  4216	035120	000000	000022			XWD 0,COMP
  4217			000013			N=N+1
  4218
  4219	035121	066101	103441			XWD ADFMPL+ADARMI+ADCR36+ADADD+ET0,SKPFD+ABPCEN+SACINH+PCCHNG+<IFN N&10,<FCE>>
  4220	035122	045344	000000			XWD	[ADCLKINH,,0],0
  4221	035123	000000	000022			XWD 0,COMP
  4222			000014			N=N+1
  4223
  4224	035124	066101	103441			XWD ADFMPL+ADARMI+ADCR36+ADADD+ET0,SKPFD+ABPCEN+SACINH+PCCHNG+<IFN N&10,<FCE>>
  4225	035125	045344	000000			XWD	[ADCLKINH,,0],0
  4226	035126	000000	000022			XWD 0,COMP
  4227			000015			N=N+1
  4228
  4229	035127	066101	103441			XWD ADFMPL+ADARMI+ADCR36+ADADD+ET0,SKPFD+ABPCEN+SACINH+PCCHNG+<IFN N&10,<FCE>>
  4230	035130	045344	000000			XWD	[ADCLKINH,,0],0
  4231	035131	000000	000022			XWD 0,COMP
  4232			000016			N=N+1
  4233
  4234	035132	066101	103441			XWD ADFMPL+ADARMI+ADCR36+ADADD+ET0,SKPFD+ABPCEN+SACINH+PCCHNG+<IFN N&10,<FCE>>
  4235	035133	045344	000000			XWD	[ADCLKINH,,0],0
  4236	035134	000000	000022			XWD 0,COMP
  4237			000017			N=N+1
  4238
  4239	035135	066101	103441			XWD ADFMPL+ADARMI+ADCR36+ADADD+ET0,SKPFD+ABPCEN+SACINH+PCCHNG+<IFN N&10,<FCE>>
  4240	035136	045344	000000			XWD	[ADCLKINH,,0],0
  4241	035137	000000	000022			XWD 0,COMP
  4242			000020			N=N+1
  4243
  4244
  4245						REPEAT 60,
  4246					<	<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4247					SAIAC0^_
  4248					+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>^_
  4249					+<IFN N&40,<<ADADD>B17>>+<IFE N&70-50,<<ADCR36+ADMAGIC>B17>>^_
  4250					+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4251						[ADCLKINH,,0],,0
  4252						IFN N&10,<XWD 0,ARADEN+SKIPS>
  4253						IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4254						N=N+1
  4255					>
  4256						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 16-3
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		270-377                                *** SEQ 0139

  4257					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4258	035140	006001	003400		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4259	035141	045344	000000			[ADCLKINH,,0],,0
  4260						IFN N&10,<XWD 0,ARADEN+SKIPS>
  4261	035142	000600	007054			IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4262			000021			N=N+1
  4263
  4264						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4265					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4266	035143	006001	003400		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4267	035144	045344	000000			[ADCLKINH,,0],,0
  4268						IFN N&10,<XWD 0,ARADEN+SKIPS>
  4269	035145	000600	007054			IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4270			000022			N=N+1
  4271
  4272						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4273					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4274	035146	006001	003400		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4275	035147	045344	000000			[ADCLKINH,,0],,0
  4276						IFN N&10,<XWD 0,ARADEN+SKIPS>
  4277	035150	000600	007054			IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4278			000023			N=N+1
  4279
  4280						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4281					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4282	035151	006001	003400		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4283	035152	045344	000000			[ADCLKINH,,0],,0
  4284						IFN N&10,<XWD 0,ARADEN+SKIPS>
  4285	035153	000600	007054			IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4286			000024			N=N+1
  4287
  4288						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4289					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4290	035154	006001	003400		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4291	035155	045344	000000			[ADCLKINH,,0],,0
  4292						IFN N&10,<XWD 0,ARADEN+SKIPS>
  4293	035156	000600	007054			IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4294			000025			N=N+1
  4295
  4296						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4297					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4298	035157	006001	003400		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4299	035160	045344	000000			[ADCLKINH,,0],,0
  4300						IFN N&10,<XWD 0,ARADEN+SKIPS>
  4301	035161	000600	007054			IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4302			000026			N=N+1
  4303
  4304						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4305					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4306	035162	006001	003400		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4307	035163	045344	000000			[ADCLKINH,,0],,0
  4308						IFN N&10,<XWD 0,ARADEN+SKIPS>
  4309	035164	000600	007054			IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4310			000027			N=N+1
  4311
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 16-4
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		270-377                                *** SEQ 0140

  4312						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4313					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4314	035165	006001	003400		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4315	035166	045344	000000			[ADCLKINH,,0],,0
  4316						IFN N&10,<XWD 0,ARADEN+SKIPS>
  4317	035167	000600	007054			IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4318			000030			N=N+1
  4319
  4320						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4321					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4322	035170	000061	103541		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4323	035171	045344	000000			[ADCLKINH,,0],,0
  4324	035172	000000	006031			IFN N&10,<XWD 0,ARADEN+SKIPS>
  4325						IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4326			000031			N=N+1
  4327
  4328						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4329					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4330	035173	000061	103541		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4331	035174	045344	000000			[ADCLKINH,,0],,0
  4332	035175	000000	006031			IFN N&10,<XWD 0,ARADEN+SKIPS>
  4333						IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4334			000032			N=N+1
  4335
  4336						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4337					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4338	035176	000061	103541		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4339	035177	045344	000000			[ADCLKINH,,0],,0
  4340	035200	000000	006031			IFN N&10,<XWD 0,ARADEN+SKIPS>
  4341						IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4342			000033			N=N+1
  4343
  4344						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4345					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4346	035201	000061	103541		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4347	035202	045344	000000			[ADCLKINH,,0],,0
  4348	035203	000000	006031			IFN N&10,<XWD 0,ARADEN+SKIPS>
  4349						IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4350			000034			N=N+1
  4351
  4352						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4353					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4354	035204	000061	103541		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4355	035205	045344	000000			[ADCLKINH,,0],,0
  4356	035206	000000	006031			IFN N&10,<XWD 0,ARADEN+SKIPS>
  4357						IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4358			000035			N=N+1
  4359
  4360						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4361					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4362	035207	000061	103541		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4363	035210	045344	000000			[ADCLKINH,,0],,0
  4364	035211	000000	006031			IFN N&10,<XWD 0,ARADEN+SKIPS>
  4365						IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4366			000036			N=N+1
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 16-5
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		270-377                                *** SEQ 0141

  4367
  4368						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4369					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4370	035212	000061	103541		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4371	035213	045344	000000			[ADCLKINH,,0],,0
  4372	035214	000000	006031			IFN N&10,<XWD 0,ARADEN+SKIPS>
  4373						IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4374			000037			N=N+1
  4375
  4376						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4377					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4378	035215	000061	103541		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4379	035216	045344	000000			[ADCLKINH,,0],,0
  4380	035217	000000	006031			IFN N&10,<XWD 0,ARADEN+SKIPS>
  4381						IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4382			000040			N=N+1
  4383
  4384						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4385					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4386	035220	066001	024400		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4387	035221	045344	000000			[ADCLKINH,,0],,0
  4388						IFN N&10,<XWD 0,ARADEN+SKIPS>
  4389	035222	000600	007054			IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4390			000041			N=N+1
  4391
  4392						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4393					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4394	035223	066001	024400		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4395	035224	045344	000000			[ADCLKINH,,0],,0
  4396						IFN N&10,<XWD 0,ARADEN+SKIPS>
  4397	035225	000600	007054			IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4398			000042			N=N+1
  4399
  4400						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4401					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4402	035226	066001	024400		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4403	035227	045344	000000			[ADCLKINH,,0],,0
  4404						IFN N&10,<XWD 0,ARADEN+SKIPS>
  4405	035230	000600	007054			IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4406			000043			N=N+1
  4407
  4408						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4409					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4410	035231	066001	024400		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4411	035232	045344	000000			[ADCLKINH,,0],,0
  4412						IFN N&10,<XWD 0,ARADEN+SKIPS>
  4413	035233	000600	007054			IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4414			000044			N=N+1
  4415
  4416						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4417					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4418	035234	066001	024400		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4419	035235	045344	000000			[ADCLKINH,,0],,0
  4420						IFN N&10,<XWD 0,ARADEN+SKIPS>
  4421	035236	000600	007054			IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 16-6
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		270-377                                *** SEQ 0142

  4422			000045			N=N+1
  4423
  4424						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4425					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4426	035237	066001	024400		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4427	035240	045344	000000			[ADCLKINH,,0],,0
  4428						IFN N&10,<XWD 0,ARADEN+SKIPS>
  4429	035241	000600	007054			IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4430			000046			N=N+1
  4431
  4432						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4433					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4434	035242	066001	024400		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4435	035243	045344	000000			[ADCLKINH,,0],,0
  4436						IFN N&10,<XWD 0,ARADEN+SKIPS>
  4437	035244	000600	007054			IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4438			000047			N=N+1
  4439
  4440						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4441					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4442	035245	066001	024400		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4443	035246	045344	000000			[ADCLKINH,,0],,0
  4444						IFN N&10,<XWD 0,ARADEN+SKIPS>
  4445	035247	000600	007054			IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4446			000050			N=N+1
  4447
  4448						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4449					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4450	035250	060071	103543		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4451	035251	045344	000000			[ADCLKINH,,0],,0
  4452	035252	000000	006031			IFN N&10,<XWD 0,ARADEN+SKIPS>
  4453						IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4454			000051			N=N+1
  4455
  4456						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4457					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4458	035253	060071	103543		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4459	035254	045344	000000			[ADCLKINH,,0],,0
  4460	035255	000000	006031			IFN N&10,<XWD 0,ARADEN+SKIPS>
  4461						IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4462			000052			N=N+1
  4463
  4464						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4465					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4466	035256	060071	103543		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4467	035257	045344	000000			[ADCLKINH,,0],,0
  4468	035260	000000	006031			IFN N&10,<XWD 0,ARADEN+SKIPS>
  4469						IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4470			000053			N=N+1
  4471
  4472						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4473					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4474	035261	060071	103543		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4475	035262	045344	000000			[ADCLKINH,,0],,0
  4476	035263	000000	006031			IFN N&10,<XWD 0,ARADEN+SKIPS>
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 16-7
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		270-377                                *** SEQ 0143

  4477						IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4478			000054			N=N+1
  4479
  4480						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4481					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4482	035264	060071	103543		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4483	035265	045344	000000			[ADCLKINH,,0],,0
  4484	035266	000000	006031			IFN N&10,<XWD 0,ARADEN+SKIPS>
  4485						IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4486			000055			N=N+1
  4487
  4488						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4489					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4490	035267	060071	103543		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4491	035270	045344	000000			[ADCLKINH,,0],,0
  4492	035271	000000	006031			IFN N&10,<XWD 0,ARADEN+SKIPS>
  4493						IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4494			000056			N=N+1
  4495
  4496						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4497					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4498	035272	060071	103543		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4499	035273	045344	000000			[ADCLKINH,,0],,0
  4500	035274	000000	006031			IFN N&10,<XWD 0,ARADEN+SKIPS>
  4501						IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4502			000057			N=N+1
  4503
  4504						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4505					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4506	035275	060071	103543		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4507	035276	045344	000000			[ADCLKINH,,0],,0
  4508	035277	000000	006031			IFN N&10,<XWD 0,ARADEN+SKIPS>
  4509						IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4510			000060			N=N+1
  4511
  4512						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4513					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4514	035300	046001	003400		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4515	035301	045344	000000			[ADCLKINH,,0],,0
  4516						IFN N&10,<XWD 0,ARADEN+SKIPS>
  4517	035302	000600	007054			IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4518			000061			N=N+1
  4519
  4520						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4521					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4522	035303	046001	003400		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4523	035304	045344	000000			[ADCLKINH,,0],,0
  4524						IFN N&10,<XWD 0,ARADEN+SKIPS>
  4525	035305	000600	007054			IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4526			000062			N=N+1
  4527
  4528						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4529					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4530	035306	046001	003400		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4531	035307	045344	000000			[ADCLKINH,,0],,0
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 16-8
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		270-377                                *** SEQ 0144

  4532						IFN N&10,<XWD 0,ARADEN+SKIPS>
  4533	035310	000600	007054			IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4534			000063			N=N+1
  4535
  4536						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4537					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4538	035311	046001	003400		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4539	035312	045344	000000			[ADCLKINH,,0],,0
  4540						IFN N&10,<XWD 0,ARADEN+SKIPS>
  4541	035313	000600	007054			IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4542			000064			N=N+1
  4543
  4544						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4545					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4546	035314	046001	003400		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4547	035315	045344	000000			[ADCLKINH,,0],,0
  4548						IFN N&10,<XWD 0,ARADEN+SKIPS>
  4549	035316	000600	007054			IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4550			000065			N=N+1
  4551
  4552						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4553					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4554	035317	046001	003400		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4555	035320	045344	000000			[ADCLKINH,,0],,0
  4556						IFN N&10,<XWD 0,ARADEN+SKIPS>
  4557	035321	000600	007054			IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4558			000066			N=N+1
  4559
  4560						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4561					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4562	035322	046001	003400		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4563	035323	045344	000000			[ADCLKINH,,0],,0
  4564						IFN N&10,<XWD 0,ARADEN+SKIPS>
  4565	035324	000600	007054			IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4566			000067			N=N+1
  4567
  4568						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4569					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4570	035325	046001	003400		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4571	035326	045344	000000			[ADCLKINH,,0],,0
  4572						IFN N&10,<XWD 0,ARADEN+SKIPS>
  4573	035327	000600	007054			IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4574			000070			N=N+1
  4575
  4576						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4577					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4578	035330	040061	103543		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4579	035331	045344	000000			[ADCLKINH,,0],,0
  4580	035332	000000	006031			IFN N&10,<XWD 0,ARADEN+SKIPS>
  4581						IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4582			000071			N=N+1
  4583
  4584						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4585					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4586	035333	040061	103543		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 16-9
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		270-377                                *** SEQ 0145

  4587	035334	045344	000000			[ADCLKINH,,0],,0
  4588	035335	000000	006031			IFN N&10,<XWD 0,ARADEN+SKIPS>
  4589						IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4590			000072			N=N+1
  4591
  4592						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4593					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4594	035336	040061	103543		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4595	035337	045344	000000			[ADCLKINH,,0],,0
  4596	035340	000000	006031			IFN N&10,<XWD 0,ARADEN+SKIPS>
  4597						IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4598			000073			N=N+1
  4599
  4600						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4601					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4602	035341	040061	103543		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4603	035342	045344	000000			[ADCLKINH,,0],,0
  4604	035343	000000	006031			IFN N&10,<XWD 0,ARADEN+SKIPS>
  4605						IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4606			000074			N=N+1
  4607
  4608						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4609					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4610	035344	040061	103543		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4611	035345	045344	000000			[ADCLKINH,,0],,0
  4612	035346	000000	006031			IFN N&10,<XWD 0,ARADEN+SKIPS>
  4613						IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4614			000075			N=N+1
  4615
  4616						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4617					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4618	035347	040061	103543		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4619	035350	045344	000000			[ADCLKINH,,0],,0
  4620	035351	000000	006031			IFN N&10,<XWD 0,ARADEN+SKIPS>
  4621						IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4622			000076			N=N+1
  4623
  4624						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4625					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4626	035352	040061	103543		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4627	035353	045344	000000			[ADCLKINH,,0],,0
  4628	035354	000000	006031			IFN N&10,<XWD 0,ARADEN+SKIPS>
  4629						IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4630			000077			N=N+1
  4631
  4632						<<ET0>B17>+PCCHNG+<IFN N&70-40,<SKPFD>>+<IFE N&10,<<ADFMPL>B17>>+<IFN N&10,<ABPCEN+
  4633					SAIAC0+<IFE N&70-30,<FCE>>+<IFE N&50-50,<FCEPSE>>+<ADARPL>B17>>+<IFN N&40,<<ADADD>B17>>+<IFE
  4634	035355	040061	103543		 N&70-50,<<ADCR36+ADMAGIC>B17>>+<IFE N&70-40,<<ADCR36>B17+AOJD>>
  4635	035356	045344	000000			[ADCLKINH,,0],,0
  4636	035357	000000	006031			IFN N&10,<XWD 0,ARADEN+SKIPS>
  4637						IFE N&10,<XWD ADBRPL,ARADEN+BRAREN+JUMPS>
  4638			000100			N=N+1
  4639
  4640
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 17
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		400-477                                *** SEQ 0146

  4641					SUBTTL	DISPATCH TABLE FOR INSTRUCTIONS		400-477
  4642
  4643					;*BOOLEAN GROUP							400-477
  4644
  4645					DEFINE CMP (X,LIST,ANS)
  4646					<	ANS==0
  4647						IRP LIST <IFE <X&74>-<LIST*4>,<STOPI
  4648						ANS==1>>>
  4649
  4650			000000			N=0
  4651						REPEAT 100,
  4652					<	CMP (N,<0,5,12,17>,M)
  4653						CMP (N,<7,13,15,16>,A6)
  4654						CMP (N,<6,11>,A1)
  4655						CMP (N,<1,2,3,6,11,15,16>,A2)
  4656						CMP (N,<4,7,10,13,14>,A3)
  4657						CMP (N,<1,4,5,11,13,16>,A4)
  4658						CMP (N,<2,6,7,10,12,15>,A5)
  4659						BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  4660						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+^_
  4661					<IFE N&3-2,<SACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  4662						XWD [XWD ADARMI,ARADEN],0
  4663						ARADEN
  4664						N=N+1
  4665					>
  4666			000000			CMP (N,<0,5,12,17>,M)^	M==0
  4667			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  4668			000000			CMP (N,<6,11>,A1)^	A1==0
  4669			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  4670			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  4671			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  4672			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  4673			000000			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  4674						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  4675	035360	000000	024000		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  4676	035361	045345	000000			XWD [XWD ADARMI,ARADEN],0
  4677	035362	000000	006000			ARADEN
  4678			000001			N=N+1
  4679
  4680			000000			CMP (N,<0,5,12,17>,M)^	M==0
  4681			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  4682			000000			CMP (N,<6,11>,A1)^	A1==0
  4683			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  4684			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  4685			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  4686			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  4687			000000			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  4688						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  4689	035363	000000	024000		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  4690	035364	045345	000000			XWD [XWD ADARMI,ARADEN],0
  4691	035365	000000	006000			ARADEN
  4692			000002			N=N+1
  4693
  4694			000000			CMP (N,<0,5,12,17>,M)^	M==0
  4695			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 17-1
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		400-477                                *** SEQ 0147

  4696			000000			CMP (N,<6,11>,A1)^	A1==0
  4697			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  4698			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  4699			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  4700			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  4701			000000			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  4702						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  4703	035366	000000	024050		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  4704	035367	045345	000000			XWD [XWD ADARMI,ARADEN],0
  4705	035370	000000	006000			ARADEN
  4706			000003			N=N+1
  4707
  4708			000000			CMP (N,<0,5,12,17>,M)^	M==0
  4709			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  4710			000000			CMP (N,<6,11>,A1)^	A1==0
  4711			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  4712			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  4713			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  4714			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  4715			000000			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  4716						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  4717	035371	000000	024010		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  4718	035372	045345	000000			XWD [XWD ADARMI,ARADEN],0
  4719	035373	000000	006000			ARADEN
  4720			000004			N=N+1
  4721
  4722			000000			CMP (N,<0,5,12,17>,M)^	M==0
  4723			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  4724			000000			CMP (N,<6,11>,A1)^	A1==0
  4725			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  4726			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  4727			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  4728			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  4729			006060			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  4730						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  4731	035374	006060	000001		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  4732	035375	045345	000000			XWD [XWD ADARMI,ARADEN],0
  4733	035376	000000	006000			ARADEN
  4734			000005			N=N+1
  4735
  4736			000000			CMP (N,<0,5,12,17>,M)^	M==0
  4737			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  4738			000000			CMP (N,<6,11>,A1)^	A1==0
  4739			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  4740			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  4741			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  4742			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  4743			006060			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  4744						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  4745	035377	006060	000000		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  4746	035400	045345	000000			XWD [XWD ADARMI,ARADEN],0
  4747	035401	000000	006000			ARADEN
  4748			000006			N=N+1
  4749
  4750			000000			CMP (N,<0,5,12,17>,M)^	M==0
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 17-2
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		400-477                                *** SEQ 0148

  4751			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  4752			000000			CMP (N,<6,11>,A1)^	A1==0
  4753			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  4754			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  4755			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  4756			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  4757			006060			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  4758						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  4759	035402	006060	000043		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  4760	035403	045345	000000			XWD [XWD ADARMI,ARADEN],0
  4761	035404	000000	006000			ARADEN
  4762			000007			N=N+1
  4763
  4764			000000			CMP (N,<0,5,12,17>,M)^	M==0
  4765			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  4766			000000			CMP (N,<6,11>,A1)^	A1==0
  4767			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  4768			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  4769			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  4770			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  4771			006060			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  4772						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  4773	035405	006060	000003		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  4774	035406	045345	000000			XWD [XWD ADARMI,ARADEN],0
  4775	035407	000000	006000			ARADEN
  4776			000010			N=N+1
  4777
  4778			000000			CMP (N,<0,5,12,17>,M)^	M==0
  4779			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  4780			000000			CMP (N,<6,11>,A1)^	A1==0
  4781			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  4782			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  4783			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  4784			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  4785			010060			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  4786						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  4787	035410	010060	000001		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  4788	035411	045345	000000			XWD [XWD ADARMI,ARADEN],0
  4789	035412	000000	006000			ARADEN
  4790			000011			N=N+1
  4791
  4792			000000			CMP (N,<0,5,12,17>,M)^	M==0
  4793			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  4794			000000			CMP (N,<6,11>,A1)^	A1==0
  4795			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  4796			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  4797			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  4798			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  4799			010060			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  4800						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  4801	035413	010060	000000		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  4802	035414	045345	000000			XWD [XWD ADARMI,ARADEN],0
  4803	035415	000000	006000			ARADEN
  4804			000012			N=N+1
  4805
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 17-3
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		400-477                                *** SEQ 0149

  4806			000000			CMP (N,<0,5,12,17>,M)^	M==0
  4807			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  4808			000000			CMP (N,<6,11>,A1)^	A1==0
  4809			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  4810			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  4811			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  4812			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  4813			010060			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  4814						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  4815	035416	010060	000043		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  4816	035417	045345	000000			XWD [XWD ADARMI,ARADEN],0
  4817	035420	000000	006000			ARADEN
  4818			000013			N=N+1
  4819
  4820			000000			CMP (N,<0,5,12,17>,M)^	M==0
  4821			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  4822			000000			CMP (N,<6,11>,A1)^	A1==0
  4823			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  4824			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  4825			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  4826			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  4827			010060			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  4828						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  4829	035421	010060	000003		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  4830	035422	045345	000000			XWD [XWD ADARMI,ARADEN],0
  4831	035423	000000	006000			ARADEN
  4832			000014			N=N+1
  4833
  4834			000000			CMP (N,<0,5,12,17>,M)^	M==0
  4835			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  4836			000000			CMP (N,<6,11>,A1)^	A1==0
  4837			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  4838			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  4839			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  4840			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  4841			000060			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  4842						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  4843	035424	000060	000001		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  4844	035425	045345	000000			XWD [XWD ADARMI,ARADEN],0
  4845	035426	000000	006000			ARADEN
  4846			000015			N=N+1
  4847
  4848			000000			CMP (N,<0,5,12,17>,M)^	M==0
  4849			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  4850			000000			CMP (N,<6,11>,A1)^	A1==0
  4851			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  4852			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  4853			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  4854			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  4855			000060			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  4856						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  4857	035427	000060	000000		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  4858	035430	045345	000000			XWD [XWD ADARMI,ARADEN],0
  4859	035431	000000	006000			ARADEN
  4860			000016			N=N+1
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 17-4
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		400-477                                *** SEQ 0150

  4861
  4862			000000			CMP (N,<0,5,12,17>,M)^	M==0
  4863			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  4864			000000			CMP (N,<6,11>,A1)^	A1==0
  4865			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  4866			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  4867			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  4868			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  4869			000060			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  4870						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  4871	035432	000060	000043		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  4872	035433	045345	000000			XWD [XWD ADARMI,ARADEN],0
  4873	035434	000000	006000			ARADEN
  4874			000017			N=N+1
  4875
  4876			000000			CMP (N,<0,5,12,17>,M)^	M==0
  4877			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  4878			000000			CMP (N,<6,11>,A1)^	A1==0
  4879			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  4880			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  4881			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  4882			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  4883			000060			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  4884						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  4885	035435	000060	000003		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  4886	035436	045345	000000			XWD [XWD ADARMI,ARADEN],0
  4887	035437	000000	006000			ARADEN
  4888			000020			N=N+1
  4889
  4890			000000			CMP (N,<0,5,12,17>,M)^	M==0
  4891			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  4892			000000			CMP (N,<6,11>,A1)^	A1==0
  4893			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  4894			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  4895			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  4896			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  4897			006100			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  4898						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  4899	035440	006100	000001		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  4900	035441	045345	000000			XWD [XWD ADARMI,ARADEN],0
  4901	035442	000000	006000			ARADEN
  4902			000021			N=N+1
  4903
  4904			000000			CMP (N,<0,5,12,17>,M)^	M==0
  4905			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  4906			000000			CMP (N,<6,11>,A1)^	A1==0
  4907			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  4908			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  4909			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  4910			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  4911			006100			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  4912						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  4913	035443	006100	000000		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  4914	035444	045345	000000			XWD [XWD ADARMI,ARADEN],0
  4915	035445	000000	006000			ARADEN
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 17-5
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		400-477                                *** SEQ 0151

  4916			000022			N=N+1
  4917
  4918			000000			CMP (N,<0,5,12,17>,M)^	M==0
  4919			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  4920			000000			CMP (N,<6,11>,A1)^	A1==0
  4921			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  4922			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  4923			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  4924			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  4925			006100			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  4926						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  4927	035446	006100	000043		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  4928	035447	045345	000000			XWD [XWD ADARMI,ARADEN],0
  4929	035450	000000	006000			ARADEN
  4930			000023			N=N+1
  4931
  4932			000000			CMP (N,<0,5,12,17>,M)^	M==0
  4933			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  4934			000000			CMP (N,<6,11>,A1)^	A1==0
  4935			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  4936			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  4937			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  4938			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  4939			006100			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  4940						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  4941	035451	006100	000003		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  4942	035452	045345	000000			XWD [XWD ADARMI,ARADEN],0
  4943	035453	000000	006000			ARADEN
  4944			000024			N=N+1
  4945
  4946			000000			CMP (N,<0,5,12,17>,M)^	M==0
  4947			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  4948			000000			CMP (N,<6,11>,A1)^	A1==0
  4949			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  4950			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  4951			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  4952			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  4953			006000			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  4954						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  4955	035454	006000	000000		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  4956	035455	045345	000000			XWD [XWD ADARMI,ARADEN],0
  4957	035456	000000	006000			ARADEN
  4958			000025			N=N+1
  4959
  4960			000000			CMP (N,<0,5,12,17>,M)^	M==0
  4961			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  4962			000000			CMP (N,<6,11>,A1)^	A1==0
  4963			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  4964			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  4965			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  4966			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  4967			006000			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  4968						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  4969	035457	006000	000000		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  4970	035460	045345	000000			XWD [XWD ADARMI,ARADEN],0
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 17-6
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		400-477                                *** SEQ 0152

  4971	035461	000000	006000			ARADEN
  4972			000026			N=N+1
  4973
  4974			000000			CMP (N,<0,5,12,17>,M)^	M==0
  4975			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  4976			000000			CMP (N,<6,11>,A1)^	A1==0
  4977			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  4978			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  4979			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  4980			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  4981			006000			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  4982						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  4983	035462	006000	000050		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  4984	035463	045345	000000			XWD [XWD ADARMI,ARADEN],0
  4985	035464	000000	006000			ARADEN
  4986			000027			N=N+1
  4987
  4988			000000			CMP (N,<0,5,12,17>,M)^	M==0
  4989			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  4990			000000			CMP (N,<6,11>,A1)^	A1==0
  4991			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  4992			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  4993			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  4994			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  4995			006000			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  4996						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  4997	035465	006000	000010		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  4998	035466	045345	000000			XWD [XWD ADARMI,ARADEN],0
  4999	035467	000000	006000			ARADEN
  5000			000030			N=N+1
  5001
  5002			000000			CMP (N,<0,5,12,17>,M)^	M==0
  5003			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  5004			000000			CMP (N,<6,11>,A1)^	A1==0
  5005			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  5006			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  5007			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  5008			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  5009			110060			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  5010						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  5011	035470	110060	000001		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  5012	035471	045345	000000			XWD [XWD ADARMI,ARADEN],0
  5013	035472	000000	006000			ARADEN
  5014			000031			N=N+1
  5015
  5016			000000			CMP (N,<0,5,12,17>,M)^	M==0
  5017			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  5018			000000			CMP (N,<6,11>,A1)^	A1==0
  5019			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  5020			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  5021			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  5022			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  5023			110060			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  5024						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  5025	035473	110060	000000		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 17-7
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		400-477                                *** SEQ 0153

  5026	035474	045345	000000			XWD [XWD ADARMI,ARADEN],0
  5027	035475	000000	006000			ARADEN
  5028			000032			N=N+1
  5029
  5030			000000			CMP (N,<0,5,12,17>,M)^	M==0
  5031			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  5032			000000			CMP (N,<6,11>,A1)^	A1==0
  5033			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  5034			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  5035			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  5036			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  5037			110060			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  5038						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  5039	035476	110060	000043		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  5040	035477	045345	000000			XWD [XWD ADARMI,ARADEN],0
  5041	035500	000000	006000			ARADEN
  5042			000033			N=N+1
  5043
  5044			000000			CMP (N,<0,5,12,17>,M)^	M==0
  5045			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  5046			000000			CMP (N,<6,11>,A1)^	A1==0
  5047			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  5048			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  5049			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  5050			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  5051			110060			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  5052						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  5053	035501	110060	000003		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  5054	035502	045345	000000			XWD [XWD ADARMI,ARADEN],0
  5055	035503	000000	006000			ARADEN
  5056			000034			N=N+1
  5057
  5058			000000			CMP (N,<0,5,12,17>,M)^	M==0
  5059			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  5060			000000			CMP (N,<6,11>,A1)^	A1==0
  5061			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  5062			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  5063			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  5064			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  5065			010100			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  5066						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  5067	035504	010101	000001		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  5068	035505	045345	000000			XWD [XWD ADARMI,ARADEN],0
  5069	035506	000000	006000			ARADEN
  5070			000035			N=N+1
  5071
  5072			000000			CMP (N,<0,5,12,17>,M)^	M==0
  5073			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  5074			000000			CMP (N,<6,11>,A1)^	A1==0
  5075			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  5076			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  5077			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  5078			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  5079			010100			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  5080						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 17-8
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		400-477                                *** SEQ 0154

  5081	035507	010101	000000		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  5082	035510	045345	000000			XWD [XWD ADARMI,ARADEN],0
  5083	035511	000000	006000			ARADEN
  5084			000036			N=N+1
  5085
  5086			000000			CMP (N,<0,5,12,17>,M)^	M==0
  5087			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  5088			000000			CMP (N,<6,11>,A1)^	A1==0
  5089			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  5090			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  5091			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  5092			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  5093			010100			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  5094						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  5095	035512	010101	000043		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  5096	035513	045345	000000			XWD [XWD ADARMI,ARADEN],0
  5097	035514	000000	006000			ARADEN
  5098			000037			N=N+1
  5099
  5100			000000			CMP (N,<0,5,12,17>,M)^	M==0
  5101			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  5102			000000			CMP (N,<6,11>,A1)^	A1==0
  5103			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  5104			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  5105			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  5106			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  5107			010100			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  5108						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  5109	035515	010101	000003		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  5110	035516	045345	000000			XWD [XWD ADARMI,ARADEN],0
  5111	035517	000000	006000			ARADEN
  5112			000040			N=N+1
  5113
  5114			000000			CMP (N,<0,5,12,17>,M)^	M==0
  5115			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  5116			000000			CMP (N,<6,11>,A1)^	A1==0
  5117			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  5118			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  5119			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  5120			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  5121			010100			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  5122						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  5123	035520	010100	000001		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  5124	035521	045345	000000			XWD [XWD ADARMI,ARADEN],0
  5125	035522	000000	006000			ARADEN
  5126			000041			N=N+1
  5127
  5128			000000			CMP (N,<0,5,12,17>,M)^	M==0
  5129			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  5130			000000			CMP (N,<6,11>,A1)^	A1==0
  5131			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  5132			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  5133			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  5134			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  5135			010100			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 17-9
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		400-477                                *** SEQ 0155

  5136						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  5137	035523	010100	000000		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  5138	035524	045345	000000			XWD [XWD ADARMI,ARADEN],0
  5139	035525	000000	006000			ARADEN
  5140			000042			N=N+1
  5141
  5142			000000			CMP (N,<0,5,12,17>,M)^	M==0
  5143			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  5144			000000			CMP (N,<6,11>,A1)^	A1==0
  5145			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  5146			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  5147			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  5148			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  5149			010100			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  5150						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  5151	035526	010100	000043		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  5152	035527	045345	000000			XWD [XWD ADARMI,ARADEN],0
  5153	035530	000000	006000			ARADEN
  5154			000043			N=N+1
  5155
  5156			000000			CMP (N,<0,5,12,17>,M)^	M==0
  5157			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  5158			000000			CMP (N,<6,11>,A1)^	A1==0
  5159			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  5160			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  5161			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  5162			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  5163			010100			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  5164						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  5165	035531	010100	000003		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  5166	035532	045345	000000			XWD [XWD ADARMI,ARADEN],0
  5167	035533	000000	006000			ARADEN
  5168			000044			N=N+1
  5169
  5170			000000			CMP (N,<0,5,12,17>,M)^	M==0
  5171			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  5172			000000			CMP (N,<6,11>,A1)^	A1==0
  5173			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  5174			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  5175			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  5176			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  5177			106060			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  5178						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  5179	035534	106060	000001		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  5180	035535	045345	000000			XWD [XWD ADARMI,ARADEN],0
  5181	035536	000000	006000			ARADEN
  5182			000045			N=N+1
  5183
  5184			000000			CMP (N,<0,5,12,17>,M)^	M==0
  5185			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  5186			000000			CMP (N,<6,11>,A1)^	A1==0
  5187			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  5188			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  5189			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  5190			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 17-10
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		400-477                                *** SEQ 0156

  5191			106060			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  5192						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  5193	035537	106060	000000		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  5194	035540	045345	000000			XWD [XWD ADARMI,ARADEN],0
  5195	035541	000000	006000			ARADEN
  5196			000046			N=N+1
  5197
  5198			000000			CMP (N,<0,5,12,17>,M)^	M==0
  5199			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  5200			000000			CMP (N,<6,11>,A1)^	A1==0
  5201			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  5202			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  5203			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  5204			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  5205			106060			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  5206						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  5207	035542	106060	000043		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  5208	035543	045345	000000			XWD [XWD ADARMI,ARADEN],0
  5209	035544	000000	006000			ARADEN
  5210			000047			N=N+1
  5211
  5212			000000			CMP (N,<0,5,12,17>,M)^	M==0
  5213			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  5214			000000			CMP (N,<6,11>,A1)^	A1==0
  5215			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  5216			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  5217			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  5218			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  5219			106060			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  5220						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  5221	035545	106060	000003		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  5222	035546	045345	000000			XWD [XWD ADARMI,ARADEN],0
  5223	035547	000000	006000			ARADEN
  5224			000050			N=N+1
  5225
  5226			000000			CMP (N,<0,5,12,17>,M)^	M==0
  5227			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  5228			000000			CMP (N,<6,11>,A1)^	A1==0
  5229			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  5230			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  5231			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  5232			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  5233			010000			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  5234						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  5235	035550	010000	000000		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  5236	035551	045345	000000			XWD [XWD ADARMI,ARADEN],0
  5237	035552	000000	006000			ARADEN
  5238			000051			N=N+1
  5239
  5240			000000			CMP (N,<0,5,12,17>,M)^	M==0
  5241			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  5242			000000			CMP (N,<6,11>,A1)^	A1==0
  5243			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  5244			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  5245			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 17-11
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		400-477                                *** SEQ 0157

  5246			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  5247			010000			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  5248						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  5249	035553	010000	000000		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  5250	035554	045345	000000			XWD [XWD ADARMI,ARADEN],0
  5251	035555	000000	006000			ARADEN
  5252			000052			N=N+1
  5253
  5254			000000			CMP (N,<0,5,12,17>,M)^	M==0
  5255			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  5256			000000			CMP (N,<6,11>,A1)^	A1==0
  5257			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  5258			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  5259			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  5260			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  5261			010000			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  5262						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  5263	035556	010000	000050		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  5264	035557	045345	000000			XWD [XWD ADARMI,ARADEN],0
  5265	035560	000000	006000			ARADEN
  5266			000053			N=N+1
  5267
  5268			000000			CMP (N,<0,5,12,17>,M)^	M==0
  5269			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  5270			000000			CMP (N,<6,11>,A1)^	A1==0
  5271			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  5272			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  5273			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  5274			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  5275			010000			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  5276						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  5277	035561	010000	000010		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  5278	035562	045345	000000			XWD [XWD ADARMI,ARADEN],0
  5279	035563	000000	006000			ARADEN
  5280			000054			N=N+1
  5281
  5282			000000			CMP (N,<0,5,12,17>,M)^	M==0
  5283			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  5284			000000			CMP (N,<6,11>,A1)^	A1==0
  5285			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  5286			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  5287			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  5288			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  5289			006100			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  5290						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  5291	035564	006101	000001		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  5292	035565	045345	000000			XWD [XWD ADARMI,ARADEN],0
  5293	035566	000000	006000			ARADEN
  5294			000055			N=N+1
  5295
  5296			000000			CMP (N,<0,5,12,17>,M)^	M==0
  5297			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  5298			000000			CMP (N,<6,11>,A1)^	A1==0
  5299			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  5300			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 17-12
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		400-477                                *** SEQ 0158

  5301			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  5302			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  5303			006100			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  5304						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  5305	035567	006101	000000		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  5306	035570	045345	000000			XWD [XWD ADARMI,ARADEN],0
  5307	035571	000000	006000			ARADEN
  5308			000056			N=N+1
  5309
  5310			000000			CMP (N,<0,5,12,17>,M)^	M==0
  5311			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  5312			000000			CMP (N,<6,11>,A1)^	A1==0
  5313			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  5314			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  5315			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  5316			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  5317			006100			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  5318						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  5319	035572	006101	000043		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  5320	035573	045345	000000			XWD [XWD ADARMI,ARADEN],0
  5321	035574	000000	006000			ARADEN
  5322			000057			N=N+1
  5323
  5324			000000			CMP (N,<0,5,12,17>,M)^	M==0
  5325			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  5326			000000			CMP (N,<6,11>,A1)^	A1==0
  5327			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  5328			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  5329			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  5330			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  5331			006100			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  5332						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  5333	035575	006101	000003		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  5334	035576	045345	000000			XWD [XWD ADARMI,ARADEN],0
  5335	035577	000000	006000			ARADEN
  5336			000060			N=N+1
  5337
  5338			000000			CMP (N,<0,5,12,17>,M)^	M==0
  5339			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  5340			000000			CMP (N,<6,11>,A1)^	A1==0
  5341			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  5342			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  5343			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  5344			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  5345			000100			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  5346						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  5347	035600	000100	000001		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  5348	035601	045345	000000			XWD [XWD ADARMI,ARADEN],0
  5349	035602	000000	006000			ARADEN
  5350			000061			N=N+1
  5351
  5352			000000			CMP (N,<0,5,12,17>,M)^	M==0
  5353			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  5354			000000			CMP (N,<6,11>,A1)^	A1==0
  5355			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 17-13
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		400-477                                *** SEQ 0159

  5356			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  5357			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  5358			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  5359			000100			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  5360						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  5361	035603	000100	000000		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  5362	035604	045345	000000			XWD [XWD ADARMI,ARADEN],0
  5363	035605	000000	006000			ARADEN
  5364			000062			N=N+1
  5365
  5366			000000			CMP (N,<0,5,12,17>,M)^	M==0
  5367			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  5368			000000			CMP (N,<6,11>,A1)^	A1==0
  5369			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  5370			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  5371			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  5372			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  5373			000100			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  5374						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  5375	035606	000100	000043		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  5376	035607	045345	000000			XWD [XWD ADARMI,ARADEN],0
  5377	035610	000000	006000			ARADEN
  5378			000063			N=N+1
  5379
  5380			000000			CMP (N,<0,5,12,17>,M)^	M==0
  5381			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  5382			000000			CMP (N,<6,11>,A1)^	A1==0
  5383			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  5384			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  5385			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  5386			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  5387			000100			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  5388						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  5389	035611	000100	000003		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  5390	035612	045345	000000			XWD [XWD ADARMI,ARADEN],0
  5391	035613	000000	006000			ARADEN
  5392			000064			N=N+1
  5393
  5394			000000			CMP (N,<0,5,12,17>,M)^	M==0
  5395			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  5396			000000			CMP (N,<6,11>,A1)^	A1==0
  5397			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  5398			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  5399			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  5400			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  5401			010060			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  5402						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  5403	035614	010061	000001		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  5404	035615	045345	000000			XWD [XWD ADARMI,ARADEN],0
  5405	035616	000000	006000			ARADEN
  5406			000065			N=N+1
  5407
  5408			000000			CMP (N,<0,5,12,17>,M)^	M==0
  5409			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  5410			000000			CMP (N,<6,11>,A1)^	A1==0
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 17-14
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		400-477                                *** SEQ 0160

  5411			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  5412			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  5413			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  5414			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  5415			010060			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  5416						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  5417	035617	010061	000000		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  5418	035620	045345	000000			XWD [XWD ADARMI,ARADEN],0
  5419	035621	000000	006000			ARADEN
  5420			000066			N=N+1
  5421
  5422			000000			CMP (N,<0,5,12,17>,M)^	M==0
  5423			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  5424			000000			CMP (N,<6,11>,A1)^	A1==0
  5425			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  5426			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  5427			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  5428			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  5429			010060			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  5430						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  5431	035622	010061	000043		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  5432	035623	045345	000000			XWD [XWD ADARMI,ARADEN],0
  5433	035624	000000	006000			ARADEN
  5434			000067			N=N+1
  5435
  5436			000000			CMP (N,<0,5,12,17>,M)^	M==0
  5437			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  5438			000000			CMP (N,<6,11>,A1)^	A1==0
  5439			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  5440			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  5441			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  5442			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  5443			010060			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  5444						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  5445	035625	010061	000003		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  5446	035626	045345	000000			XWD [XWD ADARMI,ARADEN],0
  5447	035627	000000	006000			ARADEN
  5448			000070			N=N+1
  5449
  5450			000000			CMP (N,<0,5,12,17>,M)^	M==0
  5451			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  5452			000000			CMP (N,<6,11>,A1)^	A1==0
  5453			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  5454			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  5455			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  5456			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  5457			006060			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  5458						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  5459	035630	006061	000001		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  5460	035631	045345	000000			XWD [XWD ADARMI,ARADEN],0
  5461	035632	000000	006000			ARADEN
  5462			000071			N=N+1
  5463
  5464			000000			CMP (N,<0,5,12,17>,M)^	M==0
  5465			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 17-15
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		400-477                                *** SEQ 0161

  5466			000000			CMP (N,<6,11>,A1)^	A1==0
  5467			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  5468			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  5469			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  5470			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  5471			006060			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  5472						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  5473	035633	006061	000000		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  5474	035634	045345	000000			XWD [XWD ADARMI,ARADEN],0
  5475	035635	000000	006000			ARADEN
  5476			000072			N=N+1
  5477
  5478			000000			CMP (N,<0,5,12,17>,M)^	M==0
  5479			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  5480			000000			CMP (N,<6,11>,A1)^	A1==0
  5481			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  5482			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  5483			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  5484			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  5485			006060			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  5486						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  5487	035636	006061	000043		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  5488	035637	045345	000000			XWD [XWD ADARMI,ARADEN],0
  5489	035640	000000	006000			ARADEN
  5490			000073			N=N+1
  5491
  5492			000000			CMP (N,<0,5,12,17>,M)^	M==0
  5493			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  5494			000000			CMP (N,<6,11>,A1)^	A1==0
  5495			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  5496			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  5497			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  5498			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  5499			006060			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  5500						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  5501	035641	006061	000003		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  5502	035642	045345	000000			XWD [XWD ADARMI,ARADEN],0
  5503	035643	000000	006000			ARADEN
  5504			000074			N=N+1
  5505
  5506			000000			CMP (N,<0,5,12,17>,M)^	M==0
  5507			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  5508			000000			CMP (N,<6,11>,A1)^	A1==0
  5509			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  5510			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  5511			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  5512			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  5513			000000			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  5514						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  5515	035644	000000	000000		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  5516	035645	045345	000000			XWD [XWD ADARMI,ARADEN],0
  5517	035646	000000	006000			ARADEN
  5518			000075			N=N+1
  5519
  5520			000000			CMP (N,<0,5,12,17>,M)^	M==0
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 17-16
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		400-477                                *** SEQ 0162

  5521			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  5522			000000			CMP (N,<6,11>,A1)^	A1==0
  5523			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  5524			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  5525			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  5526			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  5527			000000			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  5528						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  5529	035647	000000	000000		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  5530	035650	045345	000000			XWD [XWD ADARMI,ARADEN],0
  5531	035651	000000	006000			ARADEN
  5532			000076			N=N+1
  5533
  5534			000000			CMP (N,<0,5,12,17>,M)^	M==0
  5535			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  5536			000000			CMP (N,<6,11>,A1)^	A1==0
  5537			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  5538			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  5539			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  5540			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  5541			000000			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  5542						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  5543	035652	000000	000050		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  5544	035653	045345	000000			XWD [XWD ADARMI,ARADEN],0
  5545	035654	000000	006000			ARADEN
  5546			000077			N=N+1
  5547
  5548			000000			CMP (N,<0,5,12,17>,M)^	M==0
  5549			000000			CMP (N,<7,13,15,16>,A6)^	A6==0
  5550			000000			CMP (N,<6,11>,A1)^	A1==0
  5551			000000			CMP (N,<1,2,3,6,11,15,16>,A2)^	A2==0
  5552			000000			CMP (N,<4,7,10,13,14>,A3)^	A3==0
  5553			000000			CMP (N,<1,4,5,11,13,16>,A4)^	A4==0
  5554			000000			CMP (N,<2,6,7,10,12,15>,A5)^	A5==0
  5555			000000			BFLGS==A1*ADEQV+A2*ADARPL+A3*ADARMI+A4*ADFMPL+A5*ADFMMI
  5556						XWD BFLGS+A6*ET0,<IFE <N&3>,<<1-M>*FCE>>+<IFN <<N&2>*<1-M>>,<FCEPSE>>+<IFE N&3-2,<S
  5557	035655	000000	000010		ACINH>>+<IFN N&2,<M*SCE>>+<IFE <N&74>,<BOOL0D>>
  5558	035656	045345	000000			XWD [XWD ADARMI,ARADEN],0
  5559	035657	000000	006000			ARADEN
  5560			000100			N=N+1
  5561
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 18
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		500-577                                *** SEQ 0163

  5562					SUBTTL	DISPATCH TABLE FOR INSTRUCTIONS		500-577
  5563
  5564					;*HALF WORDS							500-577
  5565			000000			N=0
  5566						REPEAT 100,
  5567					<	M=0
  5568						IFE N&33-2,<M=FCEPSE>
  5569						IFE N&3-3,<M=FCEPSE+SAIAC0>
  5570						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,^_
  5571					<ADFMRP>>+<IFN N&3-2,<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+^_
  5572					<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+M+^_
  5573					<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  5574						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+^_
  5575					<IFE N&44-40,<ADARRP>>+<IFE N&44,<ADARLP>>,ARADEN+BRAREN],0
  5576						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,^_
  5577					<ARLTAD>>+<IFE N&44-40,<ARRTAD>>+<IFE N&50-40,<ARLTAD>>+^_
  5578					<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>>>
  5579						N=N+1>
  5580			000000			M=0
  5581						IFE N&33-2,<M=FCEPSE>
  5582						IFE N&3-3,<M=FCEPSE+SAIAC0>
  5583						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  5584					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  5585	035660	002040	000001		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  5586						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  5587	035661	045346	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  5588						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  5589					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  5590	035662	000000	006000		>>
  5591			000001			N=N+1
  5592			000000			M=0
  5593						IFE N&33-2,<M=FCEPSE>
  5594						IFE N&3-3,<M=FCEPSE+SAIAC0>
  5595						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  5596					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  5597	035663	002040	000000		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  5598						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  5599	035664	045346	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  5600						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  5601					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  5602	035665	000000	006000		>>
  5603			000002			N=N+1
  5604			000000			M=0
  5605			000003			IFE N&33-2,<M=FCEPSE>
  5606						IFE N&3-3,<M=FCEPSE+SAIAC0>
  5607						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  5608					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  5609	035666	006001	000043		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  5610						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  5611	035667	045346	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  5612						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  5613					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  5614	035670	000000	006000		>>
  5615			000003			N=N+1
  5616			000000			M=0
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 18-1
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		500-577                                *** SEQ 0164

  5617						IFE N&33-2,<M=FCEPSE>
  5618			000143			IFE N&3-3,<M=FCEPSE+SAIAC0>
  5619						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  5620					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  5621	035671	000060	000143		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  5622						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  5623	035672	045346	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  5624						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  5625					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  5626	035673	000000	006000		>>
  5627			000004			N=N+1
  5628			000000			M=0
  5629						IFE N&33-2,<M=FCEPSE>
  5630						IFE N&3-3,<M=FCEPSE+SAIAC0>
  5631						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  5632					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  5633	035674	002000	000001		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  5634						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  5635	035675	045347	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  5636						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  5637					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  5638	035676	000000	024000		>>
  5639			000005			N=N+1
  5640			000000			M=0
  5641						IFE N&33-2,<M=FCEPSE>
  5642						IFE N&3-3,<M=FCEPSE+SAIAC0>
  5643						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  5644					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  5645	035677	002000	000000		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  5646						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  5647	035700	045347	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  5648						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  5649					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  5650	035701	000000	024000		>>
  5651			000006			N=N+1
  5652			000000			M=0
  5653			000003			IFE N&33-2,<M=FCEPSE>
  5654						IFE N&3-3,<M=FCEPSE+SAIAC0>
  5655						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  5656					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  5657	035702	006001	000043		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  5658						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  5659	035703	045347	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  5660						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  5661					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  5662	035704	000000	024000		>>
  5663			000007			N=N+1
  5664			000000			M=0
  5665						IFE N&33-2,<M=FCEPSE>
  5666			000143			IFE N&3-3,<M=FCEPSE+SAIAC0>
  5667						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  5668					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  5669	035705	000020	000143		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  5670						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  5671	035706	045347	000000		4,<ADARLP>>,ARADEN+BRAREN],0
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 18-2
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		500-577                                *** SEQ 0165

  5672						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  5673					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  5674	035707	000000	024000		>>
  5675			000010			N=N+1
  5676			000000			M=0
  5677						IFE N&33-2,<M=FCEPSE>
  5678						IFE N&3-3,<M=FCEPSE+SAIAC0>
  5679						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  5680					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  5681	035710	000040	000001		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  5682						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  5683	035711	045350	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  5684						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  5685					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  5686	035712	000000	002000		>>
  5687			000011			N=N+1
  5688			000000			M=0
  5689						IFE N&33-2,<M=FCEPSE>
  5690						IFE N&3-3,<M=FCEPSE+SAIAC0>
  5691						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  5692					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  5693	035713	000040	000000		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  5694						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  5695	035714	045350	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  5696						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  5697					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  5698	035715	000000	002000		>>
  5699			000012			N=N+1
  5700			000000			M=0
  5701						IFE N&33-2,<M=FCEPSE>
  5702						IFE N&3-3,<M=FCEPSE+SAIAC0>
  5703						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  5704					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  5705	035716	006001	000050		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  5706						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  5707	035717	045350	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  5708						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  5709					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  5710	035720	000000	002000		>>
  5711			000013			N=N+1
  5712			000000			M=0
  5713						IFE N&33-2,<M=FCEPSE>
  5714			000143			IFE N&3-3,<M=FCEPSE+SAIAC0>
  5715						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  5716					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  5717	035721	000040	000143		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  5718						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  5719	035722	045350	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  5720						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  5721					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  5722	035723	000000	002000		>>
  5723			000014			N=N+1
  5724			000000			M=0
  5725						IFE N&33-2,<M=FCEPSE>
  5726						IFE N&3-3,<M=FCEPSE+SAIAC0>
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 18-3
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		500-577                                *** SEQ 0166

  5727						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  5728					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  5729	035724	000000	000001		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  5730						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  5731	035725	045351	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  5732						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  5733					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  5734	035726	000000	020000		>>
  5735			000015			N=N+1
  5736			000000			M=0
  5737						IFE N&33-2,<M=FCEPSE>
  5738						IFE N&3-3,<M=FCEPSE+SAIAC0>
  5739						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  5740					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  5741	035727	000000	000000		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  5742						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  5743	035730	045351	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  5744						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  5745					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  5746	035731	000000	020000		>>
  5747			000016			N=N+1
  5748			000000			M=0
  5749						IFE N&33-2,<M=FCEPSE>
  5750						IFE N&3-3,<M=FCEPSE+SAIAC0>
  5751						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  5752					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  5753	035732	006001	000050		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  5754						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  5755	035733	045351	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  5756						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  5757					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  5758	035734	000000	020000		>>
  5759			000017			N=N+1
  5760			000000			M=0
  5761						IFE N&33-2,<M=FCEPSE>
  5762			000143			IFE N&3-3,<M=FCEPSE+SAIAC0>
  5763						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  5764					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  5765	035735	000000	000143		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  5766						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  5767	035736	045351	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  5768						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  5769					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  5770	035737	000000	020000		>>
  5771			000020			N=N+1
  5772			000000			M=0
  5773						IFE N&33-2,<M=FCEPSE>
  5774						IFE N&3-3,<M=FCEPSE+SAIAC0>
  5775						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  5776					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  5777	035740	000040	000001		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  5778						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  5779	035741	045350	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  5780						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  5781					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 18-4
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		500-577                                *** SEQ 0167

  5782	035742	000000	006000		>>
  5783			000021			N=N+1
  5784			000000			M=0
  5785						IFE N&33-2,<M=FCEPSE>
  5786						IFE N&3-3,<M=FCEPSE+SAIAC0>
  5787						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  5788					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  5789	035743	000040	000000		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  5790						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  5791	035744	045350	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  5792						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  5793					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  5794	035745	000000	006000		>>
  5795			000022			N=N+1
  5796			000000			M=0
  5797						IFE N&33-2,<M=FCEPSE>
  5798						IFE N&3-3,<M=FCEPSE+SAIAC0>
  5799						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  5800					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  5801	035746	006001	000050		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  5802						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  5803	035747	045350	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  5804						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  5805					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  5806	035750	000000	006000		>>
  5807			000023			N=N+1
  5808			000000			M=0
  5809						IFE N&33-2,<M=FCEPSE>
  5810			000143			IFE N&3-3,<M=FCEPSE+SAIAC0>
  5811						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  5812					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  5813	035751	000040	000143		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  5814						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  5815	035752	045350	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  5816						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  5817					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  5818	035753	000000	006000		>>
  5819			000024			N=N+1
  5820			000000			M=0
  5821						IFE N&33-2,<M=FCEPSE>
  5822						IFE N&3-3,<M=FCEPSE+SAIAC0>
  5823						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  5824					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  5825	035754	000000	000001		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  5826						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  5827	035755	045351	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  5828						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  5829					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  5830	035756	000000	024000		>>
  5831			000025			N=N+1
  5832			000000			M=0
  5833						IFE N&33-2,<M=FCEPSE>
  5834						IFE N&3-3,<M=FCEPSE+SAIAC0>
  5835						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  5836					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 18-5
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		500-577                                *** SEQ 0168

  5837	035757	000000	000000		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  5838						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  5839	035760	045351	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  5840						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  5841					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  5842	035761	000000	024000		>>
  5843			000026			N=N+1
  5844			000000			M=0
  5845						IFE N&33-2,<M=FCEPSE>
  5846						IFE N&3-3,<M=FCEPSE+SAIAC0>
  5847						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  5848					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  5849	035762	006001	000050		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  5850						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  5851	035763	045351	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  5852						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  5853					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  5854	035764	000000	024000		>>
  5855			000027			N=N+1
  5856			000000			M=0
  5857						IFE N&33-2,<M=FCEPSE>
  5858			000143			IFE N&3-3,<M=FCEPSE+SAIAC0>
  5859						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  5860					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  5861	035765	000000	000143		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  5862						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  5863	035766	045351	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  5864						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  5865					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  5866	035767	000000	024000		>>
  5867			000030			N=N+1
  5868			000000			M=0
  5869						IFE N&33-2,<M=FCEPSE>
  5870						IFE N&3-3,<M=FCEPSE+SAIAC0>
  5871						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  5872					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  5873	035770	000040	000001		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  5874						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  5875	035771	045350	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  5876						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  5877					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  5878	035772	000000	002065		>>
  5879			000031			N=N+1
  5880			000000			M=0
  5881						IFE N&33-2,<M=FCEPSE>
  5882						IFE N&3-3,<M=FCEPSE+SAIAC0>
  5883						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  5884					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  5885	035773	000040	000000		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  5886						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  5887	035774	045350	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  5888						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  5889					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  5890	035775	000000	002065		>>
  5891			000032			N=N+1
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 18-6
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		500-577                                *** SEQ 0169

  5892			000000			M=0
  5893						IFE N&33-2,<M=FCEPSE>
  5894						IFE N&3-3,<M=FCEPSE+SAIAC0>
  5895						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  5896					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  5897	035776	006001	000050		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  5898						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  5899	035777	045350	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  5900						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  5901					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  5902	036000	000000	002065		>>
  5903			000033			N=N+1
  5904			000000			M=0
  5905						IFE N&33-2,<M=FCEPSE>
  5906			000143			IFE N&3-3,<M=FCEPSE+SAIAC0>
  5907						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  5908					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  5909	036001	000040	000143		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  5910						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  5911	036002	045350	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  5912						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  5913					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  5914	036003	000000	002065		>>
  5915			000034			N=N+1
  5916			000000			M=0
  5917						IFE N&33-2,<M=FCEPSE>
  5918						IFE N&3-3,<M=FCEPSE+SAIAC0>
  5919						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  5920					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  5921	036004	000000	000001		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  5922						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  5923	036005	045351	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  5924						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  5925					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  5926	036006	000000	020067		>>
  5927			000035			N=N+1
  5928			000000			M=0
  5929						IFE N&33-2,<M=FCEPSE>
  5930						IFE N&3-3,<M=FCEPSE+SAIAC0>
  5931						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  5932					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  5933	036007	000000	000000		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  5934						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  5935	036010	045351	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  5936						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  5937					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  5938	036011	000000	020067		>>
  5939			000036			N=N+1
  5940			000000			M=0
  5941						IFE N&33-2,<M=FCEPSE>
  5942						IFE N&3-3,<M=FCEPSE+SAIAC0>
  5943						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  5944					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  5945	036012	006001	000050		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  5946						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 18-7
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		500-577                                *** SEQ 0170

  5947	036013	045351	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  5948						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  5949					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  5950	036014	000000	020067		>>
  5951			000037			N=N+1
  5952			000000			M=0
  5953						IFE N&33-2,<M=FCEPSE>
  5954			000143			IFE N&3-3,<M=FCEPSE+SAIAC0>
  5955						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  5956					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  5957	036015	000000	000143		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  5958						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  5959	036016	045351	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  5960						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  5961					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  5962	036017	000000	020067		>>
  5963			000040			N=N+1
  5964			000000			M=0
  5965						IFE N&33-2,<M=FCEPSE>
  5966						IFE N&3-3,<M=FCEPSE+SAIAC0>
  5967						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  5968					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  5969	036020	004020	000001		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  5970						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  5971	036021	045352	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  5972						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  5973					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  5974	036022	000000	006000		>>
  5975			000041			N=N+1
  5976			000000			M=0
  5977						IFE N&33-2,<M=FCEPSE>
  5978						IFE N&3-3,<M=FCEPSE+SAIAC0>
  5979						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  5980					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  5981	036023	004020	000000		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  5982						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  5983	036024	045352	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  5984						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  5985					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  5986	036025	000000	006000		>>
  5987			000042			N=N+1
  5988			000000			M=0
  5989			000003			IFE N&33-2,<M=FCEPSE>
  5990						IFE N&3-3,<M=FCEPSE+SAIAC0>
  5991						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  5992					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  5993	036026	006001	000043		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  5994						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  5995	036027	045352	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  5996						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  5997					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  5998	036030	000000	006000		>>
  5999			000043			N=N+1
  6000			000000			M=0
  6001						IFE N&33-2,<M=FCEPSE>
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 18-8
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		500-577                                *** SEQ 0171

  6002			000143			IFE N&3-3,<M=FCEPSE+SAIAC0>
  6003						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  6004					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  6005	036031	000060	000143		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  6006						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  6007	036032	045352	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  6008						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  6009					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  6010	036033	000000	006000		>>
  6011			000044			N=N+1
  6012			000000			M=0
  6013						IFE N&33-2,<M=FCEPSE>
  6014						IFE N&3-3,<M=FCEPSE+SAIAC0>
  6015						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  6016					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  6017	036034	004000	000001		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  6018						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  6019	036035	045353	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  6020						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  6021					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  6022	036036	000000	012000		>>
  6023			000045			N=N+1
  6024			000000			M=0
  6025						IFE N&33-2,<M=FCEPSE>
  6026						IFE N&3-3,<M=FCEPSE+SAIAC0>
  6027						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  6028					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  6029	036037	004000	000000		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  6030						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  6031	036040	045353	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  6032						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  6033					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  6034	036041	000000	012000		>>
  6035			000046			N=N+1
  6036			000000			M=0
  6037			000003			IFE N&33-2,<M=FCEPSE>
  6038						IFE N&3-3,<M=FCEPSE+SAIAC0>
  6039						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  6040					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  6041	036042	006001	000043		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  6042						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  6043	036043	045353	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  6044						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  6045					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  6046	036044	000000	012000		>>
  6047			000047			N=N+1
  6048			000000			M=0
  6049						IFE N&33-2,<M=FCEPSE>
  6050			000143			IFE N&3-3,<M=FCEPSE+SAIAC0>
  6051						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  6052					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  6053	036045	000040	000143		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  6054						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  6055	036046	045353	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  6056						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 18-9
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		500-577                                *** SEQ 0172

  6057					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  6058	036047	000000	012000		>>
  6059			000050			N=N+1
  6060			000000			M=0
  6061						IFE N&33-2,<M=FCEPSE>
  6062						IFE N&3-3,<M=FCEPSE+SAIAC0>
  6063						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  6064					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  6065	036050	000020	000001		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  6066						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  6067	036051	045354	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  6068						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  6069					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  6070	036052	000000	004000		>>
  6071			000051			N=N+1
  6072			000000			M=0
  6073						IFE N&33-2,<M=FCEPSE>
  6074						IFE N&3-3,<M=FCEPSE+SAIAC0>
  6075						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  6076					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  6077	036053	000020	000000		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  6078						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  6079	036054	045354	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  6080						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  6081					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  6082	036055	000000	004000		>>
  6083			000052			N=N+1
  6084			000000			M=0
  6085						IFE N&33-2,<M=FCEPSE>
  6086						IFE N&3-3,<M=FCEPSE+SAIAC0>
  6087						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  6088					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  6089	036056	006001	000050		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  6090						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  6091	036057	045354	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  6092						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  6093					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  6094	036060	000000	004000		>>
  6095			000053			N=N+1
  6096			000000			M=0
  6097						IFE N&33-2,<M=FCEPSE>
  6098			000143			IFE N&3-3,<M=FCEPSE+SAIAC0>
  6099						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  6100					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  6101	036061	000020	000143		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  6102						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  6103	036062	045354	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  6104						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  6105					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  6106	036063	000000	004000		>>
  6107			000054			N=N+1
  6108			000000			M=0
  6109						IFE N&33-2,<M=FCEPSE>
  6110						IFE N&3-3,<M=FCEPSE+SAIAC0>
  6111						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 18-10
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		500-577                                *** SEQ 0173

  6112					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  6113	036064	000000	000001		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  6114						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  6115	036065	045351	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  6116						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  6117					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  6118	036066	000000	010000		>>
  6119			000055			N=N+1
  6120			000000			M=0
  6121						IFE N&33-2,<M=FCEPSE>
  6122						IFE N&3-3,<M=FCEPSE+SAIAC0>
  6123						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  6124					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  6125	036067	000000	000000		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  6126						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  6127	036070	045351	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  6128						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  6129					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  6130	036071	000000	010000		>>
  6131			000056			N=N+1
  6132			000000			M=0
  6133						IFE N&33-2,<M=FCEPSE>
  6134						IFE N&3-3,<M=FCEPSE+SAIAC0>
  6135						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  6136					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  6137	036072	006001	000050		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  6138						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  6139	036073	045351	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  6140						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  6141					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  6142	036074	000000	010000		>>
  6143			000057			N=N+1
  6144			000000			M=0
  6145						IFE N&33-2,<M=FCEPSE>
  6146			000143			IFE N&3-3,<M=FCEPSE+SAIAC0>
  6147						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  6148					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  6149	036075	000000	000143		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  6150						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  6151	036076	045351	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  6152						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  6153					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  6154	036077	000000	010000		>>
  6155			000060			N=N+1
  6156			000000			M=0
  6157						IFE N&33-2,<M=FCEPSE>
  6158						IFE N&3-3,<M=FCEPSE+SAIAC0>
  6159						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  6160					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  6161	036100	000020	000001		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  6162						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  6163	036101	045354	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  6164						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  6165					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  6166	036102	000000	006000		>>
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 18-11
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		500-577                                *** SEQ 0174

  6167			000061			N=N+1
  6168			000000			M=0
  6169						IFE N&33-2,<M=FCEPSE>
  6170						IFE N&3-3,<M=FCEPSE+SAIAC0>
  6171						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  6172					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  6173	036103	000020	000000		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  6174						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  6175	036104	045354	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  6176						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  6177					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  6178	036105	000000	006000		>>
  6179			000062			N=N+1
  6180			000000			M=0
  6181						IFE N&33-2,<M=FCEPSE>
  6182						IFE N&3-3,<M=FCEPSE+SAIAC0>
  6183						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  6184					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  6185	036106	006001	000050		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  6186						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  6187	036107	045354	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  6188						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  6189					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  6190	036110	000000	006000		>>
  6191			000063			N=N+1
  6192			000000			M=0
  6193						IFE N&33-2,<M=FCEPSE>
  6194			000143			IFE N&3-3,<M=FCEPSE+SAIAC0>
  6195						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  6196					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  6197	036111	000020	000143		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  6198						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  6199	036112	045354	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  6200						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  6201					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  6202	036113	000000	006000		>>
  6203			000064			N=N+1
  6204			000000			M=0
  6205						IFE N&33-2,<M=FCEPSE>
  6206						IFE N&3-3,<M=FCEPSE+SAIAC0>
  6207						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  6208					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  6209	036114	000000	000001		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  6210						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  6211	036115	045351	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  6212						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  6213					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  6214	036116	000000	012000		>>
  6215			000065			N=N+1
  6216			000000			M=0
  6217						IFE N&33-2,<M=FCEPSE>
  6218						IFE N&3-3,<M=FCEPSE+SAIAC0>
  6219						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  6220					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  6221	036117	000000	000000		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 18-12
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		500-577                                *** SEQ 0175

  6222						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  6223	036120	045351	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  6224						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  6225					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  6226	036121	000000	012000		>>
  6227			000066			N=N+1
  6228			000000			M=0
  6229						IFE N&33-2,<M=FCEPSE>
  6230						IFE N&3-3,<M=FCEPSE+SAIAC0>
  6231						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  6232					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  6233	036122	006001	000050		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  6234						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  6235	036123	045351	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  6236						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  6237					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  6238	036124	000000	012000		>>
  6239			000067			N=N+1
  6240			000000			M=0
  6241						IFE N&33-2,<M=FCEPSE>
  6242			000143			IFE N&3-3,<M=FCEPSE+SAIAC0>
  6243						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  6244					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  6245	036125	000000	000143		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  6246						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  6247	036126	045351	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  6248						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  6249					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  6250	036127	000000	012000		>>
  6251			000070			N=N+1
  6252			000000			M=0
  6253						IFE N&33-2,<M=FCEPSE>
  6254						IFE N&3-3,<M=FCEPSE+SAIAC0>
  6255						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  6256					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  6257	036130	000020	000001		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  6258						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  6259	036131	045354	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  6260						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  6261					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  6262	036132	000000	004067		>>
  6263			000071			N=N+1
  6264			000000			M=0
  6265						IFE N&33-2,<M=FCEPSE>
  6266						IFE N&3-3,<M=FCEPSE+SAIAC0>
  6267						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  6268					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  6269	036133	000020	000000		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  6270						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  6271	036134	045354	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  6272						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  6273					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  6274	036135	000000	004067		>>
  6275			000072			N=N+1
  6276			000000			M=0
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 18-13
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		500-577                                *** SEQ 0176

  6277						IFE N&33-2,<M=FCEPSE>
  6278						IFE N&3-3,<M=FCEPSE+SAIAC0>
  6279						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  6280					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  6281	036136	006001	000050		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  6282						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  6283	036137	045354	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  6284						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  6285					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  6286	036140	000000	004067		>>
  6287			000073			N=N+1
  6288			000000			M=0
  6289						IFE N&33-2,<M=FCEPSE>
  6290			000143			IFE N&3-3,<M=FCEPSE+SAIAC0>
  6291						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  6292					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  6293	036141	000020	000143		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  6294						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  6295	036142	045354	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  6296						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  6297					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  6298	036143	000000	004067		>>
  6299			000074			N=N+1
  6300			000000			M=0
  6301						IFE N&33-2,<M=FCEPSE>
  6302						IFE N&3-3,<M=FCEPSE+SAIAC0>
  6303						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  6304					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  6305	036144	000000	000001		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  6306						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  6307	036145	045351	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  6308						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  6309					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  6310	036146	000000	010065		>>
  6311			000075			N=N+1
  6312			000000			M=0
  6313						IFE N&33-2,<M=FCEPSE>
  6314						IFE N&3-3,<M=FCEPSE+SAIAC0>
  6315						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  6316					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  6317	036147	000000	000000		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  6318						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  6319	036150	045351	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  6320						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  6321					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  6322	036151	000000	010065		>>
  6323			000076			N=N+1
  6324			000000			M=0
  6325						IFE N&33-2,<M=FCEPSE>
  6326						IFE N&3-3,<M=FCEPSE+SAIAC0>
  6327						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  6328					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  6329	036152	006001	000050		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  6330						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  6331	036153	045351	000000		4,<ADARLP>>,ARADEN+BRAREN],0
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 18-14
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		500-577                                *** SEQ 0177

  6332						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  6333					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  6334	036154	000000	010065		>>
  6335			000077			N=N+1
  6336			000000			M=0
  6337						IFE N&33-2,<M=FCEPSE>
  6338			000143			IFE N&3-3,<M=FCEPSE+SAIAC0>
  6339						XWD <IFE N&3-2,<ADFMPL+ET0>>+<IFE N&72-40,<ADFMLP>>+<IFE N&72,<ADFMRP>>+<IFN N&3-2,
  6340					<<IFE <N&44>*<N-43>*<N-47>,<ADARLP>>+<IFE <N&44-40>*<N-3>*<N-7>,<ADARRP>>>>,<IFE N&3,<FCE>>+
  6341	036155	000000	000143		M+<IFE N&3-2,<SACINH+<IFN N&30,<SCE>>>>
  6342						XWD [XWD <IFE N&70-40,<ADBRLP>>+<IFE N&70,<ADBRRP>>+<IFE N&44-40,<ADARRP>>+<IFE N&4
  6343	036156	045351	000000		4,<ADARLP>>,ARADEN+BRAREN],0
  6344						<IFE N&44-44,<ARRARL>>+<IFE N&44-4,<ARLARR>>+<IFE N&44,<ARLTAD>>+<IFE N&44-40,<ARRT
  6345					AD>>+<IFE N&50-40,<ARLTAD>>+<IFE N&50,<ARRTAD>>+<IFE N&30-30,<HWTETS+<IFN <N&4*10+N>&40,<2>>
  6346	036157	000000	010065		>>
  6347			000100			N=N+1
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 19
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		600-777                                *** SEQ 0178

  6348					SUBTTL	DISPATCH TABLE FOR INSTRUCTIONS		600-777
  6349
  6350					;*TEST GROUP							600-677
  6351
  6352			000000			N=0
  6353						REPEAT 100,
  6354					<	M=0
  6355						IFN N&6,<M=1>
  6356						IFE N&60-60,<M=1>
  6357						A1=0
  6358						IFE N&66-20,<A1=1>
  6359						IFE N&66-40,<A1=1>
  6360						A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  6361						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>^_
  6362					+<IFN N&6,<PCCHNG+ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  6363						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],^_
  6364					[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-40,^_
  6365					<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV^_
  6366					+ADARPL+ADARMI>>+<IFE N&6-4,<PCCLK>>^_
  6367					,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  6368						XWD	<IFN N&6,<INFTST>>,ARADEN
  6369						N=N+1
  6370					>
  6371			000000			M=0
  6372						IFN N&6,<M=1>
  6373						IFE N&60-60,<M=1>
  6374			000000			A1=0
  6375						IFE N&66-20,<A1=1>
  6376						IFE N&66-40,<A1=1>
  6377			006000			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  6378						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  6379	036160	006000	000040		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  6380						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  6381					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  6382	036161	045355	045356		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  6383	036162	000000	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  6384			000001			N=N+1
  6385
  6386			000000			M=0
  6387						IFN N&6,<M=1>
  6388						IFE N&60-60,<M=1>
  6389			000000			A1=0
  6390						IFE N&66-20,<A1=1>
  6391						IFE N&66-40,<A1=1>
  6392			006000			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  6393						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  6394	036163	006001	000040		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  6395						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  6396					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  6397	036164	045355	045356		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  6398	036165	000000	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  6399			000002			N=N+1
  6400
  6401			000000			M=0
  6402			000001			IFN N&6,<M=1>
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 19-1
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		600-777                                *** SEQ 0179

  6403						IFE N&60-60,<M=1>
  6404			000000			A1=0
  6405						IFE N&66-20,<A1=1>
  6406						IFE N&66-40,<A1=1>
  6407			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  6408						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  6409	036166	006062	140440		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  6410						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  6411					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  6412	036167	045357	045360		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  6413	036170	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  6414			000003			N=N+1
  6415
  6416			000000			M=0
  6417			000001			IFN N&6,<M=1>
  6418						IFE N&60-60,<M=1>
  6419			000000			A1=0
  6420						IFE N&66-20,<A1=1>
  6421						IFE N&66-40,<A1=1>
  6422			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  6423						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  6424	036171	006063	100440		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  6425						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  6426					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  6427	036172	045357	045360		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  6428	036173	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  6429			000004			N=N+1
  6430
  6431			000000			M=0
  6432			000001			IFN N&6,<M=1>
  6433						IFE N&60-60,<M=1>
  6434			000000			A1=0
  6435						IFE N&66-20,<A1=1>
  6436						IFE N&66-40,<A1=1>
  6437			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  6438						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  6439	036174	006062	100440		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  6440						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  6441					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  6442	036175	045361	045362		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  6443	036176	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  6444			000005			N=N+1
  6445
  6446			000000			M=0
  6447			000001			IFN N&6,<M=1>
  6448						IFE N&60-60,<M=1>
  6449			000000			A1=0
  6450						IFE N&66-20,<A1=1>
  6451						IFE N&66-40,<A1=1>
  6452			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  6453						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  6454	036177	006063	100440		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  6455						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  6456					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  6457	036200	045361	045362		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 19-2
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		600-777                                *** SEQ 0180

  6458	036201	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  6459			000006			N=N+1
  6460
  6461			000000			M=0
  6462			000001			IFN N&6,<M=1>
  6463						IFE N&60-60,<M=1>
  6464			000000			A1=0
  6465						IFE N&66-20,<A1=1>
  6466						IFE N&66-40,<A1=1>
  6467			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  6468						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  6469	036202	006062	140440		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  6470						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  6471					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  6472	036203	045357	045363		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  6473	036204	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  6474			000007			N=N+1
  6475
  6476			000000			M=0
  6477			000001			IFN N&6,<M=1>
  6478						IFE N&60-60,<M=1>
  6479			000000			A1=0
  6480						IFE N&66-20,<A1=1>
  6481						IFE N&66-40,<A1=1>
  6482			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  6483						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  6484	036205	006063	100440		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  6485						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  6486					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  6487	036206	045357	045363		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  6488	036207	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  6489			000010			N=N+1
  6490
  6491			000000			M=0
  6492						IFN N&6,<M=1>
  6493						IFE N&60-60,<M=1>
  6494			000000			A1=0
  6495						IFE N&66-20,<A1=1>
  6496						IFE N&66-40,<A1=1>
  6497			006000			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  6498						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  6499	036210	006000	000041		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  6500						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  6501					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  6502	036211	045355	045356		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  6503	036212	000000	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  6504			000011			N=N+1
  6505
  6506			000000			M=0
  6507						IFN N&6,<M=1>
  6508						IFE N&60-60,<M=1>
  6509			000000			A1=0
  6510						IFE N&66-20,<A1=1>
  6511						IFE N&66-40,<A1=1>
  6512			006000			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 19-3
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		600-777                                *** SEQ 0181

  6513						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  6514	036213	006001	000041		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  6515						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  6516					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  6517	036214	045355	045356		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  6518	036215	000000	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  6519			000012			N=N+1
  6520
  6521			000000			M=0
  6522			000001			IFN N&6,<M=1>
  6523						IFE N&60-60,<M=1>
  6524			000000			A1=0
  6525						IFE N&66-20,<A1=1>
  6526						IFE N&66-40,<A1=1>
  6527			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  6528						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  6529	036216	006062	140441		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  6530						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  6531					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  6532	036217	045357	045360		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  6533	036220	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  6534			000013			N=N+1
  6535
  6536			000000			M=0
  6537			000001			IFN N&6,<M=1>
  6538						IFE N&60-60,<M=1>
  6539			000000			A1=0
  6540						IFE N&66-20,<A1=1>
  6541						IFE N&66-40,<A1=1>
  6542			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  6543						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  6544	036221	006063	100441		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  6545						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  6546					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  6547	036222	045357	045360		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  6548	036223	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  6549			000014			N=N+1
  6550
  6551			000000			M=0
  6552			000001			IFN N&6,<M=1>
  6553						IFE N&60-60,<M=1>
  6554			000000			A1=0
  6555						IFE N&66-20,<A1=1>
  6556						IFE N&66-40,<A1=1>
  6557			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  6558						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  6559	036224	006062	100441		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  6560						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  6561					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  6562	036225	045361	045362		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  6563	036226	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  6564			000015			N=N+1
  6565
  6566			000000			M=0
  6567			000001			IFN N&6,<M=1>
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 19-4
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		600-777                                *** SEQ 0182

  6568						IFE N&60-60,<M=1>
  6569			000000			A1=0
  6570						IFE N&66-20,<A1=1>
  6571						IFE N&66-40,<A1=1>
  6572			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  6573						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  6574	036227	006063	100441		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  6575						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  6576					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  6577	036230	045361	045362		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  6578	036231	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  6579			000016			N=N+1
  6580
  6581			000000			M=0
  6582			000001			IFN N&6,<M=1>
  6583						IFE N&60-60,<M=1>
  6584			000000			A1=0
  6585						IFE N&66-20,<A1=1>
  6586						IFE N&66-40,<A1=1>
  6587			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  6588						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  6589	036232	006062	140441		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  6590						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  6591					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  6592	036233	045357	045363		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  6593	036234	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  6594			000017			N=N+1
  6595
  6596			000000			M=0
  6597			000001			IFN N&6,<M=1>
  6598						IFE N&60-60,<M=1>
  6599			000000			A1=0
  6600						IFE N&66-20,<A1=1>
  6601						IFE N&66-40,<A1=1>
  6602			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  6603						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  6604	036235	006063	100441		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  6605						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  6606					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  6607	036236	045357	045363		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  6608	036237	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  6609			000020			N=N+1
  6610
  6611			000000			M=0
  6612						IFN N&6,<M=1>
  6613						IFE N&60-60,<M=1>
  6614			000000			A1=0
  6615			000001			IFE N&66-20,<A1=1>
  6616						IFE N&66-40,<A1=1>
  6617			006100			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  6618						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  6619	036240	006100	000000		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  6620						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  6621					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  6622	036241	045364	045365		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 19-5
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		600-777                                *** SEQ 0183

  6623	036242	000000	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  6624			000021			N=N+1
  6625
  6626			000000			M=0
  6627						IFN N&6,<M=1>
  6628						IFE N&60-60,<M=1>
  6629			000000			A1=0
  6630			000001			IFE N&66-20,<A1=1>
  6631						IFE N&66-40,<A1=1>
  6632			006100			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  6633						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  6634	036243	006101	000000		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  6635						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  6636					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  6637	036244	045364	045365		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  6638	036245	000000	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  6639			000022			N=N+1
  6640
  6641			000000			M=0
  6642			000001			IFN N&6,<M=1>
  6643						IFE N&60-60,<M=1>
  6644			000000			A1=0
  6645						IFE N&66-20,<A1=1>
  6646						IFE N&66-40,<A1=1>
  6647			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  6648						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  6649	036246	006062	140400		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  6650						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  6651					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  6652	036247	045357	045366		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  6653	036250	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  6654			000023			N=N+1
  6655
  6656			000000			M=0
  6657			000001			IFN N&6,<M=1>
  6658						IFE N&60-60,<M=1>
  6659			000000			A1=0
  6660						IFE N&66-20,<A1=1>
  6661						IFE N&66-40,<A1=1>
  6662			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  6663						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  6664	036251	006063	100400		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  6665						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  6666					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  6667	036252	045357	045366		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  6668	036253	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  6669			000024			N=N+1
  6670
  6671			000000			M=0
  6672			000001			IFN N&6,<M=1>
  6673						IFE N&60-60,<M=1>
  6674			000000			A1=0
  6675						IFE N&66-20,<A1=1>
  6676						IFE N&66-40,<A1=1>
  6677			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 19-6
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		600-777                                *** SEQ 0184

  6678						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  6679	036254	006062	100400		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  6680						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  6681					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  6682	036255	045361	045367		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  6683	036256	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  6684			000025			N=N+1
  6685
  6686			000000			M=0
  6687			000001			IFN N&6,<M=1>
  6688						IFE N&60-60,<M=1>
  6689			000000			A1=0
  6690						IFE N&66-20,<A1=1>
  6691						IFE N&66-40,<A1=1>
  6692			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  6693						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  6694	036257	006063	100400		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  6695						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  6696					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  6697	036260	045361	045367		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  6698	036261	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  6699			000026			N=N+1
  6700
  6701			000000			M=0
  6702			000001			IFN N&6,<M=1>
  6703						IFE N&60-60,<M=1>
  6704			000000			A1=0
  6705						IFE N&66-20,<A1=1>
  6706						IFE N&66-40,<A1=1>
  6707			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  6708						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  6709	036262	006062	140400		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  6710						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  6711					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  6712	036263	045357	045370		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  6713	036264	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  6714			000027			N=N+1
  6715
  6716			000000			M=0
  6717			000001			IFN N&6,<M=1>
  6718						IFE N&60-60,<M=1>
  6719			000000			A1=0
  6720						IFE N&66-20,<A1=1>
  6721						IFE N&66-40,<A1=1>
  6722			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  6723						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  6724	036265	006063	100400		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  6725						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  6726					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  6727	036266	045357	045370		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  6728	036267	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  6729			000030			N=N+1
  6730
  6731			000000			M=0
  6732						IFN N&6,<M=1>
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 19-7
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		600-777                                *** SEQ 0185

  6733						IFE N&60-60,<M=1>
  6734			000000			A1=0
  6735			000001			IFE N&66-20,<A1=1>
  6736						IFE N&66-40,<A1=1>
  6737			006100			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  6738						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  6739	036270	006100	000001		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  6740						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  6741					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  6742	036271	045364	045365		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  6743	036272	000000	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  6744			000031			N=N+1
  6745
  6746			000000			M=0
  6747						IFN N&6,<M=1>
  6748						IFE N&60-60,<M=1>
  6749			000000			A1=0
  6750			000001			IFE N&66-20,<A1=1>
  6751						IFE N&66-40,<A1=1>
  6752			006100			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  6753						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  6754	036273	006101	000001		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  6755						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  6756					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  6757	036274	045364	045365		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  6758	036275	000000	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  6759			000032			N=N+1
  6760
  6761			000000			M=0
  6762			000001			IFN N&6,<M=1>
  6763						IFE N&60-60,<M=1>
  6764			000000			A1=0
  6765						IFE N&66-20,<A1=1>
  6766						IFE N&66-40,<A1=1>
  6767			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  6768						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  6769	036276	006062	140401		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  6770						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  6771					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  6772	036277	045357	045366		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  6773	036300	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  6774			000033			N=N+1
  6775
  6776			000000			M=0
  6777			000001			IFN N&6,<M=1>
  6778						IFE N&60-60,<M=1>
  6779			000000			A1=0
  6780						IFE N&66-20,<A1=1>
  6781						IFE N&66-40,<A1=1>
  6782			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  6783						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  6784	036301	006063	100401		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  6785						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  6786					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  6787	036302	045357	045366		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 19-8
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		600-777                                *** SEQ 0186

  6788	036303	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  6789			000034			N=N+1
  6790
  6791			000000			M=0
  6792			000001			IFN N&6,<M=1>
  6793						IFE N&60-60,<M=1>
  6794			000000			A1=0
  6795						IFE N&66-20,<A1=1>
  6796						IFE N&66-40,<A1=1>
  6797			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  6798						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  6799	036304	006062	100401		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  6800						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  6801					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  6802	036305	045361	045367		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  6803	036306	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  6804			000035			N=N+1
  6805
  6806			000000			M=0
  6807			000001			IFN N&6,<M=1>
  6808						IFE N&60-60,<M=1>
  6809			000000			A1=0
  6810						IFE N&66-20,<A1=1>
  6811						IFE N&66-40,<A1=1>
  6812			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  6813						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  6814	036307	006063	100401		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  6815						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  6816					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  6817	036310	045361	045367		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  6818	036311	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  6819			000036			N=N+1
  6820
  6821			000000			M=0
  6822			000001			IFN N&6,<M=1>
  6823						IFE N&60-60,<M=1>
  6824			000000			A1=0
  6825						IFE N&66-20,<A1=1>
  6826						IFE N&66-40,<A1=1>
  6827			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  6828						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  6829	036312	006062	140401		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  6830						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  6831					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  6832	036313	045357	045370		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  6833	036314	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  6834			000037			N=N+1
  6835
  6836			000000			M=0
  6837			000001			IFN N&6,<M=1>
  6838						IFE N&60-60,<M=1>
  6839			000000			A1=0
  6840						IFE N&66-20,<A1=1>
  6841						IFE N&66-40,<A1=1>
  6842			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 19-9
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		600-777                                *** SEQ 0187

  6843						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  6844	036315	006063	100401		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  6845						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  6846					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  6847	036316	045357	045370		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  6848	036317	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  6849			000040			N=N+1
  6850
  6851			000000			M=0
  6852						IFN N&6,<M=1>
  6853						IFE N&60-60,<M=1>
  6854			000000			A1=0
  6855						IFE N&66-20,<A1=1>
  6856			000001			IFE N&66-40,<A1=1>
  6857			106100			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  6858						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  6859	036320	106100	000000		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  6860						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  6861					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  6862	036321	045371	045372		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  6863	036322	000000	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  6864			000041			N=N+1
  6865
  6866			000000			M=0
  6867						IFN N&6,<M=1>
  6868						IFE N&60-60,<M=1>
  6869			000000			A1=0
  6870						IFE N&66-20,<A1=1>
  6871			000001			IFE N&66-40,<A1=1>
  6872			106100			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  6873						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  6874	036323	106101	000000		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  6875						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  6876					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  6877	036324	045371	045372		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  6878	036325	000000	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  6879			000042			N=N+1
  6880
  6881			000000			M=0
  6882			000001			IFN N&6,<M=1>
  6883						IFE N&60-60,<M=1>
  6884			000000			A1=0
  6885						IFE N&66-20,<A1=1>
  6886						IFE N&66-40,<A1=1>
  6887			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  6888						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  6889	036326	006062	140400		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  6890						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  6891					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  6892	036327	045357	045373		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  6893	036330	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  6894			000043			N=N+1
  6895
  6896			000000			M=0
  6897			000001			IFN N&6,<M=1>
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 19-10
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		600-777                                *** SEQ 0188

  6898						IFE N&60-60,<M=1>
  6899			000000			A1=0
  6900						IFE N&66-20,<A1=1>
  6901						IFE N&66-40,<A1=1>
  6902			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  6903						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  6904	036331	006063	100400		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  6905						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  6906					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  6907	036332	045357	045373		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  6908	036333	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  6909			000044			N=N+1
  6910
  6911			000000			M=0
  6912			000001			IFN N&6,<M=1>
  6913						IFE N&60-60,<M=1>
  6914			000000			A1=0
  6915						IFE N&66-20,<A1=1>
  6916						IFE N&66-40,<A1=1>
  6917			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  6918						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  6919	036334	006062	100400		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  6920						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  6921					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  6922	036335	045361	045374		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  6923	036336	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  6924			000045			N=N+1
  6925
  6926			000000			M=0
  6927			000001			IFN N&6,<M=1>
  6928						IFE N&60-60,<M=1>
  6929			000000			A1=0
  6930						IFE N&66-20,<A1=1>
  6931						IFE N&66-40,<A1=1>
  6932			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  6933						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  6934	036337	006063	100400		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  6935						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  6936					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  6937	036340	045361	045374		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  6938	036341	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  6939			000046			N=N+1
  6940
  6941			000000			M=0
  6942			000001			IFN N&6,<M=1>
  6943						IFE N&60-60,<M=1>
  6944			000000			A1=0
  6945						IFE N&66-20,<A1=1>
  6946						IFE N&66-40,<A1=1>
  6947			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  6948						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  6949	036342	006062	140400		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  6950						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  6951					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  6952	036343	045357	045375		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 19-11
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		600-777                                *** SEQ 0189

  6953	036344	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  6954			000047			N=N+1
  6955
  6956			000000			M=0
  6957			000001			IFN N&6,<M=1>
  6958						IFE N&60-60,<M=1>
  6959			000000			A1=0
  6960						IFE N&66-20,<A1=1>
  6961						IFE N&66-40,<A1=1>
  6962			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  6963						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  6964	036345	006063	100400		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  6965						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  6966					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  6967	036346	045357	045375		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  6968	036347	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  6969			000050			N=N+1
  6970
  6971			000000			M=0
  6972						IFN N&6,<M=1>
  6973						IFE N&60-60,<M=1>
  6974			000000			A1=0
  6975						IFE N&66-20,<A1=1>
  6976			000001			IFE N&66-40,<A1=1>
  6977			106100			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  6978						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  6979	036350	106100	000001		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  6980						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  6981					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  6982	036351	045371	045372		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  6983	036352	000000	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  6984			000051			N=N+1
  6985
  6986			000000			M=0
  6987						IFN N&6,<M=1>
  6988						IFE N&60-60,<M=1>
  6989			000000			A1=0
  6990						IFE N&66-20,<A1=1>
  6991			000001			IFE N&66-40,<A1=1>
  6992			106100			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  6993						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  6994	036353	106101	000001		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  6995						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  6996					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  6997	036354	045371	045372		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  6998	036355	000000	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  6999			000052			N=N+1
  7000
  7001			000000			M=0
  7002			000001			IFN N&6,<M=1>
  7003						IFE N&60-60,<M=1>
  7004			000000			A1=0
  7005						IFE N&66-20,<A1=1>
  7006						IFE N&66-40,<A1=1>
  7007			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 19-12
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		600-777                                *** SEQ 0190

  7008						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  7009	036356	006062	140401		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  7010						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  7011					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  7012	036357	045357	045373		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  7013	036360	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  7014			000053			N=N+1
  7015
  7016			000000			M=0
  7017			000001			IFN N&6,<M=1>
  7018						IFE N&60-60,<M=1>
  7019			000000			A1=0
  7020						IFE N&66-20,<A1=1>
  7021						IFE N&66-40,<A1=1>
  7022			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  7023						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  7024	036361	006063	100401		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  7025						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  7026					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  7027	036362	045357	045373		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  7028	036363	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  7029			000054			N=N+1
  7030
  7031			000000			M=0
  7032			000001			IFN N&6,<M=1>
  7033						IFE N&60-60,<M=1>
  7034			000000			A1=0
  7035						IFE N&66-20,<A1=1>
  7036						IFE N&66-40,<A1=1>
  7037			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  7038						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  7039	036364	006062	100401		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  7040						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  7041					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  7042	036365	045361	045374		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  7043	036366	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  7044			000055			N=N+1
  7045
  7046			000000			M=0
  7047			000001			IFN N&6,<M=1>
  7048						IFE N&60-60,<M=1>
  7049			000000			A1=0
  7050						IFE N&66-20,<A1=1>
  7051						IFE N&66-40,<A1=1>
  7052			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  7053						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  7054	036367	006063	100401		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  7055						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  7056					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  7057	036370	045361	045374		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  7058	036371	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  7059			000056			N=N+1
  7060
  7061			000000			M=0
  7062			000001			IFN N&6,<M=1>
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 19-13
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		600-777                                *** SEQ 0191

  7063						IFE N&60-60,<M=1>
  7064			000000			A1=0
  7065						IFE N&66-20,<A1=1>
  7066						IFE N&66-40,<A1=1>
  7067			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  7068						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  7069	036372	006062	140401		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  7070						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  7071					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  7072	036373	045357	045375		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  7073	036374	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  7074			000057			N=N+1
  7075
  7076			000000			M=0
  7077			000001			IFN N&6,<M=1>
  7078						IFE N&60-60,<M=1>
  7079			000000			A1=0
  7080						IFE N&66-20,<A1=1>
  7081						IFE N&66-40,<A1=1>
  7082			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  7083						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  7084	036375	006063	100401		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  7085						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  7086					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  7087	036376	045357	045375		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  7088	036377	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  7089			000060			N=N+1
  7090
  7091			000000			M=0
  7092						IFN N&6,<M=1>
  7093			000001			IFE N&60-60,<M=1>
  7094			000000			A1=0
  7095						IFE N&66-20,<A1=1>
  7096						IFE N&66-40,<A1=1>
  7097			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  7098						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  7099	036400	006062	000000		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  7100						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  7101					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  7102	036401	045361	045376		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  7103	036402	000000	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  7104			000061			N=N+1
  7105
  7106			000000			M=0
  7107						IFN N&6,<M=1>
  7108			000001			IFE N&60-60,<M=1>
  7109			000000			A1=0
  7110						IFE N&66-20,<A1=1>
  7111						IFE N&66-40,<A1=1>
  7112			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  7113						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  7114	036403	006063	000000		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  7115						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  7116					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  7117	036404	045361	045376		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 19-14
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		600-777                                *** SEQ 0192

  7118	036405	000000	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  7119			000062			N=N+1
  7120
  7121			000000			M=0
  7122			000001			IFN N&6,<M=1>
  7123			000001			IFE N&60-60,<M=1>
  7124			000000			A1=0
  7125						IFE N&66-20,<A1=1>
  7126						IFE N&66-40,<A1=1>
  7127			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  7128						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  7129	036406	006062	140400		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  7130						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  7131					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  7132	036407	045357	045377		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  7133	036410	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  7134			000063			N=N+1
  7135
  7136			000000			M=0
  7137			000001			IFN N&6,<M=1>
  7138			000001			IFE N&60-60,<M=1>
  7139			000000			A1=0
  7140						IFE N&66-20,<A1=1>
  7141						IFE N&66-40,<A1=1>
  7142			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  7143						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  7144	036411	006063	100400		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  7145						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  7146					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  7147	036412	045357	045377		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  7148	036413	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  7149			000064			N=N+1
  7150
  7151			000000			M=0
  7152			000001			IFN N&6,<M=1>
  7153			000001			IFE N&60-60,<M=1>
  7154			000000			A1=0
  7155						IFE N&66-20,<A1=1>
  7156						IFE N&66-40,<A1=1>
  7157			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  7158						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  7159	036414	006062	100400		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  7160						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  7161					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  7162	036415	045361	045400		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  7163	036416	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  7164			000065			N=N+1
  7165
  7166			000000			M=0
  7167			000001			IFN N&6,<M=1>
  7168			000001			IFE N&60-60,<M=1>
  7169			000000			A1=0
  7170						IFE N&66-20,<A1=1>
  7171						IFE N&66-40,<A1=1>
  7172			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 19-15
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		600-777                                *** SEQ 0193

  7173						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  7174	036417	006063	100400		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  7175						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  7176					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  7177	036420	045361	045400		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  7178	036421	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  7179			000066			N=N+1
  7180
  7181			000000			M=0
  7182			000001			IFN N&6,<M=1>
  7183			000001			IFE N&60-60,<M=1>
  7184			000000			A1=0
  7185						IFE N&66-20,<A1=1>
  7186						IFE N&66-40,<A1=1>
  7187			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  7188						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  7189	036422	006062	140400		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  7190						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  7191					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  7192	036423	045357	045401		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  7193	036424	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  7194			000067			N=N+1
  7195
  7196			000000			M=0
  7197			000001			IFN N&6,<M=1>
  7198			000001			IFE N&60-60,<M=1>
  7199			000000			A1=0
  7200						IFE N&66-20,<A1=1>
  7201						IFE N&66-40,<A1=1>
  7202			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  7203						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  7204	036425	006063	100400		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  7205						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  7206					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  7207	036426	045357	045401		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  7208	036427	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  7209			000070			N=N+1
  7210
  7211			000000			M=0
  7212						IFN N&6,<M=1>
  7213			000001			IFE N&60-60,<M=1>
  7214			000000			A1=0
  7215						IFE N&66-20,<A1=1>
  7216						IFE N&66-40,<A1=1>
  7217			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  7218						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  7219	036430	006062	000001		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  7220						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  7221					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  7222	036431	045361	045376		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  7223	036432	000000	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  7224			000071			N=N+1
  7225
  7226			000000			M=0
  7227						IFN N&6,<M=1>
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 19-16
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		600-777                                *** SEQ 0194

  7228			000001			IFE N&60-60,<M=1>
  7229			000000			A1=0
  7230						IFE N&66-20,<A1=1>
  7231						IFE N&66-40,<A1=1>
  7232			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  7233						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  7234	036433	006063	000001		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  7235						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  7236					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  7237	036434	045361	045376		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  7238	036435	000000	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  7239			000072			N=N+1
  7240
  7241			000000			M=0
  7242			000001			IFN N&6,<M=1>
  7243			000001			IFE N&60-60,<M=1>
  7244			000000			A1=0
  7245						IFE N&66-20,<A1=1>
  7246						IFE N&66-40,<A1=1>
  7247			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  7248						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  7249	036436	006062	140401		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  7250						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  7251					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  7252	036437	045357	045377		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  7253	036440	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  7254			000073			N=N+1
  7255
  7256			000000			M=0
  7257			000001			IFN N&6,<M=1>
  7258			000001			IFE N&60-60,<M=1>
  7259			000000			A1=0
  7260						IFE N&66-20,<A1=1>
  7261						IFE N&66-40,<A1=1>
  7262			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  7263						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  7264	036441	006063	100401		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  7265						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  7266					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  7267	036442	045357	045377		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  7268	036443	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  7269			000074			N=N+1
  7270
  7271			000000			M=0
  7272			000001			IFN N&6,<M=1>
  7273			000001			IFE N&60-60,<M=1>
  7274			000000			A1=0
  7275						IFE N&66-20,<A1=1>
  7276						IFE N&66-40,<A1=1>
  7277			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  7278						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  7279	036444	006062	100401		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  7280						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  7281					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  7282	036445	045361	045400		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 19-17
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		600-777                                *** SEQ 0195

  7283	036446	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  7284			000075			N=N+1
  7285
  7286			000000			M=0
  7287			000001			IFN N&6,<M=1>
  7288			000001			IFE N&60-60,<M=1>
  7289			000000			A1=0
  7290						IFE N&66-20,<A1=1>
  7291						IFE N&66-40,<A1=1>
  7292			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  7293						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  7294	036447	006063	100401		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  7295						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  7296					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  7297	036450	045361	045400		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  7298	036451	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  7299			000076			N=N+1
  7300
  7301			000000			M=0
  7302			000001			IFN N&6,<M=1>
  7303			000001			IFE N&60-60,<M=1>
  7304			000000			A1=0
  7305						IFE N&66-20,<A1=1>
  7306						IFE N&66-40,<A1=1>
  7307			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  7308						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  7309	036452	006062	140401		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  7310						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  7311					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  7312	036453	045357	045401		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  7313	036454	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  7314			000077			N=N+1
  7315
  7316			000000			M=0
  7317			000001			IFN N&6,<M=1>
  7318			000001			IFE N&60-60,<M=1>
  7319			000000			A1=0
  7320						IFE N&66-20,<A1=1>
  7321						IFE N&66-40,<A1=1>
  7322			006060			A0=ADFMPL+M*ADARPL+<IFE N&66-40,<ADEQV>>+A1*ADARMI
  7323						XWD <IFN N&1,<ET0>>+M*ET1+A0,<IFN N&10,<FCE>>+<IFE N&60,<SACINH>>+<IFN N&6,<PCCHNG+
  7324	036455	006063	100401		ABPCEN>>+<IFE N&3-2,<LNGCYC>>
  7325						XWD [XWD A0,ARSWAP+<IFN N&2,<TEST1>>],[XWD <IFE N&60-20,<ADARMI+ADFMPL>>+<IFE N&60-
  7326					40,<ADEQV+ADFMPL+ADARMI>>+<IFE N&60-60,<ADBRMI+ADFMMI+ADEQV+ADARPL+ADARMI>>+<IFE N&6-4,<PCCL
  7327	036456	045357	045401		K>>,BRAREN+<IFN N&2,<TEST+<IFN N&4,<1>>>>]
  7328	036457	000004	006000			XWD	<IFN N&6,<INFTST>>,ARADEN
  7329			000100			N=N+1
  7330
  7331
  7332						IFNDEF	SIMASB,<
  7333					;*IOTS								700-
  7334						BLOCK	300
  7335					
  7336					IFN TABLE+3000-.,<PRINTX TABLE LENGTH INCORRECT>
  7337					>
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 20
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		TWO PART INST'S                        *** SEQ 0196

  7338					SUBTTL	DISPATCH TABLE FOR INSTRUCTIONS		TWO PART INST'S
  7339
  7340	036460				BPINC:
  7341			000003			N=3
  7342						REPEAT 5,
  7343					<	XWD ADADD+<IFN N&5-5,<ET0+ADARPL+ADCR36+ADBRMI^_
  7344					+ADBRPL+ADMI1B>>,SACINH+<IFN N&4,<PCCHNG>>+<IFN N&5-5,<FCEPSE^_
  7345					+LNGCYC+BPIFD>>+<IFE N&5-5,<FCE+BPNIFD>>
  7346						XWD [XWD ADADD,BYTE0],0
  7347						BYTE2+<IFE N&4,<2>>
  7348						N=N+1
  7349					>
  7350						XWD ADADD+<IFN N&5-5,<ET0+ADARPL+ADCR36+ADBRMI+ADBRPL+ADMI1B>>,SACINH+<IFN N&4,<PCC
  7351	036460	461661	046043		HNG>>+<IFN N&5-5,<FCEPSE+LNGCYC+BPIFD>>+<IFE N&5-5,<FCE+BPNIFD>>
  7352	036461	045402	000000			XWD [XWD ADADD,BYTE0],0
  7353	036462	000000	000342			BYTE2+<IFE N&4,<2>>
  7354			000004			N=N+1
  7355
  7356						XWD ADADD+<IFN N&5-5,<ET0+ADARPL+ADCR36+ADBRMI+ADBRPL+ADMI1B>>,SACINH+<IFN N&4,<PCC
  7357	036463	461661	046443		HNG>>+<IFN N&5-5,<FCEPSE+LNGCYC+BPIFD>>+<IFE N&5-5,<FCE+BPNIFD>>
  7358	036464	045402	000000			XWD [XWD ADADD,BYTE0],0
  7359	036465	000000	000340			BYTE2+<IFE N&4,<2>>
  7360			000005			N=N+1
  7361
  7362						XWD ADADD+<IFN N&5-5,<ET0+ADARPL+ADCR36+ADBRMI+ADBRPL+ADMI1B>>,SACINH+<IFN N&4,<PCC
  7363	036466	040000	005441		HNG>>+<IFN N&5-5,<FCEPSE+LNGCYC+BPIFD>>+<IFE N&5-5,<FCE+BPNIFD>>
  7364	036467	045402	000000			XWD [XWD ADADD,BYTE0],0
  7365	036470	000000	000340			BYTE2+<IFE N&4,<2>>
  7366			000006			N=N+1
  7367
  7368						XWD ADADD+<IFN N&5-5,<ET0+ADARPL+ADCR36+ADBRMI+ADBRPL+ADMI1B>>,SACINH+<IFN N&4,<PCC
  7369	036471	461661	046443		HNG>>+<IFN N&5-5,<FCEPSE+LNGCYC+BPIFD>>+<IFE N&5-5,<FCE+BPNIFD>>
  7370	036472	045402	000000			XWD [XWD ADADD,BYTE0],0
  7371	036473	000000	000340			BYTE2+<IFE N&4,<2>>
  7372			000007			N=N+1
  7373
  7374						XWD ADADD+<IFN N&5-5,<ET0+ADARPL+ADCR36+ADBRMI+ADBRPL+ADMI1B>>,SACINH+<IFN N&4,<PCC
  7375	036474	040000	005441		HNG>>+<IFN N&5-5,<FCEPSE+LNGCYC+BPIFD>>+<IFE N&5-5,<FCE+BPNIFD>>
  7376	036475	045402	000000			XWD [XWD ADADD,BYTE0],0
  7377	036476	000000	000340			BYTE2+<IFE N&4,<2>>
  7378			000010			N=N+1
  7379
  7380
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 21
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH TABLE FOR INSTRUCTIONS		TWO PART INST'S                        *** SEQ 0197

  7381	036477				BPNINC:
  7382	036477	040000	004040			XWD ADADD,SACINH+BPNI2D		;IBP (BYF6(1))
  7383	036500	000000	000000			0
  7384	036501	000000	000342			BYTE2+2
  7385
  7386						REPEAT 4,
  7387					<	XWD ADADD,FCE+SACINH+PCCHNG+BPNIFD
  7388						0
  7389						BYTE2
  7390					>
  7391	036502	040000	005441			XWD ADADD,FCE+SACINH+PCCHNG+BPNIFD
  7392	036503	000000	000000			0
  7393	036504	000000	000340			BYTE2
  7394
  7395	036505	040000	005441			XWD ADADD,FCE+SACINH+PCCHNG+BPNIFD
  7396	036506	000000	000000			0
  7397	036507	000000	000340			BYTE2
  7398
  7399	036510	040000	005441			XWD ADADD,FCE+SACINH+PCCHNG+BPNIFD
  7400	036511	000000	000000			0
  7401	036512	000000	000340			BYTE2
  7402
  7403	036513	040000	005441			XWD ADADD,FCE+SACINH+PCCHNG+BPNIFD
  7404	036514	000000	000000			0
  7405	036515	000000	000340			BYTE2
  7406
  7407
  7408	036516	060073	026060		DMVPT2:	XWD ADARPL+ADADD+ADCR36+ADMAGIC+ET0+ET1,STORE+SACINH+DMVEFD
  7409	036517	045403	045404			XWD [DMVE0A],[XWD ADFMPL,0]
  7410	036520	000000	006000			ARADEN
  7411
  7412	036521	060073	026060			XWD ADARPL+ADADD+ADCR36+ADMAGIC+ET0+ET1,STORE+SACINH+DMVEFD
  7413	036522	045405	045406			XWD [XWD ADADD+ADCR36+ADARPL+ADMAGIC,DMVE0A],[XWD ADFMMI+ADADD+ADCR36,DMVN1A]
  7414	036523	000000	006407			ARADEN+DMVN2A
  7415
  7416						IFNDEF	SIMASB,<
  7417					MUUO2:	XWD ET0,STORE+SACINH
  7418						XWD [MUUO02],0
  7419						XWD 0,ARPCEN+ARFLGS
  7420					
  7421					MUUO3:	ABADEN+PCCHNG+MUO3FD
  7422						XWD 0,0
  7423						XWD ADARPL,MUUO32
  7424					>
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 22
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH SUBROUTINES FROM MAIN TABLE                                           *** SEQ 0198

  7425					SUBTTL	DISPATCH SUBROUTINES FROM MAIN TABLE
  7426
  7427						DEFINE DSYM (A)
  7428					<	A==.-ETAB
  7429						IFG A-777,<PRINTX DISPATCH TABLE OVERFLOW>>
  7430			036523			ETAB=.-1
  7431
  7432			000001		DSYM AOBJX^	AOBJX==.-ETAB
  7433	036524	660 01 0 00 100000 		TRO	T,ABPCEN		;AOBJP
  7434	036525	331 00 0 00 000011 		SKIPL	AD			;AOBJN
  7435	036526	640 01 0 00 100000 		TRC	T,ABPCEN
  7436	036527	263 17 0 00 000000 		POPJ	P,
  7437
  7438			000005		DSYM JRST1^	JRST1==.-ETAB
  7439	036530	254 00 0 00 037504 		JRST	JRST2
  7440			000006		DSYM JFCL1^	JFCL1==.-ETAB
  7441	036531	254 00 0 00 037456 		JRST	JFCL2
  7442
  7443			000007		DSYM FWT^	FWT==.-ETAB
  7444	036532	325 06 0 00 030065 		JUMPGE	AR,CPOPJ
  7445	036533	660 01 0 00 006000 		TRO	T,ARADEN
  7446
  7447			000011		DSYM ADSUB^	ADSUB==.-ETAB
  7448	036534	205 02 0 00 700000 	ADSUB1:	MOVSI	T1,AROV!CRY0!CRY1
  7449	036535	404 02 0 00 040210 		AND	T1,ADFLGS
  7450	036536	603 00 0 00 040000 		TLNE	F,ADADD
  7451	036537	434 13 0 00 000002 		IOR	PC,T1
  7452	036540	607 00 0 00 040000 		TLNN	F,ADADD
  7453	036541	254 00 0 00 036544 		JRST	.+3
  7454	036542	603 02 0 00 400000 		TLNE	T1,AROV
  7455	036543	661 13 0 00 000200 		TLO	PC,TN1
  7456	036544	263 17 0 00 000000 		POPJ	P,
  7457
  7458			000022		DSYM COMP^	COMP==.-ETAB
  7459	036545	260 17 0 00 040402 		PUSHJ	P,CNDPQR
  7460	036546	200 02 0 00 046105 		MOVE	T1,CONDQ
  7461	036547	434 02 0 00 046104 		IOR	T1,CONDP
  7462	036550	332 00 0 00 000002 		SKIPE	T1
  7463	036551	661 01 0 00 000002 		TLO	T,PCCLK
  7464	036552	201 05 0 00 041243 		MOVEI	S,ST1
  7465	036553	263 17 0 00 000000 		POPJ	P,
  7466
  7467			000031		DSYM SKIPS^	SKIPS==.-ETAB
  7468	036554	606 04 0 00 000040 		TRNN	T3,SACINH
  7469	036555	476 00 0 00 046126 		SETOM	FMWRSET
  7470	036556	260 17 0 00 036534 		PUSHJ	P,ADSUB1
  7471	036557	260 17 0 00 040402 		PUSHJ	P,CNDPQR
  7472	036560	200 02 0 00 046106 		MOVE	T1,CONDR
  7473	036561	434 02 0 00 046104 		IOR	T1,CONDP
  7474	036562	332 00 0 00 000002 		SKIPE	T1
  7475	036563	661 01 0 00 000002 		TLO	T,PCCLK
  7476	036564	201 05 0 00 041243 		MOVEI	S,ST1
  7477	036565	263 17 0 00 000000 		POPJ	P,
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 23
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH SUBROUTINES FROM MAIN TABLE                                           *** SEQ 0199

  7478			000043		DSYM XCT2^	XCT2==.-ETAB
  7479	036566	603 13 0 00 010000 		TLNE	PC,USERF
  7480	036567	263 17 0 00 000000 		POPJ	P,
  7481	036570	607 13 0 00 004000 		TLNN	PC,EXIOT
  7482	036571	263 17 0 00 000000 		POPJ	P,
  7483	036572	603 16 0 00 000100 		TLNE	IR,(1B11)
  7484	036573	476 00 0 00 046312 		SETOM	XCTPWR#
  7485	036574	603 16 0 00 000040 		TLNE	IR,(1B12)
  7486	036575	476 00 0 00 046311 		SETOM	XCTPRD#
  7487	036576	263 17 0 00 000000 		POPJ	P,
  7488
  7489			000054		DSYM JUMPS^	JUMPS==.-ETAB
  7490	036577	260 17 0 00 036534 		PUSHJ	P,ADSUB1
  7491	036600	260 17 0 00 040402 		PUSHJ	P,CNDPQR
  7492	036601	200 02 0 00 046104 		MOVE	T1,CONDP
  7493	036602	434 02 0 00 046106 		IOR	T1,CONDR
  7494	036603	336 00 0 00 000002 		SKIPN	T1
  7495	036604	660 01 0 00 100000 		TRO	T,ABPCEN
  7496	036605	476 00 0 00 046126 		SETOM	FMWRSET
  7497	036606	201 05 0 00 041243 		MOVEI	S,ST1
  7498	036607	263 17 0 00 000000 		POPJ	P,
  7499
  7500			000065		DSYM HWTETS^	HWTETS==.-ETAB
  7501	036610	321 06 0 00 036614 		JUMPL	AR,HWTET1	;CHECKS AR0
  7502	036611	263 17 0 00 000000 		POPJ	P,
  7503	036612	606 06 0 00 400000 		TRNN	AR,400000	;CHECKS AR18
  7504	036613	263 17 0 00 000000 		POPJ	P,
  7505	036614	602 01 0 00 022000 	HWTET1:	TRNE	T,ARLTAD+ARLARR
  7506	036615	664 01 0 00 004000 		TROA	T,ARRTAD
  7507	036616	660 01 0 00 002000 		TRO	T,ARLTAD
  7508	036617	263 17 0 00 000000 		POPJ	P,
  7509
  7510			000075		DSYM TEST1^	TEST1==.-ETAB
  7511	036620	476 00 0 00 046161 		SETOM	LONGSET
  7512	036621	263 17 0 00 000000 		POPJ	P,
  7513
  7514			000077		DSYM TEST^	TEST==.-ETAB
  7515	036622	661 01 0 00 000002 		TLO	T,PCCLK
  7516	036623	332 00 0 00 000011 		SKIPE	AD
  7517	036624	641 01 0 00 000002 		TLC	T,PCCLK
  7518	036625	263 17 0 00 000000 		POPJ	P,
  7519
  7520			000103		DSYM PUSH1^	PUSH1==.-ETAB
  7521	036626	476 00 0 00 046150 		SETOM	INSYNC
  7522
  7523			000104		DSYM PUSHES^	PUSHES==.-ETAB
  7524	036627	200 02 0 00 040210 		MOVE	T1,ADFLGS	;PUSH,PUSHJ
  7525	036630	603 02 0 00 200000 		TLNE	T1,CRY0		;CARRY 0
  7526	036631	660 00 0 00 000040 		TRO	F,FLAG2
  7527	036632	263 17 0 00 000000 		POPJ	P,
  7528
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 24
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH SUBROUTINES FROM MAIN TABLE                                           *** SEQ 0200

  7529			000110		DSYM PUSHJ1^	PUSHJ1==.-ETAB
  7530	036633	476 00 0 00 046213 		SETOM	PCP1FF
  7531
  7532			000111		DSYM PUSH2^	PUSH2==.-ETAB
  7533	036634	602 00 0 00 000040 		TRNE	F,FLAG2
  7534	036635	661 13 0 00 000400 		TLO	PC,TN0
  7535	036636	263 17 0 00 000000 		POPJ	P,
  7536
  7537			000114		DSYM POPS^	POPS==.-ETAB
  7538	036637	200 02 0 00 040210 		MOVE	T1,ADFLGS
  7539	036640	607 02 0 00 200000 		TLNN	T1,CRY0		;CARRY 0
  7540	036641	661 13 0 00 000400 		TLO	PC,TN0
  7541	036642	263 17 0 00 000000 		POPJ	P,
  7542
  7543			000120		DSYM UUO1^	UUO1==.-ETAB
  7544	036643	476 00 0 00 046066 		SETOM	ARSMR
  7545	036644	354 00 0 00 046162 		AOSA	MAGIC#
  7546
  7547			000122		DSYM PCINCL^	PCINCL==.-ETAB
  7548	036645	402 00 0 00 046213 		SETZM	PCP1FF
  7549	036646	263 17 0 00 000000 		POPJ	P,
  7550
  7551			000124		DSYM MUL0^	MUL0==.-ETAB
  7552	036647	476 00 0 00 046177 		SETOM	MPY
  7553	036650	660 01 0 00 000410 		TRO	T,MQADEN+ARCLR
  7554	036651	660 03 0 00 020000 		TRO	T2,SCSAEN
  7555	036652	402 00 0 00 046060 		SETZM	ARGOLT
  7556	036653	201 02 0 00 000006 		MOVEI	T1,6
  7557	036654	202 02 0 00 046243 		MOVEM	T1,SINDEX
  7558	036655	260 17 0 00 044014 		PUSHJ	P,MPYFCN
  7559	036656	325 11 0 00 043002 		JUMPGE	AD,SCTC5
  7560	036657	325 06 0 00 043002 		JUMPGE	AR,SCTC5
  7561	036660	660 00 0 00 000100 		TRO	F,FLAG3
  7562	036661	254 00 0 00 043002 		JRST	SCTC5
  7563
  7564
  7565			000137		DSYM IMUL1^	IMUL1==.-ETAB
  7566	036662	476 00 0 00 046161 		SETOM	LONGSET
  7567	036663	331 00 0 00 000011 		SKIPL	AD
  7568	036664	665 01 0 00 000060 		TLOA	T,ADARPL
  7569	036665	661 01 0 00 000100 		TLO	T,ADARMI
  7570			000143		DSYM MUL1^	MUL1==.-ETAB
  7571	036666	660 01 0 00 000200 		TRO	T,ARSHLT
  7572	036667	660 00 0 00 000020 		TRO	F,FLAG1
  7573	036670	200 02 1 00 046147 		MOVE	T1,@INSTPT
  7574	036671	602 02 0 00 000010 		TRNE	T1,SCE
  7575	036672	260 17 0 00 044716 		PUSHJ	P,MEMWSS
  7576	036673	263 17 0 00 000000 		POPJ	P,
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 25
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH SUBROUTINES FROM MAIN TABLE                                           *** SEQ 0201

  7577			000151		DSYM IMUL2^	IMUL2==.-ETAB
  7578	036674	476 00 0 00 046064 		SETOM	ARMQEN
  7579	036675	326 11 0 00 036701 		JUMPN	AD,MUL1A
  7580
  7581			000153		DSYM MUL2^	MUL2==.-ETAB
  7582	036676	603 06 0 00 400000 		TLNE	AR,(1B0)
  7583	036677	606 00 0 00 000100 		TRNN	F,FLAG3
  7584	036700	263 17 0 00 000000 		POPJ	P,
  7585	036701	661 13 0 00 400200 	MUL1A:	TLO	PC,AROV+TN1
  7586	036702	263 17 0 00 000000 		POPJ	P,
  7587
  7588
  7589			000160		DSYM JFFO0^	JFFO0==.-ETAB
  7590	036703	332 00 0 00 000011 		SKIPE	AD
  7591	036704	660 00 0 00 000020 		TRO	F,FLAG1
  7592	036705	607 11 0 00 777777 		TLNN	AD,-1
  7593	036706	660 00 0 00 000040 		TRO	F,FLAG2
  7594	036707	254 00 0 00 042722 		JRST	FMAC2E
  7595
  7596			000165		DSYM JFFO1^	JFFO1==.-ETAB
  7597	036710	606 00 0 00 000020 		TRNN	F,FLAG1
  7598	036711	263 17 0 00 000000 		POPJ	P,
  7599	036712	476 00 0 00 046213 		SETOM	PCP1FF
  7600	036713	661 01 0 00 000002 		TLO	T,PCCLK
  7601	036714	606 00 0 00 000040 		TRNN	F,FLAG2
  7602	036715	263 17 0 00 000000 		POPJ	P,
  7603	036716	660 01 0 00 020000 		TRO	T,ARLARR
  7604	036717	660 07 0 00 000022 		TRO	MQ,22
  7605	036720	263 17 0 00 000000 		POPJ	P,
  7606
  7607			000176		DSYM JFFO2^	JFFO2==.-ETAB
  7608	036721	402 00 0 00 046243 		SETZM	SINDEX
  7609	036722	476 00 0 00 046064 		SETOM	ARMQEN
  7610	036723	660 01 0 00 000010 		TRO	T,MQADEN
  7611	036724	260 17 0 00 043517 	JFFO2A:	PUSHJ	P,MQMIXR
  7612	036725	602 00 0 00 000020 		TRNE	F,FLAG1
  7613	036726	335 00 0 00 046201 		SKIPGE	MQMIX
  7614	036727	254 00 0 00 036733 		JRST	JFFO2B
  7615	036730	661 01 0 00 060070 		TLO	T,ADARPL+ADMAGIC+ADADD+ADCR36
  7616	036731	201 05 0 00 042673 		MOVEI	S,JFFOT1
  7617	036732	263 17 0 00 000000 		POPJ	P,
  7618
  7619	036733	476 00 0 00 046126 	JFFO2B:	SETOM	FMWRSET
  7620	036734	201 05 0 00 041243 		MOVEI	S,ST1
  7621	036735	263 17 0 00 000000 		POPJ	P,
  7622
  7623			000213		DSYM DIV0^	DIV0==.-ETAB
  7624	036736	260 17 0 00 042722 		PUSHJ	P,FMAC2E
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 26
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH SUBROUTINES FROM MAIN TABLE                                           *** SEQ 0202

  7625			000214		DSYM IDIV0^	IDIV0==.-ETAB
  7626	036737	660 03 0 00 020000 		TRO	T2,SCSAEN
  7627	036740	335 00 1 00 046124 		SKIPGE	@FMREG
  7628	036741	665 01 0 00 060070 		TLOA	T,ADCR36+ADADD+ADMAGIC+ADARPL
  7629	036742	665 01 0 00 000100 		TLOA	T,ADARMI
  7630	036743	660 00 0 00 000100 		TRO	F,FLAG3
  7631	036744	263 17 0 00 000000 		POPJ	P,
  7632
  7633			000222		DSYM IDIV1^	IDIV1==.-ETAB
  7634	036745	660 01 0 00 000400 		TRO	T,ARCLR
  7635	036746	661 01 0 00 000010 		TLO	T,ADMAGIC
  7636	036747	350 00 0 00 046162 		AOS	MAGIC
  7637	036750	476 00 0 00 046161 		SETOM	LONGSET
  7638	036751	660 01 0 00 000010 	IDIV1A:	TRO	T,MQADEN
  7639	036752	201 02 0 00 000012 		MOVEI	T1,12
  7640	036753	202 02 0 00 046243 		MOVEM	T1,SINDEX
  7641	036754	263 17 0 00 000000 		POPJ	P,
  7642
  7643			000232		DSYM DIV2^	DIV2==.-ETAB
  7644	036755	660 01 0 00 000010 		TRO	T,MQADEN
  7645	036756	606 00 0 00 000100 		TRNN	F,FLAG3
  7646	036757	254 00 0 00 036762 		JRST	.+3
  7647	036760	200 02 0 00 040210 		MOVE	T1,ADFLGS
  7648	036761	603 02 0 00 100000 		TLNE	T1,CRY1
  7649	036762	476 00 0 00 046064 		SETOM	ARMQEN
  7650	036763	254 00 0 00 036766 		JRST	.+3
  7651
  7652
  7653			000241		DSYM IDIV2^	IDIV2==.-ETAB
  7654	036764	335 00 0 00 000007 		SKIPGE	MQ
  7655	036765	660 01 0 00 006000 		TRO	T,ARADEN
  7656	036766	200 02 0 00 045407 		MOVE	T1,[POINT 4,IR,12]
  7657	036767	202 02 0 00 046123 		MOVEM	T1,FMADREN
  7658	036770	660 00 0 00 000004 		TRO	F,DSF2SET
  7659	036771	201 05 0 00 041447 		MOVEI	S,DST1
  7660	036772	331 00 0 00 000010 		SKIPL	BR
  7661	036773	665 01 0 00 021000 		TLOA	T,ADBRMI+ADCR36
  7662	036774	661 01 0 00 000600 		TLO	T,ADBRPL
  7663	036775	263 17 0 00 000000 		POPJ	P,
  7664
  7665			000253		DSYM DIV1^	DIV1==.-ETAB
  7666	036776	606 00 0 00 000100 		TRNN	F,FLAG3
  7667	036777	254 00 0 00 037003 		JRST	DIV1A
  7668	037000	661 01 0 00 070000 		TLO	T,ADCR36+ADADD+ADFMMI
  7669	037001	661 03 0 00 000400 		TLO	T2,ADMSKG
  7670	037002	254 00 0 00 036750 		JRST	IDIV1A-1
  7671	037003	661 01 0 00 006000 	DIV1A:	TLO	T,ADFMPL
  7672	037004	254 00 0 00 036751 		JRST	IDIV1A
  7673
  7674			000262		DSYM DSHFT0^	DSHFT0==.-ETAB
  7675	037005	260 17 0 00 042722 		PUSHJ	P,FMAC2E
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 27
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH SUBROUTINES FROM MAIN TABLE                                           *** SEQ 0203

  7676			000263		DSYM SSHFT0^	SSHFT0==.-ETAB
  7677	037006	201 03 0 00 040104 		MOVEI	T2,SAADD+SAP220+SCAREN
  7678	037007	476 00 0 00 046161 		SETOM	LONGSET
  7679	037010	602 06 0 00 400000 		TRNE	AR,1B18
  7680	037011	664 03 0 00 000020 		TROA	T2,SASCPL
  7681	037012	660 03 0 00 000240 		TRO	T2,SASCMI+SAPL1
  7682	037013	263 17 0 00 000000 		POPJ	P,
  7683
  7684			000271		DSYM SHFT1^	SHFT1==.-ETAB
  7685	037014	201 03 0 00 000105 		MOVEI	T2,SAADD+SAP110
  7686	037015	476 00 0 00 046161 		SETOM	LONGSET
  7687	037016	402 00 0 00 046241 		SETZM	SHLONG#
  7688	037017	331 00 0 00 046226 		SKIPL	SA
  7689	037020	254 00 0 00 037023 		JRST	SHFT1A
  7690	037021	660 03 0 00 020000 		TRO	T2,SCSAEN
  7691	037022	374 00 0 00 046241 		SOSA	SHLONG
  7692	037023	335 00 0 00 000015 	SHFT1A:	SKIPGE	SC
  7693	037024	664 03 0 00 000020 		TROA	T2,SASCPL
  7694	037025	660 03 0 00 000240 		TRO	T2,SASCMI+SAPL1
  7695	037026	263 17 0 00 000000 		POPJ	P,
  7696
  7697			000304		DSYM DSHFT2^	DSHFT2==.-ETAB
  7698	037027	660 01 0 00 000010 		TRO	T,MQADEN
  7699	037030	260 17 0 00 041140 		PUSHJ	P,FMACEN
  7700
  7701			000306		DSYM SSHFT2^	SSHFT2==.-ETAB
  7702	037031	204 04 0 00 000016 		MOVS	T3,IR
  7703	037032	405 04 0 00 773000 		ANDI	T3,773000
  7704	037033	201 05 0 00 042675 		MOVEI	S,SRT1
  7705	037034	476 00 0 00 046161 		SETOM	LONGSET
  7706	037035	331 00 0 00 046226 		SKIPL	SA
  7707	037036	254 00 0 00 037043 		JRST	SHFT2A
  7708	037037	306 04 0 00 241000 		CAIN	T3,241000
  7709	037040	664 03 0 00 020020 		TROA	T2,SASCPL+SCSAEN
  7710	037041	660 03 0 00 020006 	SHFT2E:	TRO	T2,SAM110+SCSAEN
  7711	037042	263 17 0 00 000000 		POPJ	P,
  7712
  7713	037043	321 15 0 00 037046 	SHFT2A:	JUMPL	SC,SHFT2B
  7714	037044	660 03 0 00 000343 		TRO	T2,SASCMI+SAPL1+SAADD+SAZERO
  7715	037045	254 00 0 00 037051 		JRST	SHFT2C
  7716
  7717	037046	302 04 0 00 241000 	SHFT2B:	CAIE	T3,241000
  7718	037047	336 00 0 00 046241 		SKIPN	SHLONG
  7719	037050	660 03 0 00 000020 		TRO	T2,SASCPL
  7720	037051	332 00 0 00 046241 	SHFT2C:	SKIPE	SHLONG
  7721	037052	306 04 0 00 241000 		CAIN	T3,241000
  7722	037053	263 17 0 00 000000 		POPJ	P,
  7723	037054	254 00 0 00 037041 		JRST	SHFT2E
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 28
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH SUBROUTINES FROM MAIN TABLE                                           *** SEQ 0204

  7724			000332		DSYM BYTE0^	BYTE0==.-ETAB
  7725	037055	670 03 0 00 045410 		TDO	T2,[XWD ADMSKG,SAMSIZ+SAPL1+SAADD]
  7726	037056	335 00 0 00 046226 		SKIPGE	SA
  7727	037057	664 01 0 00 006000 		TROA	T,ARADEN
  7728	037060	664 03 0 00 001000 		TROA	T2,SAARPOS
  7729	037061	660 03 0 00 000002 		TRO	T2,SAPL44
  7730	037062	263 17 0 00 000000 		POPJ	P,
  7731
  7732			000340		DSYM BYTE2^	BYTE2==.-ETAB
  7733	037063	661 03 0 00 000002 		TLO	T2,MBAREN
  7734	037064	476 00 0 00 046144 		SETOM	INRDY
  7735	037065	660 01 0 00 000010 		TRO	T,MQADEN		;ENTER HERE FOR IBP
  7736	037066	476 00 0 00 046065 		SETOM	ARPOSEN#
  7737	037067	254 00 0 00 037245 		JRST	FIX1A
  7738
  7739			000345		DSYM LDB0^	LDB0==.-ETAB
  7740	037070	660 03 0 00 020000 		TRO	T2,SCSAEN
  7741	037071	322 15 0 00 030065 		JUMPE	SC,CPOPJ
  7742	037072	402 00 0 00 046243 		SETZM	SINDEX
  7743	037073	254 00 0 00 042355 		JRST	DFAT1G
  7744
  7745			000351		DSYM DPB0^	DPB0==.-ETAB
  7746	037074	660 01 0 00 000010 		TRO	T,MQADEN
  7747	037075	476 00 0 00 046064 		SETOM	ARMQEN
  7748	037076	660 03 0 00 020000 		TRO	T2,SCSAEN
  7749	037077	322 15 0 00 037103 		JUMPE	SC,DPB0A
  7750	037100	476 00 0 00 046060 		SETOM	ARGOLT
  7751	037101	402 00 0 00 046243 		SETZM	SINDEX
  7752	037102	254 00 0 00 043002 		JRST	SCTC5
  7753	037103	661 01 0 00 000700 	DPB0A:	TLO	T,ADARMI+ADBRPL
  7754	037104	263 17 0 00 000000 		POPJ	P,
  7755
  7756			000362		DSYM DPB1^	DPB1==.-ETAB
  7757	037105	660 01 0 00 000010 		TRO	T,MQADEN
  7758	037106	260 17 0 00 044716 		PUSHJ	P,MEMWSS
  7759
  7760			000364		DSYM LDB1^	LDB1==.-ETAB
  7761	037107	476 00 0 00 046064 		SETOM	ARMQEN
  7762	037110	263 17 0 00 000000 		POPJ	P,
  7763
  7764			000366		DSYM DPB2^	DPB2==.-ETAB
  7765	037111	476 00 0 00 046064 		SETOM	ARMQEN
  7766
  7767			000367		DSYM LDB2^	LDB2==.-ETAB
  7768	037112	402 00 0 00 046077 		SETZM	BYF6#
  7769	037113	621 13 0 00 020000 		TLZ	PC,BIS
  7770	037114	263 17 0 00 000000 		POPJ	P,
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 29
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH SUBROUTINES FROM MAIN TABLE                                           *** SEQ 0205

  7771			000372		DSYM DMOV2^	DMOV2==.-ETAB
  7772	037115	661 03 0 00 006000 		TLO	T2,ADMBEN
  7773	037116	201 05 0 00 042730 		MOVEI	S,DMOVT1
  7774	037117	603 16 0 00 001000 		TLNE	IR,1000
  7775	037120	201 05 0 00 042732 		MOVEI	S,DMVNT1
  7776	037121	254 00 0 00 037341 		JRST	DFA2D
  7777
  7778			000377		DSYM DMVNM1^	DMVNM1==.-ETAB
  7779	037122	476 00 0 00 046161 		SETOM	LONGSET
  7780
  7781			000400		DSYM DMVN1A^	DMVN1A==.-ETAB
  7782	037123	660 01 0 00 000010 		TRO	T,MQADEN
  7783	037124	661 03 0 00 000400 		TLO	T2,ADMSKG
  7784	037125	263 17 0 00 000000 		POPJ	P,
  7785
  7786			000403		DSYM DMVNM2^	DMVNM2==.-ETAB
  7787	037126	200 02 0 00 040210 		MOVE	T1,ADFLGS
  7788	037127	603 02 0 00 100000 		TLNE	T1,(1B2)
  7789	037130	476 00 0 00 046064 		SETOM	ARMQEN
  7790	037131	263 17 0 00 000000 		POPJ	P,
  7791
  7792			000407		DSYM DMVN2A^	DMVN2A==.-ETAB
  7793	037132	621 11 0 00 400000 		TLZ	AD,(1B0)
  7794	037133	263 17 0 00 000000 		POPJ	P,
  7795
  7796			000411		DSYM DMVE0A^	DMVE0A==.-ETAB
  7797	037134	476 00 0 00 046150 		SETOM	INSYNC
  7798
  7799			000412		DSYM DMVNM0^	DMVNM0==.-ETAB
  7800	037135	254 00 0 00 042722 		JRST	FMAC2E
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 30
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH SUBROUTINES FROM MAIN TABLE                                           *** SEQ 0206

  7801						IFNDEF	SIMASB,<
  7802					DSYM TTYFD
  7803						LDB	T3,[POINT 3,IR,12]
  7804						JRST	@TTAB1(T3)
  7805					
  7806					DSYM TDISP
  7807						LDB	T3,[POINT 3,IR,12]
  7808						JRST	@TTAB2(T3)
  7809					
  7810					DSYM APRFD
  7811						LDB	T3,[POINT 3,IR,12]
  7812						JRST	@APRTB1(T3)
  7813					
  7814					DSYM PIFD
  7815						LDB	T3,[POINT 3,IR,12]
  7816						JRST	@PITAB1(T3)
  7817					
  7818					DSYM PAGFD
  7819						LDB	T3,[POINT 3,IR,12]
  7820						JRST	@PAGTB1(T3)
  7821					>
  7822			000413		DSYM BLT0^	BLT0==.-ETAB
  7823	037136	335 00 0 00 046042 		SKIPGE	AD17.5#
  7824	037137	660 00 0 00 000100 		TRO	F,FLAG3
  7825	037140	476 00 0 00 046072 		SETOM	BLTF1#
  7826	037141	263 17 0 00 000000 		POPJ	P,
  7827
  7828			000417		DSYM BLT1^	BLT1==.-ETAB
  7829	037142	660 01 0 00 020000 		TRO	T,ARLARR
  7830	037143	602 00 0 00 000100 		TRNE	F,FLAG3
  7831	037144	640 01 0 00 022000 		TRC	T,ARLARR+ARLTAD
  7832	037145	263 17 0 00 000000 		POPJ	P,
  7833
  7834			000423		DSYM BLT2^	BLT2==.-ETAB
  7835	037146	402 00 0 00 046213 		SETZM	PCP1FF
  7836	037147	332 00 0 00 046072 		SKIPE	BLTF1
  7837	037150	201 05 0 00 043170 		MOVEI	S,BLTT0
  7838	037151	263 17 0 00 000000 		POPJ	P,
  7839
  7840			000427		DSYM FLT2^	FLT2==.-ETAB
  7841	037152	201 05 0 00 043005 		MOVEI	S,SCT2
  7842	037153	402 00 0 00 046060 		SETZM	ARGOLT
  7843	037154	254 00 0 00 037243 		JRST	FIX1B
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 31
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH SUBROUTINES FROM MAIN TABLE                                           *** SEQ 0207

  7844			000432		DSYM FSC0^	FSC0==.-ETAB
  7845	037155	660 03 0 00 042120 		TRO	T2,SAADD+SAAREX+SASCPL+SCAREN
  7846	037156	335 00 1 00 046124 		SKIPGE	@FMREG
  7847	037157	640 03 0 00 000260 		TRC	T2,SASCPL+SASCMI+SAPL1
  7848	037160	263 17 0 00 000000 		POPJ	P,
  7849
  7850			000436		DSYM FSC2^	FSC2==.-ETAB
  7851	037161	660 03 0 00 000323 		TRO	T2,SAADD+SAPL1+SAZERO+SASCPL
  7852	037162	331 00 1 00 046124 		SKIPL	@FMREG
  7853	037163	640 03 0 00 000060 		TRC	T2,SASCPL+SASCMI
  7854	037164	201 05 0 00 041666 		MOVEI	S,NRT1
  7855	037165	476 00 0 00 046066 		SETOM	ARSMR
  7856	037166	254 00 0 00 037243 		JRST	FIX1B
  7857
  7858			000444		DSYM DFN0^	DFN0==.-ETAB
  7859	037167	616 11 0 00 045411 		TDNN	AD,[777777777]
  7860	037170	665 01 0 00 060000 		TLOA	T,ADCR36+ADADD
  7861	037171	374 00 0 00 046057 		SOSA	ARESAEN			;AR0 _ AR0(0)
  7862	037172	664 00 0 00 000100 		TROA	F,FLAG3
  7863	037173	263 17 0 00 000000 		POPJ	P,
  7864	037174	661 03 0 00 000400 		TLO	T2,ADMSKG
  7865	037175	263 17 0 00 000000 		POPJ	P,
  7866
  7867			000453		DSYM DFN1^	DFN1==.-ETAB
  7868	037176	606 00 0 00 000100 		TRNN	F,FLAG3
  7869	037177	665 03 0 00 000400 		TLOA	T2,ADMSKG
  7870	037200	665 01 0 00 000600 		TLOA	T,ADBRPL
  7871	037201	661 01 0 00 061000 		TLO	T,ADBRMI+ADCR36+ADADD
  7872	037202	263 17 0 00 000000 		POPJ	P,
  7873
  7874	037203	260 17 0 00 042722 		PUSHJ	P,FMAC2E
  7875
  7876			000461		DSYM FDV1^	FDV1==.-ETAB
  7877	037204	660 03 0 00 002140 		TRO	T2,SAAREX+SAADD+SASCMI
  7878	037205	335 02 1 00 046124 		SKIPGE	T1,@FMREG
  7879	037206	665 01 0 00 060110 		TLOA	T,ADADD+ADCR36+ADARMI+ADMAGIC
  7880	037207	664 03 0 00 000200 		TROA	T2,SAPL1
  7881	037210	660 00 0 00 000100 		TRO	F,FLAG3
  7882	037211	602 00 0 00 000100 		TRNE	F,FLAG3
  7883	037212	476 00 0 00 046161 		SETOM	LONGSET
  7884	037213	201 04 0 00 000010 	FDV1B:	MOVEI	T3,10
  7885	037214	202 04 0 00 046243 		MOVEM	T3,SINDEX
  7886	037215	430 02 0 00 000006 	FDV1A:	XOR	T1,AR
  7887	037216	325 02 0 00 037245 		JUMPGE	T1,FIX1A
  7888	037217	640 03 0 00 000060 		TRC	T2,SASCMI+SASCPL
  7889	037220	254 00 0 00 037245 		JRST	FIX1A
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 32
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH SUBROUTINES FROM MAIN TABLE                                           *** SEQ 0208

  7890			000476		DSYM FDV2L^	FDV2L==.-ETAB
  7891	037221	602 00 0 00 000100 		TRNE	F,FLAG3
  7892	037222	665 01 0 00 070000 		TLOA	T,ADFMMI+ADADD+ADCR36
  7893	037223	665 01 0 00 006000 		TLOA	T,ADFMPL
  7894	037224	661 03 0 00 000400 		TLO	T2,ADMSKG
  7895	037225	476 00 0 00 046161 		SETOM	LONGSET
  7896
  7897			000503		DSYM FDV2^	FDV2==.-ETAB
  7898	037226	660 03 0 00 000040 		TRO	T2,SASCMI
  7899	037227	201 05 0 00 041552 		MOVEI	S,FDT0
  7900	037230	606 00 0 00 000100 		TRNN	F,FLAG3
  7901	037231	644 03 0 00 000060 		TRCA	T2,SASCPL+SASCMI
  7902						JRST	[TDNE AD,[777,,-1]
  7903							TRO T,ARADEN
  7904	037232	254 00 0 00 045412 			JRST FDV2X]
  7905	037233	476 00 0 00 046075 	FDV2X:	SETOM	BRSMR
  7906	037234	254 00 0 00 037245 		JRST	FIX1A
  7907
  7908			000512		DSYM FIX0^	FIX0==.-ETAB
  7909	037235	660 03 0 00 000131 		TRO	T2,SAADD+SAMI33+SASCPL
  7910	037236	325 06 0 00 037245 		JUMPGE	AR,FIX1A
  7911	037237	640 03 0 00 000060 		TRC	T2,SASCPL+SASCMI
  7912	037240	254 00 0 00 037245 		JRST	FIX1A
  7913
  7914			000516		DSYM FIX1^	FIX1==.-ETAB
  7915	037241	476 00 0 00 046161 		SETOM	LONGSET
  7916	037242	660 03 0 00 400354 		TRO	T2,SASCMI+SAPL1+SAADD+FESAEN+SAPL10
  7917	037243	201 04 0 00 000010 	FIX1B:	MOVEI	T3,10
  7918	037244	202 04 0 00 046243 		MOVEM	T3,SINDEX
  7919	037245	660 03 0 00 020000 	FIX1A:	TRO	T2,SCSAEN
  7920	037246	263 17 0 00 000000 		POPJ	P,
  7921
  7922			000524		DSYM FIX2^	FIX2==.-ETAB
  7923	037247	321 15 0 00 042316 		JUMPL	SC,FIX2A
  7924	037250	331 00 0 00 046226 		SKIPL	SA
  7925	037251	254 00 0 00 042276 		JRST	FIX2B
  7926	037252	661 13 0 00 400200 		TLO	PC,AROV+TN1
  7927	037253	201 05 0 00 043127 		MOVEI	S,INDONE
  7928	037254	263 17 0 00 000000 		POPJ	P,
  7929
  7930	037255	603 16 0 00 001000 	DFAF:	TLNE	IR,1000		;IS IT DFSB ?
  7931	037256	661 03 0 00 340000 		TLO	T2,ADXFMP+ADXFMM+ADXEQV	;YES,  *** ECO 42 ***
  7932	037257	260 17 0 00 037562 		PUSHJ	P,DFLTF
  7933
  7934	037260				FADF:
  7935	037260	476 00 0 00 046251 	FMPF:	SETOM	STINH
  7936
  7937			000536		DSYM FMP0^	FMP0==.-ETAB
  7938	037261	660 03 0 00 002000 	FMP0A:	TRO	T2,SAAREX
  7939	037262	263 17 0 00 000000 		POPJ	P,
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 33
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH SUBROUTINES FROM MAIN TABLE                                           *** SEQ 0209

  7940			000540		DSYM FMP1^	FMP1==.-ETAB
  7941	037263	660 03 0 00 002120 		TRO	T2,SAADD+SASCPL+SAAREX
  7942	037264	335 02 1 00 046124 		SKIPGE	T1,@FMREG
  7943	037265	660 03 0 00 000200 		TRO	T2,SAPL1
  7944	037266	476 00 0 00 046177 		SETOM	MPY
  7945	037267	254 00 0 00 037213 		JRST	FDV1B
  7946
  7947			000545		DSYM FMP2^	FMP2==.-ETAB
  7948	037270	476 00 0 00 046075 		SETOM	BRSMR
  7949	037271	476 00 0 00 046066 		SETOM	ARSMR
  7950	037272	476 00 0 00 046161 		SETOM	LONGSET
  7951	037273	660 03 0 00 400010 		TRO	T2,SAMI16+FESAEN
  7952	037274	201 05 0 00 041653 		MOVEI	S,FMT1
  7953	037275	263 17 0 00 000000 		POPJ	P,
  7954
  7955			000553		DSYM UFA2^	UFA2==.-ETAB
  7956	037276	260 17 0 00 042722 		PUSHJ	P,FMAC2E
  7957
  7958			000554		DSYM FAD2^	FAD2==.-ETAB
  7959	037277	476 00 0 00 046075 		SETOM	BRSMR
  7960	037300	660 03 0 00 002340 		TRO	T2,SAAREX+SAADD+SAPL1+SASCMI
  7961	037301	201 05 0 00 042613 		MOVEI	S,FAT1
  7962	037302	476 00 0 00 046161 	FAD2A:	SETOM	LONGSET
  7963	037303	660 03 0 00 400000 		TRO	T2,FESAEN
  7964	037304	200 02 1 00 046124 		MOVE	T1,@FMREG
  7965	037305	254 00 0 00 037213 		JRST	FDV1B
  7966
  7967			000563		DSYM DFA0^	DFA0==.-ETAB
  7968	037306	670 03 0 00 045415 		TDO	T2,[XWD ADXEQV+ADXBRM+ARXADX,SAADD+SAPL1+SAAREX+SASCMI]  ;ECO 42
  7969	037307	260 17 0 00 042722 		PUSHJ	P,FMAC2E
  7970	037310	254 00 0 00 037302 		JRST	FAD2A
  7971
  7972			000566		DSYM DFA1^	DFA1==.-ETAB
  7973	037311	260 17 0 00 041140 		PUSHJ	P,FMACEN
  7974	037312	661 03 0 00 000100 		TLO	T2,ARXADX
  7975	037313	331 02 0 00 046226 		SKIPL	T1,SA
  7976	037314	660 03 0 00 000343 		TRO	T2,SASCMI+SAPL1+SAADD+SAZERO
  7977	037315	430 02 0 00 000006 		XOR	T1,AR
  7978	037316	325 02 0 00 037245 		JUMPGE	T1,FIX1A
  7979	037317	660 00 0 00 000040 		TRO	F,FLAG2
  7980	037320	254 00 0 00 037245 		JRST	FIX1A
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 34
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH SUBROUTINES FROM MAIN TABLE                                           *** SEQ 0210

  7981			000576		DSYM DFA2^	DFA2==.-ETAB
  7982	037321	661 03 0 00 006000 		TLO	T2,ADMBEN
  7983	037322	331 00 0 00 000015 		SKIPL	SC
  7984	037323	660 03 0 00 020000 		TRO	T2,SCSAEN
  7985	037324	660 03 0 00 002000 		TRO	T2,SAAREX
  7986	037325	602 00 0 00 000040 		TRNE	F,FLAG2
  7987	037326	644 03 0 00 012000 		TRCA	T2,SAAREX+SAFEEN
  7988						JRST	[JUMPL	BR,DFA2A
  7989							 TRO	T2,SAEQV+SASCPL+SASCMI
  7990	037327	254 00 0 00 045416 			 JRST	DFA2A]
  7991	037330	331 00 0 00 046067 		SKIPL	ARX
  7992						JRST	[TLNE	IR,1000
  7993							JRST	DFA2A
  7994	037331	254 00 0 00 045421 			JRST	.+2]	;ECO 42
  7995	037332	603 16 0 00 001000 		TLNE	IR,1000
  7996	037333	660 03 0 00 004003 		TRO	T2,SAEQV+SAZERO
  7997	037334	331 00 0 00 046226 	DFA2A:	SKIPL	SA
  7998	037335	620 00 0 00 000040 		TRZ	F,FLAG2
  7999					;DFA2C:	TLNE	IR,1000		;ECO 42
  8000					;	TLO	T2,ADXFMP+ADXFMM+ADXEQV
  8001	037336	201 05 0 00 042333 		MOVEI	S,DFAT1
  8002	037337	201 02 0 00 000007 	DFA2B:	MOVEI	T1,7
  8003	037340	202 02 0 00 046243 		MOVEM	T1,SINDEX
  8004	037341	476 00 0 00 046117 	DFA2D:	SETOM	FCE2W#
  8005	037342	263 17 0 00 000000 		POPJ	P,
  8006
  8007			000620		DSYM DFM0^	DFM0==.-ETAB
  8008	037343	670 03 0 00 045424 		TDO	T2,[ARXADX,,SAAREX+SAADD+SASCPL]	;ECO 42
  8009	037344	660 01 0 00 000010 		TRO	T,MQADEN
  8010	037345	476 00 0 00 046075 		SETOM	BRSMR
  8011	037346	476 00 0 00 046177 		SETOM	MPY
  8012	037347	254 00 0 00 037360 		JRST	DFD0A
  8013
  8014			000625		DSYM DFM1^	DFM1==.-ETAB
  8015	037350	260 17 0 00 041140 		PUSHJ	P,FMACEN
  8016	037351	660 03 0 00 000020 		TRO	T2,SASCPL
  8017	037352	321 07 0 00 037245 		JUMPL	MQ,FIX1A
  8018	037353	254 00 0 00 037217 		JRST	FDV1A+2
  8019
  8020			000631		DSYM DFM2^	DFM2==.-ETAB
  8021	037354	670 03 0 00 045425 		TDO	T2,[XWD ADMBEN,SAMI43+FESAEN]
  8022	037355	201 05 0 00 042441 		MOVEI	S,DFMT1
  8023	037356	254 00 0 00 037337 		JRST	DFA2B
  8024
  8025			000634		DSYM DFD0^	DFD0==.-ETAB
  8026						TDO	T2,[XWD ADXEQV+ADXFMP+ADXFMM+ARXADX,^_
  8027	037357	670 03 0 00 045426 	SAAREX+SAADD+SASCMI]
  8028	037360	476 00 0 00 046161 	DFD0A:	SETOM	LONGSET
  8029	037361	260 17 0 00 042722 		PUSHJ	P,FMAC2E
  8030	037362	331 02 1 00 046124 		SKIPL	T1,@FMREG
  8031	037363	660 03 0 00 000200 		TRO	T2,SAPL1
  8032	037364	254 00 0 00 037215 		JRST	FDV1A
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 35
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH SUBROUTINES FROM MAIN TABLE                                           *** SEQ 0211

  8033			000642		DSYM DFD1^	DFD1==.-ETAB
  8034	037365	660 01 0 00 000010 		TRO	T,MQADEN
  8035	037366	660 03 0 00 000020 		TRO	T2,SASCPL
  8036	037367	331 00 0 00 046067 		SKIPL	ARX
  8037	037370	665 01 0 00 000060 		TLOA	T,ADARPL
  8038	037371	644 03 0 00 000060 		TRCA	T2,SASCPL+SASCMI
  8039	037372	254 00 0 00 037245 		JRST	FIX1A
  8040	037373	661 01 0 00 060110 		TLO	T,ADADD+ADCR36+ADARMI+ADMAGIC
  8041	037374	661 03 0 00 540100 		TLO	T2,ADXADD+ADXFMP+ADXFMM+ARXADX
  8042	037375	660 00 0 00 000100 		TRO	F,FLAG3
  8043	037376	254 00 0 00 037245 		JRST	FIX1A
  8044
  8045			000654		DSYM DFD2^	DFD2==.-ETAB
  8046	037377	670 03 0 00 045427 		TDO	T2,[XWD ARXADX+ADMBEN,FESAEN]
  8047	037400	660 01 0 00 000010 		TRO	T,MQADEN
  8048	037401	476 00 0 00 046064 		SETOM	ARMQEN
  8049	037402	201 05 0 00 042465 		MOVEI	S,DFDT0
  8050	037403	201 02 0 00 000011 		MOVEI	T1,11
  8051	037404	254 00 0 00 037340 		JRST	DFA2B+1
  8052
  8053						IFNDEF	SIMASB,<
  8054					DSYM MONUUO
  8055						TRO	F,MUOF2S
  8056						SETOM	MCSPEC#
  8057						MOVEI	T1,424
  8058						TLNE	PC,USERF
  8059						MOVEI	T1,USR424
  8060						MOVEM	T1,MCSADR#
  8061						POPJ	P,
  8062					
  8063					DSYM MUUO02
  8064						SETOM	MCSPEC
  8065						MOVEI	T1,425
  8066						TLNE	PC,USERF
  8067						MOVEI	T1,USR425
  8068						MOVEM	T1,MCSADR
  8069						POPJ	P,
  8070					
  8071					DSYM MUUO32
  8072						HLL	PC,AR
  8073						TRO	F,MUOF1C
  8074						MOVEI	S,ST1
  8075						POPJ	P,
  8076					
  8077					DSYM MUOXC2
  8078						JRST	MUOXC3
  8079					>
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 36
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH SUBROUTINES FROM MAIN TABLE                                           *** SEQ 0212

  8080						IFDEF	SIMASB,<
  8081			000662		DSYM	MONUUO^	MONUUO==.-ETAB
  8082	037405	264 00 0 00 043162 		JSR	ERR
  8083
  8084			000663		DSYM	MUUO32^	MUUO32==.-ETAB
  8085	037406	264 00 0 00 043162 		JSR	ERR
  8086					>
  8087
  8088			000664		DSYM MAP2^	MAP2==.-ETAB
  8089	037407	550 06 0 00 000014 		HRRZ	AR,MA
  8090	037410	263 17 0 00 000000 		POPJ	P,
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 37
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH SUBROUTINES FROM MAIN TABLE - FETCH ACTIONS                           *** SEQ 0213

  8091					SUBTTL	DISPATCH SUBROUTINES FROM MAIN TABLE - FETCH ACTIONS
  8092
  8093						DEFINE ASYM(A)
  8094					<	A==<.-AUXTAB>B26
  8095						IFG .-AUXTAB-37,<PRINTX AUXTAB OVERFLOW>>
  8096
  8097	037411	255 00 0 00 000000 	AUXTAB:	JFCL
  8098
  8099			001000		ASYM MULFD^	MULFD==<.-AUXTAB>B26
  8100	037412	660 03 0 00 000001 		TRO	T2,SAMI22
  8101
  8102			002000		ASYM DIVFD^	DIVFD==<.-AUXTAB>B26
  8103	037413	260 17 0 00 037534 		PUSHJ	P,DIVF
  8104
  8105			003000		ASYM MUO3FD^	MUO3FD==<.-AUXTAB>B26
  8106
  8107			003000		ASYM TCONSX^	TCONSX==<.-AUXTAB>B26
  8108
  8109			003000		ASYM SKPFD^	SKPFD==<.-AUXTAB>B26
  8110
  8111			003000		ASYM FSBFD^	FSBFD==<.-AUXTAB>B26
  8112
  8113			003000		ASYM JFFOFD^	JFFOFD==<.-AUXTAB>B26
  8114
  8115			003000		ASYM SRINST^	SRINST==<.-AUXTAB>B26
  8116	037414	476 00 0 00 046251 		SETOM	STINH
  8117
  8118			004000		ASYM BPNI2D^	BPNI2D==<.-AUXTAB>B26
  8119	037415	260 17 0 00 037541 		PUSHJ	P,BPNIF2
  8120
  8121			005000		ASYM BPNIFD^	BPNIFD==<.-AUXTAB>B26
  8122	037416	260 17 0 00 037540 		PUSHJ	P,BPNIF
  8123
  8124			006000		ASYM BPIFD^	BPIFD==<.-AUXTAB>B26
  8125	037417	660 03 0 00 001700 		TRO	T2,SAARPOS+SAPL1+SAMSIZ+SAADD
  8126
  8127			007000		ASYM LDBFD^	LDBFD==<.-AUXTAB>B26
  8128
  8129			007000		ASYM DPBFD^	DPBFD==<.-AUXTAB>B26
  8130	037420	260 17 0 00 037554 		PUSHJ	P,LDBF
  8131
  8132			010000		ASYM FIXFD^	FIXFD==<.-AUXTAB>B26
  8133	037421	260 17 0 00 037543 		PUSHJ	P,FIXF
  8134
  8135			011000		ASYM FLTFD^	FLTFD==<.-AUXTAB>B26
  8136	037422	260 17 0 00 037545 		PUSHJ	P,FLTF
  8137
  8138			012000		ASYM DFNFD^	DFNFD==<.-AUXTAB>B26
  8139	037423	660 03 0 00 006060 		TRO	T2,SAAREX+SASCPL+SASCMI+SAEQV
  8140
  8141			013000		ASYM FSCFD^	FSCFD==<.-AUXTAB>B26
  8142	037424	260 17 0 00 037550 		PUSHJ	P,FSCF
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 38
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH SUBROUTINES FROM MAIN TABLE - FETCH ACTIONS                           *** SEQ 0214

  8143			014000		ASYM FADFD^	FADFD==<.-AUXTAB>B26
  8144	037425	260 17 0 00 037260 		PUSHJ	P,FADF
  8145
  8146			015000		ASYM FMPFD^	FMPFD==<.-AUXTAB>B26
  8147	037426	260 17 0 00 037260 		PUSHJ	P,FMPF
  8148
  8149			016000		ASYM FDVFD^	FDVFD==<.-AUXTAB>B26
  8150	037427	260 17 0 00 037552 		PUSHJ	P,FDVF
  8151
  8152			017000		ASYM DFAFD^	DFAFD==<.-AUXTAB>B26
  8153	037430	260 17 0 00 037255 		PUSHJ	P,DFAF
  8154
  8155			020000		ASYM DFMFD^	DFMFD==<.-AUXTAB>B26
  8156	037431	260 17 0 00 037560 		PUSHJ	P,DFMF
  8157
  8158			021000		ASYM DFDFD^	DFDFD==<.-AUXTAB>B26
  8159	037432	260 17 0 00 037570 		PUSHJ	P,DFDF
  8160
  8161			022000		ASYM BLTFD^	BLTFD==<.-AUXTAB>B26
  8162	037433	260 17 0 00 037563 		PUSHJ	P,BLTF
  8163
  8164			023000		ASYM XCTFD^	XCTFD==<.-AUXTAB>B26
  8165	037434	260 17 0 00 037600 		PUSHJ	P,XCTFD1
  8166
  8167			024000		ASYM AOBJD^	AOBJD==<.-AUXTAB>B26
  8168
  8169			024000		ASYM PUSHD^	PUSHD==<.-AUXTAB>B26
  8170
  8171			024000		ASYM BOOL0D^	BOOL0D==<.-AUXTAB>B26
  8172
  8173			024000		ASYM AOJD^	AOJD==<.-AUXTAB>B26
  8174	037435	661 03 0 00 000400 		TLO	T2,ADMSKG
  8175
  8176			025000		ASYM DMVMFD^	DMVMFD==<.-AUXTAB>B26
  8177	037436	260 17 0 00 037601 		PUSHJ	P,XCTFD1+1
  8178
  8179			026000		ASYM DMVEFD^	DMVEFD==<.-AUXTAB>B26
  8180	037437	260 17 0 00 037531 		PUSHJ	P,DMVEA
  8181
  8182			027000		ASYM UUOFD^	UUOFD==<.-AUXTAB>B26
  8183	037440	260 17 0 00 037574 		PUSHJ	P,UUOF
  8184
  8185			030000		ASYM JFCLFD^	JFCLFD==<.-AUXTAB>B26
  8186	037441	260 17 0 00 037471 		PUSHJ	P,JFCLF
  8187
  8188			031000		ASYM JRSTFD^	JRSTFD==<.-AUXTAB>B26
  8189	037442	260 17 0 00 037476 		PUSHJ	P,JRSTF
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 39
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH SUBROUTINES FROM MAIN TABLE - FETCH ACTIONS                           *** SEQ 0215

  8190					;*PC PLUS ONE GATE
  8191
  8192	037443	552 13 0 00 046214 	PCP1:	HRRZM	PC,PCP1G#
  8193	037444	336 00 0 00 046213 		SKIPN	PCP1FF#
  8194	037445	350 00 0 00 046214 		AOS	PCP1G
  8195	037446	263 17 0 00 000000 		POPJ	P,
  8196
  8197	037447	200 02 0 00 000013 	CONDZ1:	MOVE	T1,PC
  8198	037450	242 02 0 00 777767 		LSH	T1,-11
  8199	037451	404 02 0 00 000016 		AND	T1,IR
  8200	037452	402 00 0 00 046107 		SETZM	CONDZ#
  8201	037453	603 02 0 00 000740 		TLNE	T1,740
  8202	037454	476 00 0 00 046107 		SETOM	CONDZ
  8203	037455	263 17 0 00 000000 		POPJ	P,
  8204
  8205	037456	603 16 0 00 000400 	JFCL2:	TLNE	IR,(1B9)
  8206	037457	621 13 0 00 400000 		TLZ	PC,AROV
  8207	037460	603 16 0 00 000200 		TLNE	IR,(1B10)
  8208	037461	621 13 0 00 200000 		TLZ	PC,CRY0
  8209	037462	603 16 0 00 000100 		TLNE	IR,(1B11)
  8210	037463	621 13 0 00 100000 		TLZ	PC,CRY1
  8211	037464	603 16 0 00 000040 		TLNE	IR,(1B12)
  8212	037465	621 13 0 00 040000 		TLZ	PC,FOV
  8213	037466	336 00 0 00 046107 		SKIPN	CONDZ
  8214	037467	661 01 0 00 000004 		TLO	T,INFTST
  8215	037470	263 17 0 00 000000 		POPJ	P,
  8216
  8217	037471	260 17 0 00 037447 	JFCLF:	PUSHJ	P,CONDZ1
  8218	037472	336 00 0 00 046107 		SKIPN	CONDZ
  8219	037473	664 01 0 00 100000 		TROA	T,ABPCEN
  8220	037474	661 01 0 00 000004 		TLO	T,INFTST
  8221	037475	263 17 0 00 000000 		POPJ	P,
  8222
  8223	037476	603 16 0 00 000300 	JRSTF:	TLNE	IR,(1B10+1B11)
  8224	037477	254 00 0 00 037502 		JRST	.+3
  8225	037500	661 01 0 00 000004 		TLO	T,INFTST
  8226	037501	263 17 0 00 000000 		POPJ	P,
  8227	037502	476 00 0 00 046251 		SETOM	STINH
  8228	037503	263 17 0 00 000000 		POPJ	P,
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 40
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH SUBROUTINES FROM MAIN TABLE - FETCH ACTIONS                           *** SEQ 0216

  8229	037504	661 01 0 00 000600 	JRST2:	TLO	T,ADBRPL
  8230	037505	660 01 0 00 001000 		TRO	T,BRAREN
  8231	037506	607 16 0 00 000300 		TLNN	IR,(1B10+1B11)
  8232	037507	263 17 0 00 000000 		POPJ	P,
  8233	037510	603 16 0 00 000200 		TLNE	IR,(1B10)
  8234	037511	402 00 0 00 046225 		SETZM	RUN#
  8235	037512	607 16 0 00 000100 		TLNN	IR,(1B11)
  8236	037513	254 00 0 00 037527 		JRST	JRST3
  8237	037514	510 02 0 00 000006 		HLLZ	T1,AR
  8238	037515	603 13 0 00 010000 		TLNE	PC,USERF		;USER MODE
  8239	037516	665 02 0 00 010000 		TLOA	T1,10000		;USER CANNOT LEAVE USER MODE
  8240	037517	254 00 0 00 037522 		JRST	.+3
  8241	037520	607 13 0 00 004000 		TLNN	PC,EXIOT
  8242	037521	621 02 0 00 004000 		TLZ	T1,4000			;USER CANNOT TURN ON USER IOT
  8243	037522	621 02 0 00 000037 		TLZ	T1,37
  8244	037523	500 13 0 00 000002 		HLL	PC,T1
  8245	037524	402 00 0 00 046077 		SETZM	BYF6
  8246	037525	603 13 0 00 020000 		TLNE	PC,BIS
  8247	037526	476 00 0 00 046077 		SETOM	BYF6
  8248	037527	201 05 0 00 041243 	JRST3:	MOVEI	S,ST1
  8249	037530	263 17 0 00 000000 		POPJ	P,
  8250
  8251						IFNDEF	SIMASB,<
  8252					MUOXC3:	MOVEM	17,MONTMP+17	;SAVE AC'S
  8253						MOVEI	17,MONTMP
  8254						BLT	17,MONTMP+16
  8255						HRRI	PC,.+3		;SET ACTUAL FLAGS
  8256						HLL	PC,USR425
  8257						JRST	2,(PC)
  8258						MOVE	0,USR424
  8259						LSH	0,-^D27
  8260						CAIN	0,041
  8261						JRST	MUOXC5		;INIT UUO
  8262						MOVSI	17,ACS		;GET SIMULATED AC'S
  8263						BLT	17,17
  8264						XCT	USR424		;EXECUTE MONITOR UUO
  8265						SKIPA
  8266					MUOXC4:	AOS	USR425
  8267						MOVEM	17,ACS+17	;PUT BACK SIM AC'S
  8268						MOVEI	17,ACS
  8269						BLT	17,ACS+16
  8270						JSP	0,.+1		;GET ACTUAL FLAGS
  8271						HLLM	0,USR425	;SETUP AS SIM FLAGS
  8272						MOVEI	0,0
  8273						CALL	[SIXBIT /SETUWP/]
  8274						JFCL
  8275						MOVSI	17,MONTMP
  8276						BLT	17,17		;RESTORE AC'S
  8277						POPJ	P,
  8278					
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 41
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH SUBROUTINES FROM MAIN TABLE - FETCH ACTIONS                           *** SEQ 0217

  8279					MUOXC5:	MOVE	0,@USR425	;MUUO INIT EXECUTION
  8280						MOVEM	0,MUOXC6	;SETUP ARG'S
  8281						AOS	USR425
  8282						MOVE	0,@USR425
  8283						MOVEM	0,MUOXC6+1
  8284						MOVSI	17,ACS		;GET SIMULATED AC'S
  8285						BLT	17,17
  8286						XCT	USR424		;EXECUTE INIT
  8287					MUOXC6:	0
  8288						0
  8289						SKIPA			;ERROR RETURN
  8290						AOS	USR425		;NORMAL RETURN
  8291						JRST	MUOXC4
  8292					
  8293					MONTMP:	BLOCK	20
  8294					>
  8295	037531	603 00 0 00 000600 	DMVEA:	TLNE	F,ADBRPL
  8296	037532	660 01 0 00 006000 		TRO	T,ARADEN
  8297	037533	263 17 0 00 000000 		POPJ	P,
  8298
  8299	037534	660 03 0 00 000007 	DIVF:	TRO	T2,SAMI42
  8300	037535	641 01 0 00 016000 		TLC	T,ADFMPL+ADFMMI
  8301	037536	476 00 0 00 046251 		SETOM	STINH
  8302	037537	263 17 0 00 000000 		POPJ	P,
  8303
  8304	037540	661 03 0 00 000400 	BPNIF:	TLO	T2,ADMSKG	;BYTE PTR NOT INC FETCH
  8305	037541	660 03 0 00 001000 	BPNIF2:	TRO	T2,SAARPOS
  8306	037542	263 17 0 00 000000 		POPJ	P,
  8307
  8308	037543	260 17 0 00 037550 	FIXF:	PUSHJ	P,FSCF
  8309	037544	254 00 0 00 037261 		JRST	FMP0A
  8310	037545	260 17 0 00 037550 	FLTF:	PUSHJ	P,FSCF
  8311	037546	660 03 0 00 000013 		TRO	T2,SAMI4
  8312	037547	263 17 0 00 000000 		POPJ	P,
  8313
  8314	037550	476 00 0 00 046251 	FSCF:	SETOM	STINH
  8315	037551	263 17 0 00 000000 		POPJ	P,
  8316
  8317	037552	260 17 0 00 037550 	FDVF:	PUSHJ	P,FSCF
  8318	037553	254 00 0 00 037261 		JRST	FMP0A
  8319
  8320	037554	660 03 0 00 000343 	LDBF:	TRO	T2,SASCMI+SAPL1+SAADD+SAZERO
  8321	037555	325 15 0 00 030065 		JUMPGE	SC,CPOPJ
  8322	037556	660 03 0 00 000017 		TRO	T2,SAM100
  8323	037557	263 17 0 00 000000 		POPJ	P,
  8324
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 42
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH SUBROUTINES FROM MAIN TABLE - FETCH ACTIONS                           *** SEQ 0218

  8325	037560	260 17 0 00 037562 	DFMF:	PUSHJ	P,DFLTF
  8326	037561	254 00 0 00 037261 		JRST	FMP0A
  8327
  8328	037562	665 03 0 00 000200 	DFLTF:	TLOA	T2,ARXCLR
  8329	037563	260 17 0 00 037566 	BLTF:	PUSHJ	P,BLTFDA
  8330	037564	476 00 0 00 046251 		SETOM	STINH
  8331	037565	263 17 0 00 000000 		POPJ	P,
  8332
  8333	037566	476 00 0 00 046213 	BLTFDA:	SETOM	PCP1FF
  8334	037567	254 00 0 00 037572 		JRST	DFDF+2
  8335
  8336	037570	260 17 0 00 037562 	DFDF:	PUSHJ	P,DFLTF
  8337	037571	670 03 0 00 045430 		TDO	T2,[XWD ADXFMM+ADXEQV,SAAREX]
  8338	037572	476 00 0 00 046300 		SETOM	TNCLRI#
  8339	037573	263 17 0 00 000000 		POPJ	P,
  8340
  8341	037574	476 00 0 00 046300 	UUOF:	SETOM	TNCLRI
  8342	037575	476 00 0 00 046307 		SETOM	XCTF#
  8343	037576	201 02 0 00 000040 		MOVEI	T1,40
  8344	037577	202 02 0 00 046162 		MOVEM	T1,MAGIC#
  8345
  8346	037600	476 00 0 00 046307 	XCTFD1:	SETOM	XCTF
  8347	037601	476 00 0 00 046300 		SETOM	TNCLRI
  8348	037602	263 17 0 00 000000 		POPJ	P,
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 43
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH SUBROUTINES FROM MAIN TABLE - FETCH ACTIONS                           *** SEQ 0219

  8349						IFNDEF	SIMASB,<
  8350					TDATAI:	MOVEI	S,TTYDI
  8351						POPJ	P,
  8352					
  8353					TDATAO:	MOVEI	S,TTYDO
  8354						POPJ	P,
  8355					
  8356					TCONO:	MOVEI	S,TTYCO
  8357						TRO	T,ARLARR
  8358						POPJ	P,
  8359					
  8360					TCONI:	MOVEI	S,TTYCI
  8361						POPJ	P,
  8362					
  8363					TCONSZ:	MOVEI	S,TTYCNZ
  8364						POPJ	P,
  8365					
  8366					TCONSO:	MOVEI	S,TTYCNO
  8367						POPJ	P,
  8368					
  8369					TDTAI:	PUSHJ	P,MEMWSS
  8370						POPJ	P,
  8371					
  8372					TDTAO:	POPJ	P,
  8373					
  8374					TCNO:	POPJ	P,
  8375					
  8376					TCNI:	JRST	TDTAI
  8377					
  8378					TCNSZ:
  8379					TCNSO:	MOVEI	S,ST1
  8380						POPJ	P,
  8381					
  8382					ADATAI:	MOVEI	S,APRDI
  8383						POPJ	P,
  8384					
  8385					ADATAO:	MOVEI	S,APRDO
  8386						POPJ	P,
  8387					
  8388					ACONO:	MOVEI	S,APRCO
  8389						TRO	T,ARLARR
  8390						POPJ	P,
  8391					
  8392					ACONI:	MOVEI	S,APRCI
  8393						POPJ	P,
  8394					
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 44
KI10A1	MAC	 9-JUN-76 13:52		DISPATCH SUBROUTINES FROM MAIN TABLE - FETCH ACTIONS                           *** SEQ 0220

  8395					ACONSZ:	MOVEI	S,APRCNZ
  8396						POPJ	P,
  8397					
  8398					ACONSO:	MOVEI	S,APRCNO
  8399						POPJ	P,
  8400					
  8401					PDATAI:	MOVEI	S,PIDI
  8402						POPJ	P,
  8403					
  8404					PDATAO:	MOVEI	S,PIDO
  8405						POPJ	P,
  8406					
  8407					PCONO:	MOVEI	S,PICO
  8408						TRO	T,ARLARR
  8409						POPJ	P,
  8410					
  8411					PCONI:	MOVEI	S,PICI
  8412						POPJ	P,
  8413					
  8414					PCONSZ:	MOVEI	S,PICNZ
  8415						POPJ	P,
  8416					
  8417					PCONSO:	MOVEI	S,PICNO
  8418						POPJ	P,
  8419					
  8420					GDATAI:	MOVEI	S,PGDI
  8421						POPJ	P,
  8422					
  8423					GDATAO:	MOVEI	S,PGDO
  8424						POPJ	P,
  8425					
  8426					PGCONO:	MOVEI	S,PGCO
  8427						TRO	T,ARLARR
  8428						POPJ	P,
  8429					
  8430					PGCONI:	MOVEI	S,PGCI
  8431						POPJ	P,
  8432					
  8433					GCONSZ:	MOVEI	S,PGCNZ
  8434						POPJ	P,
  8435					
  8436					GCONSO:	MOVEI	S,PGCNO
  8437						POPJ	P,
  8438					>
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 1
KI10A2	MAC	 9-JUN-76 13:56		MASTER CLOCK ROUTINE                                                           *** SEQ 0221

  8439					SUBTTL	MASTER CLOCK ROUTINE
  8440
  8441	037603				SIMGO:
  8442	037603	476 00 0 00 046133 	GO:	SETOM	INFTFF
  8443	037604	402 00 0 00 046150 		SETZM	INSYNC
  8444	037605	402 00 0 00 046213 		SETZM	PCP1FF
  8445	037606	201 00 0 00 100000 		MOVEI	F,ABPC
  8446	037607	200 13 0 00 032165 		MOVE	PC,INPC
  8447	037610	552 13 0 00 046214 		HRRZM	PC,PCP1G
  8448	037611	476 00 0 00 046225 		SETOM	RUN
  8449	037612	201 05 0 00 043127 		MOVEI	S,INDONE
  8450					GO1:	REPEAT	4,
  8451					<	SETZM MEMCMP-GO1+.>
  8452	037613	402 00 0 00 044730 		SETZM MEMCMP-GO1+.
  8453	037614	402 00 0 00 044731 		SETZM MEMCMP-GO1+.
  8454	037615	402 00 0 00 044732 		SETZM MEMCMP-GO1+.
  8455	037616	402 00 0 00 044733 		SETZM MEMCMP-GO1+.
  8456	037617	402 00 0 00 046163 		SETZM	MAMAOFF
  8457	037620	402 00 0 00 046170 		SETZM	MEMDONE
  8458	037621	402 00 0 00 046306 		SETZM	WARNED
  8459	037622	402 00 0 00 046276 		SETZM	TIME
  8460	037623	402 00 0 00 046174 		SETZM	MEMWR
  8461	037624	402 00 0 00 046175 		SETZM	MEMWRWT
  8462	037625	402 00 0 00 046122 		SETZM	FMADMA
  8463	037626	402 00 0 00 046307 		SETZM	XCTF
  8464	037627	402 00 0 00 046113 		SETZM	DSF2
  8465	037630	402 00 0 00 046305 		SETZM	TTST#
  8466	037631	403 16 0 00 046076 		SETZB	IR,BYF5
  8467	037632	402 00 0 00 046077 		SETZM	BYF6
  8468	037633	603 13 0 00 020000 		TLNE	PC,BIS
  8469	037634	476 00 0 00 046077 		SETOM	BYF6
  8470	037635	402 00 0 00 046112 		SETZM	DFDF1
  8471	037636	402 00 0 00 046231 		SETZM	SACBRFF
  8472	037637	402 00 0 00 046116 		SETZM	FCE2ST
  8473	037640	402 00 0 00 046117 		SETZM	FCE2W
  8474	037641	402 00 0 00 046126 		SETZM	FMWRSET
  8475	037642	402 00 0 00 046125 		SETZM	FMSINAC#
  8476	037643	402 00 0 00 046167 		SETZM	MCSPEC
  8477	037644	402 00 0 00 046166 		SETZM	MCSADR#
  8478	037645	402 00 0 00 046171 		SETZM	MEMGOINH#
  8479	037646	402 00 0 00 046072 		SETZM	BLTF1
  8480	037647	402 00 0 00 046202 		SETZM	MUUOF1
  8481	037650	402 00 0 00 046203 		SETZM	MUUOF2
  8482	037651	402 00 0 00 046302 		SETZM	TRPCYC
  8483	037652	402 00 0 00 046216 		SETZM	PICYC
  8484	037653	402 00 0 00 046303 		SETZM	TRPSAT
  8485	037654	402 00 0 00 046217 		SETZM	PIRDYS
  8486	037655	402 00 0 00 046301 		SETZM	TRPCSET
  8487	037656	402 00 0 00 046222 		SETZM	PSINFT
  8488	037657	402 00 0 00 046146 		SETZM	INSNXT#		;INST FETCH NEXT
  8489	037660	403 06 0 00 000007 		SETZB	AR,MQ
  8490	037661	403 10 0 00 000011 		SETZB	BR,AD
  8491	037662	403 12 0 00 000014 		SETZB	MB,MA
  8492	037663	403 15 0 00 000016 		SETZB	SC,IR
  8493	037664	402 00 0 00 046061 		SETZM	ARI08#
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 2
KI10A2	MAC	 9-JUN-76 13:56		MASTER CLOCK ROUTINE                                                           *** SEQ 0222

  8494	037665	260 17 0 00 043316 	MAIN:	PUSHJ	P,FMVAL
  8495	037666	260 17 0 00 040060 		PUSHJ	P,ADDER
  8496	037667	260 17 0 00 040226 		PUSHJ	P,ADXER
  8497	037670	260 17 0 00 043305 		PUSHJ	P,ABMIXR
  8498	037671	260 17 0 00 040314 		PUSHJ	P,SCAD
  8499	037672	306 05 0 00 043127 		CAIN	S,INDONE
  8500	037673	260 17 0 00 043127 		PUSHJ	P,INDONE
  8501	037674	336 00 0 00 046156 		SKIPN	IRLTCH
  8502						JRST	[HLLZ	IR,MB
  8503							TLZ	IR,37
  8504	037675	254 00 0 00 045431 			JRST	.+1]
  8505	037676	552 05 0 00 046246 		HRRZM	S,STATE#
  8506	037677	403 01 0 00 046145 		SETZB	T,INRDYCLR
  8507	037700	403 03 0 00 046132 		SETZB	T2,INDNCLR
  8508	037701	332 00 0 00 046146 		SKIPE	INSNXT
  8509	037702	661 01 0 00 000004 		TLO	T,INFTST
  8510	037703	402 00 0 00 046146 		SETZM	INSNXT
  8511	037704	402 00 0 00 046126 		SETZM	FMWRSET
  8512	037705	402 00 0 00 046101 		SETZM	CLINSET
  8513	037706	402 00 0 00 046064 		SETZM	ARMQEN
  8514	037707	402 00 0 00 046161 		SETZM	LONGSET
  8515	037710	402 00 0 00 046065 		SETZM	ARPOSEN
  8516	037711	402 00 0 00 046075 		SETZM	BRSMR
  8517	037712	402 00 0 00 046066 		SETZM	ARSMR
  8518	037713	402 00 0 00 046057 		SETZM	ARESAEN
  8519	037714	332 00 0 00 046133 		SKIPE	INFTFF
  8520	037715	260 17 0 00 044566 		PUSHJ	P,INFTSB
  8521	037716	201 05 0 00 043163 	SIMBRK:	MOVEI	S,ERR+1
  8522	037717	476 00 0 00 043162 		SETOM	ERR
  8523	037720	332 00 0 00 046113 		SKIPE	DSF2
  8524	037721	254 00 0 00 037725 		JRST	MAIN1
  8525	037722	332 00 0 00 046112 		SKIPE	DFDF1#
  8526	037723	260 17 0 00 037733 		PUSHJ	P,MAIN2
  8527	037724	254 00 0 00 037744 		JRST	DISP
  8528
  8529	037725	200 02 0 00 000011 	MAIN1:	MOVE	T1,AD
  8530	037726	430 02 0 00 000010 		XOR	T1,BR
  8531	037727	331 00 0 00 000002 		SKIPL	T1
  8532	037730	665 01 0 00 061060 		TLOA	T,ADBRMI+ADCR36+ADADD+ADARPL
  8533	037731	661 01 0 00 040660 		TLO	T,ADBRPL+ADADD+ADARPL
  8534	037732	254 00 0 00 037744 		JRST	DISP
  8535
  8536	037733	200 02 0 00 046052 	MAIN2:	MOVE	T1,ADX
  8537	037734	661 03 0 00 500000 		TLO	T2,ADXADD+ADXFMP
  8538	037735	242 02 0 00 000010 		LSH	T1,10
  8539	037736	430 02 1 00 046124 		XOR	T1,@FMREG
  8540	037737	331 00 0 00 000002 		SKIPL	T1
  8541	037740	665 01 0 00 061060 		TLOA	T,ADADD+ADARPL+ADBRMI+ADCR36
  8542	037741	665 01 0 00 040660 		TLOA	T,ADADD+ADARPL+ADBRPL
  8543	037742	641 03 0 00 140000 		TLC	T2,ADXFMP+ADXFMM
  8544	037743	263 17 0 00 000000 		POPJ	P,
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 3
KI10A2	MAC	 9-JUN-76 13:56		MASTER CLOCK ROUTINE                                                           *** SEQ 0223

  8545	037744	260 17 1 00 046246 	DISP:	PUSHJ	P,@STATE
  8546	037745	202 03 0 00 046233 		MOVEM	T2,SCADEN#
  8547	037746	260 17 0 00 043326 		PUSHJ	P,ARMIXR
  8548	037747	260 17 0 00 043670 		PUSHJ	P,ARXMXR
  8549	037750	260 17 0 00 043264 		PUSHJ	P,BRMIXR
  8550	037751	260 17 0 00 043517 		PUSHJ	P,MQMIXR
  8551	037752	260 17 0 00 043617 		PUSHJ	P,MBMIXR
  8552	037753	260 17 0 00 043633 		PUSHJ	P,SCMIXR
  8553	037754	332 00 0 00 046056 		SKIPE	ARCLK
  8554	037755	200 06 0 00 046063 		MOVE	AR,ARMIX
  8555	037756	200 02 0 00 046071 		MOVE	T1,ARXMIX#
  8556	037757	332 00 0 00 046070 		SKIPE	ARXCLK#
  8557	037760	202 02 0 00 046067 		MOVEM	T1,ARX#
  8558	037761	332 00 0 00 046073 		SKIPE	BRCLK
  8559	037762	200 10 0 00 046074 		MOVE	BR,BRMIX
  8560	037763	332 00 0 00 046200 		SKIPE	MQCLK#
  8561	037764	200 07 0 00 046201 		MOVE	MQ,MQMIX
  8562	037765	332 00 0 00 046164 		SKIPE	MBCLK#
  8563	037766	200 12 0 00 046165 		MOVE	MB,MBMIX#
  8564	037767	332 00 0 00 046235 		SKIPE	SCCLK#
  8565	037770	200 15 0 00 046237 		MOVE	SC,SCMIX#
  8566	037771	200 02 0 00 046226 		MOVE	T1,SA
  8567	037772	200 03 0 00 046233 		MOVE	T2,SCADEN
  8568	037773	602 03 0 00 400000 		TRNE	T2,FESAEN
  8569	037774	202 02 0 00 046120 		MOVEM	T1,FE#
  8570	037775	640 01 0 00 022000 		TRC	T,ARFLGS
  8571	037776	646 01 0 00 022000 		TRCN	T,ARFLGS
  8572	037777	621 13 0 00 020000 		TLZ	PC,BIS
  8573	040000	607 13 0 00 020000 		TLNN	PC,BIS
  8574	040001	402 00 0 00 046077 		SETZM	BYF6
  8575	040002	603 01 0 00 000002 		TLNE	T,PCCLK
  8576	040003	540 13 0 00 046037 		HRR	PC,AB
  8577	040004	260 17 0 00 037443 		PUSHJ	P,PCP1
  8578	040005	626 00 0 00 000001 		TRZN	F,CLKINH
  8579	040006	260 17 0 00 043776 		PUSHJ	P,TIMCAL
  8580	040007	603 01 0 00 000001 		TLNE	T,ADCLKINH
  8581	040010	254 00 0 00 040013 		JRST	.+3
  8582	040011	606 01 0 00 200000 		TRNN	T,ABABEN
  8583	040012	260 17 0 00 043735 		PUSHJ	P,ADCLK
  8584	040013	260 17 0 00 043750 		PUSHJ	P,ABCLK
  8585	040014	332 00 0 00 046126 		SKIPE	FMWRSET
  8586	040015	260 17 0 00 043765 		PUSHJ	P,FMWR
  8587	040016	332 00 0 00 046101 		SKIPE	CLINSET
  8588	040017	660 00 0 00 000001 		TRO	F,CLKINH
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 4
KI10A2	MAC	 9-JUN-76 13:56		MASTER CLOCK ROUTINE                                                           *** SEQ 0224

  8589	040020	622 00 0 00 000200 		TRZE	F,SCP1S
  8590	040021	664 00 0 00 000400 		TROA	F,SCP1IN
  8591	040022	620 00 0 00 000400 		TRZ	F,SCP1IN
  8592	040023	332 00 0 00 046161 		SKIPE	LONGSET
  8593	040024	664 00 0 00 040000 		TROA	F,LNGCYC
  8594	040025	620 00 0 00 040000 		TRZ	F,LNGCYC
  8595	040026	603 01 0 00 000004 		TLNE	T,INFTST
  8596	040027	476 00 0 00 046133 		SETOM	INFTFF#
  8597	040030	332 00 0 00 046117 		SKIPE	FCE2W
  8598	040031	260 17 0 00 044511 		PUSHJ	P,FCE2SY
  8599	040032	336 00 0 00 046075 		SKIPN	BRSMR#
  8600	040033	254 00 0 00 040037 		JRST	.+4
  8601	040034	603 10 0 00 400000 		TLNE	BR,(1B0)
  8602	040035	665 10 0 00 377000 		TLOA	BR,377000
  8603	040036	621 10 0 00 377000 		TLZ	BR,377000
  8604	040037	622 00 0 00 001000 		TRZE	F,MUOF1S
  8605	040040	476 00 0 00 046202 		SETOM	MUUOF1#
  8606	040041	622 00 0 00 002000 		TRZE	F,MUOF1C
  8607	040042	402 00 0 00 046202 		SETZM	MUUOF1
  8608	040043	622 00 0 00 004000 		TRZE	F,MUOF2S
  8609	040044	476 00 0 00 046203 		SETOM	MUUOF2#
  8610	040045	622 00 0 00 010000 		TRZE	F,MUOF2C
  8611	040046	402 00 0 00 046203 		SETZM	MUUOF2
  8612	040047	332 00 0 00 046301 		SKIPE	TRPCSET#
  8613	040050	476 00 0 00 046302 		SETOM	TRPCYC
  8614	040051	402 00 0 00 046301 		SETZM	TRPCSET
  8615	040052	332 00 0 00 046303 		SKIPE	TRPSAT
  8616	040053	621 13 0 00 000600 		TLZ	PC,TN0+TN1
  8617	040054	332 00 0 00 046303 		SKIPE	TRPSAT
  8618	040055	402 00 0 00 046302 		SETZM	TRPCYC
  8619	040056	402 00 0 00 046303 		SETZM	TRPSAT
  8620	040057	254 00 0 00 037665 		JRST	MAIN
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 5
KI10A2	MAC	 9-JUN-76 13:56		LOGIC SUBROUTINES                                                              *** SEQ 0225

  8621					SUBTTL	LOGIC SUBROUTINES
  8622
  8623	040060	211 11 0 00 000001 	ADDER:	MOVNI	AD,1
  8624	040061	603 00 0 00 000040 		TLNE	F,ADARLP
  8625	040062	500 11 0 00 000006 		HLL	AD,AR
  8626	040063	603 00 0 00 000020 		TLNE 	F,ADARRP
  8627	040064	540 11 0 00 000006 		HRR	AD,AR
  8628	040065	603 00 0 00 000100 		TLNE	F,ADARMI
  8629	040066	420 11 0 00 000006 		ANDCM	AD,AR
  8630	040067	520 02 0 00 000012 		HLLO	T1,MB
  8631	040070	200 03 0 00 046234 		MOVE	T2,SCADFF
  8632	040071	603 03 0 00 004000 		TLNE	T2,ADMBLE
  8633	040072	404 11 0 00 000002 		AND	AD,T1
  8634	040073	560 02 0 00 000012 		HRRO	T1,MB
  8635	040074	603 03 0 00 002000 		TLNE	T2,ADMBRE
  8636	040075	404 11 0 00 000002 		AND	AD,T1
  8637	040076	607 03 0 00 000400 		TLNN	T2,ADMSKG
  8638	040077	254 00 0 00 040111 		JRST	ADDER1
  8639	040100	402 00 0 00 000002 		SETZM	T1
  8640	040101	554 04 0 00 000016 		HLRZ	T3,IR
  8641	040102	640 04 0 00 137000 		TRC	T3,(DPB)
  8642	040103	602 04 0 00 774000 		TRNE	T3,774000
  8643	040104	606 04 0 00 773000 		TRNN	T3,773000
  8644	040105	201 02 0 00 000001 		MOVEI	T1,1
  8645	040106	135 04 0 00 045434 		LDB	T3,[POINT 6,AR,11]
  8646	040107	242 02 0 04 000000 		LSH	T1,(T3)
  8647	040110	404 11 0 00 000002 		AND	AD,T1
  8648
  8649	040111	202 11 0 00 046043 	ADDER1:	MOVEM	AD,AD2#
  8650	040112	402 00 0 00 046047 		SETZM	ADOVF1#
  8651	040113	335 00 0 00 000011 		SKIPGE	AD
  8652	040114	522 00 0 00 046047 		HLLOM	ADOVF1
  8653	040115	211 11 0 00 000001 		MOVNI	AD,1
  8654	040116	603 00 0 00 004000 		TLNE	F,ADFMLP
  8655	040117	500 11 1 00 046124 		HLL	AD,@FMREG#
  8656	040120	603 00 0 00 002000 		TLNE	F,ADFMRP
  8657	040121	540 11 1 00 046124 		HRR	AD,@FMREG
  8658	040122	603 00 0 00 010000 		TLNE	F,ADFMMI
  8659	040123	420 11 1 00 046124 		ANDCM	AD,@FMREG
  8660	040124	520 02 0 00 000010 		HLLO	T1,BR
  8661	040125	603 00 0 00 000400 		TLNE	F,ADBRLP
  8662	040126	404 11 0 00 000002 		AND	AD,T1
  8663	040127	560 02 0 00 000010 		HRRO	T1,BR
  8664	040130	603 00 0 00 000200 		TLNE	F,ADBRRP
  8665	040131	404 11 0 00 000002 		AND	AD,T1
  8666	040132	603 00 0 00 000010 		TLNE	F,ADMAGIC
  8667	040133	404 11 0 00 046162 		AND	AD,MAGIC#
  8668	040134	603 00 0 00 001000 		TLNE	F,ADBRMI
  8669	040135	420 11 0 00 000010 		ANDCM	AD,BR
  8670	040136	402 00 0 00 046046 		SETZM	ADOVF#
  8671	040137	335 00 0 00 000011 		SKIPGE	AD
  8672	040140	522 00 0 00 046046 		HLLOM	ADOVF
  8673	040141	607 03 0 00 001000 		TLNN	T2,ADBRP2
  8674	040142	254 00 0 00 040150 		JRST	ADDER2
  8675	040143	200 02 0 00 000010 		MOVE	T1,BR
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 5-1
KI10A2	MAC	 9-JUN-76 13:56		LOGIC SUBROUTINES                                                              *** SEQ 0226

  8676	040144	242 02 0 00 000001 		LSH	T1,1
  8677	040145	404 11 0 00 000002 		AND	AD,T1
  8678	040146	321 10 0 00 040150 		JUMPL	BR,ADDER2
  8679	040147	402 00 0 00 046046 		SETZM	ADOVF
  8680
  8681	040150	202 11 0 00 046050 	ADDER2:	MOVEM	AD,ADPR#
  8682	040151	607 00 0 00 140000 		TLNN	F,ADADD+ADEQV
  8683	040152	404 11 0 00 046043 		AND	AD,AD2
  8684	040153	603 00 0 00 100000 		TLNE	F,ADEQV
  8685	040154	444 11 0 00 046043 		EQV	AD,AD2
  8686	040155	550 02 0 00 046043 		HRRZ	T1,AD2
  8687	040156	603 00 0 00 020000 		TLNE	F,ADCR36
  8688	040157	271 02 0 00 000001 		ADDI	T1,1
  8689	040160	271 02 0 11 000000 		ADDI	T1,(AD)
  8690	040161	202 02 0 00 046044 		MOVEM	T1,AD4#
  8691	040162	557 00 0 00 000002 		HLRZS	T1
  8692	040163	607 00 0 00 400000 		TLNN	F,ADMI1B
  8693	040164	271 02 0 00 000001 		ADDI	T1,1
  8694	040165	603 00 0 00 200000 		TLNE	F,ADPL1L
  8695	040166	271 02 0 00 000001 		ADDI	T1,1
  8696	040167	246 02 0 00 777777 		LSHC	T1,-1
  8697	040170	202 03 0 00 046042 		MOVEM	T2,AD17.5#
  8698	040171	554 03 0 00 000011 		HLRZ	T2,AD
  8699	040172	206 02 0 00 046051 		MOVSM	T1,ADTEM#
  8700	040173	504 02 0 00 046046 		HRL	T1,ADOVF
  8701	040174	270 02 0 00 000003 		ADD	T1,T2
  8702	040175	554 03 0 00 046043 		HLRZ	T2,AD2
  8703	040176	504 03 0 00 046047 		HRL	T2,ADOVF1
  8704	040177	270 02 0 00 000003 		ADD	T1,T2
  8705	040200	506 02 0 00 046044 		HRLM	T1,AD4
  8706	040201	603 00 0 00 040000 		TLNE	F,ADADD
  8707	040202	556 02 0 00 046046 		HLRZM	T1,ADOVF
  8708	040203	255 17 0 00 040204 		JFCL	17,.+1
  8709	040204	510 02 0 00 000011 		HLLZ	T1,AD
  8710	040205	270 02 0 00 046051 		ADD	T1,ADTEM
  8711	040206	270 02 0 00 046043 		ADD	T1,AD2
  8712	040207	264 00 0 00 040210 		JSR	ADFLGS
  8713
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 6
KI10A2	MAC	 9-JUN-76 13:56		LOGIC SUBROUTINES                                                              *** SEQ 0227

  8714	040210	000000	000000		ADFLGS:	0
  8715	040211	200 02 0 00 040210 		MOVE	T1,ADFLGS
  8716	040212	255 10 0 00 040223 		JOV	ADFLGO
  8717	040213	200 02 0 00 046047 		MOVE	T1,ADOVF1
  8718	040214	603 00 0 00 100000 		TLNE	F,ADEQV
  8719	040215	446 02 0 00 046046 		EQVM	T1,ADOVF
  8720	040216	607 00 0 00 140000 		TLNN	F,ADADD+ADEQV
  8721	040217	406 02 0 00 046046 		ANDM	T1,ADOVF
  8722	040220	603 00 0 00 040000 		TLNE	F,ADADD
  8723	040221	200 11 0 00 046044 		MOVE	AD,AD4
  8724	040222	263 17 0 00 000000 		POPJ	P,
  8725
  8726	040223	661 02 0 00 400000 	ADFLGO:	TLO	T1,AROV
  8727	040224	202 02 0 00 040210 		MOVEM	T1,ADFLGS
  8728	040225	254 00 0 00 040213 		JRST	ADFLGS+3
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 7
KI10A2	MAC	 9-JUN-76 13:56		LOGIC SUBROUTINES                                                              *** SEQ 0228

  8729					;*ADX SUBROUTINE
  8730
  8731	040226	200 02 0 00 046067 	ADXER:	MOVE	T1,ARX#
  8732	040227	202 02 0 00 046052 		MOVEM	T1,ADX#
  8733	040230	211 02 0 00 000001 		MOVNI	T1,1
  8734	040231	200 04 0 00 046234 		MOVE	T3,SCADFF
  8735	040232	603 04 0 00 100000 		TLNE	T3,ADXFMP
  8736	040233	200 02 1 00 046124 		MOVE	T1,@FMREG
  8737	040234	603 04 0 00 040000 		TLNE	T3,ADXFMM
  8738	040235	420 02 1 00 046124 		ANDCM	T1,@FMREG
  8739	040236	603 04 0 00 010000 		TLNE	T3,ADXBRM
  8740	040237	420 02 0 00 000010 		ANDCM	T1,BR
  8741	040240	331 00 0 00 000002 		SKIPL	T1
  8742	040241	625 02 0 00 377000 		TLZA	T1,377000
  8743	040242	661 02 0 00 377000 		TLO	T1,377000
  8744	040243	607 04 0 00 020000 		TLNN	T3,ADXFM2
  8745	040244	254 00 0 00 040255 		JRST	ADXER1
  8746	040245	200 03 1 00 046124 		MOVE	T2,@FMREG
  8747	040246	240 03 0 00 000001 		ASH	T2,1
  8748	040247	603 10 0 00 200000 		TLNE	BR,(1B1)
  8749	040250	660 03 0 00 000001 		TRO	T2,1
  8750	040251	331 00 0 00 000003 		SKIPL	T2
  8751	040252	625 03 0 00 376000 		TLZA	T2,376000
  8752	040253	661 03 0 00 376000 		TLO	T2,376000
  8753	040254	404 02 0 00 000003 		AND	T1,T2
  8754
  8755	040255	402 00 0 00 046054 	ADXER1:	SETZM	ADXTMP#
  8756	040256	200 03 0 00 046043 		MOVE	T2,AD2
  8757	040257	430 03 0 00 046050 		XOR	T2,ADPR
  8758	040260	430 03 0 00 046044 		XOR	T2,AD4
  8759	040261	335 00 0 00 000003 		SKIPGE	T2
  8760	040262	350 00 0 00 046054 		AOS	ADXTMP
  8761	040263	200 03 0 00 000002 		MOVE	T2,T1
  8762	040264	270 03 0 00 046052 		ADD	T2,ADX
  8763	040265	270 03 0 00 046054 		ADD	T2,ADXTMP
  8764	040266	430 03 0 00 046052 		XOR	T2,ADX
  8765	040267	430 03 0 00 000002 		XOR	T2,T1
  8766	040270	402 00 0 00 046053 		SETZM	ADXCR0
  8767	040271	603 03 0 00 002000 		TLNE	T2,(1B7)
  8768	040272	476 00 0 00 046053 		SETOM	ADXCR0#
  8769	040273	603 04 0 00 200000 		TLNE	T3,ADXEQV
  8770	040274	446 02 0 00 046052 		EQVM	T1,ADX
  8771	040275	607 04 0 00 600000 		TLNN	T3,ADXEQV+ADXADD
  8772	040276	406 02 0 00 046052 		ANDM	T1,ADX
  8773	040277	607 04 0 00 400000 		TLNN	T3,ADXADD
  8774	040300	254 00 0 00 040303 		JRST	ADXER2
  8775	040301	270 02 0 00 046054 		ADD	T1,ADXTMP
  8776	040302	272 02 0 00 046052 		ADDM	T1,ADX
  8777
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 8
KI10A2	MAC	 9-JUN-76 13:56		LOGIC SUBROUTINES                                                              *** SEQ 0229

  8778	040303	200 02 0 00 046043 	ADXER2:	MOVE	T1,AD2
  8779	040304	603 04 0 00 200000 		TLNE	T3,ADXEQV
  8780	040305	446 02 0 00 046050 		EQVM	T1,ADPR
  8781	040306	607 04 0 00 600000 		TLNN	T3,ADXEQV+ADXADD
  8782	040307	406 02 0 00 046050 		ANDM	T1,ADPR
  8783	040310	200 02 0 00 046044 		MOVE	T1,AD4
  8784	040311	603 04 0 00 400000 		TLNE	T3,ADXADD
  8785	040312	202 02 0 00 046050 		MOVEM	T1,ADPR
  8786	040313	263 17 0 00 000000 		POPJ	P,
  8787
  8788					;*SHIFTCOUNT ADDER
  8789
  8790	040314	200 04 0 00 046234 	SCAD:	MOVE	T3,SCADFF
  8791	040315	211 02 0 00 000001 		MOVNI	T1,1
  8792	040316	602 04 0 00 000020 		TRNE	T3,SASCPL
  8793	040317	200 02 0 00 000015 		MOVE	T1,SC
  8794	040320	602 04 0 00 010000 		TRNE	T3,SAFEEN
  8795	040321	404 02 0 00 046120 		AND	T1,FE#
  8796	040322	602 04 0 00 000040 		TRNE	T3,SASCMI
  8797	040323	420 02 0 00 000015 		ANDCM	T1,SC
  8798	040324	135 03 0 00 045434 		LDB	T2,[POINT 6,AR,11]
  8799	040325	602 04 0 00 000400 		TRNE	T3,SAMSIZ
  8800	040326	420 02 0 00 000003 		ANDCM	T1,T2
  8801	040327	202 02 0 00 046226 		MOVEM	T1,SA#
  8802	040330	211 02 0 00 000001 		MOVNI	T1,1
  8803	040331	201 03 0 00 000017 		MOVEI	T2,17
  8804	040332	404 03 0 00 000004 		AND	T2,T3
  8805	040333	602 04 0 00 000017 		TRNE	T3,17
  8806	040334	200 02 0 03 040362 		MOVE	T1,SAMAGN-1(T2)
  8807	040335	135 03 0 00 045435 		LDB	T2,[POINT 6,AR,5]
  8808	040336	602 04 0 00 001000 		TRNE	T3,SAARPOS
  8809	040337	404 02 0 00 000003 		AND	T1,T2
  8810	040340	602 04 0 00 002000 		TRNE	T3,SAAREX
  8811	040341	254 00 0 00 040356 		JRST	SCAD4
  8812	040342	602 04 0 00 000100 	SCAD3:	TRNE	T3,SAADD
  8813	040343	254 00 0 00 040350 		JRST	SCAD1
  8814	040344	602 04 0 00 004000 		TRNE	T3,SAEQV
  8815	040345	254 00 0 00 040354 		JRST	SCAD2
  8816	040346	406 02 0 00 046226 		ANDM	T1,SA
  8817	040347	263 17 0 00 000000 		POPJ	P,
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 9
KI10A2	MAC	 9-JUN-76 13:56		LOGIC SUBROUTINES                                                              *** SEQ 0230

  8818	040350	272 02 0 00 046226 	SCAD1:	ADDM	T1,SA
  8819	040351	602 04 0 00 000200 		TRNE	T3,SAPL1
  8820	040352	350 00 0 00 046226 		AOS	SA
  8821	040353	263 17 0 00 000000 		POPJ	P,
  8822
  8823	040354	446 02 0 00 046226 	SCAD2:	EQVM	T1,SA
  8824	040355	263 17 0 00 000000 		POPJ	P,
  8825
  8826	040356	135 03 0 00 045436 	SCAD4:	LDB	T2,[POINT 8,AR,8]
  8827	040357	626 03 0 00 000200 		TRZN	T2,200
  8828	040360	465 03 0 00 000177 		ORCMI	T2,177
  8829	040361	404 02 0 00 000003 		AND	T1,T2
  8830	040362	254 00 0 00 040342 		JRST	SCAD3
  8831
  8832	040363	777777	777756		SAMAGN:	-22
  8833	040364	000000	000044			44
  8834	040365	000000	000000			0
  8835	040366	000000	000220			220
  8836	040367	000000	000110			110
  8837	040370	777777	777670			-110
  8838	040371	777777	777736			-42
  8839	040372	777777	777762			-16
  8840	040373	777777	777745			-33
  8841	040374	777777	777746			-32
  8842	040375	777777	777774			-4
  8843	040376	000000	000010			10
  8844	040377	777777	777735			-43
  8845	040400	000000	000043			43
  8846	040401	777777	777700			-100
  8847
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 10
KI10A2	MAC	 9-JUN-76 13:56		LOGIC SUBROUTINES                                                              *** SEQ 0231

  8848	040402	200 04 0 00 040210 	CNDPQR:	MOVE	T3,ADFLGS#
  8849	040403	603 04 0 00 100000 		TLNE	T3,100000	;CARRY 1
  8850	040404	641 04 0 00 200000 		TLC	T3,200000	;COMP CARRY 0
  8851	040405	335 00 0 00 000011 		SKIPGE	AD
  8852	040406	641 04 0 00 200000 		TLC	T3,200000
  8853	040407	402 00 0 00 046045 		SETZM	ADCOND#
  8854	040410	603 04 0 00 200000 		TLNE	T3,200000
  8855	040411	476 00 0 00 046045 		SETOM	ADCOND
  8856	040412	402 00 0 00 046153 		SETZM	IR6#
  8857	040413	402 00 0 00 046154 		SETZM	IR7#
  8858	040414	402 00 0 00 046155 		SETZM	IR8#
  8859	040415	603 16 0 00 004000 		TLNE	IR,(1B6)
  8860	040416	476 00 0 00 046153 		SETOM	IR6
  8861	040417	603 16 0 00 002000 		TLNE	IR,(1B7)
  8862	040420	476 00 0 00 046154 		SETOM	IR7
  8863	040421	603 16 0 00 001000 		TLNE	IR,(1B8)
  8864	040422	476 00 0 00 046155 		SETOM	IR8
  8865	040423	460 04 0 00 046153 		SETCM	T3,IR6		;COMPUTE COND P
  8866	040424	404 04 0 00 046154 		AND	T3,IR7
  8867	040425	202 04 0 00 046104 		MOVEM	T3,CONDP#
  8868	040426	332 00 0 00 000011 		SKIPE	AD
  8869	040427	402 00 0 00 046104 		SETZM	CONDP
  8870	040430	200 04 0 00 046153 		MOVE	T3,IR6
  8871	040431	420 04 0 00 046154 		ANDCM	T3,IR7
  8872	040432	420 04 0 00 046155 		ANDCM	T3,IR8
  8873	040433	436 04 0 00 046104 		IORM	T3,CONDP
  8874	040434	200 04 0 00 046153 		MOVE	T3,IR6
  8875	040435	420 04 0 00 046155 		ANDCM	T3,IR8
  8876	040436	336 00 0 00 000011 		SKIPN	AD
  8877	040437	201 04 0 00 000000 		MOVEI	T3,0
  8878	040440	436 04 0 00 046104 		IORM	T3,CONDP
  8879	040441	260 17 0 00 040451 		PUSHJ	P,CONDQR
  8880	040442	202 02 0 00 046105 		MOVEM	T1,CONDQ#
  8881	040443	402 00 0 00 046045 		SETZM	ADCOND
  8882	040444	335 00 0 00 000011 		SKIPGE	AD
  8883	040445	476 00 0 00 046045 		SETOM	ADCOND
  8884	040446	260 17 0 00 040451 		PUSHJ	P,CONDQR
  8885	040447	202 02 0 00 046106 		MOVEM	T1,CONDR#
  8886	040450	263 17 0 00 000000 		POPJ	P,
  8887	040451	460 04 0 00 046153 	CONDQR:	SETCM	T3,IR6
  8888	040452	404 04 0 00 046045 		AND	T3,ADCOND
  8889	040453	404 04 0 00 046155 		AND	T3,IR8
  8890	040454	202 04 0 00 000002 		MOVEM	T3,T1
  8891	040455	200 04 0 00 046153 		MOVE	T3,IR6
  8892	040456	420 04 0 00 046154 		ANDCM	T3,IR7
  8893	040457	420 04 0 00 046045 		ANDCM	T3,ADCOND
  8894	040460	436 04 0 00 000002 		IORM	T3,T1
  8895	040461	200 04 0 00 046153 		MOVE	T3,IR6
  8896	040462	420 04 0 00 046045 		ANDCM	T3,ADCOND
  8897	040463	336 00 0 00 000011 		SKIPN	AD
  8898	040464	201 04 0 00 000000 		MOVEI	T3,0
  8899	040465	436 04 0 00 000002 		IORM	T3,T1
  8900	040466	263 17 0 00 000000 		POPJ	P,
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 11
KI10A2	MAC	 9-JUN-76 13:56		TIME PULSE SUBROUTINES	IT0-IT1                                                *** SEQ 0232

  8901					SUBTTL	TIME PULSE SUBROUTINES	IT0-IT1
  8902
  8903	040467	336 04 0 00 046144 	IT0:	SKIPN	T3,INRDY#
  8904	040470	255 00 0 00 000000 		JFCL			;FIX FOR TRAPPING
  8905	040471	311 04 0 00 046276 		CAML	T3,TIME#
  8906	040472	202 04 0 00 046276 		MOVEM	T3,TIME
  8907	040473	661 03 0 00 002000 		TLO	T2,ADMBRE
  8908	040474	402 00 0 00 046307 		SETZM	XCTF
  8909	040475	135 02 0 00 045437 		LDB	T1,[POINT 4,MB,17]
  8910	040476	332 00 0 00 000002 		SKIPE	T1
  8911	040477	665 01 0 00 246000 		TLOA	T,ADFMPL+ADADD+ADPL1L
  8912	040500	661 03 0 00 004000 		TLO	T2,ADMBLE
  8913	040501	660 01 0 00 400000 		TRO	T,ABADEN
  8914	040502	201 02 0 00 000024 		MOVEI	T1,^D20
  8915	040503	272 02 0 00 046276 		ADDM	T1,TIME
  8916	040504	200 02 0 00 045407 		MOVE	T1,[POINT 4,IR,12]
  8917	040505	607 12 0 00 000037 		TLNN	MB,37
  8918	040506	202 02 0 00 046123 		MOVEM	T1,FMADREN
  8919	040507	660 00 0 00 000010 		TRO	F,DSF2CLR
  8920	040510	402 00 0 00 046251 		SETZM	STINH
  8921	040511	402 00 0 00 046177 		SETZM	MPY
  8922	040512	336 00 0 00 046310 		SKIPN	XCTPACT#
  8923	040513	254 00 0 00 040516 		JRST	.+3
  8924	040514	402 00 0 00 046311 		SETZM	XCTPRD
  8925	040515	402 00 0 00 046312 		SETZM	XCTPWR
  8926	040516	402 00 0 00 046310 		SETZM	XCTPACT
  8927	040517	607 13 0 00 000600 		TLNN	PC,TN0+TN1
  8928	040520	254 00 0 00 040527 		JRST	IT0A		;TN=0
  8929	040521	332 00 0 00 046302 		SKIPE	TRPCYC#
  8930	040522	254 00 0 00 040527 		JRST	IT0A
  8931	040523	332 00 0 00 046216 		SKIPE	PICYC#
  8932	040524	254 00 0 00 040527 		JRST	IT0A
  8933	040525	201 05 0 00 040774 		MOVEI	S,IT2
  8934	040526	263 17 0 00 000000 		POPJ	P,
  8935	040527	265 05 0 00 030065 	IT0A:	JSP	S,CPOPJ
  8936
  8937	040530	620 00 0 00 000160 	IT1:	TRZ	F,FLAG1+FLAG2+FLAG3
  8938	040531	402 00 0 00 046162 		SETZM	MAGIC#
  8939	040532	402 00 0 00 046231 		SETZM	SACBRFF
  8940	040533	660 01 0 00 004000 		TRO	T,ARRTAD
  8941	040534	476 00 0 00 046145 		SETOM	INRDYCLR#
  8942	040535	476 00 0 00 046156 		SETOM	IRLTCH#
  8943	040536	135 04 0 00 045440 		LDB	T3,[POINT 9,IR,8]
  8944	040537	306 04 0 00 000254 		CAIN	T3,254		;SKIP IF NOT JRST
  8945	040540	660 01 0 00 002000 		TRO	T,ARLTAD
  8946	040541	307 04 0 00 000137 		CAIG	T3,137
  8947	040542	305 04 0 00 000133 		CAIGE	T3,133
  8948	040543	334 00 0 00 000000 		SKIPA
  8949	040544	254 00 0 00 040747 		JRST	IT1BYT
  8950	040545	332 00 0 00 046077 		SKIPE	BYF6
  8951	040546	254 00 0 00 040760 		JRST	IT1DMV
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 12
KI10A2	MAC	 9-JUN-76 13:56		TIME PULSE SUBROUTINES	IT0-IT1                                                *** SEQ 0233

  8952	040547	603 12 0 00 000020 	IT1BY2:	TLNE	MB,(1B13)
  8953	040550	254 00 0 00 040555 		JRST	.+5
  8954	040551	332 00 0 00 046311 		SKIPE	XCTPRD
  8955	040552	476 00 0 00 046310 		SETOM	XCTPACT
  8956	040553	332 00 0 00 046312 		SKIPE	XCTPWR
  8957	040554	476 00 0 00 046310 		SETOM	XCTPACT
  8958						IFDEF	SIMASB,<
  8959	040555	305 04 0 00 000110 		CAIGE	T3,110
  8960	040556	264 00 0 00 043162 		JSR	ERR	>
  8961	040557	221 04 0 00 000003 		IMULI	T3,3		;PICKUP DISPATCH TABLE
  8962						IFNDEF	SIMASB,<
  8963						ADDI	T3,TABLE	>
  8964						IFDEF	SIMASB,<
  8965	040560	271 04 0 00 033760 		ADDI	T3,TABLE-330	>
  8966	040561	202 04 0 00 046147 	IT1A:	MOVEM	T3,INSTPT#
  8967	040562	336 02 0 04 000000 		SKIPN	T1,(T3)
  8968	040563	254 00 0 00 040731 		JRST	IT1H		;NO ENTRY
  8969	040564	332 00 0 00 046076 	IT1G:	SKIPE	BYF5
  8970	040565	254 00 0 00 040572 		JRST	.+5
  8971	040566	200 04 0 04 000002 		MOVE	T3,2(T3)
  8972	040567	405 04 0 00 000777 		ANDI	T3,777
  8973	040570	302 04 0 00 000031 		CAIE	T3,SKIPS
  8974	040571	260 17 0 00 040767 		PUSHJ	P,IT1I
  8975	040572	201 04 0 00 000140 		MOVEI	T3,SAIAC0
  8976	040573	404 04 0 00 000002 		AND	T3,T1
  8977	040574	306 04 0 00 000100 		CAIN	T3,SACBR
  8978	040575	476 00 0 00 046231 		SETOM	SACBRFF
  8979	040576	603 12 0 00 000020 	IT1C:	TLNE	MB,(1B13)
  8980	040577	254 00 0 00 040734 		JRST	IT1IND		;INDIRECT CYCLE
  8981
  8982					;*MB13 (0) ACTIONS
  8983
  8984	040600	201 05 0 00 041111 	IT1B:	MOVEI	S,FT6
  8985	040601	476 00 0 00 046132 		SETOM	INDNCLR#
  8986	040602	200 02 1 00 046147 		MOVE	T1,@INSTPT
  8987	040603	606 02 0 00 000437 		TRNN	T1,MEMREF!STORE!PCCHNG
  8988	040604	476 00 0 00 046146 		SETOM	INSNXT
  8989	040605	606 02 0 00 000437 		TRNN	T1,MEMREF!STORE!PCCHNG
  8990	040606	660 01 0 00 100000 		TRO	T,ABPCEN
  8991	040607	603 12 0 00 000037 		TLNE	MB,37
  8992	040610	254 00 0 00 040613 		JRST	.+3		;MB 13-17 NOT = 0
  8993	040611	606 02 0 00 000017 		TRNN	T1,MEMREF
  8994	040612	254 00 0 00 041113 		JRST	ETSEL		;ENABLE FETCH CYCLE ACTIONS
  8995
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 13
KI10A2	MAC	 9-JUN-76 13:56		TIME PULSE SUBROUTINES	IT0-IT1                                                *** SEQ 0234

  8996					;*MB13(0) AND MEMREF OR NOT MB14-17 = 0
  8997
  8998	040613	602 02 0 00 000017 	IT1D:	TRNE	T1,MEMREF
  8999	040614	334 00 0 00 000000 		SKIPA
  9000	040615	661 01 0 00 000060 		TLO	T,ADARPL	;NOT MEMREF
  9001	040616	602 02 0 00 000004 		TRNE	T1,FCCACR	;FCCACRT OR FCCACLT
  9002	040617	665 01 0 00 006000 		TLOA	T,ADFMPL
  9003	040620	606 02 0 00 000013 		TRNN	T1,FCE!FCEPSE!SCE!FCE2
  9004	040621	260 17 0 00 041140 		PUSHJ	P,FMACEN	;FM ADR AC EN
  9005	040622	602 02 0 00 000004 		TRNE	T1,FCCACR
  9006	040623	606 12 0 00 000017 		TRNN	MB,17
  9007	040624	254 00 0 00 040627 		JRST	.+3
  9008	040625	476 00 0 00 046161 		SETOM	LONGSET
  9009	040626	660 03 0 00 000100 		TRO	T2,SAADD
  9010	040627	602 02 0 00 000001 		TRNE	T1,FCE
  9011	040630	602 02 0 00 000420 		TRNE	T1,STORE!PCCHNG
  9012	040631	334 00 0 00 000000 		SKIPA
  9013	040632	476 00 0 00 046150 		SETOM	INSYNC#
  9014	040633	602 02 0 00 000010 		TRNE	T1,SCE
  9015	040634	602 02 0 00 000405 		TRNE	T1,FCCACR!FCE!PCCHNG
  9016	040635	334 00 0 00 000000 		SKIPA
  9017	040636	476 00 0 00 046150 		SETOM	INSYNC		;INST FETCH START SET
  9018	040637	402 00 0 00 046236 		SETZM	SCENACR#
  9019	040640	606 02 0 00 000010 		TRNN	T1,SCE
  9020	040641	254 00 0 00 040644 		JRST	.+3
  9021	040642	606 02 0 00 000004 		TRNN	T1,FCCACR
  9022	040643	476 00 0 00 046236 		SETOM	SCENACR		;SET FLAG FOR SCE AND NOT FCCACR
  9023	040644	606 02 0 00 000010 		TRNN	T1,SCE
  9024	040645	254 00 0 00 040651 		JRST	.+4
  9025	040646	602 02 0 00 000006 		TRNE	T1,FCCACL
  9026	040647	254 00 0 00 040651 		JRST	.+2
  9027	040650	660 01 0 00 200000 		TRO	T,ABABEN
  9028	040651	602 02 0 00 000004 		TRNE	T1,FCCACR
  9029	040652	254 00 0 00 040655 		JRST	.+3
  9030	040653	602 02 0 00 000003 		TRNE	T1,FCE!FCEPSE!FCE2
  9031	040654	660 01 0 00 200000 		TRO	T,ABABEN
  9032	040655	332 00 0 00 046236 		SKIPE	SCENACR
  9033	040656	476 00 0 00 046101 		SETOM	CLINSET
  9034	040657	602 02 0 00 000003 		TRNE	T1,FCE!FCEPSE
  9035	040660	476 00 0 00 046101 		SETOM	CLINSET
  9036	040661	336 00 0 00 046236 		SKIPN	SCENACR
  9037	040662	254 00 0 00 040665 		JRST	.+3
  9038	040663	606 02 0 00 000001 		TRNN	T1,FCE
  9039	040664	476 00 0 00 046174 		SETOM	MEMWR#
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 14
KI10A2	MAC	 9-JUN-76 13:56		TIME PULSE SUBROUTINES	IT0-IT1                                                *** SEQ 0235

  9040	040665	640 02 0 00 000003 		TRC	T1,FCEPSE
  9041	040666	646 02 0 00 000003 		TRCN	T1,FCEPSE
  9042	040667	476 00 0 00 046174 		SETOM	MEMWR
  9043	040670	640 02 0 00 000006 		TRC	T1,FCCACL
  9044	040671	646 02 0 00 000006 		TRCN	T1,FCCACL
  9045	040672	254 00 0 00 040675 		JRST	.+3
  9046	040673	602 02 0 00 000003 		TRNE	T1,FCEPSE!FCE!FCE2
  9047	040674	476 00 0 00 046172 		SETOM	MEMREAD#
  9048	040675	602 02 0 00 000005 		TRNE	T1,FCCACR!FCE
  9049	040676	254 00 0 00 040704 		JRST	IT1E
  9050	040677	606 02 0 00 000002 		TRNN	T1,FCE2
  9051	040700	254 00 0 00 040704 		JRST	IT1E
  9052	040701	201 05 0 00 041102 		MOVEI	S,FT7
  9053	040702	476 00 0 00 046116 		SETOM	FCE2ST
  9054	040703	254 00 0 00 040720 		JRST	IT1F+1
  9055
  9056	040704	336 00 0 00 046172 	IT1E:	SKIPN	MEMREAD
  9057	040705	332 00 0 00 046174 		SKIPE	MEMWR
  9058	040706	254 00 0 00 040717 		JRST	IT1F
  9059	040707	602 02 0 00 000004 		TRNE	T1,FCCACR
  9060	040710	201 05 0 00 041022 		MOVEI	S,FT3
  9061	040711	640 02 0 00 000006 		TRC	T1,FCCACL
  9062	040712	646 02 0 00 000006 		TRCN	T1,FCCACL
  9063	040713	201 05 0 00 041016 		MOVEI	S,FT1
  9064	040714	306 05 0 00 041022 		CAIN	S,FT3
  9065	040715	660 01 0 00 400000 		TRO	T,ABADEN
  9066	040716	263 17 0 00 000000 		POPJ	P,
  9067
  9068	040717	201 05 0 00 044336 	IT1F:	MOVEI	S,MEMST
  9069	040720	261 17 0 00 045441 		PUSH	P,["C"]
  9070	040721	262 17 0 00 046173 		POP	P,MEMSIN#
  9071	040722	607 12 0 00 000017 		TLNN	MB,17
  9072	040723	263 17 0 00 000000 		POPJ	P,
  9073	040724	336 00 0 00 046174 		SKIPN	MEMWR
  9074	040725	263 17 0 00 000000 		POPJ	P,
  9075	040726	261 17 0 00 045442 		PUSH	P,["K"]
  9076	040727	262 17 0 00 046173 		POP	P,MEMSIN
  9077	040730	263 17 0 00 000000 		POPJ	P,
  9078
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 15
KI10A2	MAC	 9-JUN-76 13:56		TIME PULSE SUBROUTINES	IT0-IT1                                                *** SEQ 0236

  9079	040731	332 00 0 04 000002 	IT1H:	SKIPE	2(T3)
  9080	040732	254 00 0 00 040564 		JRST	IT1G
  9081						IFNDEF	SIMASB,<
  9082						LDB	S,[POINT 10,IR,9]
  9083						CAIN	S,1624		;TTY I/O
  9084						JRST	TTIO
  9085						CAIN	S,1601		;PI
  9086						JRST	PIIO
  9087						CAIN	S,1600		;APR
  9088						JRST	APRIO
  9089						CAIN	S,1602		;PAG
  9090						JRST	PAGIO
  9091						CAIN	S,1776
  9092						JRST	MUOXCT		;MUUO EXECUTION
  9093					>
  9094	040733	264 00 0 00 043162 	IT1DE:	JSR	ERR
  9095
  9096	040734	332 00 0 00 046217 	IT1IND:	SKIPE	PIRDYS#
  9097	040735	254 00 0 00 041010 		JRST	PIT1A
  9098	040736	201 05 0 00 044336 		MOVEI	S,MEMST
  9099	040737	261 17 0 00 045443 		PUSH	P,["A"]
  9100	040740	262 17 0 00 046173 		POP	P,MEMSIN
  9101	040741	476 00 0 00 046101 		SETOM	CLINSET#
  9102	040742	660 01 0 00 200000 		TRO	T,ABABEN
  9103	040743	476 00 0 00 046172 		SETOM	MEMREAD#
  9104	040744	661 01 0 00 000004 		TLO	T,INFTST
  9105	040745	476 00 0 00 046222 		SETOM	PSINFT#
  9106	040746	263 17 0 00 000000 		POPJ	P,
  9107
  9108						IFNDEF	SIMASB,<
  9109					MUOXCT:	MOVEI	T3,MUOBLK	;MUUO EXECUTE INSTRUCTION
  9110						MOVEM	T3,INSTPT
  9111						JRST	IT1G
  9112					
  9113					MUOBLK:	SACINH
  9114						0
  9115						MUOXC2
  9116					>
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 16
KI10A2	MAC	 9-JUN-76 13:56		TIME PULSE SUBROUTINES	IT0-IT1                                                *** SEQ 0237

  9117	040747	332 00 0 00 046076 	IT1BYT:	SKIPE	BYF5#
  9118	040750	254 00 0 00 040547 		JRST	IT1BY2
  9119	040751	275 04 0 00 000133 		SUBI	T3,133
  9120	040752	221 04 0 00 000003 		IMULI	T3,3
  9121	040753	332 00 0 00 046077 		SKIPE	BYF6
  9122	040754	271 04 0 00 036477 		ADDI	T3,BPNINC
  9123	040755	336 00 0 00 046077 		SKIPN	BYF6
  9124	040756	271 04 0 00 036460 		ADDI	T3,BPINC
  9125	040757	254 00 0 00 040561 		JRST	IT1A
  9126
  9127	040760	307 04 0 00 000125 	IT1DMV:	CAIG	T3,125		;DMOVNM
  9128	040761	305 04 0 00 000124 		CAIGE	T3,124		;DMOVEM
  9129	040762	254 00 0 00 040547 		JRST	IT1BY2
  9130	040763	602 04 0 00 000001 		TRNE	T3,1
  9131	040764	334 04 0 00 045444 		SKIPA	T3,[DMVPT2+3]
  9132	040765	201 04 0 00 036516 		MOVEI	T3,DMVPT2
  9133	040766	254 00 0 00 040561 		JRST	IT1A
  9134
  9135	040767	135 04 0 00 045445 	IT1I:	LDB	T3,[POINT 3,IR,2]
  9136	040770	306 04 0 00 000007 		CAIN	T3,7
  9137	040771	263 17 0 00 000000 		POPJ	P,
  9138	040772	660 01 0 00 000020 		TRO	T,MQCLR
  9139	040773	263 17 0 00 000000 		POPJ	P,
  9140
  9141	040774	476 00 0 00 046301 	IT2:	SETOM	TRPCSET
  9142	040775	402 00 0 00 046215 		SETZM	PFF1#
  9143	040776	476 00 0 00 046167 		SETOM	MCSPEC#
  9144	040777	201 02 0 00 000420 		MOVEI	T1,420
  9145	041000	603 13 0 00 010000 		TLNE	PC,USERF
  9146	041001	201 02 0 00 041013 		MOVEI	T1,USR420
  9147	041002	202 02 0 00 046166 		MOVEM	T1,MCSADR
  9148	041003	135 02 0 00 045446 		LDB	T1,[POINT 2,PC,10]
  9149	041004	272 02 0 00 046166 		ADDM	T1,MCSADR
  9150	041005	402 00 0 00 046144 		SETZM	INRDY
  9151	041006	476 00 0 00 046213 		SETOM	PCP1FF
  9152	041007	254 00 0 00 040734 		JRST	IT1IND
  9153
  9154	041010	201 05 0 00 041012 	PIT1A:	MOVEI	S,PIT1
  9155	041011	263 17 0 00 000000 		POPJ	P,
  9156
  9157	041012	264 00 0 00 043162 	PIT1:	JSR	ERR
  9158
  9159						IFDEF	SIMASB,<
  9160	041013	000000	000000		USR420:	0
  9161	041014	000000	000000		USR427:	0
  9162	041015	000000	000000		USR436:	0	>
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 17
KI10A2	MAC	 9-JUN-76 13:56		TIME PULSE SUBROUTINES	-FETCH-                                                *** SEQ 0238

  9163					SUBTTL	TIME PULSE SUBROUTINES	-FETCH-
  9164
  9165	041016	660 01 0 00 007000 	FT1:	TRO	T,BRAREN!ARADEN
  9166	041017	265 05 0 00 030065 		JSP	S,CPOPJ
  9167
  9168	041020	670 01 0 00 045447 	FT2:	TDO	T,[XWD ADARPL,ABADEN+ARRARL]
  9169	041021	265 05 0 00 030065 		JSP	S,CPOPJ
  9170
  9171	041022	332 00 0 00 046202 	FT3:	SKIPE	MUUOF1
  9172	041023	332 00 0 00 046203 		SKIPE	MUUOF2
  9173	041024	334 00 0 00 000000 		SKIPA
  9174	041025	254 00 0 00 041143 		JRST	MUOES3
  9175	041026	200 02 1 00 046147 		MOVE	T1,@INSTPT
  9176	041027	606 02 0 00 000004 		TRNN	T1,FCCACR
  9177	041030	254 00 0 00 041033 		JRST	.+3
  9178	041031	606 02 0 00 000002 		TRNN	T1,PSE
  9179	041032	660 01 0 00 001000 		TRO	T,BRAREN
  9180	041033	476 00 0 00 046172 		SETOM	MEMREAD
  9181	041034	660 01 0 00 200000 		TRO	T,ABABEN
  9182	041035	476 00 0 00 046101 		SETOM	CLINSET
  9183	041036	606 02 0 00 000430 		TRNN	T1,STORE!PCCHNG!SCE
  9184	041037	476 00 0 00 046150 		SETOM	INSYNC		;INST FETCH START SET
  9185	041040	336 00 0 00 046202 		SKIPN	MUUOF1
  9186	041041	254 00 0 00 041051 		JRST	FT3A
  9187	041042	476 00 0 00 046167 		SETOM	MCSPEC
  9188	041043	261 17 0 00 045450 		PUSH	P,[430]
  9189	041044	262 17 0 00 046166 		POP	P,MCSADR
  9190	041045	607 13 0 00 010000 		TLNN	PC,USERF
  9191	041046	254 00 0 00 041051 		JRST	FT3A
  9192	041047	261 17 0 00 045451 		PUSH	P,[USR436]
  9193	041050	262 17 0 00 046166 		POP	P,MCSADR
  9194	041051	332 00 0 00 046302 	FT3A:	SKIPE	TRPCYC
  9195	041052	350 00 0 00 046166 		AOS	MCSADR
  9196	041053	606 02 0 00 000010 		TRNN	T1,SCE
  9197	041054	254 00 0 00 041057 		JRST	.+3
  9198	041055	261 17 0 00 045452 		PUSH	P,["B"]		;NEXT CYCLE FT4
  9199	041056	334 00 0 00 000000 		SKIPA
  9200	041057	261 17 0 00 045441 		PUSH	P,["C"]		;NEXT CYCLE FT6
  9201	041060	262 17 0 00 046173 		POP	P,MEMSIN
  9202	041061	201 05 0 00 044336 		MOVEI	S,MEMST
  9203	041062	263 17 0 00 000000 		POPJ	P,
  9204
  9205	041063	670 01 0 00 045337 	FT4:	TDO	T,[XWD ADBRPL,ABADEN]
  9206	041064	265 05 0 00 030065 		JSP	S,CPOPJ
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 18
KI10A2	MAC	 9-JUN-76 13:56		TIME PULSE SUBROUTINES	-FETCH-                                                *** SEQ 0239

  9207	041065	660 01 0 00 200000 	FT5:	TRO	T,ABABEN
  9208	041066	476 00 0 00 046101 		SETOM	CLINSET
  9209	041067	476 00 0 00 046174 		SETOM	MEMWR
  9210	041070	261 17 0 00 045441 		PUSH	P,["C"]
  9211	041071	262 17 0 00 046173 		POP	P,MEMSIN	;NEXT CYCLE FT6
  9212	041072	200 02 1 00 046147 		MOVE	T1,@INSTPT
  9213	041073	606 00 0 00 000400 		TRNN	PCCHNG
  9214	041074	476 00 0 00 046150 		SETOM	INSYNC		;INST FETCH START SET
  9215	041075	201 05 0 00 044336 		MOVEI	S,MEMST
  9216	041076	263 17 0 00 000000 		POPJ	P,
  9217
  9218	041077	260 17 0 00 041140 	FT8:	PUSHJ	P,FMACEN
  9219	041100	201 05 0 00 041111 		MOVEI	S,FT6
  9220	041101	263 17 0 00 000000 		POPJ	P,
  9221
  9222	041102	670 01 0 00 045453 	FT7:	TDO	T,[XWD ADADD+ADCR36+ADBRPL,BRAREN]
  9223	041103	661 03 0 00 000400 		TLO	T2,ADMSKG
  9224	041104	476 00 0 00 046101 		SETOM	CLINSET
  9225	041105	201 05 0 00 044336 		MOVEI	S,MEMST
  9226	041106	210 04 0 00 044760 		MOVN	T3,VERTIM
  9227	041107	272 04 0 00 046276 		ADDM	T3,TIME
  9228	041110	263 17 0 00 000000 		POPJ	P,
  9229
  9230	041111	260 17 0 00 041140 	FT6:	PUSHJ	P,FMACEN
  9231	041112	476 00 0 00 046100 		SETOM	CLINCLR#
  9232	041113	200 02 1 00 046147 	ETSEL:	MOVE	T1,@INSTPT
  9233	041114	602 02 0 00 040000 		TRNE	T1,LNGCYC
  9234	041115	476 00 0 00 046161 		SETOM	LONGSET#
  9235	041116	200 04 0 00 000002 		MOVE	T3,T1
  9236	041117	630 04 0 00 045454 		TDZ	T3,[XWD 3,077777]
  9237	041120	434 01 0 00 000004 		IOR	T,T3
  9238	041121	201 05 0 00 041204 		MOVEI	S,ET2S
  9239	041122	603 02 0 00 000002 		TLNE	T1,ET1
  9240	041123	201 05 0 00 041172 		MOVEI	S,ET1S
  9241	041124	603 02 0 00 000001 		TLNE	T1,ET0
  9242	041125	201 05 0 00 041144 		MOVEI	S,ET0S
  9243	041126	602 02 0 00 000020 		TRNE	T1,STORE
  9244	041127	254 00 0 00 041132 		JRST	.+3
  9245	041130	336 00 0 00 046300 		SKIPN	TNCLRI
  9246	041131	476 00 0 00 046303 		SETOM	TRPSAT#
  9247	041132	640 01 0 00 022000 		TRC	T,ARFLGS
  9248	041133	646 01 0 00 022000 		TRCN	T,ARFLGS
  9249	041134	476 00 0 00 046303 		SETOM	TRPSAT
  9250	041135	135 04 0 00 045455 		LDB	T3,[POINT 5,T1,26]
  9251	041136	256 00 0 04 037411 		XCT	AUXTAB(T3)	;FETCH CYCLE ACTIONS
  9252	041137	263 17 0 00 000000 		POPJ	P,
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 19
KI10A2	MAC	 9-JUN-76 13:56		TIME PULSE SUBROUTINES	-FETCH-                                                *** SEQ 0240

  9253	041140	200 04 0 00 045407 	FMACEN:	MOVE	T3,[POINT 4,IR,12]
  9254	041141	202 04 0 00 046123 		MOVEM	T3,FMADREN#
  9255	041142	263 17 0 00 000000 		POPJ	P,
  9256
  9257						IFNDEF	SIMASB,<
  9258					MUOES3:	MOVEI	T1,MUUO3
  9259						MOVEM	T1,INSTPT
  9260						JRST	FT3+4	>
  9261
  9262						IFDEF	SIMASB,<
  9263	041143	264 00 0 00 043162 	MUOES3:	JSR	ERR	>
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 20
KI10A2	MAC	 9-JUN-76 13:56		TIME PULSE SUBROUTINES	-EXECUTE-                                              *** SEQ 0241

  9264					SUBTTL	TIME PULSE SUBROUTINES	-EXECUTE-
  9265
  9266	041144	200 02 0 00 046147 	ET0S:	MOVE	T1,INSTPT
  9267	041145	200 04 0 02 000000 		MOVE	T3,(T1)
  9268	041146	554 02 0 02 000001 		HLRZ	T1,1(T1)
  9269	041147	200 02 0 02 000000 		MOVE	T1,(T1)
  9270	041150	201 05 0 00 041204 		MOVEI	S,ET2S
  9271	041151	603 04 0 00 000002 		TLNE	T3,ET1
  9272	041152	201 05 0 00 041172 		MOVEI	S,ET1S
  9273	041153	602 04 0 00 000020 		TRNE	T3,STORE
  9274	041154	254 00 0 00 041163 		JRST	ET0SA
  9275
  9276	041155	434 01 0 00 000002 	ETPULS:	IOR	T,T1
  9277	041156	620 01 0 00 000777 		TRZ	T,777
  9278	041157	405 02 0 00 000777 		ANDI	T1,777
  9279	041160	602 02 0 00 000777 		TRNE	T1,777
  9280	041161	254 00 0 02 036523 		JRST	ETAB(T1)
  9281	041162	263 17 0 00 000000 		POPJ	P,
  9282
  9283	041163	201 05 0 00 000106 	ET0SA:	MOVEI	S,"F"
  9284	041164	202 05 0 00 046173 		MOVEM	S,MEMSIN
  9285	041165	476 00 0 00 046174 		SETOM	MEMWR
  9286	041166	476 00 0 00 046101 		SETOM	CLINSET
  9287	041167	201 05 0 00 044336 		MOVEI	S,MEMST
  9288	041170	660 01 0 00 200000 		TRO	T,ABABEN
  9289	041171	254 00 0 00 041155 		JRST	ETPULS
  9290
  9291	041172	200 02 0 00 046147 	ET1S:	MOVE	T1,INSTPT
  9292	041173	550 02 0 02 000001 		HRRZ	T1,1(T1)
  9293	041174	200 02 0 02 000000 		MOVE	T1,(T1)
  9294	041175	476 00 0 00 046100 		SETOM	CLINCLR
  9295	041176	200 04 1 00 046147 		MOVE	T3,@INSTPT
  9296	041177	602 04 0 00 000020 		TRNE	T3,STORE
  9297	041200	254 00 0 00 041203 		JRST	.+3
  9298	041201	336 00 0 00 046300 		SKIPN	TNCLRI
  9299	041202	476 00 0 00 046303 		SETOM	TRPSAT
  9300	041203	265 05 0 00 041155 		JSP	S,ETPULS
  9301
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 21
KI10A2	MAC	 9-JUN-76 13:56		TIME PULSE SUBROUTINES	-EXECUTE-                                              *** SEQ 0242

  9302	041204	402 00 0 00 046171 	ET2S:	SETZM	MEMGOINH
  9303	041205	200 04 1 00 046147 		MOVE	T3,@INSTPT
  9304	041206	135 02 0 00 045407 		LDB	T1,[POINT 4,IR,12]
  9305	041207	640 04 0 00 000140 		TRC	T3,SAIAC0
  9306	041210	642 04 0 00 000140 		TRCE	T3,SAIAC0
  9307	041211	254 00 0 00 041215 		JRST	ET2SA
  9308	041212	620 04 0 00 000140 		TRZ	T3,SAIAC0
  9309	041213	336 00 0 00 000002 		SKIPN	T1
  9310	041214	660 04 0 00 000040 		TRO	T3,SACINH
  9311	041215	200 02 0 00 046147 	ET2SA:	MOVE	T1,INSTPT
  9312	041216	200 02 0 02 000002 		MOVE	T1,2(T1)
  9313	041217	602 04 0 00 000001 		TRNE	T3,FCE
  9314	041220	606 04 0 00 000002 		TRNN	T3,PSE
  9315	041221	602 04 0 00 000030 		TRNE	T3,SCE+STORE
  9316	041222	254 00 0 00 041225 		JRST	ET2SB
  9317	041223	602 04 0 00 000040 		TRNE	T3,SACINH
  9318	041224	254 00 0 00 041230 		JRST	ET2SC
  9319	041225	336 00 0 00 046251 	ET2SB:	SKIPN	STINH#
  9320	041226	201 05 0 00 041243 		MOVEI	S,ST1
  9321	041227	334 00 0 00 000000 		SKIPA
  9322	041230	201 05 0 00 043127 	ET2SC:	MOVEI	S,INDONE
  9323	041231	332 00 0 00 046251 		SKIPE	STINH#
  9324	041232	254 00 0 00 041155 		JRST	ETPULS
  9325	041233	606 04 0 00 000040 		TRNN	T3,SACINH
  9326	041234	476 00 0 00 046126 		SETOM	FMWRSET#
  9327	041235	254 00 0 00 041155 		JRST	ETPULS
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 22
KI10A2	MAC	 9-JUN-76 13:56		TIME PULSE SUBROUTINES	-STORE-                                                *** SEQ 0243

  9328					SUBTTL	TIME PULSE SUBROUTINES	-STORE-
  9329
  9330	041236	332 00 0 00 046072 	ST1A:	SKIPE	BLTF1#
  9331	041237	254 00 0 00 041333 		JRST	ST1B
  9332	041240	606 02 0 00 000200 		TRNN	T1,SAC2
  9333	041241	254 00 0 00 041420 		JRST	ST5A
  9334	041242	254 00 0 00 041377 		JRST	ST3A
  9335
  9336	041243	402 00 0 00 046231 	ST1:	SETZM	SACBRFF
  9337	041244	332 00 0 00 046072 		SKIPE	BLTF1
  9338	041245	661 01 0 00 000002 		TLO	T,PCCLK
  9339	041246	554 02 0 00 000016 		HLRZ	T1,IR
  9340	041247	405 02 0 00 777000 		ANDI	T1,777000
  9341	041250	306 02 0 00 265000 		CAIN	T1,(JSP)
  9342	041251	661 01 0 00 000004 		TLO	T,INFTST
  9343	041252	306 02 0 00 264000 		CAIN	T1,(JSR)
  9344	041253	661 01 0 00 000004 		TLO	T,INFTST
  9345	041254	306 02 0 00 260000 		CAIN	T1,(PUSHJ)
  9346	041255	661 01 0 00 000004 		TLO	T,INFTST
  9347	041256	306 02 0 00 263000 		CAIN	T1,(POPJ)
  9348	041257	661 01 0 00 000004 		TLO	T,INFTST
  9349	041260	306 02 0 00 120000 		CAIN	T1,(DMOVE)
  9350	041261	661 01 0 00 000004 		TLO	T,INFTST
  9351	041262	306 02 0 00 257000 		CAIN	T1,(MAP)
  9352	041263	661 01 0 00 000004 		TLO	T,INFTST
  9353	041264	302 02 0 00 251000 		CAIE	T1,(BLT)
  9354	041265	254 00 0 00 041270 		JRST	.+3
  9355	041266	336 00 0 00 046072 		SKIPN	BLTF1
  9356	041267	661 01 0 00 000004 		TLO	T,INFTST
  9357	041270	302 02 0 00 254000 		CAIE	T1,(JRST)
  9358	041271	254 00 0 00 041274 		JRST	.+3
  9359	041272	603 16 0 00 000300 		TLNE	IR,(1B10+1B11)
  9360	041273	661 01 0 00 000004 		TLO	T,INFTST
  9361	041274	405 02 0 00 700000 		ANDI	T1,700000
  9362	041275	306 02 0 00 700000 		CAIN	T1,700000
  9363	041276	254 00 0 00 041435 		JRST	ST1C		;I/O
  9364	041277	200 02 0 00 046147 		MOVE	T1,INSTPT
  9365	041300	200 02 0 02 000002 		MOVE	T1,2(T1)
  9366	041301	405 02 0 00 000777 		ANDI	T1,777
  9367	041302	306 02 0 00 000022 		CAIN	T1,COMP
  9368	041303	661 01 0 00 000004 		TLO	T,INFTST
  9369	041304	306 02 0 00 000031 		CAIN	T1,SKIPS
  9370	041305	661 01 0 00 000004 		TLO	T,INFTST
  9371	041306	306 02 0 00 000054 		CAIN	T1,JUMPS
  9372	041307	661 01 0 00 000004 		TLO	T,INFTST
  9373	041310	306 02 0 00 000001 		CAIN	T1,AOBJX
  9374	041311	661 01 0 00 000004 		TLO	T,INFTST
  9375	041312	306 02 0 00 000002 		CAIN	T1,AOBJX+1
  9376	041313	661 01 0 00 000004 		TLO	T,INFTST
  9377	041314	306 02 0 00 000663 		CAIN	T1,MUUO32
  9378	041315	661 01 0 00 000004 		TLO	T,INFTST
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 23
KI10A2	MAC	 9-JUN-76 13:56		TIME PULSE SUBROUTINES	-STORE-                                                *** SEQ 0244

  9379	041316	332 00 0 00 046202 	ST1D:	SKIPE	MUUOF1
  9380	041317	660 00 0 00 010000 		TRO	F,MUOF2C
  9381	041320	332 00 0 00 046203 		SKIPE	MUUOF2
  9382	041321	660 00 0 00 001000 		TRO	F,MUOF1S
  9383	041322	200 02 1 00 046147 		MOVE	T1,@INSTPT
  9384	041323	602 02 0 00 000200 		TRNE	T1,SAC2
  9385	041324	260 17 0 00 042722 		PUSHJ	P,FMAC2E
  9386	041325	640 02 0 00 000001 		TRC	T1,FCE
  9387	041326	606 02 0 00 000005 		TRNN	T1,FCCACR+FCE
  9388	041327	606 02 0 00 000002 		TRNN	T1,PSE
  9389	041330	602 02 0 00 000030 		TRNE	T1,SCE+STORE
  9390	041331	334 00 0 00 000000 		SKIPA
  9391	041332	254 00 0 00 041236 		JRST	ST1A
  9392
  9393	041333	336 00 0 00 046250 	ST1B:	SKIPN	STINAC
  9394	041334	374 00 0 00 046101 		SOSA	CLINSET#
  9395	041335	562 14 0 00 046122 		HRROM	MA,FMADMA#
  9396	041336	661 03 0 00 000002 		TLO	T2,MBAREN
  9397	041337	265 05 0 00 030065 		JSP	S,CPOPJ
  9398
  9399	041340	200 02 1 00 046147 	ST2:	MOVE	T1,@INSTPT
  9400	041341	476 00 0 00 046161 		SETOM	LONGSET
  9401	041342	201 05 0 00 041400 		MOVEI	S,ST4
  9402	041343	332 04 0 00 046250 		SKIPE	T3,STINAC#
  9403	041344	476 00 0 00 046126 		SETOM	FMWRSET#
  9404	041345	402 00 0 00 046250 		SETZM	STINAC#
  9405	041346	202 04 0 00 046125 		MOVEM	T3,FMSINAC
  9406	041347	326 04 0 00 041357 		JUMPN	T3,ST2A
  9407	041350	200 04 0 00 046276 		MOVE	T3,TIME
  9408	041351	271 04 0 00 000144 		ADDI	T3,^D100
  9409	041352	315 04 0 00 046175 		CAMGE	T3,MEMWRWT#
  9410	041353	200 04 0 00 046175 		MOVE	T3,MEMWRWT
  9411	041354	202 04 0 00 046276 		MOVEM	T3,TIME
  9412	041355	260 17 0 00 044631 		PUSHJ	P,WRRST
  9413	041356	200 02 1 00 046147 		MOVE	T1,@INSTPT
  9414	041357	332 00 0 00 046072 	ST2A:	SKIPE	BLTF1
  9415	041360	254 00 0 00 043167 		JRST	BLTT1X
  9416	041361	332 00 0 00 046215 		SKIPE	PFF1
  9417	041362	254 00 0 00 041441 		JRST	PFX1
  9418	041363	554 04 0 00 000016 		HLRZ	T3,IR
  9419	041364	420 04 0 00 046077 		ANDCM	T3,BYF6
  9420	041365	640 04 0 00 124000 		TRC	T3,(DMOVEM)
  9421	041366	606 04 0 00 776000 		TRNN	T3,776000
  9422	041367	254 00 0 00 041422 		JRST	ST2B
  9423	041370	332 00 0 00 046203 		SKIPE	MUUOF2
  9424	041371	254 00 0 00 041434 		JRST	ST2C
  9425	041372	332 00 0 00 046202 		SKIPE	MUUOF1
  9426	041373	254 00 0 00 041021 		JRST	FT2+1
  9427	041374	606 02 0 00 000200 		TRNN	T1,SAC2
  9428	041375	254 00 0 00 041411 		JRST	ST4A
  9429	041376	265 05 0 00 030065 		JSP	S,CPOPJ
  9430
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 24
KI10A2	MAC	 9-JUN-76 13:56		TIME PULSE SUBROUTINES	-STORE-                                                *** SEQ 0245

  9431	041377				ST3:
  9432	041377	265 05 0 00 030065 	ST3A:	JSP	S,CPOPJ
  9433
  9434	041400	476 00 0 00 046064 	ST4:	SETOM	ARMQEN
  9435	041401	476 00 0 00 046126 		SETOM	FMWRSET
  9436	041402	554 02 0 00 000016 		HLRZ	T1,IR
  9437	041403	405 02 0 00 777000 		ANDI	T1,777000
  9438	041404	306 02 0 00 121000 		CAIN	T1,(DMOVN)
  9439	041405	621 07 0 00 400000 		TLZ	MQ,(1B0)
  9440	041406	640 02 0 00 110000 		TRC	T1,110000	;DFAD
  9441	041407	606 02 0 00 774000 		TRNN	T1,774000
  9442	041410	621 07 0 00 400000 		TLZ	MQ,(1B0)
  9443	041411	265 05 0 00 030065 	ST4A:	JSP	S,CPOPJ
  9444
  9445	041412	554 04 0 00 000016 	ST5:	HLRZ	T3,IR
  9446	041413	640 04 0 00 124000 		TRC	T3,(DMOVEM)
  9447	041414	606 04 0 00 776000 		TRNN	T3,776000
  9448	041415	402 00 0 00 046077 		SETZM	BYF6
  9449	041416	336 00 0 00 046077 		SKIPN	BYF6
  9450	041417	621 13 0 00 020000 		TLZ	PC,BIS
  9451	041420	201 05 0 00 043127 	ST5A:	MOVEI	S,INDONE
  9452	041421	263 17 0 00 000000 		POPJ	P,
  9453
  9454	041422	661 01 0 00 000600 	ST2B:	TLO	T,ADBRPL
  9455	041423	660 01 0 00 400000 		TRO	T,ABADEN
  9456	041424	201 04 0 00 036516 		MOVEI	T3,DMVPT2
  9457	041425	603 16 0 00 001000 		TLNE	IR,(1B8)
  9458	041426	201 04 0 00 036521 		MOVEI	T3,DMVPT2+3
  9459	041427	202 04 0 00 046147 		MOVEM	T3,INSTPT
  9460	041430	476 00 0 00 046077 		SETOM	BYF6
  9461	041431	661 13 0 00 020000 		TLO	PC,BIS
  9462	041432	201 05 0 00 041111 		MOVEI	S,FT6
  9463	041433	263 17 0 00 000000 		POPJ	P,
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 25
KI10A2	MAC	 9-JUN-76 13:56		TIME PULSE SUBROUTINES	-STORE-                                                *** SEQ 0246

  9464						IFNDEF	SIMASB,<
  9465					ST2C:	MOVEI	T3,MUUO2
  9466						MOVEM	T3,INSTPT
  9467						MOVEI	S,FT6
  9468						POPJ	P,	>
  9469
  9470						IFDEF	SIMASB,<
  9471	041434	264 00 0 00 043162 	ST2C:	JSR	ERR	>
  9472
  9473	041435	135 02 0 00 045456 	ST1C:	LDB	T1,[POINT 2,IR,11]
  9474	041436	306 02 0 00 000003 		CAIN	T1,3		;CONSX
  9475	041437	661 01 0 00 000004 		TLO	T,INFTST
  9476	041440	254 00 0 00 041316 		JRST	ST1D
  9477
  9478	041441	402 00 0 00 046076 	PFX1:	SETZM	BYF5
  9479	041442	402 00 0 00 046156 		SETZM	IRLTCH
  9480	041443	200 04 0 00 045437 		MOVE	T3,[POINT 4,MB,17]
  9481	041444	202 04 0 00 046123 		MOVEM	T3,FMADREN
  9482	041445	201 05 0 00 040774 		MOVEI	S,IT2
  9483	041446	263 17 0 00 000000 		POPJ	P,
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 26
KI10A2	MAC	 9-JUN-76 13:56		TIME PULSE SUBROUTINES	-DIVIDE SUBRTN-                                        *** SEQ 0247

  9484					SUBTTL	TIME PULSE SUBROUTINES	-DIVIDE SUBRTN-
  9485
  9486	041447	402 00 0 00 046162 	DST1:	SETZM	MAGIC		;FOR SIMULATOR
  9487	041450	660 01 0 00 000204 		TRO	T,ARSHLT+MQSHLT
  9488	041451	476 00 0 00 046060 		SETOM	ARGOLT
  9489	041452	321 11 0 00 043002 		JUMPL	AD,SCTC5
  9490	041453	660 00 0 00 000010 		TRO	F,DSF2CLR
  9491	041454	265 05 0 00 030065 		JSP	S,CPOPJ
  9492
  9493	041455	661 13 0 00 400240 	DST2:	TLO	PC,AROV!TN1!DCK
  9494	041456	204 02 0 00 000016 		MOVS	T1,IR
  9495	041457	405 02 0 00 770000 		ANDI	T1,770000
  9496	041460	306 02 0 00 170000 		CAIN	T1,170000
  9497	041461	661 13 0 00 040000 		TLO	PC,FOV
  9498	041462	200 02 1 00 046147 		MOVE	T1,@INSTPT
  9499	041463	602 02 0 00 000010 		TRNE	T1,SCE
  9500	041464	260 17 0 00 044647 		PUSHJ	P,INFT3
  9501	041465	254 00 0 00 041420 		JRST	ST5A
  9502
  9503	041466	660 01 0 00 000004 	DST3:	TRO	T,MQSHLT
  9504	041467	660 00 0 00 000010 		TRO	F,DSF2CLR
  9505	041470	607 16 0 00 200000 		TLNN	IR,(1B1)
  9506	041471	254 00 0 00 041475 		JRST	DST3A
  9507	041472	200 02 1 00 046147 		MOVE	T1,@INSTPT
  9508	041473	602 02 0 00 000010 		TRNE	T1,SCE
  9509	041474	260 17 0 00 044716 		PUSHJ	P,MEMWSS
  9510	041475	660 01 0 00 006000 	DST3A:	TRO	T,ARADEN
  9511	041476	606 00 0 00 000020 		TRNN	F,FLAG1
  9512	041477	660 03 0 00 000303 		TRO	T2,SAZERO+SAPL1+SAADD
  9513	041500	660 03 0 00 020040 		TRO	T2,SCSAEN+SASCMI
  9514	041501	265 05 0 00 030065 		JSP	S,CPOPJ
  9515
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 27
KI10A2	MAC	 9-JUN-76 13:56		TIME PULSE SUBROUTINES	-DIVIDE SUBRTN-                                        *** SEQ 0248

  9516	041502	606 07 0 00 000001 	DST4:	TRNN	MQ,1
  9517	041503	660 01 0 00 006000 		TRO	T,ARADEN
  9518	041504	602 00 0 00 000100 		TRNE	F,FLAG3
  9519	041505	665 01 0 00 060110 		TLOA	T,ADARMI+ADCR36+ADADD+ADMAGIC
  9520	041506	661 01 0 00 000060 		TLO	T,ADARPL
  9521	041507	660 03 0 00 020000 		TRO	T2,SCSAEN
  9522	041510	265 05 0 00 030065 		JSP	S,CPOPJ
  9523
  9524	041511	476 00 0 00 046064 	DST5:	SETOM	ARMQEN
  9525	041512	660 01 0 00 000010 		TRO	T,MQADEN
  9526	041513	200 02 0 00 000010 		MOVE	T1,BR
  9527	041514	602 00 0 00 000100 		TRNE	F,FLAG3
  9528	041515	450 02 0 00 000000 		SETCA	T1,
  9529	041516	321 02 0 00 041536 		JUMPL	T1,DST5A
  9530	041517	603 16 0 00 204000 		TLNE	IR,204000
  9531	041520	254 00 0 00 041526 		JRST	DST5D
  9532	041521	201 05 0 00 041666 	DST5E:	MOVEI	S,NRT1
  9533	041522	476 00 0 00 046161 		SETOM	LONGSET
  9534	041523	660 03 0 00 000020 		TRO	T2,SASCPL
  9535	041524	661 01 0 00 000060 		TLO	T,ADARPL
  9536	041525	263 17 0 00 000000 		POPJ	P,
  9537
  9538	041526	607 16 0 00 200000 	DST5D:	TLNN	IR,(1B1)
  9539	041527	254 00 0 00 041535 		JRST	DST5F
  9540	041530	201 05 0 00 041243 	DST5B:	MOVEI	S,ST1
  9541	041531	200 02 1 00 046147 	DST5C:	MOVE	T1,@INSTPT
  9542	041532	606 02 0 00 000040 		TRNN	T1,SACINH
  9543	041533	476 00 0 00 046126 		SETOM	FMWRSET
  9544	041534	263 17 0 00 000000 		POPJ	P,
  9545
  9546	041535	665 01 0 00 060070 	DST5F:	TLOA	T,ADARPL+ADCR36+ADMAGIC+ADADD
  9547	041536	661 01 0 00 060110 	DST5A:	TLO	T,ADARMI+ADCR36+ADADD+ADMAGIC
  9548	041537	265 05 0 00 030065 		JSP	S,CPOPJ
  9549
  9550	041540	660 01 0 00 006000 	DST6:	TRO	T,ARADEN
  9551	041541	603 16 0 00 200000 		TLNE	IR,(1B1)
  9552	041542	254 00 0 00 041530 		JRST	DST5B
  9553	041543	603 16 0 00 004000 		TLNE	IR,(1B6)
  9554	041544	640 01 0 00 006120 		TRC	T,ARADEN+ARSHRT+MQCLR
  9555	041545	254 00 0 00 041521 		JRST	DST5E
  9556
  9557	041546	402 00 0 00 046127 	FXUSET:	SETZM	FXUH
  9558	041547	335 00 0 00 046226 		SKIPGE	SA
  9559	041550	476 00 0 00 046127 		SETOM	FXUH
  9560	041551	263 17 0 00 000000 		POPJ	P,
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 28
KI10A2	MAC	 9-JUN-76 13:56		TIME PULSE SUBROUTINES	-FLOATING DIVIDE-                                      *** SEQ 0249

  9561					SUBTTL	TIME PULSE SUBROUTINES	-FLOATING DIVIDE-
  9562
  9563	041552	607 06 0 00 400000 	FDT0:	TLNN	AR,(1B0)
  9564	041553	476 00 0 00 046066 		SETOM	ARSMR
  9565	041554	603 06 0 00 400000 		TLNE	AR,(1B0)
  9566	041555	476 00 0 00 046061 		SETOM	ARI08
  9567	041556	660 01 0 00 000400 		TRO	T,ARCLR
  9568	041557	661 01 0 00 000060 		TLO	T,ADARPL
  9569	041560	660 03 0 00 400000 		TRO	T2,FESAEN
  9570	041561	554 02 0 00 000016 		HLRZ	T1,IR
  9571	041562	640 02 0 00 171000 		TRC	T1,(FDVL)
  9572	041563	602 02 0 00 777000 		TRNE	T1,777000
  9573	041564	254 00 0 00 041575 		JRST	FDT1A
  9574	041565	660 01 0 00 000010 		TRO	T,MQADEN
  9575	041566	602 00 0 00 000100 		TRNE	F,FLAG3
  9576	041567	616 11 0 00 045411 		TDNN	AD,[777777777]
  9577	041570	254 00 0 00 041572 		JRST	.+2
  9578	041571	661 01 0 00 040000 		TLO	T,ADADD
  9579	041572	265 05 0 00 030065 		JSP	S,CPOPJ
  9580
  9581	041573	661 01 0 00 000060 	FDT1:	TLO	T,ADARPL
  9582	041574	660 01 0 00 006004 		TRO	T,ARADEN+MQSHLT
  9583	041575	660 00 0 00 000004 	FDT1A:	TRO	F,DSF2SET
  9584	041576	265 05 0 00 030065 		JSP	S,CPOPJ
  9585
  9586	041577	660 01 0 00 000102 	FDT2:	TRO	T,ARSHRT+MQSHRT
  9587	041600	603 16 0 00 004000 		TLNE	IR,4000
  9588	041601	664 03 0 00 000011 		TROA	T2,SAMI33
  9589	041602	660 03 0 00 000012 		TRO	T2,SAMI32
  9590	041603	265 05 0 00 030065 		JSP	S,CPOPJ
  9591
  9592	041604	660 03 0 00 020000 	FDT3:	TRO	T2,SCSAEN
  9593	041605	660 01 0 00 000204 		TRO	T,MQSHLT+ARSHLT
  9594	041606	476 00 0 00 046161 		SETOM	LONGSET
  9595	041607	201 05 0 00 041614 		MOVEI	S,FDT4
  9596	041610	321 11 0 00 030065 		JUMPL	AD,CPOPJ
  9597	041611	201 05 0 00 041455 		MOVEI	S,DST2
  9598	041612	660 00 0 00 000010 		TRO	F,DSF2CLR
  9599	041613	263 17 0 00 000000 		POPJ	P,
  9600
  9601	041614	660 01 0 00 000204 	FDT4:	TRO	T,MQSHLT+ARSHLT
  9602	041615	201 05 0 00 043005 		MOVEI	S,SCT2
  9603	041616	260 17 0 00 041140 		PUSHJ	P,FMACEN
  9604	041617	476 00 0 00 046060 		SETOM	ARGOLT
  9605	041620	321 11 0 00 030065 		JUMPL	AD,CPOPJ
  9606	041621	660 03 0 00 200000 		TRO	T2,SCSCP1
  9607	041622	660 00 0 00 000020 		TRO	F,FLAG1
  9608	041623	263 17 0 00 000000 		POPJ	P,
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 29
KI10A2	MAC	 9-JUN-76 13:56		TIME PULSE SUBROUTINES	-FLOATING DIVIDE-                                      *** SEQ 0250

  9609	041624	660 01 0 00 007000 	FDT5:	TRO	T,BRAREN+ARADEN
  9610	041625	476 00 0 00 046126 		SETOM	FMWRSET
  9611	041626	660 03 0 00 022120 		TRO	T2,SAAREX+SCSAEN+SASCPL+SAADD
  9612	041627	602 00 0 00 000020 		TRNE	F,FLAG1
  9613	041630	660 03 0 00 000200 		TRO	T2,SAPL1
  9614	041631	265 05 0 00 030065 		JSP	S,CPOPJ
  9615
  9616	041632	476 00 0 00 046064 	FDT6:	SETOM	ARMQEN
  9617	041633	260 17 0 00 042722 		PUSHJ	P,FMAC2E
  9618	041634	402 00 0 00 046231 		SETZM	SACBRFF
  9619	041635	661 01 0 00 000060 		TLO	T,ADARPL
  9620	041636	476 00 0 00 046161 		SETOM	LONGSET
  9621	041637	660 03 0 00 000040 		TRO	T2,SASCMI
  9622	041640	606 00 0 00 000100 		TRNN	F,FLAG3
  9623	041641	640 03 0 00 000060 		TRC	T2,SASCPL+SASCMI
  9624	041642	265 05 0 00 037245 		JSP	S,FIX1A
  9625
  9626	041643	476 00 0 00 046126 	FDT7:	SETOM	FMWRSET
  9627	041644	201 05 0 00 041412 		MOVEI	S,ST5
  9628	041645	201 02 0 15 000200 		MOVEI	T1,200(SC)
  9629	041646	606 02 0 00 000400 		TRNN	T1,400
  9630	041647	336 00 0 00 000011 		SKIPN	AD
  9631	041650	664 01 0 00 000400 		TROA	T,ARCLR
  9632	041651	476 00 0 00 046057 		SETOM	ARESAEN
  9633	041652	263 17 0 00 000000 		POPJ	P,
  9634
  9635	041653	660 03 0 00 020000 	FMT1:	TRO	T2,SCSAEN
  9636	041654	670 01 0 00 045457 		TDO	T,[XWD ADARPL,ARCLR+MQADEN]
  9637	041655	201 05 0 00 043005 		MOVEI	S,SCT2
  9638	041656	402 00 0 00 046060 		SETZM	ARGOLT
  9639	041657	254 00 0 00 044014 		JRST	MPYFCN
  9640
  9641	041660	660 03 0 00 000323 	FMT2:	TRO	T2,SAPL1+SAADD+SASCPL+SAZERO
  9642	041661	331 00 1 00 046124 		SKIPL	@FMREG
  9643	041662	640 03 0 00 000060 		TRC	T2,SASCPL+SASCMI
  9644	041663	660 01 0 00 000204 		TRO	T,ARSHLT+MQSHLT
  9645	041664	661 01 0 00 000060 	FMT2A:	TLO	T,ADARPL
  9646	041665	265 05 0 00 037245 		JSP	S,FIX1A
  9647
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 30
KI10A2	MAC	 9-JUN-76 13:56		TIME PULSE SUBROUTINES	-NORMALIZE-                                            *** SEQ 0251

  9648					SUBTTL	TIME PULSE SUBROUTINES	-NORMALIZE-
  9649
  9650					XLIST
  9651					LIST
  9652
  9653	041666	660 03 0 00 020000 	NRT1:	TRO	T2,SCSAEN		;SC SCAD EN
  9654	041667	661 01 0 00 000060 		TLO	T,ADARPL		;AD AR + EN
  9655	041670	260 17 0 00 041546 		PUSHJ	P,FXUSET		;SCAD-1(1):AR FXU HOLD SET
  9656
  9657	041671	402 00 0 00 046211 		SETZM	NRRND#
  9658	041672	402 00 0 00 046210 		SETZM	NRPOS#
  9659	041673	402 00 0 00 046207 		SETZM	NRNEG#
  9660
  9661	041674	607 16 0 00 004000 		TLNN	IR,(1B6)
  9662	041675	254 00 0 00 041700 		JRST	.+3
  9663	041676	603 07 0 00 001000 		TLNE	MQ,(1B8)
  9664	041677	476 00 0 00 046211 		SETOM	NRRND		;IR06(1)^MQ08(1):NR RND
  9665
  9666	041700	321 06 0 00 041712 		JUMPL	AR,NRT1X	;JUMP IF AR00(1)
  9667	041701	603 06 0 00 000400 		TLNE	AR,(1B9)
  9668	041702	476 00 0 00 046210 		SETOM	NRPOS		;AR00(0)^AR09(1):NR POS
  9669
  9670	041703	200 04 0 00 000016 		MOVE	T3,IR
  9671	041704	641 04 0 00 130000 		TLC	T3,(UFA)
  9672	041705	643 04 0 00 777000 		TLCE	T3,777000
  9673	041706	254 00 0 00 041712 		JRST	NRT1X		;NOT UFA
  9674	041707	326 11 0 00 041711 		JUMPN	AD,.+2		;JUMP IF 'AD=0
  9675	041710	612 07 0 00 045460 		TDNE	MQ,[1B7-1]
  9676	041711	476 00 0 00 046210 		SETOM	NRPOS		;AR00(0)^IR UFA^('AD=0 OR 'MQ08-35=0):NR POS
  9677
  9678	041712	607 06 0 00 000400 	NRT1X:	TLNN	AR,(1B9)
  9679	041713	476 00 0 00 046207 		SETOM	NRNEG		;AR09(0):NR NEG
  9680	041714	200 04 0 00 000016 		MOVE	T3,IR
  9681	041715	641 04 0 00 130000 		TLC	T3,(UFA)
  9682	041716	647 04 0 00 777000 		TLCN	T3,777000
  9683	041717	476 00 0 00 046207 		SETOM	NRNEG		;IR UFA:NR NEG
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 32
KI10A2	MAC	 9-JUN-76 13:56		TIME PULSE SUBROUTINES	-NORMALIZE-                                            *** SEQ 0252

  9684					;*NRT1 NORMAL ROUND CHECK
  9685
  9686	041720	336 00 0 00 046211 	NRT1Y:	SKIPN	NRRND
  9687	041721	254 00 0 00 041734 		JRST	NRT1Z		;NOT ROUND
  9688	041722	321 06 0 00 041725 		JUMPL	AR,.+3
  9689	041723	603 06 0 00 000400 		TLNE	AR,(1B9)
  9690	041724	254 00 0 00 041732 		JRST	NRT1NR		;IR06(1)^MQ08(1)^AR00(0)^AR09(1):NRT1 NORMAL RND
  9691
  9692	041725	325 06 0 00 041734 		JUMPGE	AR,NRT1Z
  9693	041726	603 06 0 00 000400 		TLNE	AR,(1B9)	;HERE IF AR00(1)
  9694	041727	254 00 0 00 041734 		JRST	NRT1Z
  9695	041730	616 07 0 00 045411 		TDNN	MQ,[1B8-1]	;HERE IF AR09(0)
  9696	041731	254 00 0 00 041734 		JRST	NRT1Z
  9697									;IR06(1)^MQ08(1)^AR00(1)^AR09(0)^'MQ09-35=0
  9698	041732	661 01 0 00 060010 	NRT1NR:	TLO	T,ADMAGIC+ADCR36+ADADD
  9699	041733	476 00 0 00 046161 		SETOM	LONGSET
  9700
  9701					;*NR ALL ZEROS CHECK
  9702
  9703	041734	641 16 0 00 070000 	NRT1Z:	TLC	IR,070000
  9704	041735	647 16 0 00 070000 		TLCN	IR,070000
  9705	041736	322 11 0 00 041765 		JUMPE	AD,NRAZRO	;AD00-17=0^AD09-35=0^IR FDVXX:NR ALL ZERO
  9706	041737	616 07 0 00 045460 		TDNN	MQ,[1B7-1]
  9707	041740	322 11 0 00 041765 		JUMPE	AD,NRAZRO	;AD00-17=0^AD09-35=0^MQ08-35=0:NR ALL ZERO
  9708
  9709	041741	332 00 0 00 046210 		SKIPE	NRPOS		;NR POS^NR RND:NRT3 COND
  9710	041742	336 00 0 00 046211 		SKIPN	NRRND
  9711	041743	254 00 0 00 041747 		JRST	NRT1ZX
  9712
  9713	041744	201 05 0 00 042054 	NRT13C:	MOVEI	S,NRT3		;NRT3 CONDITION
  9714	041745	660 03 0 00 000120 		TRO	T2,SASCPL+SAADD
  9715	041746	263 17 0 00 000000 		POPJ	P,
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 33
KI10A2	MAC	 9-JUN-76 13:56		TIME PULSE SUBROUTINES	-NORMALIZE-                                            *** SEQ 0253

  9716
  9717	041747	336 00 0 00 046207 	NRT1ZX:	SKIPN	NRNEG
  9718	041750	254 00 0 00 041753 		JRST	.+3
  9719	041751	603 06 0 00 001000 		TLNE	AR,(1B8)
  9720	041752	254 00 0 00 041744 		JRST	NRT13C		;AR08(1)^NR NEG:NRT3 COND
  9721
  9722	041753	336 00 0 00 046210 		SKIPN	NRPOS		;NR POS^'NR RND:NRT4 COND
  9723	041754	254 00 0 00 041763 		JRST	NRT12C
  9724	041755	332 00 0 00 046211 		SKIPE	NRRND
  9725	041756	254 00 0 00 041763 		JRST	NRT12C
  9726
  9727	041757	201 05 0 00 042073 	NRT14C:	MOVEI	S,NRT4		;NRT4 CONDITION
  9728	041760	660 03 0 00 000343 		TRO	T2,SASCMI+SAPL1+SAZERO+SAADD
  9729	041761	476 00 0 00 046161 		SETOM	LONGSET
  9730	041762	263 17 0 00 000000 		POPJ	P,
  9731
  9732	041763	201 05 0 00 041773 	NRT12C:	MOVEI	S,NRT2		;NRT2, NOTHING ELSE - MUST BE THIS
  9733	041764	263 17 0 00 000000 		POPJ	P,
  9734
  9735	041765	660 01 0 00 000020 	NRAZRO:	TRO	T,MQCLR		;NR ALL ZEROS
  9736	041766	200 04 1 00 046147 		MOVE	T3,@INSTPT
  9737	041767	606 04 0 00 000040 		TRNN	T3,SACINH
  9738	041770	476 00 0 00 046126 	NRT1I:	SETOM	FMWRSET		;'SAC INH:FM WR EN
  9739	041771	201 05 0 00 041243 		MOVEI	S,ST1
  9740	041772	263 17 0 00 000000 		POPJ	P,
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 34
KI10A2	MAC	 9-JUN-76 13:56		TIME PULSE SUBROUTINES	-NORMALIZE-                                            *** SEQ 0254

  9741
  9742	041773	670 01 0 00 045461 	NRT2:	TDO	T,[ADARPL,,ARSHLT]
  9743	041774	660 03 0 00 200000 		TRO	T2,SCSCP1
  9744	041775	554 04 0 00 000016 		HLRZ	T3,IR
  9745	041776	640 04 0 00 170000 		TRC	T3,(FDV)
  9746	041777	602 04 0 00 770000 		TRNE	T3,770000
  9747	042000	660 01 0 00 000004 		TRO	T,MQSHLT	;'IR FDVXX:MQ SH LT
  9748
  9749	042001	402 00 0 00 046211 		SETZM	NRRND
  9750	042002	402 00 0 00 046210 		SETZM	NRPOS
  9751	042003	402 00 0 00 046207 		SETZM	NRNEG
  9752
  9753	042004	607 16 0 00 004000 		TLNN	IR,(1B6)
  9754	042005	254 00 0 00 042010 		JRST	.+3
  9755	042006	603 07 0 00 000400 		TLNE	MQ,(1B9)
  9756	042007	476 00 0 00 046211 		SETOM	NRRND		;IR06(1)^MQ09(1):NR RND
  9757
  9758	042010	607 06 0 00 000200 		TLNN	AR,(1B10)
  9759	042011	476 00 0 00 046207 		SETOM	NRNEG		;AR10(0):NR NEG
  9760
  9761	042012	321 06 0 00 042015 		JUMPL	AR,.+3
  9762	042013	603 06 0 00 000200 		TLNE	AR,(1B10)
  9763	042014	476 00 0 00 046210 		SETOM	NRPOS		;AR00(0)^AR10(1):NR POS
  9764
  9765	042015	336 00 0 00 046211 		SKIPN	NRRND
  9766	042016	254 00 0 00 042030 		JRST	NRT2X		;NOT ROUND
  9767	042017	332 00 0 00 046210 		SKIPE	NRPOS
  9768	042020	254 00 0 00 042026 		JRST	NRT2NR		;NR RND^NR POS:NRT2 NORMAL RND
  9769	042021	325 06 0 00 042030 		JUMPGE	AR,NRT2X
  9770	042022	603 06 0 00 000200 		TLNE	AR,(1B10)	;HERE IF AR00(1)
  9771	042023	254 00 0 00 042030 		JRST	NRT2X
  9772	042024	616 07 0 00 045462 		TDNN	MQ,[1B9-1]	;HERE IF AR10(0)
  9773	042025	254 00 0 00 042030 		JRST	NRT2X
  9774									;NR RND^AR00(1)^AR10(0)^'MQ10-35=0:NRT2 NORM RND
  9775	042026	661 01 0 00 060010 	NRT2NR:	TLO	T,ADMAGIC+ADCR36+ADADD
  9776	042027	476 00 0 00 046161 		SETOM	LONGSET
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 35
KI10A2	MAC	 9-JUN-76 13:56		TIME PULSE SUBROUTINES	-NORMALIZE-                                            *** SEQ 0255

  9777
  9778	042030	336 00 0 00 046210 	NRT2X:	SKIPN	NRPOS		;NR POS^'NR RND:NRT4 CONDITION
  9779	042031	254 00 0 00 042035 		JRST	NRT2Y
  9780	042032	332 00 0 00 046211 		SKIPE	NRRND
  9781	042033	254 00 0 00 042035 		JRST	NRT2Y
  9782
  9783	042034	254 00 0 00 041757 	NRT24C:	JRST	NRT14C		;NRT4 CONDITION
  9784
  9785	042035	325 06 0 00 042040 	NRT2Y:	JUMPGE	AR,.+3
  9786	042036	603 06 0 00 000200 		TLNE	AR,(1B10)	;HERE IF AR00(1)
  9787	042037	254 00 0 00 041763 		JRST	NRT12C		;AR00(1)^AR10(1):NRT2
  9788
  9789	042040	321 06 0 00 042043 		JUMPL	AR,.+3
  9790	042041	607 06 0 00 000200 		TLNN	AR,(1B10)
  9791	042042	254 00 0 00 041763 		JRST	NRT12C		;AR00(0)^AR10(0):NRT2
  9792
  9793	042043	336 00 0 00 046210 	NRT2Z:	SKIPN	NRPOS
  9794	042044	254 00 0 00 042047 		JRST	.+3
  9795	042045	332 00 0 00 046211 		SKIPE	NRRND
  9796	042046	254 00 0 00 041744 		JRST	NRT13C		;NR POS^NR RND:NRT3 CONDITION
  9797
  9798	042047	336 00 0 00 046207 		SKIPN	NRNEG
  9799	042050	254 00 0 00 042053 		JRST	.+3
  9800	042051	603 06 0 00 001000 		TLNE	AR,(1B8)
  9801	042052	254 00 0 00 041744 		JRST	NRT13C		;AR08(1)^NR NEG:NRT3 CONDITION
  9802
  9803	042053	264 00 0 00 043162 	NRT2XX:	JSR	ERR		;SHOULDN'T GET HERE
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 36
KI10A2	MAC	 9-JUN-76 13:56		TIME PULSE SUBROUTINES	-NORMALIZE-                                            *** SEQ 0256

  9804	042054	476 00 0 00 046161 	NRT3:	SETOM	LONGSET
  9805	042055	660 03 0 00 000100 		TRO	T2,SAADD
  9806	042056	335 00 0 00 000006 		SKIPGE	AR
  9807	042057	664 03 0 00 000020 		TROA	T2,SASCPL
  9808	042060	660 03 0 00 000243 		TRO	T2,SASCMI+SAPL1+SAZERO
  9809	042061	612 11 0 00 045411 		TDNE	AD,[1B8-1]
  9810	042062	254 00 0 00 042071 		JRST	NRT3A
  9811	042063	660 01 0 00 000100 		TRO	T,ARSHRT
  9812	042064	554 04 0 00 000016 		HLRZ	T3,IR
  9813	042065	640 04 0 00 170000 		TRC	T3,(FDV)
  9814	042066	602 04 0 00 770000 		TRNE	T3,770000
  9815	042067	660 01 0 00 000002 		TRO	T,MQSHRT
  9816	042070	664 03 0 00 020000 		TROA	T2,SCSAEN
  9817
  9818	042071	660 01 0 00 006000 	NRT3A:	TRO	T,ARADEN
  9819	042072	265 05 0 00 030065 		JSP	S,CPOPJ
  9820
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 37
KI10A2	MAC	 9-JUN-76 13:56		TIME PULSE SUBROUTINES	-NORMALIZE-                                            *** SEQ 0257

  9821	042073	660 03 0 00 000011 	NRT4:	TRO	T2,SAMI33
  9822	042074	476 00 0 00 046057 		SETOM	ARESAEN
  9823	042075	200 02 1 00 046147 		MOVE	T1,@INSTPT
  9824	042076	602 02 0 00 000010 		TRNE	T1,SCE
  9825	042077	260 17 0 00 044716 		PUSHJ	P,MEMWSS
  9826	042100	200 02 0 00 046226 		MOVE	T1,SA
  9827	042101	271 02 0 00 000200 		ADDI	T1,200
  9828	042102	606 02 0 00 000400 		TRNN	T1,400
  9829	042103	254 00 0 00 042107 		JRST	NRT4A
  9830	042104	336 00 0 00 046127 		SKIPN	FXUH#
  9831	042105	665 13 0 00 440300 		TLOA	PC,AROV!FOV!TN1!FXU
  9832	042106	661 13 0 00 440200 	NRT4D:	TLO	PC,AROV!FOV!TN1
  9833	042107	554 04 0 00 000016 	NRT4A:	HLRZ	T3,IR
  9834	042110	640 04 0 00 171000 		TRC	T3,(FDVL)
  9835	042111	602 04 0 00 007000 		TRNE	T3,7000
  9836	042112	201 05 0 00 041243 		MOVEI	S,ST1
  9837	042113	606 04 0 00 777000 		TRNN	T3,777000
  9838	042114	254 00 0 00 042121 		JRST	NRT4B
  9839	042115	660 01 0 00 000002 		TRO	T,MQSHRT
  9840	042116	606 04 0 00 007000 		TRNN	T3,7000
  9841	042117	201 05 0 00 042127 		MOVEI	S,NRT5
  9842	042120	254 00 0 00 041531 		JRST	DST5C
  9843
  9844	042121	201 05 0 00 041624 	NRT4B:	MOVEI	S,FDT5
  9845	042122	476 00 0 00 046231 		SETOM	SACBRFF#
  9846	042123	602 00 0 00 000100 		TRNE	F,FLAG3
  9847	042124	665 01 0 00 010000 		TLOA	T,ADFMMI
  9848	042125	661 01 0 00 006000 		TLO	T,ADFMPL
  9849	042126	263 17 0 00 000000 		POPJ	P,
  9850
  9851	042127	476 00 0 00 046064 	NRT5:	SETOM	ARMQEN
  9852	042130	476 00 0 00 046161 		SETOM	LONGSET
  9853	042131	260 17 0 00 042722 		PUSHJ	P,FMAC2E
  9854	042132	660 03 0 00 000351 		TRO	T2,SASCMI+SAPL1+SAMI33+SAADD
  9855	042133	265 05 0 00 030065 		JSP	S,CPOPJ
  9856
  9857	042134	476 00 0 00 046126 	NRT6:	SETOM	FMWRSET
  9858	042135	201 05 0 00 041412 		MOVEI	S,ST5
  9859	042136	200 02 0 00 046226 		MOVE	T1,SA
  9860	042137	271 02 0 00 000200 		ADDI	T1,200
  9861	042140	606 02 0 00 000400 		TRNN	T1,400
  9862	042141	616 07 0 00 045411 		TDNN	MQ,[1B8-1]
  9863	042142	664 01 0 00 000400 		TROA	T,ARCLR
  9864	042143	476 00 0 00 046057 		SETOM	ARESAEN
  9865	042144	263 17 0 00 000000 		POPJ	P,
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 38
KI10A2	MAC	 9-JUN-76 13:56		TIME PULSE SUBROUTINES	-DOUBLE NORMALIZE-                                     *** SEQ 0258

  9866					SUBTTL	TIME PULSE SUBROUTINES	-DOUBLE NORMALIZE-
  9867
  9868	042145	660 01 0 00 000102 	DNT5A:	TRO	T,ARSHRT+MQSHRT
  9869	042146	670 03 0 00 045463 		TDO	T2,[XWD ARXSHR,SASCPL]
  9870	042147	620 00 0 00 000040 		TRZ	F,FLAG2
  9871	042150	265 05 0 00 037245 	DNT5B:	JSP	S,FIX1A
  9872
  9873	042151	402 00 0 00 046162 	DNT1:	SETZM	MAGIC#
  9874	042152	620 00 0 00 000100 		TRZ	F,FLAG3
  9875	042153	660 03 0 00 020000 		TRO	T2,SCSAEN
  9876	042154	661 01 0 00 000060 		TLO	T,ADARPL
  9877	042155	336 04 0 00 046067 		SKIPN	T3,ARX
  9878	042156	603 06 0 00 377000 		TLNE	AR,377000
  9879	042157	254 00 0 00 042164 		JRST	DNT1B
  9880	042160	606 00 0 00 000020 		TRNN	F,FLAG1
  9881	042161	254 00 0 00 042167 		JRST	DNT1A
  9882	042162	660 01 0 00 000400 	DNT1Z:	TRO	T,ARCLR
  9883	042163	254 00 0 00 041765 		JRST	NRAZRO
  9884
  9885	042164	332 00 0 00 046053 	DNT1B:	SKIPE	ADXCR0
  9886	042165	331 00 0 00 046234 		SKIPL	SCADFF
  9887	042166	254 00 0 00 042177 		JRST	DNT1C
  9888	042167	265 05 0 00 030065 	DNT1A:	JSP	S,CPOPJ
  9889
  9890	042170	661 03 0 00 210200 	DNT2:	TLO	T2,ADXBRM+ADXEQV+ARXCLR
  9891	042171	660 01 0 00 001020 		TRO	T,BRAREN+MQCLR
  9892	042172	476 00 0 00 046064 		SETOM	ARMQEN
  9893	042173	265 05 0 00 030065 		JSP	S,CPOPJ
  9894
  9895	042174	670 03 0 00 045464 	DNT3:	TDO	T2,[XWD ARXADX,SASCPL+SAPL43+SAADD]
  9896	042175	660 00 0 00 000020 		TRO	F,FLAG1
  9897	042176	254 00 0 00 042364 		JRST	DFAT1J
  9898
  9899	042177	325 04 0 00 042234 	DNT1C:	JUMPGE	T3,DNT1G
  9900	042200	603 04 0 00 000400 		TLNE	T3,(1B9)
  9901	042201	602 00 0 00 000040 		TRNE	F,FLAG2
  9902	042202	334 00 0 00 000000 		SKIPA
  9903	042203	254 00 0 00 042220 		JRST	DNT1E
  9904	042204	603 07 0 00 200000 		TLNE	MQ,(1B1)
  9905	042205	616 07 0 00 045465 		TDNN	MQ,[1B1-1]
  9906	042206	254 00 0 00 042243 		JRST	DNT1D
  9907	042207	670 01 0 00 045466 	DNT1F:	TDO	T,[XWD ADADD+ADCR36+ADMAGIC,MQCLR]
  9908	042210	670 03 0 00 045467 		TDO	T2,[XWD ADXFMP+ADXFMM+ADXADD,SASCPL+SAADD]
  9909	042211	265 05 0 00 030065 		JSP	S,CPOPJ
  9910
  9911	042212	331 00 0 00 046067 	DNT5:	SKIPL	ARX
  9912	042213	254 00 0 00 042145 		JRST	DNT5A
  9913	042214	670 01 0 00 045470 		TDO	T,[XWD ADARPL,ARADEN]
  9914	042215	670 03 0 00 045471 		TDO	T2,[XWD ARXADX,SAPL1+SAZERO+SAADD+SASCMI]
  9915	042216	201 05 0 00 042254 		MOVEI	S,DNT7
  9916	042217	263 17 0 00 000000 		POPJ	P,
  9917
  9918	042220	265 05 0 00 030065 	DNT1E:	JSP	S,CPOPJ
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 39
KI10A2	MAC	 9-JUN-76 13:56		TIME PULSE SUBROUTINES	-DOUBLE NORMALIZE-                                     *** SEQ 0259

  9919	042221	670 03 0 00 045472 	DNT4:	TDO	T2,[XWD ARXSHL,SCSCP1+SASCPL]
  9920	042222	670 01 0 00 045473 		TDO	T,[XWD ADARPL,ARSHLT+MQSHLT]
  9921	042223	660 00 0 00 000040 		TRO	F,FLAG2
  9922	042224	204 02 0 00 000016 		MOVS	T1,IR
  9923	042225	640 02 0 00 112000 		TRC	T1,112000	;DFMP
  9924	042226	331 04 0 00 046067 		SKIPL	T3,ARX
  9925	042227	641 04 0 00 000200 		TLC	T3,(1B10)
  9926	042230	602 02 0 00 777000 		TRNE	T1,777000
  9927	042231	607 04 0 00 000200 		TLNN	T3,(1B10)
  9928	042232	254 00 0 00 042372 		JRST	DFAT1K
  9929	042233	254 00 0 00 042220 		JRST	DNT1E
  9930
  9931	042234	607 04 0 00 000400 	DNT1G:	TLNN	T3,(1B9)
  9932	042235	602 00 0 00 000040 		TRNE	F,FLAG2
  9933	042236	334 00 0 00 000000 		SKIPA
  9934	042237	254 00 0 00 042220 		JRST	DNT1E
  9935	042240	603 07 0 00 200000 		TLNE	MQ,(1B1)
  9936	042241	254 00 0 00 042207 		JRST	DNT1F
  9937	042242	254 00 0 00 042252 		JRST	DNT6A
  9938
  9939	042243	660 03 0 00 000120 	DNT1D:	TRO	T2,SASCPL+SAADD
  9940	042244	265 05 0 00 030065 		JSP	S,CPOPJ
  9941
  9942	042245	661 01 0 00 000060 	DNT6:	TLO	T,ADARPL
  9943	042246	200 02 0 00 046067 		MOVE	T1,ARX
  9944	042247	326 11 0 00 042252 		JUMPN	AD,.+3
  9945	042250	616 02 0 00 045411 		TDNN	T1,[1B8-1]
  9946	042251	670 03 0 00 045474 		TDO	T2,[XWD ARXSHR,SCSAEN]
  9947	042252	660 03 0 00 000343 	DNT6A:	TRO	T2,SAPL1+SAZERO+SASCMI+SAADD
  9948	042253	265 05 0 00 030065 		JSP	S,CPOPJ
  9949
  9950	042254	670 01 0 00 045475 	DNT7:	TDO	T,[XWD ADBRPL,MQADEN]
  9951	042255	661 03 0 00 000004 		TLO	T2,BRARXE
  9952	042256	335 00 0 00 046067 		SKIPGE	ARX
  9953	042257	660 00 0 00 000100 		TRO	F,FLAG3
  9954	042260	265 05 0 00 037245 		JSP	S,FIX1A
  9955
  9956	042261	660 03 0 00 000020 	DNT8:	TRO	T2,SASCPL
  9957	042262	602 00 0 00 000100 		TRNE	F,FLAG3
  9958	042263	640 03 0 00 000060 		TRC	T2,SASCPL+SASCMI
  9959	042264	201 02 0 15 000200 		MOVEI	T1,200(SC)
  9960	042265	606 02 0 00 000400 		TRNN	T1,400
  9961	042266	254 00 0 00 042272 		JRST	DNT8A
  9962	042267	661 13 0 00 440200 		TLO	PC,AROV!FOV!TN1
  9963	042270	336 00 0 00 046127 		SKIPN	FXUH
  9964	042271	661 13 0 00 000100 		TLO	PC,FXU
  9965
  9966	042272	660 01 0 00 006000 	DNT8A:	TRO	T,ARADEN
  9967	042273	265 05 0 00 030065 		JSP	S,CPOPJ
  9968
  9969	042274	476 00 0 00 046057 	DNT9:	SETOM	ARESAE
  9970	042275	254 00 0 00 041770 		JRST	NRT1I
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 40
KI10A2	MAC	 9-JUN-76 13:56		TIME PULSE SUBROUTINES	-FIX-                                                  *** SEQ 0260

  9971					SUBTTL	TIME PULSE SUBROUTINES	-FIX-
  9972
  9973	042276	476 00 0 00 046066 	FIX2B:	SETOM	ARSMR
  9974	042277	476 00 0 00 046161 		SETOM	LONGSET
  9975	042300	660 03 0 00 000343 		TRO	T2,SAADD+SAPL1+SASCMI+SAZERO
  9976	042301	265 05 0 00 030065 		JSP	S,CPOPJ
  9977
  9978	042302	660 03 0 00 020000 	FIXT1:	TRO	T2,SCSAEN
  9979	042303	331 00 0 00 046226 		SKIPL	SA
  9980	042304	254 00 0 00 041770 		JRST	NRT1I
  9981	042305	661 01 0 00 000060 	FIX2C:	TLO	T,ADARPL
  9982	042306	335 00 0 00 046120 		SKIPGE	FE
  9983	042307	254 00 0 00 042313 		JRST	FIX2E
  9984	042310	476 00 0 00 046060 		SETOM	ARGOLT
  9985	042311	201 05 0 00 043005 		MOVEI	S,SCT2
  9986	042312	263 17 0 00 000000 		POPJ	P,
  9987
  9988	042313	402 00 0 00 046060 	FIX2E:	SETZM	ARGOLT
  9989	042314	201 05 0 00 042746 		MOVEI	S,SCT1
  9990	042315	263 17 0 00 000000 		POPJ	P,
  9991
  9992	042316	205 02 0 00 200000 	FIX2A:	MOVSI	T1,(1B1)
  9993	042317	270 02 0 00 000006 		ADD	T1,AR
  9994	042320	321 02 0 00 042331 		JUMPL	T1,FIX2F
  9995	042321	660 01 0 00 000400 		TRO	T,ARCLR
  9996
  9997	042322	603 16 0 00 004000 	FIXT2:	TLNE	IR,4000
  9998	042323	254 00 0 00 042326 		JRST	FIXT2A
  9999
 10000	042324	325 06 0 00 041770 	FIX2G:	JUMPGE	AR,NRT1I
 10001	042325	616 07 0 00 045411 		TDNN	MQ,[1B8-1]
 10002
 10003	042326	603 07 0 00 001000 	FIXT2A:	TLNE	MQ,(1B8)
 10004	042327	660 01 0 00 006000 	FIXT2B:	TRO	T,ARADEN
 10005	042330	254 00 0 00 041770 		JRST	NRT1I
 10006
 10007	042331	476 00 0 00 046066 	FIX2F:	SETOM	ARSMR
 10008	042332	254 00 0 00 042305 		JRST	FIX2C
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 41
KI10A2	MAC	 9-JUN-76 13:56		TIME PULSE SUBROUTINES	-DBLE FLOATING ADD/MUL/DIV-                            *** SEQ 0261

 10009					SUBTTL	TIME PULSE SUBROUTINES	-DBLE FLOATING ADD/MUL/DIV-
 10010
 10011	042333	670 03 0 00 045476 	DFAT1:	TDO	T2,[XWD ARXADX,FESAEN]
 10012	042334	660 01 0 00 106000 		TRO	T,ARADEN+ABPCEN
 10013	042335	260 17 0 00 041546 		PUSHJ	P,FXUSET
 10014	042336	602 00 0 00 000040 		TRNE	F,FLAG2
 10015	042337	254 00 0 00 042407 		JRST	DFAT1C
 10016	042340	325 15 0 00 042350 		JUMPGE	SC,DFAT1A
 10017	042341	640 15 0 00 000300 		TRC	SC,300
 10018	042342	646 15 0 00 000300 		TRCN	SC,300
 10019	042343	254 00 0 00 042350 		JRST	DFAT1A
 10020	042344	641 03 0 00 000300 		TLC	T2,ARXADX+ARXCLR
 10021	042345	640 01 0 00 006400 		TRC	T,ARADEN+ARCLR
 10022	042346	603 16 0 00 001000 		TLNE	IR,1000
 10023	042347	254 00 0 00 042433 		JRST	DFAT1B
 10024
 10025	042350	603 16 0 00 003000 	DFAT1A:	TLNE	IR,3000
 10026	042351	254 00 0 00 042407 		JRST	DFAT1C
 10027	042352	640 15 0 00 000700 		TRC	SC,700
 10028	042353	642 15 0 00 000700 		TRCE	SC,700
 10029	042354	254 00 0 00 042433 		JRST	DFAT1B
 10030	042355	661 01 0 00 000060 	DFAT1G:	TLO	T,ADARPL
 10031	042356	402 00 0 00 046060 		SETZM	ARGOLT
 10032	042357	201 05 0 00 042746 		MOVEI	S,SCT1
 10033	042360	263 17 0 00 000000 		POPJ	P,
 10034	042361	603 16 0 00 001000 	DFAT1D:	TLNE	IR,1000
 10035	042362	254 00 0 00 042374 		JRST	DFAT1E
 10036	042363	660 03 0 00 010303 	DFAT1H:	TRO	T2,SAFEEN+SAZERO+SAPL1+SAADD
 10037	042364	661 03 0 00 540000 	DFAT1J:	TLO	T2,ADXADD+ADXFMP+ADXFMM
 10038	042365	661 01 0 00 040070 		TLO	T,ADADD+ADMAGIC+ADARPL
 10039	042366	205 02 0 00 001000 		MOVSI	T1,(1B8)
 10040	042367	202 02 0 00 046162 		MOVEM	T1,MAGIC#
 10041	042370	620 00 0 00 000040 		TRZ	F,FLAG2
 10042	042371	661 01 0 00 000004 		TLO	T,INFTST
 10043	042372	201 05 0 00 042151 	DFAT1K:	MOVEI	S,DNT1
 10044	042373	263 17 0 00 000000 		POPJ	P,
 10045	042374	661 01 0 00 060110 	DFAT1E:	TLO	T,ADADD+ADARMI+ADCR36+ADMAGIC
 10046	042375	661 03 0 00 540000 		TLO	T2,ADXADD+ADXFMP+ADXFMM
 10047	042376	265 05 0 00 030065 		JSP	S,CPOPJ
 10048
 10049	042377	661 03 0 00 000100 	DFAT2:	TLO	T2,ARXADX
 10050	042400	660 01 0 00 006000 		TRO	T,ARADEN
 10051	042401	640 15 0 00 000700 		TRC	SC,700
 10052	042402	642 15 0 00 000700 		TRCE	SC,700
 10053	042403	254 00 0 00 042431 		JRST	DFAT2A
 10054	042404	606 00 0 00 000040 		TRNN	F,FLAG2
 10055	042405	254 00 0 00 042355 		JRST	DFAT1G
 10056	042406	254 00 0 00 042414 		JRST	DFAT1F
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 42
KI10A2	MAC	 9-JUN-76 13:56		TIME PULSE SUBROUTINES	-DBLE FLOATING ADD/MUL/DIV-                            *** SEQ 0262

 10057	042407	640 15 0 00 000700 	DFAT1C:	TRC	SC,700
 10058	042410	642 15 0 00 000700 		TRCE	SC,700
 10059	042411	254 00 0 00 042361 		JRST	DFAT1D
 10060	042412	603 16 0 00 003000 		TLNE	IR,3000
 10061	042413	254 00 0 00 042374 		JRST	DFAT1E
 10062	042414	661 01 0 00 000600 	DFAT1F:	TLO	T,ADBRPL
 10063	042415	661 03 0 00 240000 		TLO	T2,ADXFMM+ADXEQV
 10064	042416	476 00 0 00 046231 		SETOM	SACBRFF
 10065	042417	265 05 0 00 030065 		JSP	S,CPOPJ
 10066
 10067	042420	660 01 0 00 000010 	DFAT3:	TRO	T,MQADEN
 10068	042421	476 00 0 00 046126 		SETOM	FMWRSET
 10069	042422	661 03 0 00 210104 		TLO	T2,ADXBRM+ADXEQV+BRARXE+ARXADX
 10070	042423	265 05 0 00 030065 		JSP	S,CPOPJ
 10071
 10072	042424	661 03 0 00 000100 	DFAT4:	TLO	T2,ARXADX
 10073	042425	476 00 0 00 046064 		SETOM	ARMQEN
 10074	042426	660 01 0 00 001020 		TRO	T,BRAREN+MQCLR
 10075	042427	402 00 0 00 046231 		SETZM	SACBRFF
 10076	042430	254 00 0 00 042355 		JRST	DFAT1G
 10077
 10078	042431	602 00 0 00 000040 	DFAT2A:	TRNE	F,FLAG2
 10079	042432	254 00 0 00 042363 		JRST	DFAT1H
 10080
 10081	042433	661 01 0 00 040660 	DFAT1B:	TLO	T,ADARPL+ADBRPL+ADADD
 10082	042434	661 03 0 00 500000 		TLO	T2,ADXFMP+ADXADD
 10083	042435	265 05 0 00 030065 		JSP	S,CPOPJ
 10084
 10085	042436	660 01 0 00 000102 	DFAT5:	TRO	T,ARSHRT+MQSHRT
 10086	042437	670 03 0 00 045477 		TDO	T2,[XWD ARXSHR,SAFEEN]
 10087	042440	254 00 0 00 042364 		JRST	DFAT1J
 10088
 10089	042441	670 01 0 00 045457 	DFMT1:	TDO	T,[XWD ADARPL,ARCLR+MQADEN]
 10090	042442	661 03 0 00 000002 		TLO	T2,MBAREN
 10091	042443	660 00 0 00 000040 		TRO	F,FLAG2
 10092	042444	402 00 0 00 046060 		SETZM	ARGOLT
 10093	042445	201 05 0 00 042746 		MOVEI	S,SCT1
 10094	042446	606 12 0 00 000001 		TRNN	MB,1
 10095	042447	254 00 0 00 037245 		JRST	FIX1A
 10096	042450	661 01 0 00 040600 		TLO	T,ADADD+ADBRPL
 10097	042451	661 03 0 00 500000 		TLO	T2,ADXADD+ADXFMP
 10098	042452	254 00 0 00 037245 		JRST	FIX1A
 10099
 10100	042453	620 00 0 00 000040 	DFMT2:	TRZ	F,FLAG2
 10101	042454	670 01 0 00 045500 		TDO	T,[XWD ADARPL,ABPCEN+MQADEN]
 10102	042455	260 17 0 00 044014 		PUSHJ	P,MPYFCN
 10103	042456	201 05 0 00 043005 		MOVEI	S,SCT2
 10104	042457	254 00 0 00 037245 		JRST	FIX1A
 10105
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 43
KI10A2	MAC	 9-JUN-76 13:56		TIME PULSE SUBROUTINES	-DBLE FLOATING ADD/MUL/DIV-                            *** SEQ 0263

 10106	042460	660 01 0 00 000204 	DFMT3:	TRO	T,ARSHLT+MQSHLT
 10107	042461	620 00 0 00 000020 		TRZ	F,FLAG1
 10108	042462	670 03 0 00 045501 		TDO	T2,[XWD ARXSHL,SCSAEN+SASCPL+SAADD+SAPL1+SAZERO]
 10109	042463	260 17 0 00 041546 		PUSHJ	P,FXUSET
 10110	042464	254 00 0 00 042364 		JRST	DFAT1J
 10111
 10112	042465	661 03 0 00 006000 	DFDT0:	TLO	T2,ADMBEN
 10113	042466	265 05 0 00 030065 		JSP	S,CPOPJ
 10114
 10115	042467	660 01 0 00 006002 	DFDT1:	TRO	T,ARADEN+MQSHRT
 10116	042470	661 03 0 00 000022 		TLO	T2,MBAREN+ARXSHR
 10117	042471	476 00 0 00 046112 		SETOM	DFDF1
 10118	042472	476 00 0 00 046126 		SETOM	FMWRSET
 10119	042473	265 05 0 00 030065 		JSP	S,CPOPJ
 10120
 10121	042474	476 00 0 00 046064 	DFDT2:	SETOM	ARMQEN
 10122	042475	660 01 0 00 001020 		TRO	T,BRAREN+MQCLR
 10123	042476	660 03 0 00 000012 		TRO	T2,SAMI32
 10124	042477	402 00 0 00 046231 		SETZM	SACBRFF
 10125	042500	265 05 0 00 030065 		JSP	S,CPOPJ
 10126
 10127	042501	660 01 0 00 100204 	DFDT3:	TRO	T,ABPCEN+ARSHLT+MQSHLT
 10128	042502	661 03 0 00 000040 		TLO	T2,ARXSHL
 10129	042503	331 00 0 00 046052 		SKIPL	ADX
 10130	042504	254 00 0 00 042522 		JRST	DFDT3A
 10131	042505	265 05 0 00 037245 		JSP	S,FIX1A
 10132
 10133	042506	660 01 0 00 000204 	DFDT4:	TRO	T,ARSHLT+MQSHLT
 10134	042507	661 03 0 00 000040 		TLO	T2,ARXSHL
 10135	042510	476 00 0 00 046213 		SETOM	PCP1FF
 10136	042511	660 00 0 00 000040 		TRO	F,FLAG2
 10137	042512	476 00 0 00 046060 		SETOM	ARGOLT
 10138	042513	200 02 0 00 046052 		MOVE	T1,ADX
 10139	042514	607 02 0 00 001000 		TLNN	T1,(1B8)
 10140	042515	254 00 0 00 042520 		JRST	DFDT4A+1
 10141	042516	664 00 0 00 000220 		TROA	F,FLAG1+SCP1S
 10142	042517	660 03 0 00 020000 	DFDT4A:	TRO	T2,SCSAEN
 10143	042520	201 05 0 00 043005 		MOVEI	S,SCT2
 10144	042521	263 17 0 00 000000 		POPJ	P,
 10145
 10146	042522	265 05 0 00 037245 	DFDT3A:	JSP	S,FIX1A
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 44
KI10A2	MAC	 9-JUN-76 13:56		TIME PULSE SUBROUTINES	-DBLE FLOATING ADD/MUL/DIV-                            *** SEQ 0264

 10147	042523	661 13 0 00 440240 	DFDT10:	TLO	PC,AROV!FOV!TN1!DCK
 10148	042524	402 00 0 00 046112 	DFD10A:	SETZM	DFDF1
 10149	042525	476 00 0 00 046303 		SETOM	TRPSAT
 10150	042526	265 05 0 00 030065 		JSP	S,CPOPJ
 10151
 10152	042527	661 03 0 00 006000 	DFDT11:	TLO	T2,ADMBEN
 10153	042530	661 01 0 00 000004 		TLO	T,INFTST
 10154	042531	265 05 0 00 030065 		JSP	S,CPOPJ
 10155
 10156	042532	660 01 0 00 006000 	DFDT12:	TRO	T,ARADEN
 10157	042533	476 00 0 00 046126 		SETOM	FMWRSET
 10158	042534	201 05 0 00 041412 		MOVEI	S,ST5
 10159	042535	263 17 0 00 000000 		POPJ	P,
 10160
 10161	042536	476 00 0 00 046064 	DFDT5:	SETOM	ARMQEN
 10162	042537	670 03 0 00 045502 		TDO	T2,[XWD MBAREN+ADMBEN,SAMI42]
 10163	042540	402 00 0 00 046213 		SETZM	PCP1FF
 10164	042541	620 00 0 00 000040 		TRZ	F,FLAG2
 10165	042542	476 00 0 00 046303 		SETOM	TRPSAT
 10166	042543	265 05 0 00 030065 		JSP	S,CPOPJ
 10167
 10168	042544	670 01 0 00 045503 	DFDT6:	TDO	T,[XWD ADADD+ADARPL+ADBRPL,ARADEN+MQCLR]
 10169	042545	476 00 0 00 046112 		SETOM	DFDF1
 10170	042546	661 03 0 00 500002 		TLO	T2,ADXADD+ADXFMP+MBAREN
 10171	042547	200 02 0 00 000006 		MOVE	T1,AR
 10172	042550	241 02 0 00 777777 		ROT	T1,-1
 10173	042551	430 02 1 00 046124 		XOR	T1,@FMREG
 10174	042552	325 02 0 00 042517 		JUMPGE	T1,DFDT4A
 10175	042553	641 03 0 00 140000 		TLC	T2,ADXFMP+ADXFMM
 10176	042554	641 01 0 00 021600 		TLC	T,ADBRPL+ADBRMI+ADCR36
 10177	042555	254 00 0 00 042517 		JRST	DFDT4A
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 45
KI10A2	MAC	 9-JUN-76 13:56		TIME PULSE SUBROUTINES	-DBLE FLOATING ADD/MUL/DIV-                            *** SEQ 0265

 10178	042556	660 01 0 00 000004 	DFDT7:	TRO	T,MQSHLT
 10179	042557	670 03 0 00 045504 		TDO	T2,[XWD ADMBEN,SCSAEN+SAFEEN+SAZERO+SAEQV]
 10180	042560	260 17 0 00 041140 		PUSHJ	P,FMACEN
 10181	042561	476 00 0 00 046161 		SETOM	LONGSET
 10182	042562	335 00 1 00 046124 		SKIPGE	@FMREG
 10183	042563	640 00 0 00 000100 		TRC	F,FLAG3
 10184	042564	265 05 0 00 030065 		JSP	S,CPOPJ
 10185
 10186	042565	476 00 0 00 046146 	DFDT8:	SETOM	INSNXT
 10187	042566	260 17 0 00 041546 		PUSHJ	P,FXUSET
 10188	042567	612 07 0 00 045505 		TDNE	MQ,[1B0-1]
 10189	042570	254 00 0 00 042601 		JRST	DFDT8C
 10190	042571	326 11 0 00 042574 		JUMPN	AD,DFDT8A
 10191	042572	660 01 0 00 000400 		TRO	T,ARCLR
 10192	042573	254 00 0 00 041770 		JRST	NRT1I
 10193	042574	602 00 0 00 000100 	DFDT8A:	TRNE	F,FLAG3
 10194	042575	674 01 0 00 045316 		TDOA	T,[XWD ADARMI+ADMAGIC+ADADD+ADCR36,ARADEN]
 10195	042576	661 03 0 00 006000 	DFDT8D:	TLO	T2,ADMBEN
 10196	042577	201 05 0 00 042261 		MOVEI	S,DNT8
 10197	042600	263 17 0 00 000000 		POPJ	P,
 10198
 10199	042601	606 00 0 00 000100 	DFDT8C:	TRNN	F,FLAG3
 10200	042602	254 00 0 00 042576 		JRST	DFDT8D
 10201	042603	476 00 0 00 046064 		SETOM	ARMQEN
 10202	042604	661 01 0 00 060110 		TLO	T,ADARMI+ADMAGIC+ADCR36+ADADD
 10203	042605	205 02 0 00 400000 		MOVSI	T1,(1B0)
 10204	042606	202 02 0 00 046162 		MOVEM	T1,MAGIC#
 10205	042607	265 05 0 00 030065 		JSP	S,CPOPJ
 10206
 10207	042610	670 01 0 00 045506 	DFDT9:	TDO	T,[XWD ADEQV+ADMAGIC,MQADEN]
 10208	042611	402 00 0 00 046162 		SETZM	MAGIC#
 10209	042612	254 00 0 00 042576 		JRST	DFDT8D
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 46
KI10A2	MAC	 9-JUN-76 13:56		TIME PULSE SUBROUTINES	-FLT ADD, MISC-                                        *** SEQ 0266

 10210					SUBTTL	TIME PULSE SUBROUTINES	-FLT ADD, MISC-
 10211
 10212	042613	331 02 0 00 046226 	FAT1:	SKIPL	T1,SA
 10213	042614	660 03 0 00 000343 		TRO	T2,SASCMI+SAPL1+SAADD+SAZERO
 10214	042615	430 02 0 00 000006 		XOR	T1,AR
 10215	042616	335 00 0 00 000002 		SKIPGE	T1
 10216	042617	660 00 0 00 000040 		TRO	F,FLAG2
 10217	042620	265 05 0 00 037245 		JSP	S,FIX1A
 10218
 10219	042621	331 00 0 00 000015 	FAT2:	SKIPL	SC
 10220	042622	660 03 0 00 020000 		TRO	T2,SCSAEN
 10221	042623	661 01 0 00 000600 		TLO	T,ADBRPL
 10222	042624	660 03 0 00 002000 		TRO	T2,SAAREX
 10223	042625	606 00 0 00 000040 		TRNN	F,FLAG2
 10224	042626	254 00 0 00 042632 		JRST	FAT2A
 10225	042627	640 03 0 00 012000 		TRC	T2,SAFEEN+SAAREX
 10226	042630	325 10 0 00 042634 		JUMPGE	BR,FAT2B
 10227	042631	254 00 0 00 042635 		JRST	FAT2C
 10228	042632	321 06 0 00 042635 	FAT2A:	JUMPL	AR,FAT2C
 10229	042633	664 03 0 00 004060 		TROA	T2,SAEQV+SASCPL+SASCMI
 10230	042634	660 03 0 00 004003 	FAT2B:	TRO	T2,SAEQV+SAZERO
 10231	042635	265 05 0 00 030065 	FAT2C:	JSP	S,CPOPJ
 10232
 10233	042636	660 03 0 00 400000 	FAT3:	TRO	T2,FESAEN
 10234	042637	476 00 0 00 046075 		SETOM	BRSMR
 10235	042640	402 00 0 00 046060 		SETZM	ARGOLT
 10236	042641	201 05 0 00 042746 		MOVEI	S,SCT1
 10237	042642	661 01 0 00 000060 		TLO	T,ADARPL
 10238	042643	606 00 0 00 000040 		TRNN	F,FLAG2
 10239	042644	660 01 0 00 001000 		TRO	T,BRAREN
 10240	042645	325 15 0 00 042651 		JUMPGE	SC,FAT3A
 10241	042646	640 15 0 00 000300 		TRC	SC,300
 10242	042647	642 15 0 00 000300 		TRCE	SC,300
 10243						JRST	[TRO	T,ARCLR
 10244	042650	254 00 0 00 045507 			JRST	FAT3B]
 10245	042651	606 00 0 00 000040 	FAT3A:	TRNN	F,FLAG2
 10246	042652	664 01 0 00 006000 		TROA	T,ARADEN
 10247	042653	476 00 0 00 046066 		SETOM	ARSMR
 10248	042654	640 15 0 00 000700 	FAT3B:	TRC	SC,700
 10249	042655	646 15 0 00 000700 		TRCN	SC,700
 10250	042656	263 17 0 00 000000 		POPJ	P,
 10251	042657	661 01 0 00 040600 		TLO	T,ADBRPL+ADADD
 10252	042660	476 00 0 00 046161 		SETOM	LONGSET
 10253	042661	265 05 0 00 030065 		JSP	S,CPOPJ
 10254
 10255	042662	331 02 0 00 000011 	FAT4:	SKIPL	T1,AD
 10256	042663	641 02 0 00 001000 		TLC	T1,(1B8)
 10257	042664	603 02 0 00 001000 		TLNE	T1,(1B8)
 10258	042665	664 01 0 00 006000 		TROA	T,ARADEN
 10259	042666	664 01 0 00 000102 		TROA	T,ARSHRT+MQSHRT
 10260	042667	664 03 0 00 000303 		TROA	T2,SAADD+SAZERO+SAPL1
 10261	042670	476 00 0 00 046161 		SETOM	LONGSET
 10262	042671	660 03 0 00 010000 		TRO	T2,SAFEEN
 10263	042672	254 00 0 00 041664 		JRST	FMT2A
 10264
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 46-1
KI10A2	MAC	 9-JUN-76 13:56		TIME PULSE SUBROUTINES	-FLT ADD, MISC-                                        *** SEQ 0267

 10265	042673	660 01 0 00 006004 	JFFOT1:	TRO	T,ARADEN+MQSHLT
 10266	042674	254 00 0 00 036724 		JRST	JFFO2A
 10267
 10268	042675	660 03 0 00 020000 	SRT1:	TRO	T2,SCSAEN
 10269	042676	135 02 0 00 045511 		LDB	T1,[POINT 3,IR,8]
 10270	042677	200 04 0 02 042713 		MOVE	T3,SRTAB(T1)
 10271	042700	202 04 0 00 046243 		MOVEM	T3,SINDEX
 10272	042701	570 04 0 00 000010 		HRRE	T3,BR
 10273	042702	533 00 0 00 000004 		HLLES	T3
 10274	042703	452 04 0 00 046060 		SETCAM	T3,ARGOLT
 10275	042704	201 05 0 00 043005 		MOVEI	S,SCT2
 10276	042705	336 00 0 00 046060 		SKIPN	ARGOLT
 10277	042706	201 05 0 00 042746 		MOVEI	S,SCT1
 10278	042707	336 00 0 00 046226 		SKIPN	SA
 10279	042710	254 00 0 00 041420 		JRST	ST5A
 10280	042711	661 01 0 00 000060 		TLO	T,ADARPL
 10281	042712	263 17 0 00 000000 		POPJ	P,
 10282
 10283	042713	000000	000004		SRTAB:	4	;ASH
 10284	042714	000000	000001			1	;ROT
 10285	042715	000000	000000			0	;LSH
 10286	042716	000000	000000			.-.	;(JFFO)
 10287	042717	000000	000005			5	;ASHC
 10288	042720	000000	000002			2	;ROTC
 10289	042721	000000	000003			3	;LSHC
 10290
 10291	042722	205 04 0 00 000040 	FMAC2E:	MOVSI	T3,(1B12)
 10292	042723	270 04 0 00 000016 		ADD	T3,IR
 10293	042724	202 04 0 00 046041 		MOVEM	T3,ACPL2#
 10294	042725	200 04 0 00 045512 		MOVE	T3,[POINT 4,ACPL2,12]
 10295	042726	202 04 0 00 046123 		MOVEM	T3,FMADREN
 10296	042727	263 17 0 00 000000 		POPJ	P,
 10297
 10298	042730	660 01 0 00 100010 	DMOVT1:	TRO	T,ABPCEN+MQADEN
 10299	042731	254 00 0 00 036733 		JRST	JFFO2B
 10300
 10301					DMVNT1:	TDO	T,[XWD ADARMI+ADCR36+ADADD+ADMAGIC,ABPCEN^_
 10302	042732	670 01 0 00 045513 	+BRAREN+ARADEN]
 10303	042733	476 00 0 00 046161 		SETOM	LONGSET
 10304	042734	265 05 0 00 030065 		JSP	S,CPOPJ
 10305
 10306	042735	670 01 0 00 045514 	DMVNT2:	TDO	T,[XWD ADBRMI+INFTST,MQADEN]
 10307	042736	200 02 0 00 040210 		MOVE	T1,ADFLGS
 10308	042737	603 02 0 00 100000 		TLNE	T1,(1B2)
 10309	042740	665 01 0 00 060000 		TLOA	T,ADADD+ADCR36
 10310	042741	254 00 0 00 042743 		JRST	.+2
 10311	042742	661 03 0 00 000400 		TLO	T2,ADMSKG
 10312	042743	265 05 0 00 030065 		JSP	S,CPOPJ
 10313
 10314	042744	660 01 0 00 006000 	DMVNT3:	TRO	T,ARADEN
 10315	042745	254 00 0 00 036733 		JRST	JFFO2B
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 47
KI10A2	MAC	 9-JUN-76 13:56		SHIFT SUBROUTINE                                                               *** SEQ 0268

 10316					SUBTTL	SHIFT SUBROUTINE
 10317
 10318	042746	660 03 0 00 100000 	SCT1:	TRO	T2,SCSHRT
 10319	042747	606 15 0 00 000001 		TRNN	SC,1
 10320	042750	254 00 0 00 042760 		JRST	SCTC
 10321	042751	660 01 0 00 000100 		TRO	T,ARSHRT
 10322	042752	554 02 0 00 000016 		HLRZ	T1,IR
 10323	042753	640 02 0 00 134000 		TRC	T1,(ILDB)
 10324	042754	602 02 0 00 776000 		TRNE	T1,776000
 10325	042755	660 01 0 00 000002 		TRO	T,MQSHRT
 10326	042756	315 16 0 00 045515 		CAMGE	IR,[FIX]
 10327	042757	661 03 0 00 000020 		TLO	T2,ARXSHR
 10328
 10329	042760	640 15 0 00 000037 	SCTC:	TRC	SC,37
 10330	042761	642 15 0 00 000037 		TRCE	SC,37
 10331						JRST	[SKIPE	MPY#
 10332							PUSHJ	P,MPYFCN
 10333	042762	254 00 0 00 045516 			JRST	SCTC1]
 10334	042763	332 00 0 00 046177 		SKIPE	MPY
 10335	042764	602 00 0 00 000040 		TRNE	F,FLAG2
 10336	042765	254 00 0 00 042770 		JRST	.+3
 10337	042766	661 01 0 00 000060 		TLO	T,ADARPL
 10338	042767	476 00 0 00 046161 		SETOM	LONGSET
 10339	042770	200 04 0 00 046234 		MOVE	T3,SCADFF
 10340	042771	602 07 0 00 000002 		TRNE	MQ,2
 10341	042772	607 04 0 00 001000 		TLNN	T3,ADBRP2
 10342	042773	254 00 0 00 042776 		JRST	SCTC1
 10343	042774	606 00 0 00 000040 		TRNN	F,FLAG2
 10344	042775	260 17 0 00 044030 		PUSHJ	P,MPYFN5
 10345	042776	201 04 0 15 000001 	SCTC1:	MOVEI	T3,1(SC)
 10346	042777	322 04 0 00 043033 		JUMPE	T3,SCTC2
 10347	043000	602 00 0 00 000040 		TRNE	F,FLAG2
 10348	043001	336 00 0 00 046152 		SKIPN	INTRQ#
 10349	043002	665 01 0 00 000060 	SCTC5:	TLOA	T,ADARPL
 10350	043003	254 00 0 00 042524 		JRST	DFD10A
 10351	043004	265 05 0 00 030065 		JSP	S,CPOPJ
 10352
 10353	043005	554 02 0 00 000016 	SCT2:	HLRZ	T1,IR
 10354	043006	660 03 0 00 200000 		TRO	T2,SCSCP1
 10355	043007	336 00 0 00 046060 		SKIPN	ARGOLT#
 10356	043010	254 00 0 00 043024 		JRST	SCT2R
 10357	043011	660 01 0 00 000204 		TRO	T,MQSHLT+ARSHLT
 10358	043012	315 16 0 00 045515 		CAMGE	IR,[FIX]
 10359	043013	661 03 0 00 000040 		TLO	T2,ARXSHL
 10360	043014	640 02 0 00 240000 		TRC	T1,(ASH)
 10361	043015	602 02 0 00 773000 		TRNE	T1,773000
 10362	043016	254 00 0 00 042760 		JRST	SCTC
 10363	043017	331 02 0 00 000006 		SKIPL	T1,AR
 10364	043020	641 02 0 00 200000 		TLC	T1,(1B1)
 10365	043021	607 02 0 00 200000 		TLNN	T1,(1B1)
 10366	043022	661 13 0 00 400200 		TLO	PC,AROV+TN1
 10367	043023	254 00 0 00 042760 		JRST	SCTC
 10368
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 48
KI10A2	MAC	 9-JUN-76 13:56		SHIFT SUBROUTINE                                                               *** SEQ 0269

 10369	043024	660 01 0 00 000040 	SCT2R:	TRO	T,ARSHR2
 10370	043025	640 02 0 00 134000 		TRC	T1,(ILDB)
 10371	043026	602 02 0 00 776000 		TRNE	T1,776000
 10372	043027	660 01 0 00 000001 		TRO	T,MQSHR2
 10373	043030	315 16 0 00 045515 		CAMGE	IR,[FIX]
 10374	043031	661 03 0 00 000010 		TLO	T2,ARXSR2
 10375	043032	254 00 0 00 042760 		JRST	SCTC
 10376	043033	554 02 0 00 000016 	SCTC2:	HLRZ	T1,IR
 10377	043034	405 02 0 00 777000 		ANDI	T1,777000
 10378	043035	336 00 0 00 046113 		SKIPN	DSF2#
 10379	043036	254 00 0 00 043041 		JRST	.+3
 10380	043037	660 03 0 00 010000 		TRO	T2,SAFEEN
 10381	043040	201 05 0 00 041466 		MOVEI	S,DST3
 10382	043041	302 02 0 00 112000 		CAIE	T1,112000	;DFMP
 10383	043042	254 00 0 00 043050 		JRST	SCTC3
 10384	043043	606 00 0 00 000040 		TRNN	F,FLAG2
 10385						JRST	[TRO	T2,SAFEEN+SAADD+SAPL1+SAZERO
 10386							MOVEI	S,DFMT3
 10387	043044	254 00 0 00 045521 			JRST	SCTC3]
 10388	043045	670 03 0 00 045524 		TDO	T2,[XWD ADMBEN,SAMI16]
 10389	043046	201 05 0 00 042453 		MOVEI	S,DFMT2
 10390	043047	476 00 0 00 046161 		SETOM	LONGSET
 10391	043050	302 02 0 00 113000 	SCTC3:	CAIE	T1,113000	;DFDV
 10392	043051	254 00 0 00 043061 		JRST	SCTC4
 10393	043052	602 00 0 00 000040 		TRNE	F,FLAG2
 10394						JRST	[SKIPE	INTRQ
 10395							JRST	SCTC4
 10396							SETZM	DFDF1
 10397							MOVEI	S,DFDT5
 10398	043053	254 00 0 00 045525 			JRST	SCTC4]
 10399	043054	402 00 0 00 046112 		SETZM	DFDF1
 10400	043055	201 05 0 00 042556 		MOVEI	S,DFDT7
 10401	043056	660 03 0 00 010000 		TRO	T2,SAFEEN
 10402	043057	606 00 0 00 000020 		TRNN	F,FLAG1
 10403	043060	660 03 0 00 000303 		TRO	T2,SAADD+SAZERO+SAPL1
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 49
KI10A2	MAC	 9-JUN-76 13:56		SHIFT SUBROUTINE                                                               *** SEQ 0270

 10404	043061	201 04 0 00 776000 	SCTC4:	MOVEI	T3,776000
 10405	043062	404 04 0 00 000002 		AND	T3,T1
 10406	043063	302 02 0 00 122000 		CAIE	T1,(FIX)
 10407	043064	306 02 0 00 126000 		CAIN	T1,(FIXR)
 10408	043065	665 01 0 00 060070 		TLOA	T,ADARPL+ADMAGIC+ADCR36+ADADD
 10409	043066	254 00 0 00 043070 		JRST	.+2
 10410	043067	201 05 0 00 042322 		MOVEI	S,FIXT2
 10411	043070	306 02 0 00 127000 		CAIN	T1,(FLTR)
 10412	043071	664 03 0 00 000015 		TROA	T2,SAMI43
 10413	043072	254 00 0 00 043076 		JRST	.+4
 10414	043073	661 01 0 00 000060 		TLO	T,ADARPL
 10415	043074	201 05 0 00 041666 		MOVEI	S,NRT1
 10416	043075	476 00 0 00 046161 		SETOM	LONGSET
 10417	043076	306 04 0 00 110000 		CAIN	T3,110000	;DFAD
 10418	043077	260 17 0 00 042433 		PUSHJ	P,DFAT1B
 10419	043100	306 04 0 00 136000 		CAIN	T3,(IDPB)
 10420	043101	661 01 0 00 000700 		TLO	T,ADARMI+ADBRPL
 10421	043102	405 04 0 00 774000 		ANDI	T3,774000
 10422	043103	306 04 0 00 134000 		CAIN	T3,(ILDB)
 10423	043104	254 00 0 00 043107 		JRST	.+3
 10424	043105	405 04 0 00 770000 		ANDI	T3,770000
 10425	043106	306 04 0 00 220000 		CAIN	T3,(IMUL)
 10426	043107	201 05 0 00 041172 		MOVEI	S,ET1S
 10427	043110	306 04 0 00 240000 		CAIN	T3,(ASH)
 10428	043111	260 17 0 00 036733 		PUSHJ	P,JFFO2B
 10429	043112	302 04 0 00 160000 		CAIE	T3,(FMP)
 10430	043113	254 00 0 00 043116 		JRST	.+3
 10431	043114	660 03 0 00 010000 		TRO	T2,SAFEEN
 10432	043115	201 05 0 00 041660 		MOVEI	S,FMT2
 10433	043116	302 04 0 00 140000 		CAIE	T3,(FAD)
 10434	043117	306 04 0 00 150000 		CAIN	T3,(FSB)
 10435	043120	254 00 0 00 043123 		JRST	.+3
 10436	043121	302 02 0 00 130000 		CAIE	T1,(UFA)
 10437	043122	263 17 0 00 000000 		POPJ	P,
 10438	043123	661 01 0 00 040660 		TLO	T,ADARPL+ADBRPL+ADADD
 10439	043124	201 05 0 00 042662 		MOVEI	S,FAT4
 10440	043125	476 00 0 00 046161 		SETOM	LONGSET
 10441	043126	263 17 0 00 000000 		POPJ	P,
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 50
KI10A2	MAC	 9-JUN-76 13:56		TIME PULSE SUBROUTINES	-INDONE-                                               *** SEQ 0271

 10442					SUBTTL	TIME PULSE SUBROUTINES	-INDONE-
 10443
 10444	043127	332 00 0 00 046076 	INDONE:	SKIPE	BYF5
 10445	043130	254 00 0 00 043164 		JRST	INDON1
 10446	043131	554 04 0 00 000016 		HLRZ	T3,IR
 10447	043132	405 04 0 00 774000 		ANDI	T3,774000
 10448	043133	306 04 0 00 134000 		CAIN	T3,134000
 10449	043134	476 00 0 00 046076 		SETOM	BYF5
 10450	043135	306 04 0 00 134000 		CAIN	T3,134000
 10451	043136	476 00 0 00 046077 		SETOM	BYF6
 10452	043137	332 00 0 00 046077 		SKIPE	BYF6
 10453	043140	661 13 0 00 020000 		TLO	PC,BIS
 10454	043141	306 04 0 00 134000 		CAIN	T3,134000
 10455	043142	476 00 0 00 046222 		SETOM	PSINFT
 10456	043143	332 00 0 00 046076 	INDON2:	SKIPE	BYF5
 10457	043144	254 00 0 00 043150 		JRST	INDON3
 10458	043145	201 04 0 00 000062 		MOVEI	T3,^D50
 10459	043146	272 04 0 00 046276 		ADDM	T3,TIME
 10460	043147	402 00 0 00 046156 		SETZM	IRLTCH#
 10461	043150	336 00 0 00 046225 	INDON3:	SKIPN	RUN#
 10462	043151	254 00 0 00 032160 		JRST	DDTEX
 10463	043152	200 04 0 00 045437 		MOVE	T3,[POINT 4,MB,17]
 10464	043153	202 04 0 00 046123 		MOVEM	T3,FMADREN
 10465	043154	476 00 0 00 046101 		SETOM	CLINSET
 10466	043155	402 00 0 00 046175 		SETZM	MEMWRWT#
 10467	043156	332 00 0 00 046133 		SKIPE	INFTFF
 10468	043157	254 00 0 00 044574 		JRST	INFTS2
 10469	043160	201 05 0 00 040467 		MOVEI	S,IT0
 10470	043161	263 17 0 00 000000 		POPJ	P,
 10471
 10472	043162	000000	000000		ERR:	0
 10473	043163	254 04 0 00 000000 		HALT
 10474
 10475	043164	402 00 0 00 046076 	INDON1:	SETZM	BYF5
 10476	043165	200 13 0 00 000014 		MOVE	PC,MA		;?BYTE IN MEMORY BUG FIX
 10477	043166	254 00 0 00 043143 		JRST	INDON2
 10478						XLIST
 10479						LIST
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 57
KI10A2	MAC	 9-JUN-76 13:56		TIME PULSE SUBROUTINES	-BLT-                                                  *** SEQ 0272

 10480					SUBTTL	TIME PULSE SUBROUTINES	-BLT-
 10481
 10482	043167	674 01 0 00 045532 	BLTT1X:	TDOA	T,[XWD ADBRPL+ADADD+ADPL1B,ABADEN]
 10483	043170	670 01 0 00 045533 	BLTT0:	TDO	T,[XWD ADBRPL+ADADD,MQADEN]
 10484	043171	476 00 0 00 046161 		SETOM	LONGSET
 10485	043172	661 03 0 00 000400 		TLO	T2,ADMSKG
 10486	043173	265 05 0 00 030065 		JSP	S,CPOPJ
 10487
 10488	043174	660 01 0 00 006000 	BLTT1:	TRO	T,ARADEN
 10489	043175	200 02 0 00 040210 		MOVE	T1,ADFLGS
 10490	043176	607 02 0 00 200000 		TLNN	T1,CRY0
 10491	043177	254 00 0 00 043203 		JRST	.+4
 10492	043200	476 00 0 00 046303 		SETOM	TRPSAT
 10493	043201	201 05 0 00 043244 		MOVEI	S,BLTT8
 10494	043202	263 17 0 00 000000 		POPJ	P,
 10495	043203	332 00 0 00 046152 		SKIPE	INTRQ
 10496	043204	254 00 0 00 043233 		JRST	BLTT7A
 10497	043205	476 00 0 00 046172 		SETOM	MEMREAD
 10498	043206	201 02 0 00 000112 		MOVEI	T1,"J"
 10499	043207	202 02 0 00 046173 		MOVEM	T1,MEMSIN
 10500	043210	660 01 0 00 200000 		TRO	T,ABABEN
 10501	043211	265 05 0 00 030065 		JSP	S,CPOPJ
 10502
 10503	043212	660 01 0 00 001000 	BLTT2:	TRO	T,BRAREN
 10504	043213	476 00 0 00 046101 		SETOM	CLINSET
 10505	043214	201 05 0 00 044336 		MOVEI	S,MEMST
 10506	043215	263 17 0 00 000000 		POPJ	P,
 10507
 10508	043216	660 01 0 00 100000 	BLTT3:	TRO	T,ABPCEN
 10509	043217	265 05 0 00 030065 		JSP	S,CPOPJ
 10510
 10511	043220	660 01 0 00 200000 	BLTT4:	TRO	T,ABABEN
 10512	043221	476 00 0 00 046101 	BLTT9A:	SETOM	CLINSET
 10513	043222	201 02 0 00 000105 		MOVEI	T1,"E"
 10514	043223	202 02 0 00 046173 		MOVEM	T1,MEMSIN
 10515	043224	476 00 0 00 046174 		SETOM	MEMWR
 10516	043225	201 05 0 00 044336 		MOVEI	S,MEMST
 10517	043226	263 17 0 00 000000 		POPJ	P,
 10518
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 58
KI10A2	MAC	 9-JUN-76 13:56		TIME PULSE SUBROUTINES	-BLT-                                                  *** SEQ 0273

 10519	043227	661 01 0 00 000600 	BLTT5:	TLO	T,ADBRPL
 10520	043230	476 00 0 00 046215 		SETOM	PFF1
 10521	043231	265 05 0 00 030065 		JSP	S,CPOPJ
 10522
 10523	043232	660 01 0 00 006000 	BLTT6:	TRO	T,ARADEN
 10524	043233	265 05 0 00 030065 	BLTT7A:	JSP	S,CPOPJ
 10525
 10526	043234	660 01 0 00 034000 	BLTT7:	TRO	T,ARPCEN+ARLARR
 10527	043235	476 00 0 00 046126 		SETOM	FMWRSET
 10528	043236	476 00 0 00 046213 		SETOM	PCP1FF
 10529	043237	336 00 0 00 046215 		SKIPN	PFF1
 10530	043240	254 00 0 00 043243 		JRST	BLTT7B
 10531	043241	661 01 0 00 000010 		TLO	T,ADMAGIC
 10532	043242	476 00 0 00 046161 		SETOM	LONGSET
 10533	043243	265 05 0 00 030065 	BLTT7B:	JSP	S,CPOPJ
 10534
 10535	043244	476 00 0 00 046064 	BLTT8:	SETOM	ARMQEN
 10536	043245	670 01 0 00 045534 		TDO	T,[XWD ADARPL,ABADEN+MQADEN]
 10537	043246	402 00 0 00 046072 		SETZM	BLTF1
 10538	043247	265 05 0 00 030065 		JSP	S,CPOPJ
 10539
 10540	043250	670 01 0 00 045535 	BLTT9:	TDO	T,[XWD PCCLK,ABPCEN]
 10541	043251	332 00 0 00 046215 		SKIPE	PFF1
 10542	043252	254 00 0 00 043255 		JRST	.+3
 10543	043253	201 05 0 00 041243 		MOVEI	S,ST1
 10544	043254	263 17 0 00 000000 		POPJ	P,
 10545	043255	476 00 0 00 046064 		SETOM	ARMQEN
 10546	043256	476 00 0 00 046167 		SETOM	MCSPEC
 10547	043257	201 02 0 00 000426 		MOVEI	T1,426
 10548	043260	603 13 0 00 010000 		TLNE	PC,USERF
 10549	043261	201 02 0 00 041014 		MOVEI	T1,USR427
 10550	043262	202 02 0 00 046166 		MOVEM	T1,MCSADR
 10551	043263	254 00 0 00 043221 		JRST	BLTT9A
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 59
KI10A2	MAC	 9-JUN-76 13:56		REGISTER MIXERS, ETC.                                                          *** SEQ 0274

 10552					SUBTTL	REGISTER MIXERS, ETC.
 10553
 10554	043264	402 00 0 00 046074 	BRMIXR:	SETZM	BRMIX
 10555	043265	476 00 0 00 046073 		SETOM	BRCLK#
 10556	043266	606 01 0 00 001000 		TRNN	T,BRAREN
 10557	043267	354 00 0 00 046073 		AOSA	BRCLK
 10558	043270	202 06 0 00 046074 		MOVEM	AR,BRMIX#
 10559	043271	200 02 0 00 000006 		MOVE	T1,AR
 10560	043272	241 02 0 00 000002 		ROT	T1,2
 10561	043273	550 03 0 00 046246 		HRRZ	T2,STATE
 10562	043274	306 03 0 00 042170 		CAIN	T2,DNT2
 10563	043275	137 02 0 00 045536 		DPB	T1,[POINT 1,BRMIX,0]
 10564	043276	200 04 0 00 046233 		MOVE	T3,SCADEN
 10565	043277	607 04 0 00 000004 		TLNN	T3,BRARXE
 10566	043300	263 17 0 00 000000 		POPJ	P,
 10567	043301	476 00 0 00 046073 		SETOM	BRCLK
 10568	043302	200 02 0 00 046067 		MOVE	T1,ARX
 10569	043303	436 02 0 00 046074 		IORM	T1,BRMIX
 10570	043304	263 17 0 00 000000 		POPJ	P,
 10571
 10572	043305	200 02 0 00 046037 	ABMIXR:	MOVE	T1,AB
 10573	043306	602 00 0 00 100000 		TRNE	F,ABPC
 10574	043307	200 02 0 00 046214 		MOVE	T1,PCP1G
 10575	043310	602 00 0 00 400000 		TRNE	F,ABAD
 10576	043311	550 02 0 00 000011 		HRRZ	T1,AD
 10577	043312	602 00 0 00 200000 		TRNE	F,ABAB
 10578	043313	550 02 0 00 046037 		HRRZ	T1,AB#
 10579	043314	202 02 0 00 046037 		MOVEM	T1,AB
 10580	043315	263 17 0 00 000000 		POPJ	P,
 10581
 10582	043316	332 00 0 00 046125 	FMVAL:	SKIPE	FMSINAC
 10583	043317	402 00 0 00 046122 		SETZM	FMADMA
 10584	043320	331 02 0 00 046122 		SKIPL	T1,FMADMA
 10585	043321	135 02 0 00 046123 		LDB	T1,FMADREN
 10586	043322	201 02 0 02 032173 		MOVEI	T1,ACS(T1)
 10587	043323	202 02 0 00 046124 		MOVEM	T1,FMREG
 10588	043324	402 00 0 00 046125 		SETZM	FMSINAC
 10589	043325	263 17 0 00 000000 		POPJ	P,
 10590
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 60
KI10A2	MAC	 9-JUN-76 13:56		REGISTER MIXERS, ETC.                                                          *** SEQ 0275

 10591	043326	403 02 0 00 046056 	ARMIXR:	SETZB	T1,ARCLK#
 10592	043327	606 01 0 00 076000 		TRNN	T,ARADEN!ARSWAP!ARPCEN!ARFLGS!ARIREN
 10593	043330	254 00 0 00 043352 		JRST	ARMIX1
 10594	043331	476 00 0 00 046056 		SETOM	ARCLK
 10595	043332	602 01 0 00 002000 		TRNE	T,ARLTAD
 10596	043333	500 02 0 00 000011 		HLL	T1,AD
 10597	043334	602 01 0 00 004000 		TRNE	T,ARRTAD
 10598	043335	540 02 0 00 000011 		HRR	T1,AD
 10599	043336	602 01 0 00 010000 		TRNE	T,ARRARL
 10600	043337	544 02 0 00 000006 		HLR	T1,AR
 10601	043340	602 01 0 00 020000 		TRNE	T,ARLARR
 10602	043341	504 02 0 00 000006 		HRL	T1,AR
 10603	043342	640 01 0 00 022000 		TRC	T,ARFLGS
 10604	043343	646 01 0 00 022000 		TRCN	T,ARFLGS
 10605	043344	500 02 0 00 000013 		HLL	T1,PC
 10606	043345	640 01 0 00 014000 		TRC	T,ARPCEN
 10607	043346	646 01 0 00 014000 		TRCN	T,ARPCEN
 10608	043347	540 02 0 00 046214 		HRR	T1,PCP1G
 10609	043350	602 01 0 00 040000 		TRNE	T,ARIREN
 10610	043351	434 02 0 00 000016 		IOR	T1,IR
 10611
 10612	043352	332 00 0 00 046066 	ARMIX1:	SKIPE	ARSMR#
 10613	043353	260 17 0 00 043423 		PUSHJ	P,ARMIX6
 10614	043354	332 00 0 00 046057 		SKIPE	ARESAEN#
 10615	043355	260 17 0 00 043410 		PUSHJ	P,ARMIX7
 10616	043356	602 01 0 00 000200 		TRNE	T,ARSHLT
 10617	043357	260 17 0 00 043445 		PUSHJ	P,ARLT
 10618	043360	602 01 0 00 000100 		TRNE	T,ARSHRT
 10619	043361	260 17 0 00 043471 		PUSHJ	P,ARRT1
 10620	043362	602 01 0 00 000040 		TRNE	T,ARSHR2
 10621	043363	260 17 0 00 043503 		PUSHJ	P,ARRT2
 10622	043364	602 01 0 00 000400 		TRNE	T,ARCLR
 10623	043365	476 00 0 00 046056 		SETOM	ARCLK
 10624	043366	336 00 0 00 046065 		SKIPN	ARPOSEN
 10625	043367	254 00 0 00 043375 		JRST	ARMIX5
 10626	043370	200 03 0 00 046226 		MOVE	T2,SA
 10627	043371	200 04 0 00 000006 		MOVE	T3,AR
 10628	043372	137 03 0 00 045537 		DPB	T2,[POINT 6,T3,5]
 10629	043373	434 02 0 00 000004 		IOR	T1,T3
 10630	043374	476 00 0 00 046056 		SETOM	ARCLK
 10631	043375	602 00 0 00 000020 	ARMIX5:	TRNE	F,FLAG1
 10632	043376	254 00 0 00 043431 		JRST	ARMIX2
 10633	043377	332 03 0 00 046064 	ARMIX8:	SKIPE	T2,ARMQEN#
 10634	043400	434 02 0 00 000007 		IOR	T1,MQ
 10635	043401	332 00 0 00 046061 	ARMIX3:	SKIPE	ARI08
 10636	043402	661 02 0 00 001000 		TLO	T1,1000
 10637	043403	402 00 0 00 046061 		SETZM	ARI08
 10638	043404	202 02 0 00 046063 		MOVEM	T1,ARMIX#
 10639	043405	322 03 0 00 030065 		JUMPE	T2,CPOPJ
 10640	043406	476 00 0 00 046056 	ARMIX4:	SETOM	ARCLK
 10641	043407	263 17 0 00 000000 		POPJ	P,
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 61
KI10A2	MAC	 9-JUN-76 13:56		REGISTER MIXERS, ETC.                                                          *** SEQ 0276

 10642	043410	200 03 0 00 046226 	ARMIX7:	MOVE	T2,SA
 10643	043411	405 03 0 00 000377 		ANDI	T2,377
 10644	043412	640 03 0 00 000200 		TRC	T2,200
 10645	043413	241 03 0 00 777767 		ROT	T2,-11
 10646	043414	434 02 0 00 000003 		IOR	T1,T2
 10647	043415	200 03 0 00 000006 		MOVE	T2,AR
 10648	043416	554 04 0 00 000016 		HLRZ	T3,IR
 10649	043417	640 04 0 00 131000 		TRC	T3,(DFN)
 10650	043420	606 04 0 00 777000 		TRNN	T3,777000
 10651	043421	641 03 0 00 400000 		TLC	T2,(1B0)
 10652	043422	334 00 0 00 000000 		SKIPA
 10653
 10654	043423	331 03 0 00 000006 	ARMIX6:	SKIPL	T2,AR
 10655	043424	625 03 0 00 377000 		TLZA	T2,377000
 10656	043425	661 03 0 00 377000 		TLO	T2,377000
 10657	043426	434 02 0 00 000003 		IOR	T1,T2
 10658	043427	476 00 0 00 046056 		SETOM	ARCLK
 10659	043430	263 17 0 00 000000 		POPJ	P,
 10660
 10661	043431	554 04 0 00 000016 	ARMIX2:	HLRZ	T3,IR
 10662	043432	640 04 0 00 220000 		TRC	T3,(IMUL)
 10663	043433	602 04 0 00 770000 		TRNE	T3,770000
 10664	043434	254 00 0 00 043377 		JRST	ARMIX8
 10665	043435	336 03 0 00 046064 		SKIPN	T2,ARMQEN
 10666	043436	254 00 0 00 043401 		JRST	ARMIX3
 10667	043437	200 03 0 00 000007 		MOVE	T2,MQ
 10668	043440	607 06 0 00 400000 		TLNN	AR,(1B0)
 10669	043441	625 03 0 00 400000 		TLZA	T2,(1B0)
 10670	043442	661 03 0 00 400000 		TLO	T2,(1B0)
 10671	043443	434 02 0 00 000003 		IOR	T1,T2
 10672	043444	265 03 0 00 043401 		JSP	T2,ARMIX3
 10673
 10674	043445	200 04 0 00 046243 	ARLT:	MOVE	T3,SINDEX#
 10675	043446	550 03 0 00 046246 		HRRZ	T2,STATE
 10676	043447	302 03 0 00 042501 		CAIE	T2,DFDT3
 10677	043450	634 03 0 00 000003 		TDZA	T2,T2
 10678	043451	476 00 0 00 000003 		SETOM	T2
 10679	043452	404 03 0 00 000012 		AND	T2,MB
 10680	043453	202 03 0 00 046062 		MOVEM	T2,ARLTEM#
 10681	043454	332 00 0 00 046113 		SKIPE	DSF2
 10682	043455	254 00 0 00 043462 		JRST	ARLT1
 10683	043456	554 03 0 00 000016 		HLRZ	T2,IR
 10684	043457	640 03 0 00 170000 		TRC	T2,(FDV)
 10685	043460	606 03 0 00 770000 		TRNN	T2,770000
 10686	043461	254 00 0 00 043464 		JRST	.+3
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 62
KI10A2	MAC	 9-JUN-76 13:56		REGISTER MIXERS, ETC.                                                          *** SEQ 0277

 10687	043462	135 03 0 04 044056 	ARLT1:	LDB	T2,AR35L(T3)
 10688	043463	434 02 0 00 000003 		IOR	T1,T2
 10689	043464	135 03 0 04 044043 		LDB	T2,AR0L(T3)
 10690	043465	200 04 0 00 000011 		MOVE	T3,AD
 10691	043466	242 04 0 00 000002 		LSH	T3,2
 10692	043467	245 03 0 00 777777 		ROTC	T2,-1
 10693	043470	254 00 0 00 043501 		JRST	ARRT1A
 10694
 10695	043471	200 04 0 00 046243 	ARRT1:	MOVE	T3,SINDEX
 10696	043472	135 03 0 04 044071 		LDB	T2,AR0R1(T3)
 10697	043473	241 03 0 00 777777 		ROT	T2,-1
 10698	043474	434 02 0 00 000003 		IOR	T1,T2
 10699	043475	135 03 0 04 044132 		LDB	T2,AR1R1(T3)
 10700	043476	200 04 0 00 000011 		MOVE	T3,AD
 10701	043477	242 04 0 00 000001 		LSH	T3,1
 10702	043500	245 03 0 00 777776 		ROTC	T2,-2
 10703	043501	434 02 0 00 000004 	ARRT1A:	IOR	T1,T3
 10704	043502	254 00 0 00 043406 		JRST	ARMIX4
 10705
 10706	043503	200 04 0 00 046243 	ARRT2:	MOVE	T3,SINDEX
 10707	043504	135 03 0 04 044104 		LDB	T2,AR0R2(T3)
 10708	043505	241 03 0 00 777777 		ROT	T2,-1
 10709	043506	434 02 0 00 000003 		IOR	T1,T2
 10710	043507	135 03 0 04 044117 		LDB	T2,AR1R2(T3)
 10711	043510	135 04 0 04 044132 		LDB	T3,AR2R2(T3)
 10712	043511	242 03 0 00 000001 		LSH	T2,1
 10713	043512	434 03 0 00 000004 		IOR	T2,T3
 10714	043513	200 04 0 00 000011 		MOVE	T3,AD
 10715	043514	242 04 0 00 000001 		LSH	T3,1
 10716	043515	245 03 0 00 777775 		ROTC	T2,-3
 10717	043516	254 00 0 00 043501 		JRST	ARRT1A
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 63
KI10A2	MAC	 9-JUN-76 13:56		REGISTER MIXERS, ETC.                                                          *** SEQ 0278

 10718	043517	403 02 0 00 046200 	MQMIXR:	SETZB	T1,MQCLK
 10719	043520	602 01 0 00 000010 		TRNE	T,MQADEN
 10720	043521	260 17 0 00 043554 		PUSHJ	P,MQLTB
 10721	043522	602 01 0 00 000004 		TRNE	T,MQSHLT
 10722	043523	260 17 0 00 043534 		PUSHJ	P,MQLT
 10723	043524	602 01 0 00 000002 		TRNE	T,MQSHRT
 10724	043525	260 17 0 00 043557 		PUSHJ	P,MQRT1
 10725	043526	602 01 0 00 000001 		TRNE	T,MQSHR2
 10726	043527	260 17 0 00 043574 		PUSHJ	P,MQRT2
 10727	043530	602 01 0 00 000020 		TRNE	T,MQCLR
 10728	043531	476 00 0 00 046200 		SETOM	MQCLK
 10729	043532	202 02 0 00 046201 		MOVEM	T1,MQMIX#
 10730	043533	263 17 0 00 000000 		POPJ	P,
 10731
 10732	043534	200 04 0 00 046243 	MQLT:	MOVE	T3,SINDEX
 10733	043535	452 11 0 00 046204 		SETCAM	AD,NEGAD#
 10734	043536	336 00 0 00 046113 		SKIPN	DSF2
 10735	043537	402 00 0 00 046204 		SETZM	NEGAD
 10736	043540	200 03 0 00 046052 		MOVE	T2,ADX
 10737	043541	452 03 0 00 046205 		SETCAM	T2,NEGADX#
 10738	043542	135 03 0 04 044275 		LDB	T2,MQ35L(T3)
 10739	043543	434 02 0 00 000003 		IOR	T1,T2
 10740	043544	135 03 0 04 044173 		LDB	T2,MQ0L(T3)
 10741	043545	200 04 0 00 000007 		MOVE	T3,MQ
 10742	043546	242 04 0 00 000002 		LSH	T3,2
 10743	043547	245 03 0 00 777777 		ROTC	T2,-1
 10744	043550	200 03 0 00 046243 		MOVE	T2,SINDEX
 10745	043551	306 03 0 00 000010 		CAIN	T2,10		;FP SHIFT
 10746	043552	621 04 0 00 002000 		TLZ	T3,(1B7)
 10747	043553	674 02 0 00 000004 	MQLTA:	TDOA	T1,T3
 10748	043554	434 02 0 00 000011 	MQLTB:	IOR	T1,AD
 10749	043555	476 00 0 00 046200 		SETOM	MQCLK
 10750	043556	263 17 0 00 000000 		POPJ	P,
 10751
 10752	043557	200 04 0 00 046243 	MQRT1:	MOVE	T3,SINDEX
 10753	043560	135 03 0 04 044323 		LDB	T2,MQ8R1(T3)
 10754	043561	241 03 0 00 777767 		ROT	T2,-11
 10755	043562	434 02 0 00 000003 		IOR	T1,T2
 10756	043563	135 03 0 04 044234 		LDB	T2,MQ0R1(T3)
 10757	043564	135 04 0 04 044247 		LDB	T3,MQ1R1(T3)
 10758	043565	242 03 0 00 000001 		LSH	T2,1
 10759	043566	434 03 0 00 000004 		IOR	T2,T3
 10760	043567	200 04 0 00 000007 		MOVE	T3,MQ
 10761	043570	242 04 0 00 000001 		LSH	T3,1
 10762	043571	245 03 0 00 777776 		ROTC	T2,-2
 10763	043572	621 04 0 00 001000 		TLZ	T3,(1B8)
 10764	043573	254 00 0 00 043553 		JRST	MQLTA
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 64
KI10A2	MAC	 9-JUN-76 13:56		REGISTER MIXERS, ETC.                                                          *** SEQ 0279

 10765	043574	200 04 0 00 046243 	MQRT2:	MOVE	T3,SINDEX
 10766	043575	135 03 0 04 044310 		LDB	T2,MQ8R2(T3)
 10767	043576	241 03 0 00 777767 		ROT	T2,-11
 10768	043577	434 02 0 00 000003 		IOR	T1,T2
 10769	043600	135 03 0 04 044323 		LDB	T2,MQ9R2(T3)
 10770	043601	241 03 0 00 777766 		ROT	T2,-12
 10771	043602	434 02 0 00 000003 		IOR	T1,T2
 10772	043603	135 03 0 04 044206 		LDB	T2,MQ0R2(T3)
 10773	043604	241 03 0 00 777777 		ROT	T2,-1
 10774	043605	434 02 0 00 000003 		IOR	T1,T2
 10775	043606	135 03 0 04 044221 		LDB	T2,MQ1R2(T3)
 10776	043607	135 04 0 04 044262 		LDB	T3,MQ2R2(T3)
 10777	043610	242 03 0 00 000001 		LSH	T2,1
 10778	043611	434 03 0 00 000004 		IOR	T2,T3
 10779	043612	200 04 0 00 000007 		MOVE	T3,MQ
 10780	043613	242 04 0 00 000001 		LSH	T3,1
 10781	043614	245 03 0 00 777775 		ROTC	T2,-3
 10782	043615	621 04 0 00 001400 		TLZ	T3,(3B9)
 10783	043616	254 00 0 00 043553 		JRST	MQLTA
 10784
 10785	043617	200 04 0 00 046233 	MBMIXR:	MOVE	T3,SCADEN
 10786	043620	403 02 0 00 046164 		SETZB	T1,MBCLK
 10787	043621	603 04 0 00 000002 		TLNE	T3,MBAREN
 10788	043622	260 17 0 00 043627 		PUSHJ	P,MBMIX1
 10789	043623	603 04 0 00 000001 		TLNE	T3,MBFMEN
 10790	043624	260 17 0 00 043630 		PUSHJ	P,MBMIX2
 10791	043625	202 02 0 00 046165 		MOVEM	T1,MBMIX
 10792	043626	263 17 0 00 000000 		POPJ	P,
 10793
 10794	043627	674 02 0 00 000006 	MBMIX1:	TDOA	T1,AR
 10795	043630	434 02 1 00 046124 	MBMIX2:	IOR	T1,@FMREG
 10796	043631	476 00 0 00 046164 		SETOM	MBCLK
 10797	043632	263 17 0 00 000000 		POPJ	P,
 10798
 10799	043633	200 04 0 00 046233 	SCMIXR:	MOVE	T3,SCADEN
 10800	043634	403 02 0 00 046235 		SETZB	T1,SCCLK
 10801	043635	571 03 0 15 000001 		HRREI	T2,1(SC)
 10802	043636	602 00 0 00 000400 		TRNE	F,SCP1IN
 10803	043637	200 03 0 00 000015 		MOVE	T2,SC
 10804	043640	602 04 0 00 200000 		TRNE	T3,SCSCP1
 10805	043641	260 17 0 00 043660 		PUSHJ	P,SCMIX3
 10806	043642	602 04 0 00 100000 		TRNE	T3,SCSHRT
 10807	043643	260 17 0 00 043657 		PUSHJ	P,SCMIX4
 10808	043644	602 04 0 00 040000 		TRNE	T3,SCAREN
 10809	043645	260 17 0 00 043652 		PUSHJ	P,SCMIX5
 10810	043646	602 04 0 00 020000 		TRNE	T3,SCSAEN
 10811	043647	260 17 0 00 043663 		PUSHJ	P,SCMIX1
 10812	043650	202 02 0 00 046237 		MOVEM	T1,SCMIX
 10813	043651	263 17 0 00 000000 		POPJ	P,
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 65
KI10A2	MAC	 9-JUN-76 13:56		REGISTER MIXERS, ETC.                                                          *** SEQ 0280

 10814	043652	200 03 0 00 000006 	SCMIX5:	MOVE	T2,AR
 10815	043653	405 03 0 00 000377 		ANDI	T2,377
 10816	043654	602 06 0 00 400000 		TRNE	AR,1B18
 10817	043655	465 03 0 00 000377 		ORCMI	T2,377
 10818	043656	334 00 0 00 000000 		SKIPA
 10819	043657	240 03 0 00 777777 	SCMIX4:	ASH	T2,-1
 10820	043660	670 02 0 00 000003 	SCMIX3:	TDO	T1,T2
 10821	043661	476 00 0 00 046235 		SETOM	SCCLK
 10822	043662	263 17 0 00 000000 		POPJ	P,
 10823	043663	200 03 0 00 046226 	SCMIX1:	MOVE	T2,SA
 10824	043664	405 03 0 00 000777 		ANDI	T2,777
 10825	043665	602 03 0 00 000400 		TRNE	T2,400
 10826	043666	465 03 0 00 000777 		ORCMI	T2,777
 10827	043667	254 00 0 00 043660 		JRST	SCMIX3
 10828
 10829	043670	403 02 0 00 046070 	ARXMXR:	SETZB	T1,ARXCLK
 10830	043671	250 01 0 00 046233 		EXCH	T,SCADEN
 10831	043672	603 01 0 00 000200 		TLNE	T,ARXCLR
 10832	043673	476 00 0 00 046070 		SETOM	ARXCLK
 10833	043674	603 01 0 00 000100 		TLNE	T,ARXADX
 10834	043675	260 17 0 00 043720 		PUSHJ	P,ARXMX1
 10835	043676	200 04 0 00 046243 		MOVE	T3,SINDEX
 10836	043677	603 01 0 00 000040 		TLNE	T,ARXSHL
 10837	043700	260 17 0 00 043713 		PUSHJ	P,ARXMX2
 10838	043701	603 01 0 00 000020 		TLNE	T,ARXSHR
 10839	043702	260 17 0 00 043723 		PUSHJ	P,ARXMX3
 10840	043703	603 01 0 00 000010 		TLNE	T,ARXSR2
 10841	043704	260 17 0 00 043732 		PUSHJ	P,ARXMX4
 10842	043705	603 02 0 00 001000 		TLNE	T1,(1B8)
 10843	043706	665 02 0 00 776000 		TLOA	T1,776000
 10844	043707	621 02 0 00 776000 		TLZ	T1,776000
 10845	043710	202 02 0 00 046071 		MOVEM	T1,ARXMIX
 10846	043711	250 01 0 00 046233 		EXCH	T,SCADEN
 10847	043712	263 17 0 00 000000 		POPJ	P,
 10848
 10849	043713	200 03 0 00 046052 	ARXMX2:	MOVE	T2,ADX
 10850	043714	242 03 0 00 000001 		LSH	T2,1
 10851	043715	434 02 0 00 000003 		IOR	T1,T2
 10852	043716	135 03 0 04 044145 		LDB	T2,ARX35L(T3)
 10853	043717	674 02 0 00 000003 	ARXMX5:	TDOA	T1,T2
 10854
 10855	043720	434 02 0 00 046052 	ARXMX1:	IOR	T1,ADX
 10856	043721	476 00 0 00 046070 		SETOM	ARXCLK#
 10857	043722	263 17 0 00 000000 		POPJ	P,
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 66
KI10A2	MAC	 9-JUN-76 13:56		REGISTER MIXERS, ETC.                                                          *** SEQ 0281

 10858	043723	200 03 0 00 046052 	ARXMX3:	MOVE	T2,ADX
 10859	043724	242 03 0 00 777777 		LSH	T2,-1
 10860	043725	621 03 0 00 777000 		TLZ	T2,777000
 10861	043726	434 02 0 00 000003 		IOR	T1,T2
 10862	043727	135 03 0 04 044160 		LDB	T2,ARX0R1(T3)
 10863	043730	241 03 0 00 777767 		ROT	T2,-11
 10864	043731	254 00 0 00 043717 		JRST	ARXMX5
 10865
 10866	043732	200 03 0 00 046052 	ARXMX4:	MOVE	T2,ADX
 10867	043733	240 03 0 00 777776 		ASH	T2,-2
 10868	043734	254 00 0 00 043717 		JRST	ARXMX5
 10869
 10870	043735	621 00 0 00 777770 	ADCLK:	TLZ	F,777770
 10871	043736	650 00 0 00 000001 		TDC	F,T
 10872	043737	621 01 0 00 777770 		TLZ	T,777770
 10873	043740	650 00 0 00 000001 		TDC	F,T
 10874	043741	200 02 0 00 046233 		MOVE	T1,SCADEN
 10875	043742	202 02 0 00 046234 		MOVEM	T1,SCADFF#
 10876	043743	622 00 0 00 000010 		TRZE	F,DSF2CLR
 10877	043744	402 00 0 00 046113 		SETZM	DSF2#
 10878	043745	622 00 0 00 000004 		TRZE	F,DSF2SET
 10879	043746	476 00 0 00 046113 		SETOM	DSF2
 10880	043747	263 17 0 00 000000 		POPJ	P,
 10881
 10882	043750	602 01 0 00 700000 	ABCLK:	TRNE	T,ABADEN+ABPCEN+ABABEN	;IF NONE AND
 10883	043751	254 00 0 00 043754 		JRST	.+3
 10884	043752	603 01 0 00 000004 		TLNE	T,INFTST		;INST FETCH START
 10885	043753	660 01 0 00 200000 		TRO	T,ABABEN		;SET ABABEN
 10886	043754	602 01 0 00 700000 		TRNE	T,ABADEN+ABPCEN+ABABEN		;IF ENABLE, CLEAR OTHER FLOPS
 10887	043755	620 00 0 00 700002 		TRZ	F,ABAD+ABAB+ABPC+ABAS
 10888	043756	602 01 0 00 100000 		TRNE	T,ABPCEN		;SET FLOPS
 10889	043757	660 00 0 00 100000 		TRO	F,ABPC
 10890	043760	602 01 0 00 400000 		TRNE	T,ABADEN
 10891	043761	660 00 0 00 400000 		TRO	F,ABAD
 10892	043762	602 01 0 00 200000 		TRNE	T,ABABEN
 10893	043763	660 00 0 00 200000 		TRO	F,ABAB
 10894	043764	263 17 0 00 000000 		POPJ	P,
 10895
 10896	043765	331 02 0 00 046122 	FMWR:	SKIPL	T1,FMADMA
 10897	043766	135 02 0 00 046123 		LDB	T1,FMADREN
 10898	043767	201 02 0 02 032173 		MOVEI	T1,ACS(T1)
 10899	043770	312 02 0 00 046124 		CAME	T1,FMREG
 10900	043771	264 00 0 00 043162 		JSR	ERR
 10901	043772	202 06 0 02 000000 		MOVEM	AR,(T1)
 10902	043773	332 00 0 00 046231 		SKIPE	SACBRFF
 10903	043774	202 10 0 02 000000 		MOVEM	BR,(T1)
 10904	043775	263 17 0 00 000000 		POPJ	P,
 10905
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 67
KI10A2	MAC	 9-JUN-76 13:56		REGISTER MIXERS, ETC.                                                          *** SEQ 0282

 10906	043776	200 03 0 00 044762 	TIMCAL:	MOVE	T2,LONGTM
 10907	043777	335 04 0 00 046234 		SKIPGE	T3,SCADFF
 10908	044000	200 03 0 00 044763 		MOVE	T2,DPADTM
 10909	044001	321 04 0 00 044012 		JUMPL	T3,TIMC1
 10910	044002	606 00 0 00 040000 		TRNN	F,LNGCYC
 10911	044003	200 03 0 00 044761 		MOVE	T2,ADTIME
 10912	044004	607 00 0 00 040000 		TLNN	F,ADADD
 10913	044005	602 04 0 00 000100 		TRNE	T3,SAADD
 10914	044006	254 00 0 00 044012 		JRST	TIMC1
 10915	044007	200 03 0 00 044761 		MOVE	T2,ADTIME
 10916	044010	606 00 0 00 040000 		TRNN	F,LNGCYC
 10917	044011	200 03 0 00 044760 		MOVE	T2,VERTIM
 10918	044012	272 03 0 00 046276 	TIMC1:	ADDM	T2,TIME
 10919	044013	263 17 0 00 000000 		POPJ	P,
 10920
 10921	044014	261 17 0 00 000003 	MPYFCN:	PUSH	P,T2
 10922	044015	260 17 0 00 043517 		PUSHJ	P,MQMIXR
 10923	044016	262 17 0 00 000003 		POP	P,T2
 10924	044017	200 02 0 00 046201 		MOVE	T1,MQMIX
 10925	044020	602 00 0 00 000020 		TRNE	F,FLAG1
 10926	044021	271 02 0 00 000001 		ADDI	T1,1
 10927	044022	405 02 0 00 000003 		ANDI	T1,3
 10928	044023	254 00 0 02 044024 		JRST	.+1(T1)
 10929	044024	263 17 0 00 000000 		POPJ	P,
 10930	044025	254 00 0 00 044034 		JRST	MPYFN1
 10931	044026	254 00 0 00 044033 		JRST	MPYFN2
 10932	044027	660 00 0 00 000020 		TRO	F,FLAG1
 10933	044030	661 01 0 00 061000 	MPYFN5:	TLO	T,ADBRMI+ADADD+ADCR36
 10934	044031	661 03 0 00 040000 		TLO	T2,ADXFMM
 10935	044032	254 00 0 00 044040 		JRST	MPYFN4
 10936
 10937	044033	665 01 0 00 040000 	MPYFN2:	TLOA	T,ADADD
 10938	044034	665 01 0 00 040600 	MPYFN1:	TLOA	T,ADBRPL+ADADD
 10939	044035	665 03 0 00 021000 		TLOA	T2,ADXFM2+ADBRP2
 10940	044036	661 03 0 00 100000 		TLO	T2,ADXFMP
 10941	044037	620 00 0 00 000020 	MPYFN3:	TRZ	F,FLAG1
 10942	044040	607 16 0 00 040000 	MPYFN4:	TLNN	IR,(1B3)
 10943	044041	661 03 0 00 400000 		TLO	T2,ADXADD
 10944	044042	263 17 0 00 000000 		POPJ	P,
 10945
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 68
KI10A2	MAC	 9-JUN-76 13:56		SHIFT CONNECTIONS                                                              *** SEQ 0283

 10946					SUBTTL	SHIFT CONNECTIONS
 10947
 10948						DEFINE	PT(ADR,BIT)
 10949					<	POINT	1,ADR,BIT>
 10950
 10951	044043	42 01 0 00 000011 	AR0L:	PT AD,1^	POINT	1,AD,1^
 10952	044044	42 01 0 00 000011 		PT AD,1^	POINT	1,AD,1^
 10953	044045	42 01 0 00 000011 		PT AD,1^	POINT	1,AD,1^
 10954	044046	42 01 0 00 000011 		PT AD,1^	POINT	1,AD,1^
 10955	044047	43 01 0 00 000006 		PT AR,0^	POINT	1,AR,0^
 10956	044050	43 01 0 00 000006 		PT AR,0^	POINT	1,AR,0^
 10957	044051	42 01 0 00 000011 		PT AD,1^	POINT	1,AD,1^
 10958	044052	000000	000000			0
 10959	044053	42 01 0 00 000011 		PT AD,1^	POINT	1,AD,1^
 10960	044054	000000	000000			0
 10961	044055	42 01 0 00 000011 		PT AD,1^	POINT	1,AD,1^
 10962
 10963	044056	000000	000000		AR35L:	0
 10964	044057	43 01 0 00 000006 		PT AR,0^	POINT	1,AR,0^
 10965	044060	43 01 0 00 000007 		PT MQ,0^	POINT	1,MQ,0^
 10966	044061	43 01 0 00 000007 		PT MQ,0^	POINT	1,MQ,0^
 10967	044062	000000	000000			0
 10968	044063	42 01 0 00 000007 		PT MQ,1^	POINT	1,MQ,1^
 10969	044064	43 01 0 00 000007 		PT MQ,0^	POINT	1,MQ,0^
 10970	044065	42 01 0 00 000007 		PT MQ,1^	POINT	1,MQ,1^
 10971	044066	33 01 0 00 000007 		PT MQ,8^	POINT	1,MQ,8^
 10972	044067	00 01 0 00 046062 		PT ARLTEM,35^	POINT	1,ARLTEM,35^
 10973	044070	42 01 0 00 000007 		PT MQ,1^	POINT	1,MQ,1^
 10974
 10975	044071	000000	000000		AR0R1:	0
 10976	044072	00 01 0 00 000006 		PT AR,35^	POINT	1,AR,35^
 10977	044073	00 01 0 00 000007 		PT MQ,35^	POINT	1,MQ,35^
 10978	044074	000000	000000			0
 10979	044075	43 01 0 00 000006 		PT AR,0^	POINT	1,AR,0^
 10980	044076	43 01 0 00 000006 		PT AR,0^	POINT	1,AR,0^
 10981	044077	000000	000000			.-.		;DON'T CARE CONDITION
 10982	044100	000000	000000			0
 10983	044101	00 01 0 00 046046 		PT ADOVF,35^	POINT	1,ADOVF,35^
 10984	044102	000000	000000			.-.
 10985	044103	000000	000000			.-.
 10986
 10987	044104	000000	000000		AR0R2:	0
 10988	044105	01 01 0 00 000006 		PT AR,34^	POINT	1,AR,34^
 10989	044106	01 01 0 00 000007 		PT MQ,34^	POINT	1,MQ,34^
 10990	044107	000000	000000			0
 10991	044110	43 01 0 00 000006 		PT AR,0^	POINT	1,AR,0^
 10992	044111	43 01 0 00 000006 		PT AR,0^	POINT	1,AR,0^
 10993	044112	01 01 0 00 046046 		PT ADOVF,34^	POINT	1,ADOVF,34^
 10994	044113	000000	000000			0
 10995	044114	01 01 0 00 046046 		PT ADOVF,34^	POINT	1,ADOVF,34^
 10996	044115	000000	000000			.-.
 10997	044116	000000	000000			.-.
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 69
KI10A2	MAC	 9-JUN-76 13:56		SHIFT CONNECTIONS                                                              *** SEQ 0284

 10998	044117	000000	000000		AR1R2:	0
 10999	044120	00 01 0 00 000006 		PT AR,35^	POINT	1,AR,35^
 11000	044121	00 01 0 00 000007 		PT MQ,35^	POINT	1,MQ,35^
 11001	044122	000000	000000			0
 11002	044123	43 01 0 00 000006 		PT AR,0^	POINT	1,AR,0^
 11003	044124	43 01 0 00 000006 		PT AR,0^	POINT	1,AR,0^
 11004	044125	00 01 0 00 046046 		PT ADOVF,35^	POINT	1,ADOVF,35^
 11005	044126	01 01 0 00 046052 		PT ADX,34^	POINT	1,ADX,34^
 11006	044127	00 01 0 00 046046 		PT ADOVF,35^	POINT	1,ADOVF,35^
 11007	044130	000000	000000			.-.
 11008	044131	000000	000000			.-.
 11009
 11010	044132				AR1R1:
 11011	044132	43 01 0 00 000011 	AR2R2:	PT AD,0^	POINT	1,AD,0^
 11012	044133	43 01 0 00 000011 		PT AD,0^	POINT	1,AD,0^
 11013	044134	43 01 0 00 000011 		PT AD,0^	POINT	1,AD,0^
 11014	044135	43 01 0 00 000011 		PT AD,0^	POINT	1,AD,0^
 11015	044136	43 01 0 00 000011 		PT AD,0^	POINT	1,AD,0^
 11016	044137	43 01 0 00 000011 		PT AD,0^	POINT	1,AD,0^
 11017	044140	43 01 0 00 000011 		PT AD,0^	POINT	1,AD,0^
 11018	044141	00 01 0 00 046052 		PT ADX,35^	POINT	1,ADX,35^
 11019	044142	43 01 0 00 000011 		PT AD,0^	POINT	1,AD,0^
 11020	044143	000000	000000			.-.
 11021	044144	000000	000000			.-.
 11022
 11023	044145	000000	000000		ARX35L:	.-.
 11024	044146	000000	000000			.-.
 11025	044147	000000	000000			.-.
 11026	044150	000000	000000			.-.
 11027	044151	000000	000000			.-.
 11028	044152	000000	000000			.-.
 11029	044153	000000	000000			.-.
 11030	044154	42 01 0 00 000011 		PT AD,1^	POINT	1,AD,1^
 11031	044155	000000	000000			.-.
 11032	044156	42 01 0 00 046050 		PT ADPR,1^	POINT	1,ADPR,1^
 11033	044157	000000	000000			.-.
 11034
 11035	044160				ARX9R2:
 11036	044160	000000	000000		ARX0R1:	.-.
 11037	044161	000000	000000			.-.
 11038	044162	000000	000000			.-.
 11039	044163	000000	000000			.-.
 11040	044164	000000	000000			.-.
 11041	044165	000000	000000			.-.
 11042	044166	000000	000000			.-.
 11043	044167	34 01 0 00 046052 		PT ADX,7^	POINT	1,ADX,7^
 11044	044170	000000	000000			.-.
 11045	044171	000000	000000			0
 11046	044172	000000	000000			.-.
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 70
KI10A2	MAC	 9-JUN-76 13:56		SHIFT CONNECTIONS                                                              *** SEQ 0285

 11047	044173	42 01 0 00 000007 	MQ0L:	PT MQ,1^	POINT	1,MQ,1^
 11048	044174	000000	000000			.-.
 11049	044175	42 01 0 00 000007 		PT MQ,1^	POINT	1,MQ,1^
 11050	044176	42 01 0 00 000007 		PT MQ,1^	POINT	1,MQ,1^
 11051	044177	000000	000000			.-.
 11052	044200	43 01 0 00 000011 		PT AD,0^	POINT	1,AD,0^
 11053	044201	42 01 0 00 000007 		PT MQ,1^	POINT	1,MQ,1^
 11054	044202	000000	000000			0
 11055	044203	000000	000000			.-.
 11056	044204	42 01 0 00 000007 		PT MQ,1^	POINT	1,MQ,1^
 11057	044205	000000	000000			.-.
 11058
 11059	044206	000000	000000		MQ0R2:	.-.
 11060	044207	000000	000000			.-.
 11061	044210	01 01 0 00 000011 		PT AD,34^	POINT	1,AD,34^
 11062	044211	01 01 0 00 000011 		PT AD,34^	POINT	1,AD,34^
 11063	044212	000000	000000			.-.
 11064	044213	43 01 0 00 000011 		PT AD,0^	POINT	1,AD,0^
 11065	044214	01 01 0 00 000011 		PT AD,34^	POINT	1,AD,34^
 11066	044215	000000	000000			0
 11067	044216	000000	000000			.-.
 11068	044217	000000	000000			.-.
 11069	044220	000000	000000			.-.
 11070
 11071	044221	000000	000000		MQ1R2:	.-.
 11072	044222	000000	000000			.-.
 11073	044223	00 01 0 00 000011 		PT AD,35^	POINT	1,AD,35^
 11074	044224	00 01 0 00 000011 		PT AD,35^	POINT	1,AD,35^
 11075	044225	000000	000000			.-.
 11076	044226	01 01 0 00 000011 		PT AD,34^	POINT	1,AD,34^
 11077	044227	00 01 0 00 000011 		PT AD,35^	POINT	1,AD,35^
 11078	044230	01 01 0 00 000011 		PT AD,34^	POINT	1,AD,34^
 11079	044231	000000	000000			.-.
 11080	044232	000000	000000			.-.
 11081	044233	000000	000000			.-.
 11082
 11083	044234	000000	000000		MQ0R1:	.-.
 11084	044235	000000	000000			.-.
 11085	044236	00 01 0 00 000006 		PT AR,35^	POINT	1,AR,35^
 11086	044237	00 01 0 00 000006 		PT AR,35^	POINT	1,AR,35^
 11087	044240	000000	000000			.-.
 11088	044241	43 01 0 00 000011 		PT AD,0^	POINT	1,AD,0^
 11089	044242	000000	000000			.-.
 11090	044243	000000	000000			0
 11091	044244	000000	000000			.-.
 11092	044245	000000	000000			0
 11093	044246	000000	000000			.-.
 11094
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 71
KI10A2	MAC	 9-JUN-76 13:56		SHIFT CONNECTIONS                                                              *** SEQ 0286

 11095	044247	000000	000000		MQ1R1:	.-.
 11096	044250	000000	000000			.-.
 11097	044251	43 01 0 00 000007 		PT MQ,0^	POINT	1,MQ,0^
 11098	044252	43 01 0 00 000007 		PT MQ,0^	POINT	1,MQ,0^
 11099	044253	000000	000000			.-.
 11100	044254	00 01 0 00 000011 		PT AD,35^	POINT	1,AD,35^
 11101	044255	000000	000000			.-.
 11102	044256	00 01 0 00 000011 		PT AD,35^	POINT	1,AD,35^
 11103	044257	000000	000000			.-.
 11104	044260	00 01 0 00 046067 		PT ARX,35^	POINT	1,ARX,35^
 11105	044261	000000	000000			.-.
 11106
 11107	044262	000000	000000		MQ2R2:	.-.
 11108	044263	000000	000000			.-.
 11109	044264	43 01 0 00 000007 		PT MQ,0^	POINT	1,MQ,0^
 11110	044265	43 01 0 00 000007 		PT MQ,0^	POINT	1,MQ,0^
 11111	044266	000000	000000			.-.
 11112	044267	00 01 0 00 000011 		PT AD,35^	POINT	1,AD,35^
 11113	044270	43 01 0 00 000007 		PT MQ,0^	POINT	1,MQ,0^
 11114	044271	00 01 0 00 000011 		PT AD,35^	POINT	1,AD,35^
 11115	044272	000000	000000			.-.
 11116	044273	000000	000000			.-.
 11117	044274	000000	000000			.-.
 11118
 11119	044275	000000	000000		MQ35L:	0
 11120	044276	000000	000000			.-.
 11121	044277	43 01 0 00 000006 		PT AR,0^	POINT	1,AR,0^
 11122	044300	000000	000000			0
 11123	044301	000000	000000			.-.
 11124	044302	000000	000000			0
 11125	044303	000000	000000			.-.
 11126	044304	000000	000000			0
 11127	044305	43 01 0 00 046204 		PT NEGAD,0^	POINT	1,NEGAD,0^
 11128	044306	33 01 0 00 046205 		PT NEGADX,8^	POINT	1,NEGADX,8^
 11129	044307	43 01 0 00 046204 		PT NEGAD,0^	POINT	1,NEGAD,0^
 11130
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 72
KI10A2	MAC	 9-JUN-76 13:56		SHIFT CONNECTIONS                                                              *** SEQ 0287

 11131	044310	000000	000000		MQ8R2:	.-.
 11132	044311	000000	000000			.-.
 11133	044312	35 01 0 00 000007 		PT MQ,6^	POINT	1,MQ,6^
 11134	044313	35 01 0 00 000007 		PT MQ,6^	POINT	1,MQ,6^
 11135	044314	000000	000000			.-.
 11136	044315	35 01 0 00 000007 		PT MQ,6^	POINT	1,MQ,6^
 11137	044316	35 01 0 00 000007 		PT MQ,6^	POINT	1,MQ,6^
 11138	044317	35 01 0 00 000007 		PT MQ,6^	POINT	1,MQ,6^
 11139	044320	01 01 0 00 000011 		PT AD,34^	POINT	1,AD,34^
 11140	044321	000000	000000			.-.
 11141	044322	000000	000000			.-.
 11142
 11143	044323				MQ9R2:
 11144	044323	000000	000000		MQ8R1:	.-.
 11145	044324	000000	000000			.-.
 11146	044325	34 01 0 00 000007 		PT MQ,7^	POINT	1,MQ,7^
 11147	044326	34 01 0 00 000007 		PT MQ,7^	POINT	1,MQ,7^
 11148	044327	000000	000000			.-.
 11149	044330	34 01 0 00 000007 		PT MQ,7^	POINT	1,MQ,7^
 11150	044331	34 01 0 00 000007 		PT MQ,7^	POINT	1,MQ,7^
 11151	044332	34 01 0 00 000007 		PT MQ,7^	POINT	1,MQ,7^
 11152	044333	00 01 0 00 000011 		PT AD,35^	POINT	1,AD,35^
 11153	044334	34 01 0 00 000007 		PT MQ,7^	POINT	1,MQ,7^
 11154	044335	000000	000000			.-.
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 73
KI10A2	MAC	 9-JUN-76 13:56		MEMORY CONTROL SUBROUTINES                                                     *** SEQ 0288

 11155					SUBTTL	MEMORY CONTROL SUBROUTINES
 11156
 11157	044336	402 00 0 00 046250 	MEMST:	SETZM	STINAC
 11158	044337	200 02 0 00 046276 		MOVE	T1,TIME
 11159	044340	271 02 0 00 000144 		ADDI	T1,PAGDLY
 11160	044341	315 02 0 00 046163 		CAMGE	T1,MAMAOFF
 11161	044342	200 02 0 00 046163 		MOVE	T1,MAMAOFF
 11162	044343	200 14 0 00 046037 	MEMSTA:	MOVE	MA,AB
 11163	044344	332 00 0 00 046167 		SKIPE	MCSPEC
 11164	044345	200 14 0 00 046166 		MOVE	MA,MCSADR
 11165	044346	200 05 0 00 046037 		MOVE	S,AB
 11166	044347	332 00 0 00 046167 		SKIPE	MCSPEC
 11167	044350	200 05 0 00 046166 		MOVE	S,MCSADR
 11168	044351	305 05 0 00 000020 		CAIGE	S,20
 11169	044352	254 00 0 00 044522 		JRST	ACREF
 11170	044353	405 05 0 00 000003 		ANDI	S,3
 11171	044354	271 02 0 00 000122 		ADDI	T1,^D82
 11172	044355	332 00 0 00 046116 		SKIPE	FCE2ST
 11173	044356	254 00 0 00 044413 		JRST	MEMST5
 11174	044357	332 00 0 00 046150 		SKIPE	INSYNC
 11175	044360	254 00 0 00 044413 		JRST	MEMST5
 11176	044361	200 04 0 00 046170 	MEMST6:	MOVE	T3,MEMDONE#
 11177	044362	332 00 0 00 046172 		SKIPE	MEMREAD
 11178	044363	254 00 0 00 044426 		JRST	MEMST1
 11179	044364	202 02 0 00 046276 		MOVEM	T1,TIME
 11180	044365	315 04 0 00 046224 		CAMGE	T3,RDRST
 11181	044366	200 04 0 00 046224 		MOVE	T3,RDRST
 11182	044367	271 04 0 00 000106 		ADDI	T3,^D70
 11183	044370	305 02 0 00 000004 		CAIGE	T1,T3
 11184	044371	200 02 0 00 000004 		MOVE	T1,T3
 11185	044372	315 02 0 05 044730 	MEMSTB:	CAMGE	T1,MEMCMP(S)
 11186	044373	200 02 0 05 044730 		MOVE	T1,MEMCMP(S)
 11187	044374	270 02 0 05 044744 		ADD	T1,ACKDLY(S)
 11188	044375	202 02 0 00 046175 		MOVEM	T1,MEMWRWT
 11189	044376	332 00 0 00 046150 		SKIPE	INSYNC
 11190	044377	260 17 0 00 044417 		PUSHJ	P,MEMST7
 11191	044400	200 04 0 00 000002 		MOVE	T3,T1
 11192	044401	271 04 0 00 000074 		ADDI	T3,^D60
 11193	044402	202 04 0 00 046163 		MOVEM	T3,MAMAOFF#
 11194	044403	270 02 0 05 044740 		ADD	T1,WARN(S)
 11195	044404	270 02 0 05 044734 		ADD	T1,CYCLE(S)
 11196	044405	271 02 0 00 000536 		ADDI	T1,WARNDLY
 11197	044406	202 02 0 05 044730 		MOVEM	T1,MEMCMP(S)
 11198
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 74
KI10A2	MAC	 9-JUN-76 13:56		MEMORY CONTROL SUBROUTINES                                                     *** SEQ 0289

 11199	044407	200 02 0 00 046173 	MEMST4:	MOVE	T1,MEMSIN
 11200	044410	550 05 0 02 044663 		HRRZ	S,MEMRET-"A"(T1)
 11201	044411	402 00 0 00 046174 		SETZM	MEMWR
 11202	044412	263 17 0 00 000000 		POPJ	P,
 11203
 11204	044413	200 04 0 00 000002 	MEMST5:	MOVE	T3,T1
 11205	044414	271 04 0 00 000233 		ADDI	T3,^D155	;100(PG RDY)+30(IN SYNC)+25(AB PROP)
 11206	044415	202 04 0 00 046150 		MOVEM	T3,INSYNC
 11207	044416	254 00 0 00 044361 		JRST	MEMST6
 11208
 11209	044417	200 04 0 00 000002 	MEMST7:	MOVE	T3,T1
 11210	044420	271 04 0 00 000074 		ADDI	T3,^D60
 11211	044421	315 04 0 00 046150 		CAMGE	T3,INSYNC
 11212	044422	200 04 0 00 046150 		MOVE	T3,INSYNC
 11213	044423	271 04 0 00 000031 		ADDI	T3,^D25
 11214	044424	202 04 0 00 046150 		MOVEM	T3,INSYNC
 11215	044425	263 17 0 00 000000 		POPJ	P,
 11216
 11217	044426	271 04 0 00 000062 	MEMST1:	ADDI	T3,^D50
 11218	044427	305 02 0 00 000004 		CAIGE	T1,T3
 11219	044430	200 02 0 00 000004 		MOVE	T1,T3
 11220	044431	315 02 0 05 044730 		CAMGE	T1,MEMCMP(S)
 11221	044432	200 02 0 05 044730 		MOVE	T1,MEMCMP(S)
 11222	044433	333 00 0 05 044750 		SKIPLE	MEMFLG(S)
 11223	044434	254 00 0 00 044561 		JRST	MEMST3
 11224	044435	332 00 0 05 044750 		SKIPE	MEMFLG(S)
 11225	044436	254 00 0 00 044443 		JRST	MEMST2
 11226	044437	200 04 0 00 046306 		MOVE	T3,WARNED#
 11227	044440	271 04 0 00 000062 		ADDI	T3,^D50
 11228	044441	315 02 0 00 000004 		CAMGE	T1,T3
 11229	044442	200 02 0 00 000004 		MOVE	T1,T3
 11230
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 75
KI10A2	MAC	 9-JUN-76 13:56		MEMORY CONTROL SUBROUTINES                                                     *** SEQ 0290

 11231	044443	270 02 0 05 044744 	MEMST2:	ADD	T1,ACKDLY(S)
 11232	044444	332 00 0 00 046150 		SKIPE	INSYNC
 11233	044445	260 17 0 00 044417 		PUSHJ	P,MEMST7
 11234	044446	200 04 0 00 000002 		MOVE	T3,T1
 11235	044447	271 04 0 00 000074 		ADDI	T3,^D60
 11236	044450	202 04 0 00 046163 		MOVEM	T3,MAMAOFF
 11237	044451	270 02 0 05 044740 		ADD	T1,WARN(S)
 11238	044452	202 02 0 00 046306 		MOVEM	T1,WARNED
 11239	044453	271 02 0 00 000536 		ADDI	T1,WARNDLY
 11240	044454	202 02 0 00 046224 		MOVEM	T1,RDRST#
 11241	044455	202 02 0 00 046276 		MOVEM	T1,TIME
 11242	044456	333 00 0 05 044750 		SKIPLE	MEMFLG(S)
 11243	044457	202 02 0 00 046170 		MOVEM	T1,MEMDONE
 11244	044460	332 00 0 00 046174 		SKIPE	MEMWR
 11245	044461	202 02 0 00 046175 		MOVEM	T1,MEMWRWT
 11246	044462	270 02 0 05 044734 		ADD	T1,CYCLE(S)
 11247	044463	202 02 0 05 044730 		MOVEM	T1,MEMCMP(S)
 11248	044464	332 00 0 00 046167 		SKIPE	MCSPEC
 11249	044465	334 02 0 00 046166 		SKIPA	T1,MCSADR
 11250	044466	200 02 0 00 046037 		MOVE	T1,AB
 11251	044467	202 02 0 00 046037 		MOVEM	T1,AB
 11252	044470	402 00 0 00 046167 		SETZM	MCSPEC
 11253	044471	200 12 0 02 000000 		MOVE	MB,OFFSET(T1)
 11254	044472	200 02 0 00 046173 		MOVE	T1,MEMSIN
 11255	044473	550 05 0 02 044663 		HRRZ	S,MEMRET-"A"(T1)
 11256	044474	331 00 0 02 044663 		SKIPL	MEMRET-"A"(T1)
 11257	044475	200 06 0 00 000012 		MOVE	AR,MB
 11258	044476	332 00 0 00 046116 		SKIPE	FCE2ST#
 11259	044477	254 00 0 00 044703 		JRST	FCE2M
 11260
 11261	044500	332 00 0 00 046150 		SKIPE	INSYNC
 11262	044501	332 00 0 00 046174 		SKIPE	MEMWR
 11263	044502	254 00 0 00 044556 		JRST	MEMST8
 11264	044503	302 02 0 00 000103 		CAIE	T1,"C"
 11265	044504	254 00 0 00 044647 		JRST	INFT3
 11266	044505	460 02 1 00 046147 		SETCM	T1,@INSTPT
 11267	044506	602 02 0 00 000011 		TRNE	T1,FCE+SCE
 11268	044507	254 00 0 00 044647 		JRST	INFT3
 11269	044510	254 00 0 00 044556 		JRST	MEMST8
 11270
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 76
KI10A2	MAC	 9-JUN-76 13:56		MEMORY CONTROL SUBROUTINES                                                     *** SEQ 0291

 11271	044511	402 00 0 00 046117 	FCE2SY:	SETZM	FCE2W
 11272	044512	332 00 0 00 046116 		SKIPE	FCE2ST
 11273	044513	260 17 0 00 044711 		PUSHJ	P,FCE2S1
 11274	044514	200 02 0 00 046144 		MOVE	T1,INRDY
 11275	044515	317 02 0 00 046276 		CAMG	T1,TIME
 11276	044516	200 02 0 00 046276 		MOVE	T1,TIME
 11277	044517	270 02 0 00 044760 		ADD	T1,VERTIM
 11278	044520	202 02 0 00 046276 		MOVEM	T1,TIME
 11279	044521	263 17 0 00 000000 		POPJ	P,
 11280
 11281	044522	336 00 0 00 046150 	ACREF:	SKIPN	INSYNC
 11282	044523	254 00 0 00 044527 		JRST	ACREF2
 11283	044524	200 04 0 00 046214 		MOVE	T3,PCP1G
 11284	044525	202 04 0 00 046037 		MOVEM	T3,AB
 11285	044526	260 17 0 00 044620 		PUSHJ	P,INFT3A
 11286	044527	332 00 0 00 046172 	ACREF2:	SKIPE	MEMREAD
 11287	044530	254 00 0 00 044535 		JRST	ACREF1
 11288	044531	271 02 0 00 000067 		ADDI	T1,^D55
 11289	044532	202 02 0 00 046276 		MOVEM	T1,TIME
 11290	044533	476 00 0 00 046250 		SETOM	STINAC
 11291	044534	254 00 0 00 044407 		JRST	MEMST4
 11292
 11293	044535	271 02 0 00 000404 	ACREF1:	ADDI	T1,^D260
 11294	044536	202 02 0 00 046276 		MOVEM	T1,TIME
 11295	044537	200 02 0 00 046173 		MOVE	T1,MEMSIN
 11296	044540	331 00 0 02 044663 		SKIPL	MEMRET-"A"(T1)
 11297	044541	200 06 0 05 032173 		MOVE	AR,ACS(S)
 11298	044542	302 02 0 00 000103 		CAIE	T1,"C"
 11299	044543	254 00 0 00 044547 		JRST	ACREF3
 11300	044544	402 00 0 00 046222 		SETZM	PSINFT
 11301	044545	460 04 1 00 046147 		SETCM	T3,@INSTPT
 11302	044546	602 04 0 00 000011 		TRNE	T3,FCE+SCE
 11303
 11304	044547	332 00 0 00 046174 	ACREF3:	SKIPE	MEMWR
 11305	044550	476 00 0 00 046250 		SETOM	STINAC
 11306	044551	335 00 0 02 044663 		SKIPGE	MEMRET-"A"(T1)
 11307	044552	200 12 0 05 032173 		MOVE	MB,ACS(S)
 11308	044553	550 05 0 02 044663 		HRRZ	S,MEMRET-"A"(T1)
 11309	044554	332 00 0 00 046116 		SKIPE	FCE2ST
 11310	044555	254 00 0 00 044703 		JRST	FCE2M
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 77
KI10A2	MAC	 9-JUN-76 13:56		MEMORY CONTROL SUBROUTINES                                                     *** SEQ 0292

 11311	044556	402 00 0 00 046172 	MEMST8:	SETZM	MEMREAD
 11312	044557	402 00 0 00 046174 		SETZM	MEMWR
 11313	044560	263 17 0 00 000000 		POPJ	P,
 11314
 11315	044561	200 04 0 00 046224 	MEMST3:	MOVE	T3,RDRST
 11316	044562	271 04 0 00 000062 		ADDI	T3,^D50
 11317	044563	315 02 0 00 000004 		CAMGE	T1,T3
 11318	044564	200 02 0 00 000004 		MOVE	T1,T3
 11319	044565	254 00 0 00 044443 		JRST	MEMST2
 11320
 11321	044566	332 00 0 00 046175 	INFTSB:	SKIPE	MEMWRWT
 11322	044567	254 00 0 00 044622 		JRST	INFTS1
 11323	044570	201 02 0 00 000020 		MOVEI	T1,20
 11324	044571	336 00 0 00 046250 		SKIPN	STINAC
 11325	044572	313 02 0 00 046037 		CAMLE	T1,AB
 11326	044573	254 00 0 00 044625 		JRST	INFTS3
 11327	044574	332 00 0 00 046307 	INFTS2:	SKIPE	XCTF
 11328	044575	254 00 0 00 044600 		JRST	.+3
 11329	044576	336 00 0 00 046222 		SKIPN	PSINFT
 11330	044577	540 13 0 00 046037 		HRR	PC,AB
 11331	044600	402 00 0 00 046307 		SETZM	XCTF
 11332	044601	336 00 0 00 046222 		SKIPN	PSINFT
 11333	044602	402 00 0 00 046213 		SETZM	PCP1FF
 11334	044603	402 00 0 00 046133 		SETZM	INFTFF
 11335	044604	402 00 0 00 046222 		SETZM	PSINFT
 11336	044605	201 02 0 00 000101 		MOVEI	T1,"A"
 11337	044606	202 02 0 00 046173 	INFT2A:	MOVEM	T1,MEMSIN
 11338	044607	261 17 0 00 046276 		PUSH	P,TIME
 11339	044610	201 02 0 00 000144 		MOVEI	T1,^D100
 11340	044611	272 02 0 00 046276 		ADDM	T1,TIME
 11341	044612	476 00 0 00 046172 		SETOM	MEMREAD
 11342	044613	260 17 0 00 044336 		PUSHJ	P,MEMST
 11343	044614	200 02 0 00 046276 		MOVE	T1,TIME
 11344	044615	202 02 0 00 046144 		MOVEM	T1,INRDY
 11345	044616	262 17 0 00 046276 		POP	P,TIME
 11346	044617	263 17 0 00 000000 		POPJ	P,
 11347	044620	476 00 0 00 046133 	INFT3A:	SETOM	INFTFF
 11348	044621	402 00 0 00 046150 	INFT3B:	SETZM	INSYNC
 11349
 11350	044622	620 00 0 00 500002 	INFTS1:	TRZ	F,ABPC+ABAD+ABAS
 11351	044623	660 00 0 00 200000 		TRO	F,ABAB
 11352	044624	263 17 0 00 000000 		POPJ	P,
 11353
 11354	044625	332 00 0 00 046222 	INFTS3:	SKIPE	PSINFT
 11355	044626	402 00 0 00 046133 		SETZM	INFTFF
 11356	044627	402 00 0 00 046222 		SETZM	PSINFT
 11357	044630	254 00 0 00 044622 		JRST	INFTS1
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 78
KI10A2	MAC	 9-JUN-76 13:56		MEMORY CONTROL SUBROUTINES                                                     *** SEQ 0293

 11358	044631	332 00 0 00 046167 	WRRST:	SKIPE	MCSPEC
 11359	044632	200 14 0 00 046166 		MOVE	MA,MCSADR
 11360	044633	402 00 0 00 046167 		SETZM	MCSPEC
 11361	044634	202 06 0 14 000000 		MOVEM	AR,OFFSET(MA)
 11362	044635	200 02 0 00 046276 		MOVE	T1,TIME
 11363	044636	202 02 0 00 046170 		MOVEM	T1,MEMDONE
 11364	044637	200 04 0 00 000014 		MOVE	T3,MA
 11365	044640	405 04 0 00 000003 		ANDI	T3,3
 11366	044641	270 02 0 04 044754 		ADD	T1,WRCYC(T3)
 11367	044642	311 02 0 04 044730 		CAML	T1,MEMCMP(T3)
 11368	044643	202 02 0 04 044730 		MOVEM	T1,MEMCMP(T3)
 11369	044644	402 00 0 00 046175 		SETZM	MEMWRWT
 11370	044645	336 00 0 00 046150 		SKIPN	INSYNC
 11371	044646	263 17 0 00 000000 		POPJ	P,
 11372
 11373	044647	550 02 0 00 046214 	INFT3:	HRRZ	T1,PCP1G
 11374	044650	332 00 0 00 046167 		SKIPE	MCSPEC
 11375	044651	200 02 0 00 046166 		MOVE	T1,MCSADR
 11376	044652	202 02 0 00 046037 		MOVEM	T1,AB
 11377	044653	305 02 0 00 000020 		CAIGE	T1,20
 11378	044654	254 00 0 00 044620 		JRST	INFT3A
 11379	044655	332 00 0 00 046307 		SKIPE	XCTF
 11380	044656	254 00 0 00 044661 		JRST	.+3
 11381	044657	336 00 0 00 046222 		SKIPN	PSINFT
 11382	044660	540 13 0 00 046037 		HRR	PC,AB
 11383	044661	402 00 0 00 046307 		SETZM	XCTF
 11384	044662	336 00 0 00 046222 		SKIPN	PSINFT
 11385	044663	402 00 0 00 046213 		SETZM	PCP1FF
 11386	044664	402 00 0 00 046222 		SETZM	PSINFT
 11387	044665	201 02 0 00 000101 		MOVEI	T1,"A"
 11388	044666	202 02 0 00 046173 	INFT3C:	MOVEM	T1,MEMSIN
 11389	044667	476 00 0 00 046172 		SETOM	MEMREAD
 11390	044670	403 02 0 00 046174 		SETZB	T1,MEMWR
 11391	044671	250 02 0 00 046150 		EXCH	T1,INSYNC
 11392	044672	275 02 0 00 000122 		SUBI	T1,^D82
 11393	044673	261 17 0 00 000005 		PUSH	P,S
 11394	044674	261 17 0 00 046276 		PUSH	P,TIME
 11395	044675	260 17 0 00 044343 		PUSHJ	P,MEMSTA
 11396	044676	200 02 0 00 046276 		MOVE	T1,TIME
 11397	044677	202 02 0 00 046144 		MOVEM	T1,INRDY
 11398	044700	262 17 0 00 046276 		POP	P,TIME
 11399	044701	262 17 0 00 000005 	INFT3D:	POP	P,S
 11400	044702	263 17 0 00 000000 		POPJ	P,
 11401
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 79
KI10A2	MAC	 9-JUN-76 13:56		MEMORY CONTROL SUBROUTINES                                                     *** SEQ 0294

 11402	044703	552 11 0 00 046037 	FCE2M:	HRRZM	AD,AB
 11403	044704	606 11 0 00 777760 		TRNN	AD,777760
 11404	044705	254 00 0 00 044621 		JRST	INFT3B
 11405	044706	402 00 0 00 046116 		SETZM	FCE2ST
 11406	044707	201 02 0 00 000111 		MOVEI	T1,"I"
 11407	044710	254 00 0 00 044666 		JRST	INFT3C
 11408
 11409	044711	402 00 0 00 046116 	FCE2S1:	SETZM	FCE2ST
 11410	044712	201 02 0 00 000111 		MOVEI	T1,"I"
 11411	044713	261 17 0 00 000005 		PUSH	P,S
 11412	044714	260 17 0 00 044606 		PUSHJ	P,INFT2A
 11413	044715	254 00 0 00 044701 		JRST	INFT3D
 11414
 11415	044716	332 00 0 00 046250 	MEMWSS:	SKIPE	STINAC
 11416	044717	263 17 0 00 000000 		POPJ	P,
 11417	044720	261 17 0 00 000005 		PUSH	P,S
 11418	044721	200 05 0 00 000014 		MOVE	S,MA
 11419	044722	405 05 0 00 000003 		ANDI	S,3
 11420	044723	200 02 0 00 046276 		MOVE	T1,TIME
 11421	044724	271 02 0 00 000113 		ADDI	T1,^D75
 11422	044725	260 17 0 00 044372 		PUSHJ	P,MEMSTB
 11423	044726	262 17 0 00 000005 		POP	P,S
 11424	044727	263 17 0 00 000000 		POPJ	P,
 11425
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 80
KI10A2	MAC	 9-JUN-76 13:56		MEMORY CONTROL SUBROUTINES                                                     *** SEQ 0295

 11426	044730				MEMCMP:	BLOCK	4			;LAST COMPLETION TIME
 11427	044734				CYCLE:	REPEAT	4,<^D500>		;RD RST TO END OF CYCLE
 11428	044734	000000	000764		^D500
 11429	044735	000000	000764		^D500
 11430	044736	000000	000764		^D500
 11431	044737	000000	000764		^D500
 11432	044740				WARN:	REPEAT	4,<0>			;ADR ACK TO WARN
 11433	044740	000000	000000		0
 11434	044741	000000	000000		0
 11435	044742	000000	000000		0
 11436	044743	000000	000000		0
 11437	044744				ACKDLY:	REPEAT	4,<^D150>		;START TO ADR ACK
 11438	044744	000000	000226		^D150
 11439	044745	000000	000226		^D150
 11440	044746	000000	000226		^D150
 11441	044747	000000	000226		^D150
 11442	044750				MEMFLG:	REPEAT	4,<0>			;MEM TYPE
 11443	044750	000000	000000		0
 11444	044751	000000	000000		0
 11445	044752	000000	000000		0
 11446	044753	000000	000000		0
 11447	044754				WRCYC:	REPEAT	4,<^D500>		;TIME WRITE CYCLE COMPLETES
 11448	044754	000000	000764		^D500
 11449	044755	000000	000764		^D500
 11450	044756	000000	000764		^D500
 11451	044757	000000	000764		^D500
 11452
 11453	044760	000000	000156		VERTIM:	^D110		;STRAIGHT THRU TIME (NO ADD)
 11454	044761	000000	000252		ADTIME:	^D170		;FULL ADD TIME (NS)
 11455	044762	000000	000346		LONGTM:	^D230		;ADD TIME PLUS AD=0 GATING
 11456	044763	000000	000346		DPADTM:	^D230		;63-BIT ADD TIME
 11457
 11458	044764	400 00 0 00 040467 	MEMRET:	SETZ	IT0
 11459	044765	000000	041063				FT4
 11460	044766	000000	041111				FT6
 11461	044767	000000	043162				ERR
 11462	044770	000000	041243				ST1
 11463	044771	000000	041172				ET1S
 11464	044772	000000	043162				ERR
 11465	044773	000000	043162				ERR
 11466	044774	400 00 0 00 044511 		SETZ	FCE2SY
 11467	044775	000000	043216				BLTT3
 11468	044776	000000	041077				FT8
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 1
STOR	KLM	 5-JAN-76 18:18		*STOR* RESERVED STORAGE, JAN 5,1976                                            *** SEQ 0296

 11469					SUBTTL	*STOR* RESERVED STORAGE, JAN 5,1976
 11470
 11471					;PROGRAM LITERALS
 11472
 11473						XLIST
 11474					IFNDEF	$LPAPER,<LIST>
 11475	044777					LIT
 11476	044777	64 51 55 45 62 00 
 11477	045000	015 012 123 120 105 
 11478	045001	103 111 106 131 040 
 11479	045002	102 101 123 105 040 
 11480	045003	122 101 116 104 117 
 11481	045004	115 040 116 125 115 
 11482	045005	102 105 122 040 055 
 11483	045006	040 000 000 000 000 
 11484	045007	264 00 0 00 031621 
 11485	045010	264 00 0 00 030104 
 11486	045011	377777	777741
 11487	045012	770000	000000
 11488	045013	777000	000000
 11489	045014	245000	000000
 11490	045015	220000	000000
 11491	045016	174000	000000
 11492	045017	164000	000000
 11493	045020	154000	000000
 11494	045021	244000	000000
 11495	045022	110000	000000
 11496	045023	111000	000000
 11497	045024	112000	000000
 11498	045025	113000	000000
 11499	045026	777340	000007
 11500	045027	031761	032173
 11501	045030	002000	010000
 11502	045031	031771	000011
 11503	045032	254 00 0 00 031216 
 11504	045033	032173	032041
 11505	045034	015 012 052 052 052 
 11506	045035	052 052 052 052 052 
 11507	045036	052 052 000 000 000 
 11508	045037	015 012 122 101 116 
 11509	045040	104 117 115 040 111 
 11510	045041	116 123 124 122 125 
 11511	045042	103 124 111 117 116 
 11512	045043	040 106 101 111 114 
 11513	045044	125 122 105 015 012 
 11514	045045	040 040 040 040 111 
 11515	045046	116 123 124 040 107 
 11516	045047	122 117 125 120 040 
 11517	045050	040 040 040 040 040 
 11518	045051	040 040 117 120 105 
 11519	045052	122 101 116 104 123 
 11520	045053	040 040 040 040 040 
 11521	045054	040 040 040 040 040 
 11522	045055	040 000 000 000 000 
 11523	045056	123 114 117 127 040 
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 1-1
STOR	KLM	 5-JAN-76 18:18		*STOR* RESERVED STORAGE, JAN 5,1976                                            *** SEQ 0297

 11524	045057	101 116 123 040 040 
 11525	045060	040 040 040 040 040 
 11526	045061	040 040 040 123 111 
 11527	045062	115 040 101 116 123 
 11528	045063	000 000 000 000 000 
 11529	045064	106 101 123 124 040 
 11530	045065	101 116 123 040 040 
 11531	045066	040 040 040 040 040 
 11532	045067	040 040 040 123 114 
 11533	045070	117 127 040 101 116 
 11534	045071	123 000 000 000 000 
 11535	045072	015 012 040 040 040 
 11536	045073	040 040 040 040 040 
 11537	045074	040 040 040 040 040 
 11538	045075	040 040 040 040 040 
 11539	045076	000 000 000 000 000 
 11540	045077	015 012 102 101 123 
 11541	045100	105 040 122 101 116 
 11542	045101	104 117 115 040 116 
 11543	045102	125 115 102 105 122 
 11544	045103	040 075 040 000 000 
 11545	045104	015 012 015 012 111 
 11546	045105	116 123 124 122 125 
 11547	045106	103 124 111 117 116 
 11548	045107	040 123 111 115 125 
 11549	045110	114 101 124 111 117 
 11550	045111	116 040 055 040 103 
 11551	045112	117 122 105 040 114 
 11552	045113	117 117 120 040 111 
 11553	045114	116 123 124 040 043 
 11554	045115	040 000 000 000 000 
 11555	045116	015 012 055 055 055 
 11556	045117	055 055 055 055 055 
 11557	045120	055 055 015 012 000 
 11558	045121	057 040 000 000 000 
 11559	045122	040 040 040 105 130 
 11560	045123	111 124 040 040 040 
 11561	045124	040 040 040 040 000 
 11562	045125	015 012 124 117 124 
 11563	045126	101 114 040 105 122 
 11564	045127	122 117 122 123 040 
 11565	045130	075 040 000 000 000 
 11566	045131	015 012 122 125 116 
 11567	045132	040 124 111 115 105 
 11568	045133	040 075 040 000 000 
 11569	045134	072 000 000 000 000 
 11570	045135	000001	032022
 11571	045136	015 012 015 012 111 
 11572	045137	116 123 124 122 125 
 11573	045140	103 124 111 117 116 
 11574	045141	040 123 111 115 125 
 11575	045142	114 101 124 111 117 
 11576	045143	116 040 055 040 106 
 11577	045144	101 123 124 040 114 
 11578	045145	117 117 120 040 106 
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 1-2
STOR	KLM	 5-JAN-76 18:18		*STOR* RESERVED STORAGE, JAN 5,1976                                            *** SEQ 0298

 11579	045146	101 111 114 125 122 
 11580	045147	105 015 012 055 055 
 11581	045150	055 055 055 055 055 
 11582	045151	055 055 055 015 012 
 11583	045152	000 000 000 000 000 
 11584	045153	031771	032204
 11585	045154	63 45 64 65 67 60 
 11586	045155	254 00 0 00 032152 
 11587	045156	254 00 0 00 032643 
 11588	045157	45 70 51 64 00 00 
 11589	045160	015 012 052 052 052 
 11590	045161	052 052 052 052 052 
 11591	045162	052 052 015 012 000 
 11592	045163	130 130 130 055 055 
 11593	045164	052 040 040 040 040 
 11594	045165	040 040 040 040 040 
 11595	045166	040 040 040 000 000 
 11596	045167	060 040 040 040 040 
 11597	045170	040 040 040 040 040 
 11598	045171	040 040 040 000 000 
 11599	045172	052 040 040 040 040 
 11600	045173	040 040 000 000 000 
 11601	045174	060 040 040 040 040 
 11602	045175	040 040 000 000 000 
 11603	045176	052 040 040 040 000 
 11604	045177	060 040 040 040 000 
 11605	045200	015 012 123 105 121 
 11606	045201	125 105 116 103 105 
 11607	045202	040 043 040 075 040 
 11608	045203	000 000 000 000 000 
 11609	045204	015 012 111 116 123 
 11610	045205	124 122 125 103 124 
 11611	045206	111 117 116 040 110 
 11612	045207	125 116 107 040 125 
 11613	045210	120 000 000 000 000 
 11614	045211	015 012 123 111 115 
 11615	045212	125 114 101 124 117 
 11616	045213	122 040 105 122 122 
 11617	045214	117 122 040 101 124 
 11618	045215	040 120 103 040 075 
 11619	045216	040 000 000 000 000 
 11620	045217	015 012 123 111 115 
 11621	045220	125 114 101 124 105 
 11622	045221	104 040 111 116 123 
 11623	045222	124 122 125 103 124 
 11624	045223	111 117 116 000 000 
 11625	045224	000016	000001
 11626	045225	000002	000001
 11627	045226	103 050 101 103 051 
 11628	045227	075 000 000 000 000 
 11629	045230	103 050 101 103 053 
 11630	045231	061 051 075 000 000 
 11631	045232	103 050 103 050 101 
 11632	045233	103 122 051 051 075 
 11633	045234	000 000 000 000 000 
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 1-3
STOR	KLM	 5-JAN-76 18:18		*STOR* RESERVED STORAGE, JAN 5,1976                                            *** SEQ 0299

 11634	045235	103 050 103 050 101 
 11635	045236	103 122 053 061 051 
 11636	045237	051 075 000 000 000 
 11637	045240	103 050 103 050 101 
 11638	045241	103 114 051 051 075 
 11639	045242	000 000 000 000 000 
 11640	045243	105 040 040 040 040 
 11641	045244	075 000 000 000 000 
 11642	045245	103 050 105 051 040 
 11643	045246	075 000 000 000 000 
 11644	045247	103 050 105 053 061 
 11645	045250	051 040 075 000 000 
 11646	045251	103 050 103 050 105 
 11647	045252	051 051 075 000 000 
 11648	045253	015 012 106 114 101 
 11649	045254	107 123 040 055 040 
 11650	045255	111 116 124 057 106 
 11651	045256	111 116 101 114 040 
 11652	045257	040 040 000 000 000 
 11653	045260	111 116 111 124 111 
 11654	045261	101 114 015 012 000 
 11655	045262	015 012 106 111 116 
 11656	045263	101 114 015 012 000 
 11657	045264	006000	007563
 11658	045265	000600	007566
 11659	045266	006000	007620
 11660	045267	000600	006625
 11661	045270	006000	007634
 11662	045271	000000	006642
 11663	045272	000000	000662
 11664	045273	000060	000000
 11665	045274	000000	000512
 11666	045275	000000	000516
 11667	045276	060070	007412
 11668	045277	070000	000377
 11669	045300	010000	000444
 11670	045301	000000	007453
 11671	045302	000000	006432
 11672	045303	000000	000345
 11673	045304	000660	001364
 11674	045305	000000	001351
 11675	045306	000660	001362
 11676	045307	006000	030536
 11677	045310	060110	030000
 11678	045311	006000	006536
 11679	045312	000000	007540
 11680	045313	000000	007461
 11681	045314	000000	007460
 11682	045315	000000	006000
 11683	045316	060110	006000
 11684	045317	000000	001124
 11685	045320	000000	000137
 11686	045321	000000	000143
 11687	045322	000000	007214
 11688	045323	000000	000222
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 1-4
STOR	KLM	 5-JAN-76 18:18		*STOR* RESERVED STORAGE, JAN 5,1976                                            *** SEQ 0300

 11689	045324	000000	007213
 11690	045325	000000	000253
 11691	045326	000000	007263
 11692	045327	000000	000271
 11693	045330	000600	007160
 11694	045331	000060	100165
 11695	045332	000000	007262
 11696	045333	006000	000271
 11697	045334	000000	006413
 11698	045335	046000	010417
 11699	045336	000000	007104
 11700	045337	000600	400000
 11701	045340	000000	007103
 11702	045341	000600	000000
 11703	045342	000600	007114
 11704	045343	006002	134122
 11705	045344	000001	000000
 11706	045345	000100	006000
 11707	045346	000240	007000
 11708	045347	000200	007000
 11709	045350	000040	007000
 11710	045351	000000	007000
 11711	045352	000420	007000
 11712	045353	000400	007000
 11713	045354	000020	007000
 11714	045355	006000	030000
 11715	045356	000000	001000
 11716	045357	006060	030075
 11717	045360	000000	001077
 11718	045361	006060	030000
 11719	045362	000002	001000
 11720	045363	000000	001100
 11721	045364	006100	030000
 11722	045365	006100	001000
 11723	045366	006100	001077
 11724	045367	006102	001000
 11725	045370	006100	001100
 11726	045371	106100	030000
 11727	045372	106100	001000
 11728	045373	106100	001077
 11729	045374	106102	001000
 11730	045375	106100	001100
 11731	045376	111160	001000
 11732	045377	111160	001077
 11733	045400	111162	001000
 11734	045401	111160	001100
 11735	045402	040000	000332
 11736	045403	000000	000411
 11737	045404	006000	000000
 11738	045405	060070	000411
 11739	045406	070000	000400
 11740	045407	27 04 0 00 000016 
 11741	045410	000400	000700
 11742	045411	000777	777777
 11743	045412	612 11 0 00 045411 
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 1-5
STOR	KLM	 5-JAN-76 18:18		*STOR* RESERVED STORAGE, JAN 5,1976                                            *** SEQ 0301

 11744	045413	660 01 0 00 006000 
 11745	045414	254 00 0 00 037233 
 11746	045415	210100	002340
 11747	045416	321 10 0 00 037334 
 11748	045417	660 03 0 00 004060 
 11749	045420	254 00 0 00 037334 
 11750	045421	603 16 0 00 001000 
 11751	045422	254 00 0 00 037334 
 11752	045423	254 00 0 00 037333 
 11753	045424	000100	002120
 11754	045425	006000	400015
 11755	045426	340100	002140
 11756	045427	006100	400000
 11757	045430	240000	002000
 11758	045431	510 16 0 00 000012 
 11759	045432	621 16 0 00 000037 
 11760	045433	254 00 0 00 037676 
 11761	045434	30 06 0 00 000006 
 11762	045435	36 06 0 00 000006 
 11763	045436	33 10 0 00 000006 
 11764	045437	22 04 0 00 000012 
 11765	045440	33 11 0 00 000016 
 11766	045441	000000	000103
 11767	045442	000000	000113
 11768	045443	000000	000101
 11769	045444	000000	036521
 11770	045445	41 03 0 00 000016 
 11771	045446	31 02 0 00 000013 
 11772	045447	000060	410000
 11773	045450	000000	000430
 11774	045451	000000	041015
 11775	045452	000000	000102
 11776	045453	060600	001000
 11777	045454	000003	077777
 11778	045455	11 05 0 00 000002 
 11779	045456	30 02 0 00 000016 
 11780	045457	000060	000410
 11781	045460	001777	777777
 11782	045461	000060	000200
 11783	045462	000377	777777
 11784	045463	000020	000020
 11785	045464	000100	000136
 11786	045465	177777	777777
 11787	045466	060010	000020
 11788	045467	540000	000120
 11789	045470	000060	006000
 11790	045471	000100	000343
 11791	045472	000040	200020
 11792	045473	000060	000204
 11793	045474	000020	020000
 11794	045475	000600	000010
 11795	045476	000100	400000
 11796	045477	000020	010000
 11797	045500	000060	100010
 11798	045501	000040	020323
DBKDB	DECSYSTEM10 KI10 RANDOM NUMBER INSTRUCTION TEST, VER 0,3	MACRO %51(414) 16:27  9-JUN-76 PAGE 1-6
STOR	KLM	 5-JAN-76 18:18		*STOR* RESERVED STORAGE, JAN 5,1976                                            *** SEQ 0302

 11799	045502	006002	000007
 11800	045503	040660	006020
 11801	045504	006000	034003
 11802	045505	377777	777777
 11803	045506	100010	000010
 11804	045507	660 01 0 00 000400 
 11805	045510	254 00 0 00 042654 
 11806	045511	33 03 0 00 000016 
 11807	045512	27 04 0 00 046041 
 11808	045513	060110	107000
 11809	045514	001004	000010
 11810	045515	122 00 0 00 000000 
 11811	045516	332 00 0 00 046177 
 11812	045517	260 17 0 00 044014 
 11813	045520	254 00 0 00 042776 
 11814	045521	660 03 0 00 010303 
 11815	045522	201 05 0 00 042460 
 11816	045523	254 00 0 00 043050 
 11817	045524	006000	000010
 11818	045525	332 00 0 00 046152 
 11819	045526	254 00 0 00 043061 
 11820	045527	402 00 0 00 046112 
 11821	045530	201 05 0 00 042536 
 11822	045531	254 00 0 00 043061 
 11823	045532	260600	400000
 11824	045533	040600	000010
 11825	045534	000060	400010
 11826	045535	000002	100000
 11827	045536	43 01 0 00 046074 
 11828	045537	36 06 0 00 000004 
 11829						LIST
 11830	045776	000000	000000		ENDSLD:	0
 11831
 11832					IFDEF	DEBUG,<
 11833	045777				PATCH:	BLOCK DEBUG		;PATCHING AREA
 11834					>
 11835
 11836					;PROGRAM VARIABLES
 11837	046037					VAR
 11838
 11839					IFDEF	PGMEND,<
 11840	046313	000000	000000		END:	0
 11841			030000			END	BEGIN	>

NO ERRORS DETECTED

PROGRAM BREAK IS 000000
ABSLUTE BREAK IS 046314
CPU TIME USED 02:43.694

13K CORE USED

A0	  3943#	  3950	  3954	  3958	  3974	  3978	  3982	  4045#	  4046	  4060#	  4064	  4069	  6377#	  6378
	  6380	  6392#	  6393	  6395	  6407#	  6408	  6410	  6422#	  6423	  6425	  6437#	  6438	  6440	  6452 *** SEQ 0303
	  6453	  6455	  6467#	  6468	  6470	  6482#	  6483	  6485	  6497#	  6498	  6500	  6512#	  6513	  6515
	  6527#	  6528	  6530	  6542#	  6543	  6545	  6557#	  6558	  6560	  6572#	  6573	  6575	  6587#	  6588
	  6590	  6602#	  6603	  6605	  6617#	  6618	  6620	  6632#	  6633	  6635	  6647#	  6648	  6650	  6662#
	  6663	  6665	  6677#	  6678	  6680	  6692#	  6693	  6695	  6707#	  6708	  6710	  6722#	  6723	  6725
	  6737#	  6738	  6740	  6752#	  6753	  6755	  6767#	  6768	  6770	  6782#	  6783	  6785	  6797#	  6798
	  6800	  6812#	  6813	  6815	  6827#	  6828	  6830	  6842#	  6843	  6845	  6857#	  6858	  6860	  6872#
	  6873	  6875	  6887#	  6888	  6890	  6902#	  6903	  6905	  6917#	  6918	  6920	  6932#	  6933	  6935
	  6947#	  6948	  6950	  6962#	  6963	  6965	  6977#	  6978	  6980	  6992#	  6993	  6995	  7007#	  7008
	  7010	  7022#	  7023	  7025	  7037#	  7038	  7040	  7052#	  7053	  7055	  7067#	  7068	  7070	  7082#
	  7083	  7085	  7097#	  7098	  7100	  7112#	  7113	  7115	  7127#	  7128	  7130	  7142#	  7143	  7145
	  7157#	  7158	  7160	  7172#	  7173	  7175	  7187#	  7188	  7190	  7202#	  7203	  7205	  7217#	  7218
	  7220	  7232#	  7233	  7235	  7247#	  7248	  7250	  7262#	  7263	  7265	  7277#	  7278	  7280	  7292#
	  7293	  7295	  7307#	  7308	  7310	  7322#	  7323	  7325
A1	  4046#	  4051	  4056	  4061#	  4065	  4071	  4668#	  4673	  4682#	  4687	  4696#	  4701	  4710#	  4715
	  4724#	  4729	  4738#	  4743	  4752#	  4757	  4766#	  4771	  4780#	  4785	  4794#	  4799	  4808#	  4813
	  4822#	  4827	  4836#	  4841	  4850#	  4855	  4864#	  4869	  4878#	  4883	  4892#	  4897	  4906#	  4911
	  4920#	  4925	  4934#	  4939	  4948#	  4953	  4962#	  4967	  4976#	  4981	  4990#	  4995	  5004#	  5005#
	  5009	  5018#	  5019#	  5023	  5032#	  5033#	  5037	  5046#	  5047#	  5051	  5060#	  5065	  5074#	  5079
	  5088#	  5093	  5102#	  5107	  5116#	  5121	  5130#	  5135	  5144#	  5149	  5158#	  5163	  5172#	  5173#
	  5177	  5186#	  5187#	  5191	  5200#	  5201#	  5205	  5214#	  5215#	  5219	  5228#	  5233	  5242#	  5247
	  5256#	  5261	  5270#	  5275	  5284#	  5289	  5298#	  5303	  5312#	  5317	  5326#	  5331	  5340#	  5345
	  5354#	  5359	  5368#	  5373	  5382#	  5387	  5396#	  5401	  5410#	  5415	  5424#	  5429	  5438#	  5443
	  5452#	  5457	  5466#	  5471	  5480#	  5485	  5494#	  5499	  5508#	  5513	  5522#	  5527	  5536#	  5541
	  5550#	  5555	  6374#	  6377	  6389#	  6392	  6404#	  6407	  6419#	  6422	  6434#	  6437	  6449#	  6452
	  6464#	  6467	  6479#	  6482	  6494#	  6497	  6509#	  6512	  6524#	  6527	  6539#	  6542	  6554#	  6557
	  6569#	  6572	  6584#	  6587	  6599#	  6602	  6614#	  6615#	  6617	  6629#	  6630#	  6632	  6644#	  6647
	  6659#	  6662	  6674#	  6677	  6689#	  6692	  6704#	  6707	  6719#	  6722	  6734#	  6735#	  6737	  6749#
	  6750#	  6752	  6764#	  6767	  6779#	  6782	  6794#	  6797	  6809#	  6812	  6824#	  6827	  6839#	  6842
	  6854#	  6856#	  6857	  6869#	  6871#	  6872	  6884#	  6887	  6899#	  6902	  6914#	  6917	  6929#	  6932
	  6944#	  6947	  6959#	  6962	  6974#	  6976#	  6977	  6989#	  6991#	  6992	  7004#	  7007	  7019#	  7022
	  7034#	  7037	  7049#	  7052	  7064#	  7067	  7079#	  7082	  7094#	  7097	  7109#	  7112	  7124#	  7127
	  7139#	  7142	  7154#	  7157	  7169#	  7172	  7184#	  7187	  7199#	  7202	  7214#	  7217	  7229#	  7232
	  7244#	  7247	  7259#	  7262	  7274#	  7277	  7289#	  7292	  7304#	  7307	  7319#	  7322
A2	  4047#	  4052	  4057	  4669#	  4673	  4683#	  4687	  4697#	  4701	  4711#	  4715	  4725#	  4726#	  4729
	  4739#	  4740#	  4743	  4753#	  4754#	  4757	  4767#	  4768#	  4771	  4781#	  4782#	  4785	  4795#	  4796#
	  4799	  4809#	  4810#	  4813	  4823#	  4824#	  4827	  4837#	  4838#	  4841	  4851#	  4852#	  4855	  4865#
	  4866#	  4869	  4879#	  4880#	  4883	  4893#	  4897	  4907#	  4911	  4921#	  4925	  4935#	  4939	  4949#
	  4953	  4963#	  4967	  4977#	  4981	  4991#	  4995	  5005#	  5006#	  5009	  5019#	  5020#	  5023	  5033#
	  5034#	  5037	  5047#	  5048#	  5051	  5061#	  5065	  5075#	  5079	  5089#	  5093	  5103#	  5107	  5117#
	  5121	  5131#	  5135	  5145#	  5149	  5159#	  5163	  5173#	  5174#	  5177	  5187#	  5188#	  5191	  5201#
	  5202#	  5205	  5215#	  5216#	  5219	  5229#	  5233	  5243#	  5247	  5257#	  5261	  5271#	  5275	  5285#
	  5289	  5299#	  5303	  5313#	  5317	  5327#	  5331	  5341#	  5345	  5355#	  5359	  5369#	  5373	  5383#
	  5387	  5397#	  5398#	  5401	  5411#	  5412#	  5415	  5425#	  5426#	  5429	  5439#	  5440#	  5443	  5453#
	  5454#	  5457	  5467#	  5468#	  5471	  5481#	  5482#	  5485	  5495#	  5496#	  5499	  5509#	  5513	  5523#
	  5527	  5537#	  5541	  5551#	  5555
A3	  4048#	  4052	  4057	  4670#	  4673	  4684#	  4687	  4698#	  4701	  4712#	  4715	  4726#	  4729	  4740#
	  4743	  4754#	  4757	  4768#	  4771	  4782#	  4785	  4796#	  4799	  4810#	  4813	  4824#	  4827	  4838#
	  4841	  4852#	  4855	  4866#	  4869	  4880#	  4883	  4894#	  4895#	  4897	  4908#	  4909#	  4911	  4922#
	  4923#	  4925	  4936#	  4937#	  4939	  4950#	  4953	  4964#	  4967	  4978#	  4981	  4992#	  4995	  5006#
	  5009	  5020#	  5023	  5034#	  5037	  5048#	  5051	  5062#	  5063#	  5065	  5076#	  5077#	  5079	  5090#
	  5091#	  5093	  5104#	  5105#	  5107	  5118#	  5119#	  5121	  5132#	  5133#	  5135	  5146#	  5147#	  5149
	  5160#	  5161#	  5163	  5174#	  5177	  5188#	  5191	  5202#	  5205	  5216#	  5219	  5230#	  5233	  5244#
	  5247	  5258#	  5261	  5272#	  5275	  5286#	  5287#	  5289	  5300#	  5301#	  5303	  5314#	  5315#	  5317 *** SEQ 0304
	  5328#	  5329#	  5331	  5342#	  5343#	  5345	  5356#	  5357#	  5359	  5370#	  5371#	  5373	  5384#	  5385#
	  5387	  5398#	  5401	  5412#	  5415	  5426#	  5429	  5440#	  5443	  5454#	  5457	  5468#	  5471	  5482#
	  5485	  5496#	  5499	  5510#	  5513	  5524#	  5527	  5538#	  5541	  5552#	  5555
A4	  4671#	  4673	  4685#	  4687	  4699#	  4701	  4713#	  4715	  4727#	  4728#	  4729	  4741#	  4742#	  4743
	  4755#	  4756#	  4757	  4769#	  4770#	  4771	  4783#	  4785	  4797#	  4799	  4811#	  4813	  4825#	  4827
	  4839#	  4841	  4853#	  4855	  4867#	  4869	  4881#	  4883	  4895#	  4896#	  4897	  4909#	  4910#	  4911
	  4923#	  4924#	  4925	  4937#	  4938#	  4939	  4951#	  4952#	  4953	  4965#	  4966#	  4967	  4979#	  4980#
	  4981	  4993#	  4994#	  4995	  5007#	  5009	  5021#	  5023	  5035#	  5037	  5049#	  5051	  5063#	  5065
	  5077#	  5079	  5091#	  5093	  5105#	  5107	  5119#	  5121	  5133#	  5135	  5147#	  5149	  5161#	  5163
	  5175#	  5176#	  5177	  5189#	  5190#	  5191	  5203#	  5204#	  5205	  5217#	  5218#	  5219	  5231#	  5233
	  5245#	  5247	  5259#	  5261	  5273#	  5275	  5287#	  5288#	  5289	  5301#	  5302#	  5303	  5315#	  5316#
	  5317	  5329#	  5330#	  5331	  5343#	  5345	  5357#	  5359	  5371#	  5373	  5385#	  5387	  5399#	  5401
	  5413#	  5415	  5427#	  5429	  5441#	  5443	  5455#	  5456#	  5457	  5469#	  5470#	  5471	  5483#	  5484#
	  5485	  5497#	  5498#	  5499	  5511#	  5513	  5525#	  5527	  5539#	  5541	  5553#	  5555
A5	  4672#	  4673	  4686#	  4687	  4700#	  4701	  4714#	  4715	  4728#	  4729	  4742#	  4743	  4756#	  4757
	  4770#	  4771	  4784#	  4785#	  4785	  4798#	  4799#	  4799	  4812#	  4813#	  4813	  4826#	  4827#	  4827
	  4840#	  4841	  4854#	  4855	  4868#	  4869	  4882#	  4883	  4896#	  4897	  4910#	  4911	  4924#	  4925
	  4938#	  4939	  4952#	  4953	  4966#	  4967	  4980#	  4981	  4994#	  4995	  5008#	  5009#	  5009	  5022#
	  5023#	  5023	  5036#	  5037#	  5037	  5050#	  5051#	  5051	  5064#	  5065#	  5065	  5078#	  5079#	  5079
	  5092#	  5093#	  5093	  5106#	  5107#	  5107	  5120#	  5121#	  5121	  5134#	  5135#	  5135	  5148#	  5149#
	  5149	  5162#	  5163#	  5163	  5176#	  5177	  5190#	  5191	  5204#	  5205	  5218#	  5219	  5232#	  5233#
	  5233	  5246#	  5247#	  5247	  5260#	  5261#	  5261	  5274#	  5275#	  5275	  5288#	  5289	  5302#	  5303
	  5316#	  5317	  5330#	  5331	  5344#	  5345	  5358#	  5359	  5372#	  5373	  5386#	  5387	  5400#	  5401#
	  5401	  5414#	  5415#	  5415	  5428#	  5429#	  5429	  5442#	  5443#	  5443	  5456#	  5457	  5470#	  5471
	  5484#	  5485	  5498#	  5499	  5512#	  5513	  5526#	  5527	  5540#	  5541	  5554#	  5555
A6	  4667#	  4674	  4681#	  4688	  4695#	  4702	  4709#	  4716	  4723#	  4730	  4737#	  4744	  4751#	  4758
	  4765#	  4772	  4779#	  4786	  4793#	  4800	  4807#	  4814	  4821#	  4828	  4835#	  4842	  4849#	  4856
	  4863#	  4870	  4877#	  4884	  4891#	  4898	  4905#	  4912	  4919#	  4926	  4933#	  4940	  4947#	  4954
	  4961#	  4968	  4975#	  4982	  4989#	  4996	  5003#	  5010	  5017#	  5024	  5031#	  5038	  5045#	  5052
	  5059#	  5060#	  5066	  5073#	  5074#	  5080	  5087#	  5088#	  5094	  5101#	  5102#	  5108	  5115#	  5122
	  5129#	  5136	  5143#	  5150	  5157#	  5164	  5171#	  5178	  5185#	  5192	  5199#	  5206	  5213#	  5220
	  5227#	  5234	  5241#	  5248	  5255#	  5262	  5269#	  5276	  5283#	  5284#	  5290	  5297#	  5298#	  5304
	  5311#	  5312#	  5318	  5325#	  5326#	  5332	  5339#	  5346	  5353#	  5360	  5367#	  5374	  5381#	  5388
	  5395#	  5396#	  5402	  5409#	  5410#	  5416	  5423#	  5424#	  5430	  5437#	  5438#	  5444	  5451#	  5452#
	  5458	  5465#	  5466#	  5472	  5479#	  5480#	  5486	  5493#	  5494#	  5500	  5507#	  5514	  5521#	  5528
	  5535#	  5542	  5549#	  5556
AB	  1530	  1637	  1707	  2120	  2130	  8576	 10572	 10578#	 10578	 10579	 11162	 11165	 11250	 11251
	 11284	 11325	 11330	 11376	 11382	 11402
ABAB	  3213#	 10577	 10887	 10893	 11351
ABABEN	  3208#	  8582	  9027	  9031	  9102	  9181	  9207	  9288	 10500	 10511	 10882	 10885	 10886	 10892
ABAD	  3213#	 10575	 10887	 10891	 11350
ABADEN	  3208#	  4052	  4056	  4071	  4084	  4089	  8913	  9065	  9168	  9205	  9455	 10482	 10536	 10882
	 10886	 10890
ABAS	  3214#	 10887	 11350
ABCLK	  8584	 10882#
ABMIXR	  8497	 10572#
ABORT	   158#
ABPC	  3213#	  8445	 10573	 10887	 10889	 11350
ABPCEN	  3208#	  3213	  3965	  4042	  4053	  4076	  4085	  4164	  4169	  4174	  4179	  4184	  4189	  4194
	  4199	  4204	  4209	  4214	  4219	  4224	  4229	  4234	  4239	  4320	  4328	  4336	  4344	  4352
	  4360	  4368	  4376	  4448	  4456	  4464	  4472	  4480	  4488	  4496	  4504	  4576	  4584	  4592
	  4600	  4608	  4616	  4624	  4632	  6409	  6424	  6439	  6454	  6469	  6484	  6529	  6544	  6559
	  6574	  6589	  6604	  6649	  6664	  6679	  6694	  6709	  6724	  6769	  6784	  6799	  6814	  6829 *** SEQ 0305
	  6844	  6889	  6904	  6919	  6934	  6949	  6964	  7009	  7024	  7039	  7054	  7069	  7084	  7129
	  7144	  7159	  7174	  7189	  7204	  7249	  7264	  7279	  7294	  7309	  7324	  7433	  7435	  7495
	  8219	  8990	 10012	 10101	 10127	 10298	 10302	 10508	 10540	 10882	 10886	 10888
ACCNT	  1207#	  1207	  1257	  1305
ACKDLY	 11187	 11231	 11437#
ACPL2	 10293#	 10293	 10294
ACPNT	  1819#
ACPNT1	  1246	  1249	  1252	  1302#	  1312
ACREF	 11169	 11281#
ACREF1	 11287	 11293#
ACREF2	 11282	 11286#
ACREF3	 11299	 11304#
ACS	   991	   992	   993	  1123	  1127	  1129	  1131	  1133	  1135	  1137	  1139	  1141	  1253	  1294
	  1295	  1476	  1477	  1478	  1479	  1480	  1582#	  2221	  2229	  2292	 10586	 10898	 11297	 11307
AD	   120#	  1522	  1647	  3158#	  7434	  7516	  7559	  7567	  7579	  7590	  7592	  7793	  7859	  7902
	  8490	  8529	  8623	  8625	  8627	  8629	  8633	  8636	  8647	  8649	  8651	  8653	  8655	  8657
	  8659	  8662	  8665	  8667	  8669	  8671	  8677	  8681	  8683	  8685	  8689	  8698	  8709	  8723
	  8851	  8868	  8876	  8882	  8897	  9489	  9576	  9596	  9605	  9630	  9674	  9705	  9707	  9809
	  9944	 10190	 10255	 10576	 10596	 10598	 10690	 10700	 10714	 10733	 10748	 10951	 10952	 10953
	 10954	 10957	 10959	 10961	 11011	 11012	 11013	 11014	 11015	 11016	 11017	 11019	 11030	 11052
	 11061	 11062	 11064	 11065	 11073	 11074	 11076	 11077	 11078	 11088	 11100	 11102	 11112	 11114
	 11139	 11152	 11402	 11403
AD17.5	  7823#	  7823	  8697#	  8697
AD2	  8649#	  8649	  8683	  8685	  8686	  8702	  8711	  8756	  8778
AD4	  8690#	  8690	  8705	  8723	  8758	  8783
ADADD	  3181#	  3405	  3406	  3539	  3541	  3545	  3547	  3551	  3553	  3557	  3559	  3563	  3565	  3569
	  3571	  3575	  3577	  3581	  3583	  3764	  3766	  3770	  3772	  3778	  3782	  3784	  3788	  3790
	  3794	  3796	  3802	  3806	  3808	  3887	  3894	  3901	  3908	  3915	  3922	  3929	  3936	  4001
	  4002	  4013	  4018	  4045	  4060	  4105	  4111	  4117	  4123	  4129	  4135	  4141	  4147	  4164
	  4169	  4174	  4179	  4184	  4189	  4194	  4199	  4204	  4209	  4214	  4219	  4224	  4229	  4234
	  4239	  4385	  4393	  4401	  4409	  4417	  4425	  4433	  4441	  4449	  4457	  4465	  4473	  4481
	  4489	  4497	  4505	  4513	  4521	  4529	  4537	  4545	  4553	  4561	  4569	  4577	  4585	  4593
	  4601	  4609	  4617	  4625	  4633	  7350	  7352	  7356	  7358	  7362	  7364	  7368	  7370	  7374
	  7376	  7382	  7391	  7395	  7399	  7403	  7408	  7412	  7413	  7450	  7452	  7615	  7628	  7668
	  7860	  7871	  7879	  7892	  8040	  8532	  8533	  8541	  8542	  8682	  8706	  8720	  8722	  8911
	  9222	  9519	  9546	  9547	  9578	  9698	  9775	  9907	 10038	 10045	 10081	 10096	 10168	 10194
	 10202	 10251	 10301	 10309	 10408	 10438	 10482	 10483	 10912	 10933	 10937	 10938
ADARLP	  3181#	  3182	  5584	  5587	  5596	  5599	  5611	  5620	  5623	  5680	  5683	  5692	  5695	  5707
	  5716	  5719	  5776	  5779	  5788	  5791	  5803	  5812	  5815	  5872	  5875	  5884	  5887	  5899
	  5908	  5911	  6004	  6052	  8624
ADARMI	  3181#	  3539	  3541	  3545	  3547	  3551	  3553	  3557	  3559	  3563	  3565	  3569	  3571	  3575
	  3577	  3581	  3583	  3764	  3766	  3770	  3772	  3778	  3782	  3784	  3788	  3790	  3794	  3796
	  3802	  3806	  3808	  4001	  4129	  4135	  4141	  4147	  4164	  4169	  4174	  4179	  4184	  4189
	  4194	  4199	  4204	  4209	  4214	  4219	  4224	  4229	  4234	  4239	  4673	  4676	  4687	  4690
	  4701	  4704	  4715	  4718	  4729	  4732	  4743	  4746	  4757	  4760	  4771	  4774	  4785	  4788
	  4799	  4802	  4813	  4816	  4827	  4830	  4841	  4844	  4855	  4858	  4869	  4872	  4883	  4886
	  4897	  4900	  4911	  4914	  4925	  4928	  4939	  4942	  4953	  4956	  4967	  4970	  4981	  4984
	  4995	  4998	  5009	  5012	  5023	  5026	  5037	  5040	  5051	  5054	  5065	  5068	  5079	  5082
	  5093	  5096	  5107	  5110	  5121	  5124	  5135	  5138	  5149	  5152	  5163	  5166	  5177	  5180
	  5191	  5194	  5205	  5208	  5219	  5222	  5233	  5236	  5247	  5250	  5261	  5264	  5275	  5278
	  5289	  5292	  5303	  5306	  5317	  5320	  5331	  5334	  5345	  5348	  5359	  5362	  5373	  5376
	  5387	  5390	  5401	  5404	  5415	  5418	  5429	  5432	  5443	  5446	  5457	  5460	  5471	  5474
	  5485	  5488	  5499	  5502	  5513	  5516	  5527	  5530	  5541	  5544	  5555	  5558	  6377	  6392 *** SEQ 0306
	  6407	  6422	  6437	  6452	  6467	  6482	  6497	  6512	  6527	  6542	  6557	  6572	  6587	  6602
	  6617	  6620	  6632	  6635	  6647	  6650	  6662	  6665	  6677	  6680	  6692	  6695	  6707	  6710
	  6722	  6725	  6737	  6740	  6752	  6755	  6767	  6770	  6782	  6785	  6797	  6800	  6812	  6815
	  6827	  6830	  6842	  6845	  6857	  6861	  6872	  6876	  6887	  6891	  6902	  6906	  6917	  6921
	  6932	  6936	  6947	  6951	  6962	  6966	  6977	  6981	  6992	  6996	  7007	  7011	  7022	  7026
	  7037	  7041	  7052	  7056	  7067	  7071	  7082	  7086	  7097	  7101	  7112	  7116	  7127	  7131
	  7142	  7146	  7157	  7161	  7172	  7176	  7187	  7191	  7202	  7206	  7217	  7221	  7232	  7236
	  7247	  7251	  7262	  7266	  7277	  7281	  7292	  7296	  7307	  7311	  7322	  7326	  7569	  7629
	  7753	  7879	  8040	  8628	  9519	  9547	 10045	 10194	 10202	 10301	 10420
ADARPL	  3182#	  3352	  3357	  3362	  3367	  3393	  3405	  3417	  3425	  3432	  3446	  3450	  3461	  3465
	  3600	  3606	  3612	  3618	  3624	  3630	  3636	  3642	  3887	  3894	  3901	  3908	  3915	  3922
	  3929	  3936	  3965	  3990	  4003	  4084	  4105	  4111	  4117	  4123	  4321	  4329	  4337	  4345
	  4353	  4361	  4369	  4377	  4449	  4457	  4465	  4473	  4481	  4489	  4497	  4505	  4577	  4585
	  4593	  4601	  4609	  4617	  4625	  4633	  4673	  4687	  4701	  4715	  4729	  4743	  4757	  4771
	  4785	  4799	  4813	  4827	  4841	  4855	  4869	  4883	  4897	  4911	  4925	  4939	  4953	  4967
	  4981	  4995	  5009	  5023	  5037	  5051	  5065	  5079	  5093	  5107	  5121	  5135	  5149	  5163
	  5177	  5191	  5205	  5219	  5233	  5247	  5261	  5275	  5289	  5303	  5317	  5331	  5345	  5359
	  5373	  5387	  5401	  5415	  5429	  5443	  5457	  5471	  5485	  5499	  5513	  5527	  5541	  5555
	  6377	  6392	  6407	  6422	  6437	  6452	  6467	  6482	  6497	  6512	  6527	  6542	  6557	  6572
	  6587	  6602	  6617	  6632	  6647	  6662	  6677	  6692	  6707	  6722	  6737	  6752	  6767	  6782
	  6797	  6812	  6827	  6842	  6857	  6872	  6887	  6902	  6917	  6932	  6947	  6962	  6977	  6992
	  7007	  7022	  7037	  7052	  7067	  7082	  7097	  7101	  7112	  7116	  7127	  7131	  7142	  7146
	  7157	  7161	  7172	  7176	  7187	  7191	  7202	  7206	  7217	  7221	  7232	  7236	  7247	  7251
	  7262	  7266	  7277	  7281	  7292	  7296	  7307	  7311	  7322	  7326	  7350	  7356	  7368	  7408
	  7412	  7413	  7568	  7615	  7628	  8037	  8532	  8533	  8541	  8542	  9000	  9168	  9520	  9535
	  9546	  9568	  9581	  9619	  9636	  9645	  9654	  9742	  9876	  9913	  9920	  9942	  9981	 10030
	 10038	 10081	 10089	 10101	 10168	 10237	 10280	 10337	 10349	 10408	 10414	 10438	 10536
ADARRP	  3181#	  3182	  5620	  5668	  5968	  5970	  5980	  5982	  5994	  6004	  6006	  6064	  6066	  6076
	  6078	  6090	  6100	  6102	  6160	  6162	  6172	  6174	  6186	  6196	  6198	  6256	  6258	  6268
	  6270	  6282	  6292	  6294	  8626
ADBRLP	  3181#	  3183	  5970	  5982	  5994	  6006	  6018	  6030	  6042	  6054	  8661
ADBRMI	  3181#	  7101	  7116	  7131	  7146	  7161	  7176	  7191	  7206	  7221	  7236	  7251	  7266	  7281
	  7296	  7311	  7326	  7350	  7356	  7368	  7661	  7871	  8532	  8541	  8668	 10176	 10306	 10933
ADBRP2	  3253#	  8673	 10341	 10939
ADBRPL	  3183#	  3328	  3332	  3337	  3446	  3450	  3461	  3465	  3965	  4015	  4020	  4048	  4061	  4081
	  4089	  4261	  4269	  4277	  4285	  4293	  4301	  4309	  4317	  4389	  4397	  4405	  4413	  4421
	  4429	  4437	  4445	  4517	  4525	  4533	  4541	  4549	  4557	  4565	  4573	  7350	  7356	  7368
	  7662	  7753	  7870	  8229	  8295	  8533	  8542	  9205	  9222	  9454	  9950	 10062	 10081	 10096
	 10168	 10176	 10221	 10251	 10420	 10438	 10482	 10483	 10519	 10938
ADBRRP	  3181#	  3183	  5586	  5598	  5610	  5622	  5634	  5646	  5658	  5670	  8664
ADCLK	  8583	 10870#
ADCLKI	  3210#	  4165	  4170	  4175	  4180	  4185	  4190	  4195	  4200	  4205	  4210	  4215	  4220	  4225
	  4230	  4235	  4240	  4259	  4267	  4275	  4283	  4291	  4299	  4307	  4315	  4323	  4331	  4339
	  4347	  4355	  4363	  4371	  4379	  4387	  4395	  4403	  4411	  4419	  4427	  4435	  4443	  4451
	  4459	  4467	  4475	  4483	  4491	  4499	  4507	  4515	  4523	  4531	  4539	  4547	  4555	  4563
	  4571	  4579	  4587	  4595	  4603	  4611	  4619	  4627	  4635	  8580
ADCOND	  8853#	  8853	  8855	  8881	  8883	  8888	  8893	  8896
ADCR36	  3181#	  3184	  3405	  3406	  3539	  3541	  3545	  3547	  3551	  3553	  3557	  3559	  3563	  3565
	  3569	  3571	  3575	  3577	  3581	  3583	  3764	  3766	  3770	  3772	  3778	  3782	  3784	  3788
	  3790	  3794	  3796	  3802	  3806	  3808	  4129	  4135	  4141	  4147	  4164	  4169	  4174	  4179
	  4184	  4189	  4194	  4199	  4204	  4209	  4214	  4219	  4224	  4229	  4234	  4239	  4386	  4394
	  4402	  4410	  4418	  4426	  4434	  4442	  4450	  4458	  4466	  4474	  4482	  4490	  4498	  4506
	  7350	  7356	  7368	  7408	  7412	  7413	  7615	  7628	  7661	  7668	  7860	  7871	  7879	  7892 *** SEQ 0307
	  8040	  8532	  8541	  8687	  9222	  9519	  9546	  9547	  9698	  9775	  9907	 10045	 10176	 10194
	 10202	 10301	 10309	 10408	 10933
ADDER	  8495	  8623#
ADDER1	  8638	  8649#
ADDER2	  8674	  8678	  8681#
ADDTST	  2031	  2037#
ADEQV	  3181#	  4673	  4687	  4701	  4715	  4729	  4743	  4757	  4771	  4785	  4799	  4813	  4827	  4841
	  4855	  4869	  4883	  4897	  4911	  4925	  4939	  4953	  4967	  4981	  4995	  5009	  5023	  5037
	  5051	  5065	  5079	  5093	  5107	  5121	  5135	  5149	  5163	  5177	  5191	  5205	  5219	  5233
	  5247	  5261	  5275	  5289	  5303	  5317	  5331	  5345	  5359	  5373	  5387	  5401	  5415	  5429
	  5443	  5457	  5471	  5485	  5499	  5513	  5527	  5541	  5555	  6857	  6861	  6872	  6876	  6891
	  6906	  6921	  6936	  6951	  6966	  6977	  6981	  6992	  6996	  7011	  7026	  7041	  7056	  7071
	  7086	  7101	  7116	  7131	  7146	  7161	  7176	  7191	  7206	  7221	  7236	  7251	  7266	  7281
	  7296	  7311	  7326	  8682	  8684	  8718	  8720	 10207
ADFLGO	  8716	  8726#
ADFLGS	  7449	  7524	  7538	  7647	  7787	  8712	  8714#	  8715	  8727	  8728	  8848#	  8848	 10307	 10489
ADFMLP	  3181#	  3181	  5967	  5979	  6015	  6027	  8654
ADFMMI	  3181#	  3404	  3406	  3426	  3764	  3770	  3782	  3788	  3794	  3806	  4673	  4687	  4701	  4715
	  4729	  4743	  4757	  4771	  4785	  4799	  4813	  4827	  4841	  4855	  4869	  4883	  4897	  4911
	  4925	  4939	  4953	  4967	  4981	  4995	  5009	  5023	  5037	  5051	  5065	  5079	  5093	  5107
	  5121	  5135	  5149	  5163	  5177	  5191	  5205	  5219	  5233	  5247	  5261	  5275	  5289	  5303
	  5317	  5331	  5345	  5359	  5373	  5387	  5401	  5415	  5429	  5443	  5457	  5471	  5485	  5499
	  5513	  5527	  5541	  5555	  7101	  7116	  7131	  7146	  7161	  7176	  7191	  7206	  7221	  7236
	  7251	  7266	  7281	  7296	  7311	  7326	  7413	  7668	  7892	  8300	  8658	  9847
ADFMPL	  3181#	  3327	  3328	  3331	  3332	  3336	  3337	  3340	  3341	  3399	  3420	  3430	  3460	  3464
	  3479	  3481	  3485	  3487	  3491	  3493	  3497	  3499	  3503	  3505	  3509	  3511	  3515	  3517
	  3521	  3523	  3541	  3547	  3553	  3559	  3565	  3571	  3577	  3583	  3597	  3599	  3603	  3605
	  3609	  3611	  3615	  3617	  3621	  3623	  3627	  3629	  3633	  3635	  3639	  3641	  3655	  3657
	  3661	  3663	  3667	  3669	  3673	  3675	  3679	  3681	  3685	  3687	  3691	  3693	  3697	  3699
	  3716	  3722	  3728	  3734	  3740	  3746	  3752	  3758	  3764	  3770	  3776	  3782	  3788	  3794
	  3800	  3806	  3825	  3831	  3837	  3843	  3849	  3855	  3861	  3867	  3883	  3890	  3897	  3904
	  3911	  3918	  3925	  3932	  3943	  3964	  3975	  3979	  3983	  3996	  4001	  4002	  4013	  4018
	  4045	  4060	  4085	  4105	  4111	  4117	  4123	  4129	  4135	  4141	  4147	  4164	  4169	  4174
	  4179	  4184	  4189	  4194	  4199	  4204	  4209	  4214	  4219	  4224	  4229	  4234	  4239	  4256
	  4264	  4272	  4280	  4288	  4296	  4304	  4312	  4384	  4392	  4400	  4408	  4416	  4424	  4432
	  4440	  4512	  4520	  4528	  4536	  4544	  4552	  4560	  4568	  4673	  4687	  4701	  4715	  4729
	  4743	  4757	  4771	  4785	  4799	  4813	  4827	  4841	  4855	  4869	  4883	  4897	  4911	  4925
	  4939	  4953	  4967	  4981	  4995	  5009	  5023	  5037	  5051	  5065	  5079	  5093	  5107	  5121
	  5135	  5149	  5163	  5177	  5191	  5205	  5219	  5233	  5247	  5261	  5275	  5289	  5303	  5317
	  5331	  5345	  5359	  5373	  5387	  5401	  5415	  5429	  5443	  5457	  5471	  5485	  5499	  5513
	  5527	  5541	  5555	  5607	  5655	  5703	  5751	  5799	  5847	  5895	  5943	  5991	  6039	  6087
	  6135	  6183	  6231	  6279	  6327	  6377	  6392	  6407	  6422	  6437	  6452	  6467	  6482	  6497
	  6512	  6527	  6542	  6557	  6572	  6587	  6602	  6617	  6620	  6632	  6635	  6647	  6650	  6662
	  6665	  6677	  6680	  6692	  6695	  6707	  6710	  6722	  6725	  6737	  6740	  6752	  6755	  6767
	  6770	  6782	  6785	  6797	  6800	  6812	  6815	  6827	  6830	  6842	  6845	  6857	  6861	  6872
	  6876	  6887	  6891	  6902	  6906	  6917	  6921	  6932	  6936	  6947	  6951	  6962	  6966	  6977
	  6981	  6992	  6996	  7007	  7011	  7022	  7026	  7037	  7041	  7052	  7056	  7067	  7071	  7082
	  7086	  7097	  7112	  7127	  7142	  7157	  7172	  7187	  7202	  7217	  7232	  7247	  7262	  7277
	  7292	  7307	  7322	  7409	  7671	  7893	  8300	  8911	  9002	  9848
ADFMRP	  3181#	  3181	  5583	  5595	  5631	  5643	  8656
ADMAGI	  3181#	  3405	  3539	  3541	  3545	  3547	  3551	  3553	  3557	  3559	  3563	  3565	  3569	  3571
	  3575	  3577	  3581	  3583	  3766	  3772	  3778	  3784	  3790	  3796	  3802	  3808	  4450	  4458
	  4466	  4474	  4482	  4490	  4498	  4506	  7408	  7412	  7413	  7615	  7628	  7635	  7879	  8040 *** SEQ 0308
	  8666	  9519	  9546	  9547	  9698	  9775	  9907	 10038	 10045	 10194	 10202	 10207	 10301	 10408
	 10531
ADMBEN	  3253#	  7772	  7982	  8021	  8046	 10112	 10152	 10162	 10179	 10195	 10388
ADMBLE	  3253#	  3253	  8632	  8912
ADMBRE	  3253#	  3253	  8635	  8907
ADMI1B	  3181#	  4060	  7350	  7356	  7368	  8692
ADMSKG	  3253#	  7669	  7725	  7783	  7864	  7869	  7894	  8174	  8304	  8637	  9223	 10311	 10485
ADOVF	  8670#	  8670	  8672	  8679	  8700	  8707	  8719	  8721	 10983	 10993	 10995	 11004	 11006
ADOVF1	  8650#	  8650	  8652	  8703	  8717
ADPL1B	  3184#	  4013	  4018	  4045	 10482
ADPL1L	  3181#	  3184	  4001	  8694	  8911
ADPR	  8681#	  8681	  8757	  8780	  8782	  8785	 11032
ADSUB	  3767	  3773	  3779	  3785	  4108	  4114	  4120	  4126	  4132	  4138	  4144	  4150	  7447#	  7448
ADSUB1	  7448#	  7470	  7490
ADTEM	  8699#	  8699	  8710
ADTIME	 10911	 10915	 11454#
ADX	  1531	  1712	  8536	  8732#	  8732	  8762	  8764	  8770	  8772	  8776	 10129	 10138	 10736	 10849
	 10855	 10858	 10866	 11005	 11018	 11043
ADXADD	  3257#	  8041	  8537	  8771	  8773	  8781	  8784	  9908	 10037	 10046	 10082	 10097	 10170	 10943
ADXBRM	  3257#	  7968	  8739	  9890	 10069
ADXCR0	  8766	  8768#	  8768	  9885
ADXEQV	  3257#	  7931	  7968	  8026	  8337	  8769	  8771	  8779	  8781	  9890	 10063	 10069
ADXER	  8496	  8731#
ADXER1	  8745	  8755#
ADXER2	  8774	  8778#
ADXFM2	  3257#	  8744	 10939
ADXFMM	  3257#	  7931	  8026	  8041	  8337	  8543	  8737	  9908	 10037	 10046	 10063	 10175	 10934
ADXFMP	  3257#	  7931	  8026	  8041	  8537	  8543	  8735	  9908	 10037	 10046	 10082	 10097	 10170	 10175
	 10940
ADXTMP	  8755#	  8755	  8760	  8763	  8775
ALTMGO	   512#
AMCLRB	   426#
ANSBLK	  1028	  1029	  1064	  1066	  1068	  1070	  1072	  1074	  1076	  1078	  1255	  1459#
ANSSV0	  1055#	  1055	  1059
ANXM	   426#
AOBJD	  4013	  4018	  8167#
AOBJX	  4015	  4020	  7432#	  7433	  9373	  9375
AOJD	  4386	  4394	  4402	  4410	  4418	  4426	  4434	  4442	  8173#
APR	   822	   827	   999	  1025	  1052	  1063	  1121	  1147	  1160	  1187	  1194	  1335	  1338	  1340
	  1346	  1356
AR	   117#	  1519	  1652	  3155#	  7444	  7501	  7503	  7560	  7582	  7679	  7886	  7910	  7977	  8089
	  8237	  8489	  8554	  8625	  8627	  8629	  8645	  8798	  8807	  8826	  9563	  9565	  9666	  9667
	  9678	  9688	  9689	  9692	  9693	  9719	  9758	  9761	  9762	  9769	  9770	  9785	  9786	  9789
	  9790	  9800	  9806	  9878	  9993	 10000	 10171	 10214	 10228	 10363	 10558	 10559	 10600	 10602
	 10627	 10647	 10654	 10668	 10794	 10814	 10816	 10901	 10955	 10956	 10964	 10976	 10979	 10980
	 10988	 10991	 10992	 10999	 11002	 11003	 11085	 11086	 11121	 11257	 11297	 11361
AR0L	 10689	 10951#
AR0R1	 10696	 10975#
AR0R2	 10707	 10987#
AR1R1	 10699	 11010#
AR1R2	 10710	 10998#
AR2R2	 10711	 11011#
AR35L	 10687	 10963#                                                                                                *** SEQ 0309
ARADEN	  3204#	  3328	  3329	  3332	  3333	  3337	  3338	  3341	  3401	  3405	  3422	  3426	  3427	  3431
	  3447	  3451	  3462	  3466	  3482	  3488	  3494	  3500	  3506	  3512	  3518	  3524	  3541	  3542
	  3547	  3548	  3553	  3554	  3559	  3560	  3565	  3566	  3571	  3572	  3577	  3578	  3583	  3584
	  3599	  3605	  3611	  3617	  3623	  3629	  3635	  3641	  3657	  3663	  3669	  3675	  3681	  3687
	  3693	  3699	  3718	  3724	  3730	  3736	  3742	  3748	  3754	  3760	  3766	  3767	  3772	  3773
	  3778	  3779	  3784	  3785	  3790	  3796	  3802	  3808	  3885	  3892	  3899	  3906	  3913	  3920
	  3927	  3934	  3951	  3955	  3959	  3965	  3975	  3979	  3983	  3998	  4002	  4015	  4020	  4047
	  4058	  4061	  4066	  4086	  4108	  4114	  4120	  4126	  4132	  4138	  4144	  4150	  4261	  4269
	  4277	  4285	  4293	  4301	  4309	  4317	  4324	  4332	  4340	  4348	  4356	  4364	  4372	  4380
	  4389	  4397	  4405	  4413	  4421	  4429	  4437	  4445	  4452	  4460	  4468	  4476	  4484	  4492
	  4500	  4508	  4517	  4525	  4533	  4541	  4549	  4557	  4565	  4573	  4580	  4588	  4596	  4604
	  4612	  4620	  4628	  4636	  4676	  4677	  4690	  4691	  4704	  4705	  4718	  4719	  4732	  4733
	  4746	  4747	  4760	  4761	  4774	  4775	  4788	  4789	  4802	  4803	  4816	  4817	  4830	  4831
	  4844	  4845	  4858	  4859	  4872	  4873	  4886	  4887	  4900	  4901	  4914	  4915	  4928	  4929
	  4942	  4943	  4956	  4957	  4970	  4971	  4984	  4985	  4998	  4999	  5012	  5013	  5026	  5027
	  5040	  5041	  5054	  5055	  5068	  5069	  5082	  5083	  5096	  5097	  5110	  5111	  5124	  5125
	  5138	  5139	  5152	  5153	  5166	  5167	  5180	  5181	  5194	  5195	  5208	  5209	  5222	  5223
	  5236	  5237	  5250	  5251	  5264	  5265	  5278	  5279	  5292	  5293	  5306	  5307	  5320	  5321
	  5334	  5335	  5348	  5349	  5362	  5363	  5376	  5377	  5390	  5391	  5404	  5405	  5418	  5419
	  5432	  5433	  5446	  5447	  5460	  5461	  5474	  5475	  5488	  5489	  5502	  5503	  5516	  5517
	  5530	  5531	  5544	  5545	  5558	  5559	  5587	  5599	  5611	  5623	  5635	  5647	  5659	  5671
	  5683	  5695	  5707	  5719	  5731	  5743	  5755	  5767	  5779	  5791	  5803	  5815	  5827	  5839
	  5851	  5863	  5875	  5887	  5899	  5911	  5923	  5935	  5947	  5959	  5971	  5983	  5995	  6007
	  6019	  6031	  6043	  6055	  6067	  6079	  6091	  6103	  6115	  6127	  6139	  6151	  6163	  6175
	  6187	  6199	  6211	  6223	  6235	  6247	  6259	  6271	  6283	  6295	  6307	  6319	  6331	  6343
	  6383	  6398	  6413	  6428	  6443	  6458	  6473	  6488	  6503	  6518	  6533	  6548	  6563	  6578
	  6593	  6608	  6623	  6638	  6653	  6668	  6683	  6698	  6713	  6728	  6743	  6758	  6773	  6788
	  6803	  6818	  6833	  6848	  6863	  6878	  6893	  6908	  6923	  6938	  6953	  6968	  6983	  6998
	  7013	  7028	  7043	  7058	  7073	  7088	  7103	  7118	  7133	  7148	  7163	  7178	  7193	  7208
	  7223	  7238	  7253	  7268	  7283	  7298	  7313	  7328	  7410	  7414	  7445	  7655	  7727	  7903
	  8296	  9165	  9510	  9517	  9550	  9554	  9582	  9609	  9818	  9913	  9966	 10004	 10012	 10021
	 10050	 10115	 10156	 10168	 10194	 10246	 10258	 10265	 10302	 10314	 10488	 10523	 10592
ARANGE	   874	   880#	   884	   886	   892	   959
ARCLK	  8553	 10591#	 10591	 10594	 10623	 10630	 10640	 10658
ARCLR	  3198#	  7553	  7634	  9567	  9631	  9636	  9863	  9882	  9995	 10021	 10089	 10191	 10243	 10622
ARESAE	  7861	  8518	  9632	  9822	  9864	  9969	 10614#	 10614
ARFLGS	  3202#	  4053	  4076	  4081	  8570	  8571	  9247	  9248	 10592	 10603	 10604
ARGOLT	  7555	  7750	  7842	  9488	  9604	  9638	  9984	  9988	 10031	 10092	 10137	 10235	 10274	 10276
	 10355#	 10355
ARI08	  8493#	  8493	  9566	 10635	 10637
ARIREN	  3202#	  3353	  3358	  3363	  3368	  3394	  3991	 10592	 10609
ARLARR	  3202#	  3202	  3205	  4085	  5636	  5648	  5660	  5672	  5732	  5744	  5756	  5768	  5828	  5840
	  5852	  5864	  5924	  5936	  5948	  5960	  7505	  7603	  7829	  7831	 10526	 10601
ARLT	 10617	 10674#
ARLT1	 10682	 10687#
ARLTAD	  3202#	  3202	  3204	  5588	  5600	  5612	  5624	  5684	  5696	  5708	  5720	  5780	  5792	  5804
	  5816	  5876	  5888	  5900	  5912	  5973	  5985	  5997	  6009	  6021	  6033	  6045	  6057	  6165
	  6177	  6189	  6201	  6213	  6225	  6237	  6249	  7505	  7507	  7831	  8945	 10595
ARLTEM	 10680#	 10680	 10972
ARMIX	  8554	 10638#	 10638
ARMIX1	 10593	 10612#
ARMIX2	 10632	 10661#
ARMIX3	 10635#	 10666	 10672                                                                                         *** SEQ 0310
ARMIX4	 10640#	 10704
ARMIX5	 10625	 10631#
ARMIX6	 10613	 10654#
ARMIX7	 10615	 10642#
ARMIX8	 10633#	 10664
ARMIXR	  8547	 10591#
ARMQEN	  7578	  7609	  7649	  7747	  7761	  7765	  7789	  8048	  8513	  9434	  9524	  9616	  9851	  9892
	 10073	 10121	 10161	 10201	 10535	 10545	 10633#	 10633	 10665
AROV	   426#	  3269#	  7448	  7454	  7585	  7926	  8206	  8726	  9493	  9831	  9832	  9962	 10147	 10366
AROVTP	   426#
AROVU	   426#
ARPCEN	  3203#	  4003	  4027	  4053	  4076	  4081	  4085	 10526	 10592	 10606	 10607
ARPOSE	  7736#	  7736	  8515	 10624
ARRARL	  3202#	  3203	  3205	  4002	  6020	  6032	  6044	  6056	  6116	  6128	  6140	  6152	  6212	  6224
	  6236	  6248	  6308	  6320	  6332	  6344	  9168	 10599
ARRT1	 10619	 10695#
ARRT1A	 10693	 10703#	 10717
ARRT2	 10621	 10706#
ARRTAD	  3202#	  3203	  3204	  3353	  3358	  3363	  3368	  3394	  3991	  5589	  5601	  5613	  5625	  5637
	  5649	  5661	  5673	  5781	  5793	  5805	  5817	  5829	  5841	  5853	  5865	  5973	  5985	  5997
	  6009	  6069	  6081	  6093	  6105	  6165	  6177	  6189	  6201	  6261	  6273	  6285	  6297	  7506
	  8940	 10597
ARSHLT	  3198#	  7571	  9487	  9593	  9601	  9644	  9742	  9920	 10106	 10127	 10133	 10357	 10616
ARSHR2	  3198#	 10369	 10620
ARSHRT	  3198#	  9554	  9586	  9811	  9868	 10085	 10259	 10321	 10618
ARSMR	  7544	  7855	  7949	  8517	  9564	  9973	 10007	 10247	 10612#	 10612
ARSWAP	  3205#	  3481	  3487	  3493	  3499	  3505	  3511	  3517	  3523	  3541	  3547	  3553	  3559	  3565
	  3571	  3577	  3583	  3599	  3605	  3611	  3617	  3623	  3629	  3635	  3641	  3657	  3663	  3669
	  3675	  3681	  3687	  3693	  3699	  3743	  3749	  3755	  3761	  6380	  6395	  6410	  6425	  6440
	  6455	  6470	  6485	  6500	  6515	  6530	  6545	  6560	  6575	  6590	  6605	  6620	  6635	  6650
	  6665	  6680	  6695	  6710	  6725	  6740	  6755	  6770	  6785	  6800	  6815	  6830	  6845	  6860
	  6875	  6890	  6905	  6920	  6935	  6950	  6965	  6980	  6995	  7010	  7025	  7040	  7055	  7070
	  7085	  7100	  7115	  7130	  7145	  7160	  7175	  7190	  7205	  7220	  7235	  7250	  7265	  7280
	  7295	  7310	  7325	 10592
ARX	  1527	  1717	  7991	  8036	  8557#	  8557	  8731#	  8731	  9877	  9911	  9924	  9943	  9952	 10568
	 11104
ARX0R1	 10862	 11036#
ARX35L	 10852	 11023#
ARX9R2	 11035#
ARXADX	  3252#	  7968	  7974	  8008	  8026	  8041	  8046	  9895	  9914	 10011	 10020	 10049	 10069	 10072
	 10833
ARXCLK	  8556#	  8556	 10829	 10832	 10856#	 10856
ARXCLR	  3252#	  8328	  9890	 10020	 10831
ARXMIX	  8555#	  8555	 10845
ARXMX1	 10834	 10855#
ARXMX2	 10837	 10849#
ARXMX3	 10839	 10858#
ARXMX4	 10841	 10866#
ARXMX5	 10853#	 10864	 10868
ARXMXR	  8548	 10829#
ARXSHL	  3252#	  9919	 10108	 10128	 10134	 10359	 10836
ARXSHR	  3252#	  9869	  9946	 10086	 10116	 10327	 10838
ARXSR2	  3252#	 10374	 10840                                                                                         *** SEQ 0311
AST	   627#	  1807
ATSIN	   628#	  1882
AUXTAB	  8097#	  8099	  8100	  8102	  8103	  8105	  8106	  8107	  8108	  8109	  8110	  8111	  8112	  8113
	  8114	  8115	  8116	  8118	  8119	  8121	  8122	  8124	  8125	  8127	  8128	  8129	  8130	  8132
	  8133	  8135	  8136	  8138	  8139	  8141	  8142	  8143	  8144	  8146	  8147	  8149	  8150	  8152
	  8153	  8155	  8156	  8158	  8159	  8161	  8162	  8164	  8165	  8167	  8168	  8169	  8170	  8171
	  8172	  8173	  8174	  8176	  8177	  8179	  8180	  8182	  8183	  8185	  8186	  8188	  8189	  9251
BEG	   805	   824	   829	   832#
BEGEND	   508#	  1095	  1098
BEGIN	   132	   136	   137	   138	   372	   373	   439#	   773	  1911	  1991	 11841
BEGIN1	   455#	   509
BELL	   631#	  1180
BFLGS	  4673#	  4674	  4687#	  4688	  4701#	  4702	  4715#	  4716	  4729#	  4730	  4743#	  4744	  4757#	  4758
	  4771#	  4772	  4785#	  4786	  4799#	  4800	  4813#	  4814	  4827#	  4828	  4841#	  4842	  4855#	  4856
	  4869#	  4870	  4883#	  4884	  4897#	  4898	  4911#	  4912	  4925#	  4926	  4939#	  4940	  4953#	  4954
	  4967#	  4968	  4981#	  4982	  4995#	  4996	  5009#	  5010	  5023#	  5024	  5037#	  5038	  5051#	  5052
	  5065#	  5066	  5079#	  5080	  5093#	  5094	  5107#	  5108	  5121#	  5122	  5135#	  5136	  5149#	  5150
	  5163#	  5164	  5177#	  5178	  5191#	  5192	  5205#	  5206	  5219#	  5220	  5233#	  5234	  5247#	  5248
	  5261#	  5262	  5275#	  5276	  5289#	  5290	  5303#	  5304	  5317#	  5318	  5331#	  5332	  5345#	  5346
	  5359#	  5360	  5373#	  5374	  5387#	  5388	  5401#	  5402	  5415#	  5416	  5429#	  5430	  5443#	  5444
	  5457#	  5458	  5471#	  5472	  5485#	  5486	  5499#	  5500	  5513#	  5514	  5527#	  5528	  5541#	  5542
	  5555#	  5556
BIS	   426#	  3273#	  7769	  8246	  8468	  8572	  8573	  9450	  9461	 10453
BLT0	  4002	  7822#	  7823
BLT1	  4002	  7828#	  7829
BLT2	  4003	  7834#	  7835
BLTF	  8162	  8329#
BLTF1	  7825#	  7825	  7836	  8479	  9330#	  9330	  9337	  9355	  9414	 10537
BLTFD	  4001	  8161#
BLTFDA	  8329	  8333#
BLTT0	  2881	  7837	 10483#
BLTT1	  2882	 10488#
BLTT1X	  9415	 10482#
BLTT2	  2883	 10503#
BLTT3	  2884	 10508#	 11467
BLTT4	  2885	 10511#
BLTT5	  2886	 10519#
BLTT6	  2887	 10523#
BLTT7	  2888	 10526#
BLTT7A	 10496	 10524#
BLTT7B	 10530	 10533#
BLTT8	  2889	 10493	 10535#
BLTT9	  2890	 10540#
BLTT9A	 10512#	 10551
BOOL0D	  4675	  4689	  4703	  4717	  8171#
BOTST	  1971	  2051#
BPIFD	  7351	  7357	  7369	  8124#
BPINC	  7340#	  9124
BPNI2D	  7382	  8118#
BPNIF	  8122	  8304#
BPNIF2	  8119	  8305#
BPNIFD	  7363	  7375	  7391	  7395	  7399	  7403	  8121#
BPNINC	  7381#	  9122                                                                                                 *** SEQ 0312
BR	   119#	  1521	  1670	  3157#	  7660	  7988	  8490	  8530	  8559	  8601	  8602	  8603	  8660	  8663
	  8669	  8675	  8678	  8740	  8748	  9526	 10226	 10272	 10903
BRAREN	  3199#	  3328	  3329	  3332	  3333	  3337	  3338	  3341	  3401	  3405	  3422	  3426	  3427	  3446
	  3450	  3461	  3465	  3482	  3488	  3494	  3500	  3506	  3512	  3518	  3524	  3542	  3548	  3554
	  3560	  3566	  3572	  3578	  3584	  3599	  3605	  3611	  3617	  3623	  3629	  3635	  3641	  3657
	  3663	  3669	  3675	  3681	  3687	  3693	  3699	  3827	  3833	  3839	  3845	  3851	  3857	  3863
	  3869	  3885	  3892	  3899	  3906	  3913	  3920	  3927	  3934	  3951	  3955	  3959	  3965	  3975
	  3979	  3983	  3998	  4003	  4015	  4020	  4047	  4053	  4058	  4061	  4066	  4081	  4086	  4261
	  4269	  4277	  4285	  4293	  4301	  4309	  4317	  4389	  4397	  4405	  4413	  4421	  4429	  4437
	  4445	  4517	  4525	  4533	  4541	  4549	  4557	  4565	  4573	  5587	  5599	  5611	  5623	  5635
	  5647	  5659	  5671	  5683	  5695	  5707	  5719	  5731	  5743	  5755	  5767	  5779	  5791	  5803
	  5815	  5827	  5839	  5851	  5863	  5875	  5887	  5899	  5911	  5923	  5935	  5947	  5959	  5971
	  5983	  5995	  6007	  6019	  6031	  6043	  6055	  6067	  6079	  6091	  6103	  6115	  6127	  6139
	  6151	  6163	  6175	  6187	  6199	  6211	  6223	  6235	  6247	  6259	  6271	  6283	  6295	  6307
	  6319	  6331	  6343	  6382	  6397	  6412	  6427	  6442	  6457	  6472	  6487	  6502	  6517	  6532
	  6547	  6562	  6577	  6592	  6607	  6622	  6637	  6652	  6667	  6682	  6697	  6712	  6727	  6742
	  6757	  6772	  6787	  6802	  6817	  6832	  6847	  6862	  6877	  6892	  6907	  6922	  6937	  6952
	  6967	  6982	  6997	  7012	  7027	  7042	  7057	  7072	  7087	  7102	  7117	  7132	  7147	  7162
	  7177	  7192	  7207	  7222	  7237	  7252	  7267	  7282	  7297	  7312	  7327	  8230	  9165	  9179
	  9222	  9609	  9891	 10074	 10122	 10239	 10302	 10503	 10556
BRARXE	  3251#	  9951	 10069	 10565
BRCLK	  8558	 10555#	 10555	 10557	 10567
BRMIX	  8559	 10554	 10558#	 10558	 10563	 10569
BRMIXR	  8549	 10554#
BRSMR	  7905	  7948	  7959	  8010	  8516	  8599#	  8599	 10234
BYF5	  2118	  8466	  8969	  9117#	  9117	  9478	 10444	 10449	 10456	 10475
BYF6	  7768#	  7768	  8245	  8247	  8467	  8469	  8574	  8950	  9121	  9123	  9419	  9448	  9449	  9460
	 10451	 10452
BYTE0	  7352	  7358	  7364	  7370	  7376	  7724#	  7725
BYTE2	  7353	  7359	  7365	  7371	  7377	  7384	  7393	  7397	  7401	  7405	  7732#	  7733
BYTST	  1979	  2004#
BYTTAB	  2005	  2388#
BYTTST	   860	   886#
CAC	  2153	  2156	  2160	  2164	  2169	  2173	  2177	  2182	  2195	  2200	  2205	  2209	  2213	  2220#
CAC1	  2161	  2165	  2183	  2214	  2227#
CACL	  2206	  2251#
CACR	  2170	  2196	  2235#
CACR1	  2174	  2201	  2243#
CADR	  2236	  2244	  2252	  2265	  2281	  2288#
CCA	   426#
CCE	  2132	  2179	  2278#
CE	  2157	  2166	  2178	  2184	  2188	  2191	  2197	  2202	  2264#
CE1	  2185	  2192	  2272#
CHAIN	   178#
CHEC	  1046	  1055#
CHEC1	  1080#
CHEC2	  1085#	  1102	  1152
CHNOFF	   426#	   826
CHNON	   426#	   823	   828
CLINCL	  9231#	  9231	  9294
CLINSE	  8512	  8587	  9033	  9035	  9101#	  9101	  9182	  9208	  9224	  9286	  9394#	  9394	 10465	 10504
	 10512
CLK	   426#	  1346                                                                                                 *** SEQ 0313
CLKAC0	  1349#	  1349	  1357
CLKAC1	  1350#	  1350	  1358
CLKCLR	   426#	   822	  1340	  1356
CLKDIS	   426#	  1338
CLKENB	   426#	   822	  1340	  1356
CLKINH	  3213#	  8578	  8588
CLKU	   426#
CLOCKF	   494#
CNDPQR	  7459	  7471	  7491	  8848#
CNTLC	   511#
CNTLPC	  1436	  1484	  1578#	  1787
CNTRP	   426#
COMMA	   620#	  1827
COMP	  4166	  4171	  4176	  4181	  4186	  4191	  4196	  4201	  4206	  4211	  4216	  4221	  4226	  4231
	  4236	  4241	  7458#	  7459	  9367
COMTAB	  2043	  2432#
COMTST	  1973	  2042#
CONDP	  7461	  7473	  7492	  8867#	  8867	  8869	  8873	  8878
CONDQ	  7460	  8880#	  8880
CONDQR	  8879	  8884	  8887#
CONDR	  7472	  7493	  8885#	  8885
CONDZ	  8200#	  8200	  8202	  8213	  8218
CONDZ1	  8197#	  8217
CONN	  1965	  1990#
CONNF	  1819#	  1819	  1956#	  1956
CONSW	   495#	  1214	  1330	  1606	  1657	  1792	  1853	  2339
CONTNU	   134	   834#	   847	  1094	  1097
CORER1	  1027	  1150#	  1189
COREX	  1003	  1006	  1009	  1012	  1015	  1018	  1104#	  1106	  1112	  1116	  1148
COREX1	  1118#
COREXF	   988	  1020#	  1032	  1122	  1188	  1226	  1254	  1279
CORIN1	   971	  1001#	  1286
CORIN2	   973	  1004#
CORIN3	   975	  1007#
CORIN4	   977	  1010#
CORIN5	   979	  1013#
CORIN6	   981	  1016#
CORLOP	  1000#
CPOPJ	   515#	  7444	  7741	  8321	  8935	  9166	  9169	  9206	  9397	  9429	  9432	  9443	  9491	  9514
	  9522	  9548	  9579	  9584	  9590	  9596	  9605	  9614	  9819	  9855	  9888	  9893	  9909	  9918
	  9940	  9948	  9967	  9976	 10047	 10065	 10070	 10083	 10113	 10119	 10125	 10150	 10154	 10166
	 10184	 10205	 10231	 10253	 10304	 10312	 10351	 10486	 10501	 10509	 10521	 10524	 10533	 10538
	 10639
CPOPJ1	   513#
CRLF	   307	   308	   615#	  1235	  1268	  1275	  1314	  1421	  1453	  1497	  1660	  1695	  1805	  1850
	  1860	  2303	  2342
CRLF2	   311	   312	   617#	  1377
CRY0	   426#	  3270#	  7448	  7525	  7539	  8208	 10490
CRY1	   426#	  3271#	  7448	  7648	  8210
CSHFLG	   674#
CSHMEM	   675#
CTRP	   426#
CYCL60	   668#	   812                                                                                                 *** SEQ 0314
CYCLE	 11195	 11246	 11427#
DBLAF	  1625	  1857	  1957#	  1957	  2100
DCK	   426#	  3281#	  9493	 10147
DDTEX	   986	  1037	  1567#	 10462
DDTLNK	   192#	   453
DDTSRT	   453#	   803	  1573
DEBUG	    80#	 11832	 11833
DECVER	     4#	    11	    23	   474
DF22F	   579#
DFA0	  3328	  3332	  7967#	  7968
DFA1	  3328	  3332	  7972#	  7973
DFA2	  3329	  3333	  7981#	  7982
DFA2A	  7988	  7990	  7993	  7997#
DFA2B	  8002#	  8023	  8051
DFA2D	  7776	  8004#
DFAF	  7930#	  8153
DFAFD	  3327	  3331	  8152#
DFAT1	  2851	  8001	 10011#
DFAT1A	 10016	 10019	 10025#
DFAT1B	 10023	 10029	 10081#	 10418
DFAT1C	 10015	 10026	 10057#
DFAT1D	 10034#	 10059
DFAT1E	 10035	 10045#	 10061
DFAT1F	 10056	 10062#
DFAT1G	  7743	 10030#	 10055	 10076
DFAT1H	 10036#	 10079
DFAT1J	  9897	 10037#	 10087	 10110
DFAT1K	  9928	 10043#
DFAT2	  2852	 10049#
DFAT2A	 10053	 10078#
DFAT3	  2853	 10067#
DFAT4	  2854	 10072#
DFAT5	  2855	 10085#
DFD0	  3341	  8025#	  8026
DFD0A	  8012	  8028#
DFD1	  3341	  8033#	  8034
DFD10A	 10148#	 10350
DFD2	  3342	  8045#	  8046
DFDF	  8159	  8334	  8336#
DFDF1	  8470	  8525#	  8525	 10117	 10148	 10169	 10396	 10399
DFDFD	  3340	  8158#
DFDT0	  2859	  8049	 10112#
DFDT1	  2860	 10115#
DFDT10	  2869	 10147#
DFDT11	  2870	 10152#
DFDT12	  2871	 10156#
DFDT2	  2861	 10121#
DFDT3	  2862	 10127#	 10676
DFDT3A	 10130	 10146#
DFDT4	  2863	 10133#
DFDT4A	 10140	 10142#	 10174	 10177
DFDT5	  2864	 10161#	 10397
DFDT6	  2865	 10168#                                                                                                *** SEQ 0315
DFDT7	  2866	 10178#	 10400
DFDT8	  2867	 10186#
DFDT8A	 10190	 10193#
DFDT8C	 10189	 10199#
DFDT8D	 10195#	 10200	 10209
DFDT9	  2868	 10207#
DFLTF	  7932	  8325	  8328#	  8336
DFM0	  3337	  8007#	  8008
DFM1	  3337	  8014#	  8015
DFM2	  3338	  8020#	  8021
DFMF	  8156	  8325#
DFMFD	  3336	  8155#
DFMT1	  2856	  8022	 10089#
DFMT2	  2857	 10100#	 10389
DFMT3	  2858	 10106#	 10386
DFN0	  3426	  7858#	  7859
DFN1	  3426	  7867#	  7868
DFNFD	  3425	  8138#
DIAGMN	   442#
DING	   164#	  1178
DISP	  8527	  8534	  8545#
DITT30	  1743	  1747#
DITT60	  1736	  1740#
DITTO	  1644	  1649	  1654	  1667	  1672	  1677	  1714	  1719	  1726#	  1734	  1738	  1741	  1745	  1748
DITTO0	  1726	  1733#
DITTO3	  1682	  1687	  1692	  1743#
DITTO6	  1629	  1634	  1639	  1709	  1736#
DIV0	  3913	  3920	  3927	  3934	  7623#	  7624
DIV1	  3913	  3920	  3927	  3934	  7665#	  7666
DIV1A	  7667	  7671#
DIV2	  3915	  3922	  3929	  3936	  7643#	  7644
DIVF	  8103	  8299#
DIVFD	  3884	  3891	  3898	  3905	  3912	  3919	  3926	  3933	  8102#
DMOV2	  3379	  3383	  7771#	  7772
DMOVT1	  2847	  7773	 10298#
DMVE0A	  7409	  7413	  7796#	  7797
DMVEA	  8180	  8295#
DMVEFD	  7408	  7412	  8179#
DMVMFD	  3404	  8176#
DMVN1A	  7413	  7781#	  7782
DMVN2A	  7414	  7792#	  7793
DMVNM0	  3405	  7799#	  7800
DMVNM1	  3406	  7778#	  7779
DMVNM2	  3407	  7786#	  7787
DMVNT1	  2848	  7775	 10301#
DMVNT2	  2849	 10306#
DMVNT3	  2850	 10314#
DMVPT2	  7408#	  9131	  9132	  9456	  9458
DNT1	  2872	  9873#	 10043
DNT1A	  9881	  9888#
DNT1B	  9879	  9885#
DNT1C	  9887	  9899#
DNT1D	  9906	  9939#                                                                                                *** SEQ 0316
DNT1E	  9903	  9918#	  9929	  9934
DNT1F	  9907#	  9936
DNT1G	  9899	  9931#
DNT1Z	  9882#
DNT2	  2873	  9890#	 10562
DNT3	  2874	  9895#
DNT4	  2875	  9919#
DNT5	  2876	  9911#
DNT5A	  9868#	  9912
DNT5B	  9871#
DNT6	  2877	  9942#
DNT6A	  9937	  9947#
DNT7	  2878	  9915	  9950#
DNT8	  2879	  9956#	 10196
DNT8A	  9961	  9966#
DNT9	  2880	  9969#
DOLLAR	   634#
DPADTM	 10908	 11456#
DPB0	  3461	  3465	  7745#	  7746
DPB0A	  7749	  7753#
DPB1	  3461	  3465	  7756#	  7757
DPB2	  3462	  3466	  7764#	  7765
DPBFD	  3460	  3464	  8129#
DSF2	  8464	  8523	 10378#	 10378	 10681	 10734	 10877#	 10877	 10879
DSF2CL	  3216#	  8919	  9490	  9504	  9598	 10876
DSF2SE	  3215#	  7658	  9583	 10878
DSHFT0	  3975	  3979	  3983	  7674#	  7675
DSHFT2	  3976	  3980	  3984	  7697#	  7698
DSKUPD	   479
DST1	  2835	  7659	  9486#
DST2	  2836	  9493#	  9597
DST3	  2837	  9503#	 10381
DST3A	  9506	  9510#
DST4	  2838	  9516#
DST5	  2839	  9524#
DST5A	  9529	  9547#
DST5B	  9540#	  9552
DST5C	  9541#	  9842
DST5D	  9531	  9538#
DST5E	  9532#	  9555
DST5F	  9539	  9546#
DST6	  2840	  9550#
DVCPNT	  1820	  1886#
E	  2210	  2215	  2218	  2258#
ECHTST	   864	   892#
EFPNT	  1830#	  1884	  1890
END	 11840#
ENDFIX	   748#
ENDSLD	  1463	 11830#
ENTDDT	    87#	   802
ERMORE	   528#
ERR	  1516	  1901	  8082	  8085	  8521	  8522	  8960	  9094	  9157	  9263	  9471	  9803	 10472#	 10900
	 11461	 11464	 11465                                                                                         *** SEQ 0317
ERRCNT	   832#	   832	  1169	  1177
ERRPC	   499#
ERRPNT	  1515	  1896	  1898#
ERRTLS	   500#	   770	  1170	  1370
ERRX	  1065	  1067	  1069	  1071	  1073	  1075	  1077	  1079	  1128	  1130	  1132	  1134	  1136	  1138
	  1140	  1142	  1156#
ERRX1	  1169#
ERRX2	  1183	  1188#
ERSTOP	   167#	  1172
ET0	  3177#	  3327	  3331	  3336	  3340	  3351	  3356	  3361	  3366	  3386	  3392	  3404	  3410	  3425
	  3430	  3445	  3449	  3460	  3464	  3509	  3569	  3627	  3685	  3728	  3752	  3776	  3800	  3825
	  3831	  3837	  3843	  3849	  3855	  3861	  3867	  3883	  3890	  3897	  3904	  3911	  3918	  3925
	  3932	  3943	  3964	  3989	  4001	  4046	  4064	  4084	  4164	  4169	  4174	  4179	  4184	  4189
	  4194	  4199	  4204	  4209	  4214	  4219	  4224	  4229	  4234	  4239	  4256	  4264	  4272	  4280
	  4288	  4296	  4304	  4312	  4320	  4328	  4336	  4344	  4352	  4360	  4368	  4376	  4384	  4392
	  4400	  4408	  4416	  4424	  4432	  4440	  4448	  4456	  4464	  4472	  4480	  4488	  4496	  4504
	  4512	  4520	  4528	  4536	  4544	  4552	  4560	  4568	  4576	  4584	  4592	  4600	  4608	  4616
	  4624	  4632	  4674	  4688	  4702	  4716	  4730	  4744	  4758	  4772	  4786	  4800	  4814	  4828
	  4842	  4856	  4870	  4884	  4898	  4912	  4926	  4940	  4954	  4968	  4982	  4996	  5010	  5024
	  5038	  5052	  5066	  5080	  5094	  5108	  5122	  5136	  5150	  5164	  5178	  5192	  5206	  5220
	  5234	  5248	  5262	  5276	  5290	  5304	  5318	  5332	  5346	  5360	  5374	  5388	  5402	  5416
	  5430	  5444	  5458	  5472	  5486	  5500	  5514	  5528	  5542	  5556	  5607	  5655	  5703	  5751
	  5799	  5847	  5895	  5943	  5991	  6039	  6087	  6135	  6183	  6231	  6279	  6327	  6393	  6423
	  6453	  6483	  6513	  6543	  6573	  6603	  6633	  6663	  6693	  6723	  6753	  6783	  6813	  6843
	  6873	  6903	  6933	  6963	  6993	  7023	  7053	  7083	  7113	  7143	  7173	  7203	  7233	  7263
	  7293	  7323	  7350	  7356	  7368	  7408	  7412	  9241
ET0S	  2801	  9242	  9266#
ET0SA	  9274	  9283#
ET1	  3177#	  3327	  3331	  3336	  3340	  3351	  3356	  3361	  3366	  3386	  3392	  3404	  3410	  3425
	  3445	  3449	  3460	  3464	  3539	  3545	  3551	  3557	  3563	  3569	  3575	  3581	  3597	  3603
	  3609	  3615	  3621	  3627	  3633	  3639	  3655	  3661	  3667	  3673	  3679	  3685	  3691	  3697
	  3825	  3831	  3837	  3843	  3849	  3855	  3861	  3867	  3883	  3890	  3897	  3904	  3911	  3918
	  3925	  3932	  3943	  3964	  3989	  4001	  4046	  6378	  6393	  6408	  6423	  6438	  6453	  6468
	  6483	  6498	  6513	  6528	  6543	  6558	  6573	  6588	  6603	  6618	  6633	  6648	  6663	  6678
	  6693	  6708	  6723	  6738	  6753	  6768	  6783	  6798	  6813	  6828	  6843	  6858	  6873	  6888
	  6903	  6918	  6933	  6948	  6963	  6978	  6993	  7008	  7023	  7038	  7053	  7068	  7083	  7098
	  7113	  7128	  7143	  7158	  7173	  7188	  7203	  7218	  7233	  7248	  7263	  7278	  7293	  7308
	  7323	  7408	  7412	  9239	  9271
ET1S	  2802	  9240	  9272	  9291#	 10426	 11463
ET2S	  2803	  9238	  9270	  9302#
ET2SA	  9307	  9311#
ET2SB	  9316	  9319#
ET2SC	  9318	  9322#
ETAB	  7430#	  7432	  7438	  7440	  7443	  7447	  7458	  7467	  7478	  7489	  7500	  7510	  7514	  7520
	  7523	  7529	  7532	  7537	  7543	  7547	  7551	  7565	  7570	  7577	  7581	  7589	  7596	  7607
	  7623	  7625	  7633	  7643	  7653	  7665	  7674	  7676	  7684	  7697	  7701	  7724	  7732	  7739
	  7745	  7756	  7760	  7764	  7767	  7771	  7778	  7781	  7786	  7792	  7796	  7799	  7822	  7828
	  7834	  7840	  7844	  7850	  7858	  7867	  7876	  7890	  7897	  7908	  7914	  7922	  7937	  7940
	  7947	  7955	  7958	  7967	  7972	  7981	  8007	  8014	  8020	  8025	  8033	  8045	  8081	  8084
	  8088	  9280
ETPULS	  9276#	  9289	  9300	  9324	  9327
ETSEL	  8994	  9232#
EXCASB	    77#	   477                                                                                                 *** SEQ 0318
EXCMEM	   426#
EXCPFW	   426#
EXFAST	  1046#
EXIOT	   426#	  3275#	  7481	  8241
EXIT1	  1202#	  1202	  1260	  1265
F	   111#	  3149#	  7450	  7452	  7526	  7533	  7561	  7572	  7583	  7591	  7593	  7597	  7601	  7612
	  7630	  7645	  7658	  7666	  7824	  7830	  7862	  7868	  7881	  7882	  7891	  7900	  7979	  7986
	  7998	  8042	  8295	  8445	  8578	  8588	  8589	  8590	  8591	  8593	  8594	  8604	  8606	  8608
	  8610	  8624	  8626	  8628	  8654	  8656	  8658	  8661	  8664	  8666	  8668	  8682	  8684	  8687
	  8692	  8694	  8706	  8718	  8720	  8722	  8919	  8937	  9380	  9382	  9490	  9504	  9511	  9518
	  9527	  9575	  9583	  9598	  9607	  9612	  9622	  9846	  9870	  9874	  9880	  9896	  9901	  9921
	  9932	  9953	  9957	 10014	 10041	 10054	 10078	 10091	 10100	 10107	 10136	 10141	 10164	 10183
	 10193	 10199	 10216	 10223	 10238	 10245	 10335	 10343	 10347	 10384	 10393	 10402	 10573	 10575
	 10577	 10631	 10802	 10870	 10871	 10873	 10876	 10878	 10887	 10889	 10891	 10893	 10910	 10912
	 10916	 10925	 10932	 10941	 11350	 11351
FAD2	  3482	  3488	  3494	  3500	  3506	  3512	  3518	  3524	  3542	  3548	  3554	  3560	  3566	  3572
	  3578	  3584	  7958#	  7959
FAD2A	  7962#	  7970
FADF	  7934#	  8144
FADFD	  3420	  3479	  3485	  3491	  3497	  3503	  3509	  3515	  3521	  8143#
FAST	   135	  1034#	  1083	  1103
FAT1	  2816	  7961	 10212#
FAT2	  2817	 10219#
FAT2A	 10224	 10228#
FAT2B	 10226	 10230#
FAT2C	 10227	 10228	 10231#
FAT3	  2818	 10233#
FAT3A	 10240	 10245#
FAT3B	 10244	 10248#
FAT4	  2819	 10255#	 10439
FCCACL	  3192#	  3258	  4089	  9025	  9043	  9044	  9061	  9062
FCCACR	  3190#	  3192	  3258	  4060	  9001	  9005	  9015	  9021	  9028	  9048	  9059	  9176	  9387
FCE	  3190#	  3190	  3258	  3386	  3410	  3415	  3420	  3445	  3449	  3460	  3464	  3479	  3485	  3491
	  3497	  3503	  3515	  3521	  3539	  3545	  3551	  3557	  3563	  3575	  3581	  3597	  3603	  3609
	  3615	  3621	  3633	  3639	  3655	  3661	  3667	  3673	  3679	  3691	  3697	  3717	  3741	  3765
	  3789	  3825	  3837	  3843	  3849	  3861	  3867	  3883	  3897	  3904	  3911	  3925	  3932	  4056
	  4105	  4129	  4204	  4209	  4214	  4219	  4224	  4229	  4234	  4239	  4321	  4329	  4337	  4345
	  4353	  4361	  4369	  4377	  4674	  4730	  4786	  4842	  4898	  4954	  5010	  5066	  5122	  5178
	  5234	  5290	  5346	  5402	  5458	  5514	  5584	  5632	  5680	  5728	  5776	  5824	  5872	  5920
	  5968	  6016	  6064	  6112	  6160	  6208	  6256	  6304	  6498	  6513	  6528	  6543	  6558	  6573
	  6588	  6603	  6738	  6753	  6768	  6783	  6798	  6813	  6828	  6843	  6978	  6993	  7008	  7023
	  7038	  7053	  7068	  7083	  7218	  7233	  7248	  7263	  7278	  7293	  7308	  7323	  7363	  7375
	  7391	  7395	  7399	  7403	  9003	  9010	  9015	  9030	  9034	  9038	  9046	  9048	  9313	  9386
	  9387	 11267	 11302
FCE2	  3191#	  3258	  3327	  3331	  3336	  3340	  3377	  3381	  9003	  9030	  9046	  9050
FCE2M	 11259	 11310	 11402#
FCE2S1	 11273	 11409#
FCE2ST	  8472	  9053	 11172	 11258#	 11258	 11272	 11309	 11405	 11409
FCE2SY	  8598	 11271#	 11466
FCE2W	  8004#	  8004	  8473	  8597	 11271
FCEPSE	  3190#	  3258	  3425	  3735	  3759	  3783	  3807	  3996	  4118	  4124	  4142	  4148	  4449	  4457
	  4465	  4473	  4481	  4489	  4497	  4505	  4577	  4585	  4593	  4601	  4609	  4617	  4625	  4633
	  4758	  4772	  4814	  4828	  4870	  4884	  4926	  4940	  5038	  5052	  5094	  5108	  5150	  5164 *** SEQ 0319
	  5206	  5220	  5318	  5332	  5374	  5388	  5430	  5444	  5486	  5500	  5605	  5618	  5653	  5666
	  5714	  5762	  5810	  5858	  5906	  5954	  5989	  6002	  6037	  6050	  6098	  6146	  6194	  6242
	  6290	  6338	  7351	  7357	  7369	  9003	  9030	  9034	  9040	  9041	  9046
FDT0	  2822	  7899	  9563#
FDT1	  2823	  9581#
FDT1A	  9573	  9583#
FDT2	  2824	  9586#
FDT3	  2825	  9592#
FDT4	  2826	  9595	  9601#
FDT5	  2827	  9609#	  9844
FDT6	  2828	  9616#
FDT7	  2829	  9626#
FDV1	  3657	  3663	  3669	  3675	  3681	  3687	  3693	  3699	  7876#	  7877
FDV1A	  7886#	  8018	  8032
FDV1B	  7884#	  7945	  7965
FDV2	  3658	  3664	  3670	  3676	  3682	  3688	  3694	  3700	  7897#	  7898
FDV2L	  3664	  7890#	  7891
FDV2X	  7904	  7905#
FDVF	  8150	  8317#
FDVFD	  3655	  3661	  3667	  3673	  3679	  3685	  3691	  3697	  8149#
FE	  1528	  1685	  8569#	  8569	  8795#	  8795	  9982
FESAEN	  3247#	  7916	  7951	  7963	  8021	  8046	  8568	  9569	 10011	 10233
FIX0	  3387	  3411	  7908#	  7909
FIX1	  3387	  3411	  7914#	  7915
FIX1A	  7737	  7887	  7889	  7906	  7910	  7912	  7919#	  7978	  7980	  8017	  8039	  8043	  9624	  9646
	  9871	  9954	 10095	 10098	 10104	 10131	 10146	 10217
FIX1B	  7843	  7856	  7917#
FIX2	  3388	  3412	  7922#	  7923
FIX2A	  7923	  9992#
FIX2B	  7925	  9973#
FIX2C	  9981#	 10008
FIX2E	  9983	  9988#
FIX2F	  9994	 10007#
FIX2G	 10000#
FIXF	  8133	  8308#
FIXFD	  3386	  3410	  8132#
FIXT1	  2830	  9978#
FIXT2	  2831	  9997#	 10410
FIXT2A	  9998	 10003#
FIXT2B	 10004#
FLAG1	  3217#	  7572	  7591	  7597	  7612	  8937	  9511	  9607	  9612	  9880	  9896	 10107	 10141	 10402
	 10631	 10925	 10932	 10941
FLAG2	  3218#	  7526	  7533	  7593	  7601	  7979	  7986	  7998	  8937	  9870	  9901	  9921	  9932	 10014
	 10041	 10054	 10078	 10091	 10100	 10136	 10164	 10216	 10223	 10238	 10245	 10335	 10343	 10347
	 10384	 10393
FLAG3	  3219#	  7561	  7583	  7630	  7645	  7666	  7824	  7830	  7862	  7868	  7881	  7882	  7891	  7900
	  8042	  8937	  9518	  9527	  9575	  9622	  9846	  9874	  9953	  9957	 10183	 10193	 10199
FLCNT	   801#	   801	   836	  1030
FLT2	  3417	  7840#	  7841
FLTF	  8136	  8310#
FLTFD	  3415	  8135#
FLTTAB	  1998	  2038	  2056	  2379#
FLTTST	  1977	  1992#                                                                                                *** SEQ 0320
FMAC2E	  7594	  7624	  7675	  7800	  7874	  7956	  7969	  8029	  9385	  9617	  9853	 10291#
FMACEN	  7699	  7973	  8015	  9004	  9218	  9230	  9253#	  9603	 10180
FMADMA	  8462	  9395#	  9395	 10583	 10584	 10896
FMADRE	  7657	  8918	  9254#	  9254	  9481	 10295	 10464	 10585	 10897
FMP0	  3481	  3487	  3493	  3499	  3505	  3511	  3517	  3523	  3541	  3547	  3553	  3559	  3565	  3571
	  3577	  3583	  3599	  3605	  3611	  3617	  3623	  3629	  3635	  3641	  3657	  3663	  3669	  3675
	  3681	  3687	  3693	  3699	  7937#	  7938
FMP0A	  7938#	  8309	  8318	  8326
FMP1	  3599	  3605	  3611	  3617	  3623	  3629	  3635	  3641	  7940#	  7941
FMP2	  3600	  3606	  3612	  3618	  3624	  3630	  3636	  3642	  7947#	  7948
FMPF	  7935#	  8147
FMPFD	  3597	  3603	  3609	  3615	  3621	  3627	  3633	  3639	  8146#
FMREG	  1665	  7627	  7846	  7852	  7878	  7942	  7964	  8030	  8539	  8655#	  8655	  8657	  8659	  8736
	  8738	  8746	  9642	 10173	 10182	 10587	 10795	 10899
FMSINA	  8475#	  8475	  9405	 10582	 10588
FMT1	  2820	  7952	  9635#
FMT2	  2821	  9641#	 10432
FMT2A	  9645#	 10263
FMVAL	  8494	 10582#
FMWR	  8586	 10896#
FMWRSE	  7469	  7496	  7619	  8474	  8511	  8585	  9326#	  9326	  9403#	  9403	  9435	  9543	  9610	  9626
	  9738	  9857	 10068	 10118	 10157	 10527
FOUND	  1618	  1705#
FOV	   426#	  3272#	  8212	  9497	  9831	  9832	  9962	 10147
FOVU	   426#
FRDLNK	   190#
FSBFD	  3539	  3545	  3551	  3557	  3563	  3569	  3575	  3581	  8111#
FSC0	  3431	  7844#	  7845
FSC2	  3432	  7850#	  7851
FSCF	  8142	  8308	  8310	  8314#	  8317
FSCFD	  3430	  8141#
FSELNK	   189#
FSTANS	  1203	  1204	  1250	  1460#
FSTER1	  1081	  1100#	  1190
FT1	  2804	  9063	  9165#
FT2	  2805	  9168#	  9426
FT3	  2806	  9060	  9064	  9171#
FT3A	  9186	  9191	  9194#
FT4	  2807	  9205#	 11459
FT5	  2808	  9207#
FT6	  2809	  8984	  9219	  9230#	  9462	 11460
FT7	  2810	  9052	  9222#
FT8	  9218#	 11468
FWT	  3791	  3797	  3803	  3809	  7443#	  7444
FXU	   426#	  3280#	  9831	  9964
FXUH	  9557	  9559	  9830#	  9830	  9963
FXUSET	  9557#	  9655	 10013	 10109	 10187
GO	  8442#
GO1	  8450#	  8452	  8453	  8454	  8455
GOING	  1173	  1193#	  1197
H.	  2060	  2666#
HDER1	  1856	  1913#
HDER2	  1858	  1927#                                                                                                *** SEQ 0321
HDER3	  1864	  1941#
HDPNT	  1801	  1853#
HERTZ	   814#	   814	  1389	  1407
HNGCNT	  1598#	  1598	  1891
HTST	  1969	  2060#
HUNGCK	  1595	  1891#
HWTET1	  7501	  7505#
HWTETS	  5877	  5889	  5901	  5913	  5925	  5937	  5949	  5961	  6261	  6273	  6285	  6297	  6309	  6321
	  6333	  6345	  7500#	  7501
HYPEN	   625#
IADBRK	   426#
IADEXC	   426#
IADSTP	   426#
IADUSR	   426#
IAPRC1	   426#	   822	  1340
IAPRE1	   426#	   822	   827	  1338	  1340	  1356
IASRTC	   426#
IASRTE	   426#
IASRTS	   426#
ICNSLL	   426#
ICNSLR	   426#
IDATAF	   426#
IDIV0	  3885	  3892	  3899	  3906	  7625#	  7626
IDIV1	  3886	  3893	  3900	  3907	  7633#	  7634
IDIV1A	  7638#	  7670	  7672
IDIV2	  3887	  3894	  3901	  3908	  7653#	  7654
IDXPN1	  1841	  1850#
IDXPNT	  1839#
IEVNPR	   426#
IFMMAN	   426#
IFPNT	  2309	  2321	  2327#
IINSTF	   426#
IIOPFC	   426#
IIOPFL	   426#
IMAINT	   426#
IMGINM	   426#
IMGNLO	   426#
IMGNOF	   426#	  1025	  1063	  1121	  1160	  1335
IMGNON	   426#
IMIPGD	   426#
IMLAPD	   426#
IMLTST	  2024	  2030#
IMUL1	  3827	  3833	  3839	  3845	  7565#	  7566
IMUL2	  3828	  3834	  3840	  3846	  7577#	  7578
INDNCL	  8507	  8985#	  8985
INDON1	 10445	 10475#
INDON2	 10456#	 10477
INDON3	 10457	 10461#
INDONE	  2893	  7927	  8449	  8499	  8500	  9322	  9451	 10444#
INDX0	  2134	  2151#
INDX1	  2135	  2153#
INDX10	  2142	  2182#
INDX11	  2143	  2188#                                                                                                *** SEQ 0322
INDX12	  2144	  2191#
INDX13	  2145	  2195#
INDX14	  2146	  2200#
INDX15	  2147	  2205#
INDX16	  2148	  2209#
INDX17	  2149	  2213#
INDX2	  2136	  2156#
INDX20	  2150	  2218#
INDX3	  2137	  2160#
INDX4	  2138	  2164#
INDX5	  2139	  2169#
INDX6	  2140	  2173#
INDX7	  2141	  2177#
INFT2A	 11337#	 11412
INFT3	  9500	 11265	 11268	 11373#
INFT3A	 11285	 11347#	 11378
INFT3B	 11348#	 11404
INFT3C	 11388#	 11407
INFT3D	 11399#	 11413
INFTFF	  8442	  8519	  8596#	  8596	 10467	 11334	 11347	 11355
INFTS1	 11322	 11350#	 11357
INFTS2	 10468	 11327#
INFTS3	 11326	 11354#
INFTSB	  8520	 11321#
INFTST	  3177#	  3966	  4035	  4086	  4091	  6413	  6428	  6443	  6458	  6473	  6488	  6533	  6548	  6563
	  6578	  6593	  6608	  6653	  6668	  6683	  6698	  6713	  6728	  6773	  6788	  6803	  6818	  6833
	  6848	  6893	  6908	  6923	  6938	  6953	  6968	  7013	  7028	  7043	  7058	  7073	  7088	  7133
	  7148	  7163	  7178	  7193	  7208	  7253	  7268	  7283	  7298	  7313	  7328	  8214	  8220	  8225
	  8509	  8595	  9104	  9342	  9344	  9346	  9348	  9350	  9352	  9356	  9360	  9368	  9370	  9372
	  9374	  9376	  9378	  9475	 10042	 10153	 10306	 10884
INHCLK	    94#	   807	  1215	  1364
INHCSH	   175#
INHIF	   103#	  1803	  2295
INHMS	    95#	  1607	  1854
INHNEW	    99#	   794
INHPAG	   172#
INHSCT	    93#	  1612
INHSIM	    98#	   796
INIT1	  2222#	  2222	  2235	  2243	  2251	  2331
INIT1A	  2122#	  2122	  2224	  2310	  2327	  2329
INIT2	  2230#	  2230	  2238	  2246	  2254	  2337
INIT2A	  2123#	  2123	  2232	  2240	  2248	  2256	  2311	  2333	  2335
INIT3	  2259	  2267#	  2267	  2348
INIT3A	  2124#	  2124	  2261	  2269	  2312	  2344	  2346
INIT4	  2273#	  2273	  2283	  2354
INIT4A	  2125#	  2125	  2275	  2285	  2313	  2350	  2352
INPC	  1108	  1285	  1482	  1575#	  8446
INRDY	  7734	  8903#	  8903	  9150	 11274	 11344	 11397
INRDYC	  8506	  8941#	  8941
INSBLK	   902	   970	   972	   974	   976	   978	   980	  1039	  1243	  1458#	  1476
INSNXT	  8488#	  8488	  8508	  8510	  8988	 10186
INSOUT	  2000#	  2007	  2015	  2028	  2035	  2040	  2049	  2058	  2069	  2083	  2103	  2107	  2111	  2115
INSTPT	  7573	  8966#	  8966	  8986	  9175	  9212	  9232	  9266	  9291	  9295	  9303	  9311	  9364	  9383 *** SEQ 0323
	  9399	  9413	  9459	  9498	  9507	  9541	  9736	  9823	 11266	 11301
INSTR	  1435	  1483	  1577#	  1784
INSYNC	  7521	  7797	  8443	  9013#	  9013	  9017	  9184	  9214	 11174	 11189	 11206	 11211	 11212	 11214
	 11232	 11261	 11281	 11348	 11370	 11391
INTCNT	  1206#	  1206	  1230	  1232
INTFN1	  2305#
INTFN2	  2315	  2322#
INTFNL	  1757	  2294#
INTPNT	  1605	  2118#
INTRQ	 10348#	 10348	 10394	 10495
INXCLR	   426#
INXM	   426#
INXSTP	   426#
IOCLR	   426#
IP50HZ	   426#
IPAREN	   426#
IPARER	   426#
IPRSTP	   426#
IPWRFL	   426#
IPWRLO	   426#
IR	   125#	  3163#	  7483	  7485	  7656	  7702	  7774	  7930	  7992	  7995	  8199	  8205	  8207	  8209
	  8211	  8223	  8231	  8233	  8235	  8466	  8492	  8502	  8503	  8640	  8859	  8861	  8863	  8916
	  8943	  9135	  9253	  9304	  9339	  9359	  9418	  9436	  9445	  9457	  9473	  9494	  9505	  9530
	  9538	  9551	  9553	  9570	  9587	  9661	  9670	  9680	  9703	  9704	  9744	  9753	  9812	  9833
	  9922	  9997	 10022	 10025	 10034	 10060	 10269	 10292	 10322	 10326	 10353	 10358	 10373	 10376
	 10446	 10610	 10648	 10661	 10683	 10942
IR6	  8856#	  8856	  8860	  8865	  8870	  8874	  8887	  8891	  8895
IR7	  8857#	  8857	  8862	  8866	  8871	  8892
IR8	  8858#	  8858	  8864	  8872	  8875	  8889
IRLTCH	  1754	  8501	  8942#	  8942	  9479	 10460#	 10460
IRPNT	  1600	  1754#
IRPNT1	  1759	  1761	  1763	  1772#
IRPNT2	  1800	  1802#	  1906
IRQCLR	   426#
ISPDOF	   426#	  1025	  1063	  1121	  1160	  1335
ISPDON	   426#
IT0	  1599	  2798	  8903#	 10469	 11458
IT0A	  8928	  8930	  8932	  8935#
IT1	  1604	  2799	  8937#
IT12	  2119	  2130#
IT1A	  8966#	  9125	  9133
IT1B	  8984#
IT1BY2	  8952#	  9118	  9129
IT1BYT	  8949	  9117#
IT1C	  8979#
IT1D	  8998#
IT1DE	  9094#
IT1DMV	  8951	  9127#
IT1E	  9049	  9051	  9056#
IT1F	  9054	  9058	  9068#
IT1G	  8969#	  9080
IT1H	  8968	  9079#
IT1I	  8974	  9135#                                                                                                *** SEQ 0324
IT1IND	  8980	  9096#	  9152
IT2	  2800	  8933	  9141#	  9482
ITERAT	   147#	   472
ITMDIS	   426#
ITMENB	   426#
ITMOEN	   426#
ITMOUT	   426#
ITMSET	   426#
ITRCH1	   532#	   815	  1359
ITRCLK	   809	  1345#	  1347
ITRCNT	   472#
IWRITE	   426#
JFCL1	  4032	  7440#	  7441
JFCL2	  7441	  8205#
JFCLF	  8186	  8217#
JFCLFD	  4030	  8185#
JFFO0	  3965	  7589#	  7590
JFFO1	  3965	  7596#	  7597
JFFO2	  3966	  7607#	  7608
JFFO2A	  7611#	 10266
JFFO2B	  7614	  7619#	 10299	 10315	 10428
JFFOFD	  3964	  8113#
JFFOT1	  2891	  7616	 10265#
JOB41	   426#
JOBAPR	   426#
JOBCNI	   426#
JOBDDT	   426#
JOBFF	   426#
JOBOPC	   426#
JOBREL	   426#
JOBREN	   426#
JOBSA	   426#
JOBSYM	   426#
JOBTPC	   426#
JOBUSY	   426#
JOBUUO	   426#
JOBVER	   426#
JRST1	  4027	  7438#	  7439
JRST2	  7439	  8229#
JRST3	  8236	  8248#
JRSTF	  8189	  8223#
JRSTFD	  4025	  8188#
JUMPS	  4261	  4269	  4277	  4285	  4293	  4301	  4309	  4317	  4389	  4397	  4405	  4413	  4421	  4429
	  4437	  4445	  4517	  4525	  4533	  4541	  4549	  4557	  4565	  4573	  7489#	  7490	  9371
K1	   835#	   835	   840	   843	  1085	  1352
K2	   837#	   837	  1026	  1031	  1080	  1082	  1175
KA10	   426
KAHZ50	   180#
KAIFLG	   489#
KI10	    81#	   426
KL10	   426
KLFLG	   490#
KLOLD	   387                                                                                                         *** SEQ 0325
KLTYP	   706#
KNTRP	   426#
KTRP	   426#
LDB0	  3446	  3450	  7739#	  7740
LDB1	  3446	  3450	  7760#	  7761
LDB2	  3447	  3451	  7767#	  7768
LDBF	  8130	  8320#
LDBFD	  3445	  3449	  8127#
LDEXCB	   426#
LDLNK	   191#	   442	   444
LDUSRB	   426#
LFP	   629#	  1842
LIP	   426#	  3276#
LNGCYC	  3209#	  3425	  3826	  3832	  3838	  3844	  3850	  3856	  3862	  3868	  3964	  4013	  4018	  6409
	  6469	  6529	  6589	  6649	  6709	  6769	  6829	  6889	  6949	  7009	  7069	  7129	  7189	  7249
	  7309	  7351	  7357	  7369	  8593	  8594	  9233	 10910	 10916
LONGSE	  7511	  7566	  7637	  7678	  7686	  7705	  7779	  7883	  7895	  7915	  7950	  7962	  8028	  8514
	  8592	  9008	  9234#	  9234	  9400	  9533	  9594	  9620	  9699	  9729	  9776	  9804	  9852	  9974
	 10181	 10252	 10261	 10303	 10338	 10390	 10416	 10440	 10484	 10532
LONGTM	 10906	 11455#
LOOP	  1231	  1314#
LOOPER	   166#	  1101	  1151	  1174
LUUO	   426#
LUUO1	   559	   560
LUUO10	   559	   564
LUUO11	   559	   564
LUUO12	   559	   565
LUUO13	   559	   565
LUUO14	   559	   566
LUUO15	   559	   566
LUUO16	   559	   567
LUUO17	   559	   567
LUUO2	   559	   561
LUUO20	   559	   568
LUUO21	   559	   568
LUUO22	   559	   569
LUUO23	   559	   569
LUUO24	   559	   570
LUUO25	   559	   570
LUUO26	   559	   571
LUUO27	   559	   571
LUUO3	   559	   561
LUUO30	   559	   572
LUUO31	   559	   572
LUUO32	   559	   573
LUUO33	   559	   573
LUUO4	   559	   562
LUUO5	   559	   562
LUUO6	   559	   563
LUUO7	   559	   563
LUUOI	   426#
M	  4666#	  4667#	  4674	  4680#	  4681#	  4688	  4694#	  4695#	  4702	  4703	  4708#	  4709#	  4716	  4717
	  4722#	  4730	  4736#	  4744	  4750#	  4758	  4759	  4764#	  4772	  4773	  4778#	  4786	  4792#	  4800 *** SEQ 0326
	  4806#	  4814	  4815	  4820#	  4828	  4829	  4834#	  4842	  4848#	  4856	  4862#	  4870	  4871	  4876#
	  4884	  4885	  4890#	  4898	  4904#	  4912	  4918#	  4926	  4927	  4932#	  4940	  4941	  4946#	  4947#
	  4954	  4960#	  4961#	  4968	  4974#	  4975#	  4982	  4983	  4988#	  4989#	  4996	  4997	  5002#	  5010
	  5016#	  5024	  5030#	  5038	  5039	  5044#	  5052	  5053	  5058#	  5066	  5072#	  5080	  5086#	  5094
	  5095	  5100#	  5108	  5109	  5114#	  5122	  5128#	  5136	  5142#	  5150	  5151	  5156#	  5164	  5165
	  5170#	  5178	  5184#	  5192	  5198#	  5206	  5207	  5212#	  5220	  5221	  5226#	  5227#	  5234	  5240#
	  5241#	  5248	  5254#	  5255#	  5262	  5263	  5268#	  5269#	  5276	  5277	  5282#	  5290	  5296#	  5304
	  5310#	  5318	  5319	  5324#	  5332	  5333	  5338#	  5346	  5352#	  5360	  5366#	  5374	  5375	  5380#
	  5388	  5389	  5394#	  5402	  5408#	  5416	  5422#	  5430	  5431	  5436#	  5444	  5445	  5450#	  5458
	  5464#	  5472	  5478#	  5486	  5487	  5492#	  5500	  5501	  5506#	  5507#	  5514	  5520#	  5521#	  5528
	  5534#	  5535#	  5542	  5543	  5548#	  5549#	  5556	  5557	  5580#	  5585	  5592#	  5597	  5604#	  5605#
	  5609	  5616#	  5618#	  5621	  5628#	  5633	  5640#	  5645	  5652#	  5653#	  5657	  5664#	  5666#	  5669
	  5676#	  5681	  5688#	  5693	  5700#	  5705	  5712#	  5714#	  5717	  5724#	  5729	  5736#	  5741	  5748#
	  5753	  5760#	  5762#	  5765	  5772#	  5777	  5784#	  5789	  5796#	  5801	  5808#	  5810#	  5813	  5820#
	  5825	  5832#	  5837	  5844#	  5849	  5856#	  5858#	  5861	  5868#	  5873	  5880#	  5885	  5892#	  5897
	  5904#	  5906#	  5909	  5916#	  5921	  5928#	  5933	  5940#	  5945	  5952#	  5954#	  5957	  5964#	  5969
	  5976#	  5981	  5988#	  5989#	  5993	  6000#	  6002#	  6005	  6012#	  6017	  6024#	  6029	  6036#	  6037#
	  6041	  6048#	  6050#	  6053	  6060#	  6065	  6072#	  6077	  6084#	  6089	  6096#	  6098#	  6101	  6108#
	  6113	  6120#	  6125	  6132#	  6137	  6144#	  6146#	  6149	  6156#	  6161	  6168#	  6173	  6180#	  6185
	  6192#	  6194#	  6197	  6204#	  6209	  6216#	  6221	  6228#	  6233	  6240#	  6242#	  6245	  6252#	  6257
	  6264#	  6269	  6276#	  6281	  6288#	  6290#	  6293	  6300#	  6305	  6312#	  6317	  6324#	  6329	  6336#
	  6338#	  6341	  6371#	  6377	  6378	  6386#	  6392	  6393	  6401#	  6402#	  6407	  6408	  6416#	  6417#
	  6422	  6423	  6431#	  6432#	  6437	  6438	  6446#	  6447#	  6452	  6453	  6461#	  6462#	  6467	  6468
	  6476#	  6477#	  6482	  6483	  6491#	  6497	  6498	  6506#	  6512	  6513	  6521#	  6522#	  6527	  6528
	  6536#	  6537#	  6542	  6543	  6551#	  6552#	  6557	  6558	  6566#	  6567#	  6572	  6573	  6581#	  6582#
	  6587	  6588	  6596#	  6597#	  6602	  6603	  6611#	  6617	  6618	  6626#	  6632	  6633	  6641#	  6642#
	  6647	  6648	  6656#	  6657#	  6662	  6663	  6671#	  6672#	  6677	  6678	  6686#	  6687#	  6692	  6693
	  6701#	  6702#	  6707	  6708	  6716#	  6717#	  6722	  6723	  6731#	  6737	  6738	  6746#	  6752	  6753
	  6761#	  6762#	  6767	  6768	  6776#	  6777#	  6782	  6783	  6791#	  6792#	  6797	  6798	  6806#	  6807#
	  6812	  6813	  6821#	  6822#	  6827	  6828	  6836#	  6837#	  6842	  6843	  6851#	  6857	  6858	  6866#
	  6872	  6873	  6881#	  6882#	  6887	  6888	  6896#	  6897#	  6902	  6903	  6911#	  6912#	  6917	  6918
	  6926#	  6927#	  6932	  6933	  6941#	  6942#	  6947	  6948	  6956#	  6957#	  6962	  6963	  6971#	  6977
	  6978	  6986#	  6992	  6993	  7001#	  7002#	  7007	  7008	  7016#	  7017#	  7022	  7023	  7031#	  7032#
	  7037	  7038	  7046#	  7047#	  7052	  7053	  7061#	  7062#	  7067	  7068	  7076#	  7077#	  7082	  7083
	  7091#	  7093#	  7097	  7098	  7106#	  7108#	  7112	  7113	  7121#	  7122#	  7123#	  7127	  7128	  7136#
	  7137#	  7138#	  7142	  7143	  7151#	  7152#	  7153#	  7157	  7158	  7166#	  7167#	  7168#	  7172	  7173
	  7181#	  7182#	  7183#	  7187	  7188	  7196#	  7197#	  7198#	  7202	  7203	  7211#	  7213#	  7217	  7218
	  7226#	  7228#	  7232	  7233	  7241#	  7242#	  7243#	  7247	  7248	  7256#	  7257#	  7258#	  7262	  7263
	  7271#	  7272#	  7273#	  7277	  7278	  7286#	  7287#	  7288#	  7292	  7293	  7301#	  7302#	  7303#	  7307
	  7308	  7316#	  7317#	  7318#	  7322	  7323
MA	   123#	  1525	  1632	  3161#	  8089	  8491	  9395	 10476	 11162	 11164	 11359	 11361	 11364	 11418
MAGIC	  7545#	  7545	  7636	  8344#	  8344	  8667#	  8667	  8938#	  8938	  9486	  9873#	  9873	 10040#	 10040
	 10204#	 10204	 10208#	 10208
MAIN	  8494#	  8620
MAIN1	  8524	  8529#
MAIN2	  8526	  8536#
MAMAOF	  8456	 11160	 11161	 11193#	 11193	 11236
MAP2	  4042	  8088#	  8089
MAPNEW	   580#
MARGIN	   502#	   998	   999	  1024	  1051	  1052	  1062	  1120	  1146	  1147	  1159	  1186	  1187	  1334
MASK	  1125	  1451	  1473	  1576#	  1783
MASKX	   873	   879	   889	   895	   899	   911	   942#	   961	   965	   968
MB	   121#	  1523	  1642	  1782	  1822	  1830	  1833	  1839	  1844	  1886	  1958	  3159#	  8491	  8502 *** SEQ 0327
	  8563	  8630	  8634	  8909	  8917	  8952	  8979	  8991	  9006	  9071	  9480	 10094	 10463	 10679
	 11253	 11257	 11307
MBAREN	  3250#	  7733	  9396	 10090	 10116	 10162	 10170	 10787
MBCLK	  8562#	  8562	 10786	 10796
MBFMEN	  3250#	 10789
MBMIX	  8563#	  8563	 10791
MBMIX1	 10788	 10794#
MBMIX2	 10790	 10795#
MBMIXR	  8551	 10785#
MCNVER	     5#	    11	    23	   474
MCSADR	  8477#	  8477	  9147	  9149	  9189	  9193	  9195	 10550	 11164	 11167	 11249	 11359	 11375
MCSPEC	  8476	  9143#	  9143	  9187	 10546	 11163	 11166	 11248	 11252	 11358	 11360	 11374
MEMCMP	  8452	  8453	  8454	  8455	 11185	 11186	 11197	 11220	 11221	 11247	 11367	 11368	 11426#
MEMDON	  8457	 11176#	 11176	 11243	 11363
MEMFLG	 11222	 11224	 11242	 11442#
MEMGOI	  8478#	  8478	  9302
MEMLOW	   582#
MEMMAP	   480
MEMREA	  9047#	  9047	  9056	  9103#	  9103	  9180	 10497	 11177	 11286	 11311	 11341	 11389
MEMREF	  3258#	  8987	  8989	  8993	  8998
MEMRET	 11200	 11255	 11256	 11296	 11306	 11308	 11458#
MEMSIN	  9070#	  9070	  9076	  9100	  9201	  9211	  9284	 10499	 10514	 11199	 11254	 11295	 11337	 11388
MEMSIZ	   583#
MEMST	  2892	  9068	  9098	  9202	  9215	  9225	  9287	 10505	 10516	 11157#	 11342
MEMST1	 11178	 11217#
MEMST2	 11225	 11231#	 11319
MEMST3	 11223	 11315#
MEMST4	 11199#	 11291
MEMST5	 11173	 11175	 11204#
MEMST6	 11176#	 11207
MEMST7	 11190	 11209#	 11233
MEMST8	 11263	 11269	 11311#
MEMSTA	 11162#	 11395
MEMSTB	 11185#	 11422
MEMTOT	   581#
MEMWR	  8460	  9039#	  9039	  9042	  9057	  9073	  9209	  9285	 10515	 11201	 11244	 11262	 11304	 11312
	 11390
MEMWRW	  8461	  9409#	  9409	  9410	 10466#	 10466	 11188	 11245	 11321	 11369
MEMWSS	  7575	  7758	  9509	  9825	 11415#
MGNCLR	   776	  1326#	  1329	  1332	  1336
MGNFLG	   996	  1022	  1049	  1060	  1118	  1144	  1184	  1327#	  1327	  1333
MGNTST	    89#	  1331
MINUS	   624#
MMASKX	   907#	   910	   913	   916	   919	   921	   924	   927	   930	   933	   936	   939
MODDVC	   174#
MODDVL	   372	   372#	   475
MODDVU	   373	   373#	   476
MODLNK	   193#	   439
MONCTL	   492#
MONFLG	   491#
MONTEN	   493#
MONUUO	  3352	  3357	  3362	  3367	  3393	  3990	  8081#	  8082
MOTAB	  2013	  2397#                                                                                                *** SEQ 0328
MOVTAB	  2026	  2067	  2422#
MOVTST	  1975	  2009#
MPVU	   426#
MPY	  7552	  7944	  8011	  8921	 10331#	 10331	 10334
MPYFCN	  7558	  9639	 10102	 10332	 10921#
MPYFN1	 10930	 10938#
MPYFN2	 10931	 10937#
MPYFN3	 10941#
MPYFN4	 10935	 10942#
MPYFN5	 10344	 10933#
MQ	   118#	  1520	  1675	  3156#	  7604	  7654	  8017	  8489	  8561	  9439	  9442	  9516	  9663	  9675
	  9695	  9706	  9755	  9772	  9862	  9904	  9905	  9935	 10001	 10003	 10188	 10340	 10634	 10667
	 10741	 10760	 10779	 10965	 10966	 10968	 10969	 10970	 10971	 10973	 10977	 10989	 11000	 11047
	 11049	 11050	 11053	 11056	 11097	 11098	 11109	 11110	 11113	 11133	 11134	 11136	 11137	 11138
	 11146	 11147	 11149	 11150	 11151	 11153
MQ0L	 10740	 11047#
MQ0R1	 10756	 11083#
MQ0R2	 10772	 11059#
MQ1R1	 10757	 11095#
MQ1R2	 10775	 11071#
MQ2R2	 10776	 11107#
MQ35L	 10738	 11119#
MQ8R1	 10753	 11144#
MQ8R2	 10766	 11131#
MQ9R2	 10769	 11143#
MQADEN	  3196#	  7553	  7610	  7638	  7644	  7698	  7735	  7746	  7757	  7782	  8009	  8034	  8047	  9525
	  9574	  9636	  9950	 10067	 10089	 10101	 10207	 10298	 10306	 10483	 10536	 10719
MQCLK	  8560#	  8560	 10718	 10728	 10749
MQCLR	  3196#	  9138	  9554	  9735	  9891	  9907	 10074	 10122	 10168	 10727
MQLT	 10722	 10732#
MQLTA	 10747#	 10764	 10783
MQLTB	 10720	 10748#
MQMIX	  7613	  8561	 10729#	 10729	 10924
MQMIXR	  7611	  8550	 10718#	 10922
MQRT1	 10724	 10752#
MQRT2	 10726	 10765#
MQSHLT	  3196#	  9487	  9503	  9582	  9593	  9601	  9644	  9747	  9920	 10106	 10127	 10133	 10178	 10265
	 10357	 10721
MQSHR2	  3196#	 10372	 10725
MQSHRT	  3196#	  9586	  9815	  9839	  9868	 10085	 10115	 10259	 10325	 10723
MRPNT	  1539	  1588#
MRPNT1	  1621#	  1706
MRPNT2	  1602	  1608	  1613	  1698#
MRPNT3	  1599#	  1892
MRPNT4	  1626	  1707#
MRPNT5	  1647#	  1724
MUL0	  3827	  3833	  3839	  3845	  3851	  3857	  3863	  3869	  7551#	  7552
MUL1	  3851	  3857	  3863	  3869	  7570#	  7571
MUL1A	  7579	  7585#
MUL2	  3852	  3858	  3864	  3870	  7581#	  7582
MULFD	  3826	  3832	  3838	  3844	  3850	  3856	  3862	  3868	  8099#
MULTAB	  2033	  2427#
MUO3FD	  8105#                                                                                                        *** SEQ 0329
MUOES3	  9174	  9263#
MUOF1C	  3223#	  8606
MUOF1S	  3222#	  8604	  9382
MUOF2C	  3225#	  8610	  9380
MUOF2S	  3224#	  8608
MUOTAB	  2113	  2460#
MUOTST	  1983	  1986	  2109#
MUOXT	  1963	  2113#
MUUO	   426#
MUUO32	  8084#	  8085	  9377
MUUOF1	  8480	  8605#	  8605	  8607	  9171	  9185	  9379	  9425
MUUOF2	  8481	  8609#	  8609	  8611	  9172	  9381	  9423
MUUOPC	   426#
N	  3471#	  3479	  3480	  3483	  3483#	  3485	  3486	  3489	  3489#	  3491	  3492	  3495	  3495#	  3497
	  3498	  3501	  3501#	  3503	  3504	  3507	  3507#	  3509	  3510	  3513	  3513#	  3515	  3516	  3519
	  3519#	  3521	  3522	  3525	  3525#	  3529#	  3539	  3540	  3543	  3543#	  3545	  3546	  3549	  3549#
	  3551	  3552	  3555	  3555#	  3557	  3558	  3561	  3561#	  3563	  3564	  3567	  3567#	  3569	  3570
	  3573	  3573#	  3575	  3576	  3579	  3579#	  3581	  3582	  3585	  3585#	  3589#	  3597	  3598	  3601
	  3601#	  3603	  3604	  3607	  3607#	  3609	  3610	  3613	  3613#	  3615	  3616	  3619	  3619#	  3621
	  3622	  3625	  3625#	  3627	  3628	  3631	  3631#	  3633	  3634	  3637	  3637#	  3639	  3640	  3643
	  3643#	  3647#	  3655	  3656	  3657	  3658	  3659	  3659#	  3661	  3662	  3663	  3664	  3665	  3665#
	  3667	  3668	  3669	  3670	  3671	  3671#	  3673	  3674	  3675	  3676	  3677	  3677#	  3679	  3680
	  3681	  3682	  3683	  3683#	  3685	  3686	  3687	  3688	  3689	  3689#	  3691	  3692	  3693	  3694
	  3695	  3695#	  3697	  3698	  3699	  3700	  3701	  3701#	  3706#	  3716	  3717	  3718	  3719	  3720
	  3720#	  3722	  3723	  3724	  3725	  3726	  3726#	  3728	  3729	  3730	  3731	  3732	  3732#	  3734
	  3735	  3736	  3737	  3738	  3738#	  3740	  3741	  3742	  3743	  3744	  3744#	  3746	  3747	  3748
	  3749	  3750	  3750#	  3752	  3753	  3754	  3755	  3756	  3756#	  3758	  3759	  3760	  3761	  3762
	  3762#	  3764	  3765	  3766	  3767	  3768	  3768#	  3770	  3771	  3772	  3773	  3774	  3774#	  3776
	  3777	  3778	  3779	  3780	  3780#	  3782	  3783	  3784	  3785	  3786	  3786#	  3788	  3789	  3790
	  3791	  3792	  3792#	  3794	  3795	  3796	  3797	  3798	  3798#	  3800	  3801	  3802	  3803	  3804
	  3804#	  3806	  3807	  3808	  3809	  3810	  3810#	  3818#	  3825	  3826	  3827	  3828	  3829	  3829#
	  3831	  3832	  3833	  3834	  3835	  3835#	  3837	  3838	  3839	  3840	  3841	  3841#	  3843	  3844
	  3845	  3846	  3847	  3847#	  3849	  3850	  3851	  3852	  3853	  3853#	  3855	  3856	  3857	  3858
	  3859	  3859#	  3861	  3862	  3863	  3864	  3865	  3865#	  3867	  3868	  3869	  3870	  3871	  3871#
	  3875#	  3883	  3884	  3885	  3886	  3887	  3888	  3888#	  3890	  3891	  3892	  3893	  3894	  3895
	  3895#	  3897	  3898	  3899	  3900	  3901	  3902	  3902#	  3904	  3905	  3906	  3907	  3908	  3909
	  3909#	  3911	  3912	  3913	  3914	  3915	  3916	  3916#	  3918	  3919	  3920	  3921	  3922	  3923
	  3923#	  3925	  3926	  3927	  3928	  3929	  3930	  3930#	  3932	  3933	  3934	  3935	  3936	  3937
	  3937#	  4006#	  4015	  4016#	  4020	  4021#	  4096#	  4105	  4106	  4109	  4109#	  4111	  4112	  4115
	  4115#	  4117	  4118	  4121	  4121#	  4123	  4124	  4127	  4127#	  4129	  4130	  4133	  4133#	  4135
	  4136	  4139	  4139#	  4141	  4142	  4145	  4145#	  4147	  4148	  4151	  4151#	  4156#	  4164	  4167
	  4167#	  4169	  4172	  4172#	  4174	  4177	  4177#	  4179	  4182	  4182#	  4184	  4187	  4187#	  4189
	  4192	  4192#	  4194	  4197	  4197#	  4199	  4202	  4202#	  4204	  4207	  4207#	  4209	  4212	  4212#
	  4214	  4217	  4217#	  4219	  4222	  4222#	  4224	  4227	  4227#	  4229	  4232	  4232#	  4234	  4237
	  4237#	  4239	  4242	  4242#	  4256	  4257	  4258	  4260	  4261	  4262	  4262#	  4264	  4265	  4266
	  4268	  4269	  4270	  4270#	  4272	  4273	  4274	  4276	  4277	  4278	  4278#	  4280	  4281	  4282
	  4284	  4285	  4286	  4286#	  4288	  4289	  4290	  4292	  4293	  4294	  4294#	  4296	  4297	  4298
	  4300	  4301	  4302	  4302#	  4304	  4305	  4306	  4308	  4309	  4310	  4310#	  4312	  4313	  4314
	  4316	  4317	  4318	  4318#	  4320	  4321	  4322	  4324	  4325	  4326	  4326#	  4328	  4329	  4330
	  4332	  4333	  4334	  4334#	  4336	  4337	  4338	  4340	  4341	  4342	  4342#	  4344	  4345	  4346
	  4348	  4349	  4350	  4350#	  4352	  4353	  4354	  4356	  4357	  4358	  4358#	  4360	  4361	  4362
	  4364	  4365	  4366	  4366#	  4368	  4369	  4370	  4372	  4373	  4374	  4374#	  4376	  4377	  4378
	  4380	  4381	  4382	  4382#	  4384	  4385	  4386	  4388	  4389	  4390	  4390#	  4392	  4393	  4394 *** SEQ 0330
	  4396	  4397	  4398	  4398#	  4400	  4401	  4402	  4404	  4405	  4406	  4406#	  4408	  4409	  4410
	  4412	  4413	  4414	  4414#	  4416	  4417	  4418	  4420	  4421	  4422	  4422#	  4424	  4425	  4426
	  4428	  4429	  4430	  4430#	  4432	  4433	  4434	  4436	  4437	  4438	  4438#	  4440	  4441	  4442
	  4444	  4445	  4446	  4446#	  4448	  4449	  4450	  4452	  4453	  4454	  4454#	  4456	  4457	  4458
	  4460	  4461	  4462	  4462#	  4464	  4465	  4466	  4468	  4469	  4470	  4470#	  4472	  4473	  4474
	  4476	  4477	  4478	  4478#	  4480	  4481	  4482	  4484	  4485	  4486	  4486#	  4488	  4489	  4490
	  4492	  4493	  4494	  4494#	  4496	  4497	  4498	  4500	  4501	  4502	  4502#	  4504	  4505	  4506
	  4508	  4509	  4510	  4510#	  4512	  4513	  4514	  4516	  4517	  4518	  4518#	  4520	  4521	  4522
	  4524	  4525	  4526	  4526#	  4528	  4529	  4530	  4532	  4533	  4534	  4534#	  4536	  4537	  4538
	  4540	  4541	  4542	  4542#	  4544	  4545	  4546	  4548	  4549	  4550	  4550#	  4552	  4553	  4554
	  4556	  4557	  4558	  4558#	  4560	  4561	  4562	  4564	  4565	  4566	  4566#	  4568	  4569	  4570
	  4572	  4573	  4574	  4574#	  4576	  4577	  4578	  4580	  4581	  4582	  4582#	  4584	  4585	  4586
	  4588	  4589	  4590	  4590#	  4592	  4593	  4594	  4596	  4597	  4598	  4598#	  4600	  4601	  4602
	  4604	  4605	  4606	  4606#	  4608	  4609	  4610	  4612	  4613	  4614	  4614#	  4616	  4617	  4618
	  4620	  4621	  4622	  4622#	  4624	  4625	  4626	  4628	  4629	  4630	  4630#	  4632	  4633	  4634
	  4636	  4637	  4638	  4638#	  4650#	  4667	  4668	  4669	  4670	  4671	  4672	  4673	  4674	  4675
	  4678	  4678#	  4681	  4682	  4683	  4684	  4685	  4686	  4687	  4688	  4689	  4692	  4692#	  4695
	  4696	  4697	  4698	  4699	  4700	  4701	  4702	  4703	  4706	  4706#	  4709	  4710	  4711	  4712
	  4713	  4714	  4715	  4716	  4717	  4720	  4720#	  4723	  4724	  4725	  4726	  4727	  4728	  4729
	  4730	  4731	  4734	  4734#	  4737	  4738	  4739	  4740	  4741	  4742	  4743	  4744	  4745	  4748
	  4748#	  4751	  4752	  4753	  4754	  4755	  4756	  4757	  4758	  4759	  4762	  4762#	  4765	  4766
	  4767	  4768	  4769	  4770	  4771	  4772	  4773	  4776	  4776#	  4779	  4780	  4781	  4782	  4783
	  4784	  4785	  4786	  4787	  4790	  4790#	  4793	  4794	  4795	  4796	  4797	  4798	  4799	  4800
	  4801	  4804	  4804#	  4807	  4808	  4809	  4810	  4811	  4812	  4813	  4814	  4815	  4818	  4818#
	  4821	  4822	  4823	  4824	  4825	  4826	  4827	  4828	  4829	  4832	  4832#	  4835	  4836	  4837
	  4838	  4839	  4840	  4841	  4842	  4843	  4846	  4846#	  4849	  4850	  4851	  4852	  4853	  4854
	  4855	  4856	  4857	  4860	  4860#	  4863	  4864	  4865	  4866	  4867	  4868	  4869	  4870	  4871
	  4874	  4874#	  4877	  4878	  4879	  4880	  4881	  4882	  4883	  4884	  4885	  4888	  4888#	  4891
	  4892	  4893	  4894	  4895	  4896	  4897	  4898	  4899	  4902	  4902#	  4905	  4906	  4907	  4908
	  4909	  4910	  4911	  4912	  4913	  4916	  4916#	  4919	  4920	  4921	  4922	  4923	  4924	  4925
	  4926	  4927	  4930	  4930#	  4933	  4934	  4935	  4936	  4937	  4938	  4939	  4940	  4941	  4944
	  4944#	  4947	  4948	  4949	  4950	  4951	  4952	  4953	  4954	  4955	  4958	  4958#	  4961	  4962
	  4963	  4964	  4965	  4966	  4967	  4968	  4969	  4972	  4972#	  4975	  4976	  4977	  4978	  4979
	  4980	  4981	  4982	  4983	  4986	  4986#	  4989	  4990	  4991	  4992	  4993	  4994	  4995	  4996
	  4997	  5000	  5000#	  5003	  5004	  5005	  5006	  5007	  5008	  5009	  5010	  5011	  5014	  5014#
	  5017	  5018	  5019	  5020	  5021	  5022	  5023	  5024	  5025	  5028	  5028#	  5031	  5032	  5033
	  5034	  5035	  5036	  5037	  5038	  5039	  5042	  5042#	  5045	  5046	  5047	  5048	  5049	  5050
	  5051	  5052	  5053	  5056	  5056#	  5059	  5060	  5061	  5062	  5063	  5064	  5065	  5066	  5067
	  5070	  5070#	  5073	  5074	  5075	  5076	  5077	  5078	  5079	  5080	  5081	  5084	  5084#	  5087
	  5088	  5089	  5090	  5091	  5092	  5093	  5094	  5095	  5098	  5098#	  5101	  5102	  5103	  5104
	  5105	  5106	  5107	  5108	  5109	  5112	  5112#	  5115	  5116	  5117	  5118	  5119	  5120	  5121
	  5122	  5123	  5126	  5126#	  5129	  5130	  5131	  5132	  5133	  5134	  5135	  5136	  5137	  5140
	  5140#	  5143	  5144	  5145	  5146	  5147	  5148	  5149	  5150	  5151	  5154	  5154#	  5157	  5158
	  5159	  5160	  5161	  5162	  5163	  5164	  5165	  5168	  5168#	  5171	  5172	  5173	  5174	  5175
	  5176	  5177	  5178	  5179	  5182	  5182#	  5185	  5186	  5187	  5188	  5189	  5190	  5191	  5192
	  5193	  5196	  5196#	  5199	  5200	  5201	  5202	  5203	  5204	  5205	  5206	  5207	  5210	  5210#
	  5213	  5214	  5215	  5216	  5217	  5218	  5219	  5220	  5221	  5224	  5224#	  5227	  5228	  5229
	  5230	  5231	  5232	  5233	  5234	  5235	  5238	  5238#	  5241	  5242	  5243	  5244	  5245	  5246
	  5247	  5248	  5249	  5252	  5252#	  5255	  5256	  5257	  5258	  5259	  5260	  5261	  5262	  5263
	  5266	  5266#	  5269	  5270	  5271	  5272	  5273	  5274	  5275	  5276	  5277	  5280	  5280#	  5283
	  5284	  5285	  5286	  5287	  5288	  5289	  5290	  5291	  5294	  5294#	  5297	  5298	  5299	  5300
	  5301	  5302	  5303	  5304	  5305	  5308	  5308#	  5311	  5312	  5313	  5314	  5315	  5316	  5317
	  5318	  5319	  5322	  5322#	  5325	  5326	  5327	  5328	  5329	  5330	  5331	  5332	  5333	  5336 *** SEQ 0331
	  5336#	  5339	  5340	  5341	  5342	  5343	  5344	  5345	  5346	  5347	  5350	  5350#	  5353	  5354
	  5355	  5356	  5357	  5358	  5359	  5360	  5361	  5364	  5364#	  5367	  5368	  5369	  5370	  5371
	  5372	  5373	  5374	  5375	  5378	  5378#	  5381	  5382	  5383	  5384	  5385	  5386	  5387	  5388
	  5389	  5392	  5392#	  5395	  5396	  5397	  5398	  5399	  5400	  5401	  5402	  5403	  5406	  5406#
	  5409	  5410	  5411	  5412	  5413	  5414	  5415	  5416	  5417	  5420	  5420#	  5423	  5424	  5425
	  5426	  5427	  5428	  5429	  5430	  5431	  5434	  5434#	  5437	  5438	  5439	  5440	  5441	  5442
	  5443	  5444	  5445	  5448	  5448#	  5451	  5452	  5453	  5454	  5455	  5456	  5457	  5458	  5459
	  5462	  5462#	  5465	  5466	  5467	  5468	  5469	  5470	  5471	  5472	  5473	  5476	  5476#	  5479
	  5480	  5481	  5482	  5483	  5484	  5485	  5486	  5487	  5490	  5490#	  5493	  5494	  5495	  5496
	  5497	  5498	  5499	  5500	  5501	  5504	  5504#	  5507	  5508	  5509	  5510	  5511	  5512	  5513
	  5514	  5515	  5518	  5518#	  5521	  5522	  5523	  5524	  5525	  5526	  5527	  5528	  5529	  5532
	  5532#	  5535	  5536	  5537	  5538	  5539	  5540	  5541	  5542	  5543	  5546	  5546#	  5549	  5550
	  5551	  5552	  5553	  5554	  5555	  5556	  5557	  5560	  5560#	  5565#	  5581	  5582	  5583	  5584
	  5585	  5586	  5588	  5589	  5591	  5591#	  5593	  5594	  5595	  5596	  5597	  5598	  5600	  5601
	  5603	  5603#	  5605	  5606	  5607	  5608	  5609	  5610	  5612	  5613	  5615	  5615#	  5617	  5618
	  5619	  5620	  5621	  5622	  5624	  5625	  5627	  5627#	  5629	  5630	  5631	  5632	  5633	  5634
	  5636	  5637	  5639	  5639#	  5641	  5642	  5643	  5644	  5645	  5646	  5648	  5649	  5651	  5651#
	  5653	  5654	  5655	  5656	  5657	  5658	  5660	  5661	  5663	  5663#	  5665	  5666	  5667	  5668
	  5669	  5670	  5672	  5673	  5675	  5675#	  5677	  5678	  5679	  5680	  5681	  5682	  5684	  5685
	  5687	  5687#	  5689	  5690	  5691	  5692	  5693	  5694	  5696	  5697	  5699	  5699#	  5701	  5702
	  5703	  5704	  5705	  5706	  5708	  5709	  5711	  5711#	  5713	  5714	  5715	  5716	  5717	  5718
	  5720	  5721	  5723	  5723#	  5725	  5726	  5727	  5728	  5729	  5730	  5732	  5733	  5735	  5735#
	  5737	  5738	  5739	  5740	  5741	  5742	  5744	  5745	  5747	  5747#	  5749	  5750	  5751	  5752
	  5753	  5754	  5756	  5757	  5759	  5759#	  5761	  5762	  5763	  5764	  5765	  5766	  5768	  5769
	  5771	  5771#	  5773	  5774	  5775	  5776	  5777	  5778	  5780	  5781	  5783	  5783#	  5785	  5786
	  5787	  5788	  5789	  5790	  5792	  5793	  5795	  5795#	  5797	  5798	  5799	  5800	  5801	  5802
	  5804	  5805	  5807	  5807#	  5809	  5810	  5811	  5812	  5813	  5814	  5816	  5817	  5819	  5819#
	  5821	  5822	  5823	  5824	  5825	  5826	  5828	  5829	  5831	  5831#	  5833	  5834	  5835	  5836
	  5837	  5838	  5840	  5841	  5843	  5843#	  5845	  5846	  5847	  5848	  5849	  5850	  5852	  5853
	  5855	  5855#	  5857	  5858	  5859	  5860	  5861	  5862	  5864	  5865	  5867	  5867#	  5869	  5870
	  5871	  5872	  5873	  5874	  5876	  5877	  5879	  5879#	  5881	  5882	  5883	  5884	  5885	  5886
	  5888	  5889	  5891	  5891#	  5893	  5894	  5895	  5896	  5897	  5898	  5900	  5901	  5903	  5903#
	  5905	  5906	  5907	  5908	  5909	  5910	  5912	  5913	  5915	  5915#	  5917	  5918	  5919	  5920
	  5921	  5922	  5924	  5925	  5927	  5927#	  5929	  5930	  5931	  5932	  5933	  5934	  5936	  5937
	  5939	  5939#	  5941	  5942	  5943	  5944	  5945	  5946	  5948	  5949	  5951	  5951#	  5953	  5954
	  5955	  5956	  5957	  5958	  5960	  5961	  5963	  5963#	  5965	  5966	  5967	  5968	  5969	  5970
	  5972	  5973	  5975	  5975#	  5977	  5978	  5979	  5980	  5981	  5982	  5984	  5985	  5987	  5987#
	  5989	  5990	  5991	  5992	  5993	  5994	  5996	  5997	  5999	  5999#	  6001	  6002	  6003	  6004
	  6005	  6006	  6008	  6009	  6011	  6011#	  6013	  6014	  6015	  6016	  6017	  6018	  6020	  6021
	  6023	  6023#	  6025	  6026	  6027	  6028	  6029	  6030	  6032	  6033	  6035	  6035#	  6037	  6038
	  6039	  6040	  6041	  6042	  6044	  6045	  6047	  6047#	  6049	  6050	  6051	  6052	  6053	  6054
	  6056	  6057	  6059	  6059#	  6061	  6062	  6063	  6064	  6065	  6066	  6068	  6069	  6071	  6071#
	  6073	  6074	  6075	  6076	  6077	  6078	  6080	  6081	  6083	  6083#	  6085	  6086	  6087	  6088
	  6089	  6090	  6092	  6093	  6095	  6095#	  6097	  6098	  6099	  6100	  6101	  6102	  6104	  6105
	  6107	  6107#	  6109	  6110	  6111	  6112	  6113	  6114	  6116	  6117	  6119	  6119#	  6121	  6122
	  6123	  6124	  6125	  6126	  6128	  6129	  6131	  6131#	  6133	  6134	  6135	  6136	  6137	  6138
	  6140	  6141	  6143	  6143#	  6145	  6146	  6147	  6148	  6149	  6150	  6152	  6153	  6155	  6155#
	  6157	  6158	  6159	  6160	  6161	  6162	  6164	  6165	  6167	  6167#	  6169	  6170	  6171	  6172
	  6173	  6174	  6176	  6177	  6179	  6179#	  6181	  6182	  6183	  6184	  6185	  6186	  6188	  6189
	  6191	  6191#	  6193	  6194	  6195	  6196	  6197	  6198	  6200	  6201	  6203	  6203#	  6205	  6206
	  6207	  6208	  6209	  6210	  6212	  6213	  6215	  6215#	  6217	  6218	  6219	  6220	  6221	  6222
	  6224	  6225	  6227	  6227#	  6229	  6230	  6231	  6232	  6233	  6234	  6236	  6237	  6239	  6239#
	  6241	  6242	  6243	  6244	  6245	  6246	  6248	  6249	  6251	  6251#	  6253	  6254	  6255	  6256 *** SEQ 0332
	  6257	  6258	  6260	  6261	  6263	  6263#	  6265	  6266	  6267	  6268	  6269	  6270	  6272	  6273
	  6275	  6275#	  6277	  6278	  6279	  6280	  6281	  6282	  6284	  6285	  6287	  6287#	  6289	  6290
	  6291	  6292	  6293	  6294	  6296	  6297	  6299	  6299#	  6301	  6302	  6303	  6304	  6305	  6306
	  6308	  6309	  6311	  6311#	  6313	  6314	  6315	  6316	  6317	  6318	  6320	  6321	  6323	  6323#
	  6325	  6326	  6327	  6328	  6329	  6330	  6332	  6333	  6335	  6335#	  6337	  6338	  6339	  6340
	  6341	  6342	  6344	  6345	  6347	  6347#	  6352#	  6372	  6373	  6375	  6376	  6377	  6378	  6379
	  6380	  6381	  6382	  6383	  6384	  6384#	  6387	  6388	  6390	  6391	  6392	  6393	  6394	  6395
	  6396	  6397	  6398	  6399	  6399#	  6402	  6403	  6405	  6406	  6407	  6408	  6409	  6410	  6411
	  6412	  6413	  6414	  6414#	  6417	  6418	  6420	  6421	  6422	  6423	  6424	  6425	  6426	  6427
	  6428	  6429	  6429#	  6432	  6433	  6435	  6436	  6437	  6438	  6439	  6440	  6441	  6442	  6443
	  6444	  6444#	  6447	  6448	  6450	  6451	  6452	  6453	  6454	  6455	  6456	  6457	  6458	  6459
	  6459#	  6462	  6463	  6465	  6466	  6467	  6468	  6469	  6470	  6471	  6472	  6473	  6474	  6474#
	  6477	  6478	  6480	  6481	  6482	  6483	  6484	  6485	  6486	  6487	  6488	  6489	  6489#	  6492
	  6493	  6495	  6496	  6497	  6498	  6499	  6500	  6501	  6502	  6503	  6504	  6504#	  6507	  6508
	  6510	  6511	  6512	  6513	  6514	  6515	  6516	  6517	  6518	  6519	  6519#	  6522	  6523	  6525
	  6526	  6527	  6528	  6529	  6530	  6531	  6532	  6533	  6534	  6534#	  6537	  6538	  6540	  6541
	  6542	  6543	  6544	  6545	  6546	  6547	  6548	  6549	  6549#	  6552	  6553	  6555	  6556	  6557
	  6558	  6559	  6560	  6561	  6562	  6563	  6564	  6564#	  6567	  6568	  6570	  6571	  6572	  6573
	  6574	  6575	  6576	  6577	  6578	  6579	  6579#	  6582	  6583	  6585	  6586	  6587	  6588	  6589
	  6590	  6591	  6592	  6593	  6594	  6594#	  6597	  6598	  6600	  6601	  6602	  6603	  6604	  6605
	  6606	  6607	  6608	  6609	  6609#	  6612	  6613	  6615	  6616	  6617	  6618	  6619	  6620	  6621
	  6622	  6623	  6624	  6624#	  6627	  6628	  6630	  6631	  6632	  6633	  6634	  6635	  6636	  6637
	  6638	  6639	  6639#	  6642	  6643	  6645	  6646	  6647	  6648	  6649	  6650	  6651	  6652	  6653
	  6654	  6654#	  6657	  6658	  6660	  6661	  6662	  6663	  6664	  6665	  6666	  6667	  6668	  6669
	  6669#	  6672	  6673	  6675	  6676	  6677	  6678	  6679	  6680	  6681	  6682	  6683	  6684	  6684#
	  6687	  6688	  6690	  6691	  6692	  6693	  6694	  6695	  6696	  6697	  6698	  6699	  6699#	  6702
	  6703	  6705	  6706	  6707	  6708	  6709	  6710	  6711	  6712	  6713	  6714	  6714#	  6717	  6718
	  6720	  6721	  6722	  6723	  6724	  6725	  6726	  6727	  6728	  6729	  6729#	  6732	  6733	  6735
	  6736	  6737	  6738	  6739	  6740	  6741	  6742	  6743	  6744	  6744#	  6747	  6748	  6750	  6751
	  6752	  6753	  6754	  6755	  6756	  6757	  6758	  6759	  6759#	  6762	  6763	  6765	  6766	  6767
	  6768	  6769	  6770	  6771	  6772	  6773	  6774	  6774#	  6777	  6778	  6780	  6781	  6782	  6783
	  6784	  6785	  6786	  6787	  6788	  6789	  6789#	  6792	  6793	  6795	  6796	  6797	  6798	  6799
	  6800	  6801	  6802	  6803	  6804	  6804#	  6807	  6808	  6810	  6811	  6812	  6813	  6814	  6815
	  6816	  6817	  6818	  6819	  6819#	  6822	  6823	  6825	  6826	  6827	  6828	  6829	  6830	  6831
	  6832	  6833	  6834	  6834#	  6837	  6838	  6840	  6841	  6842	  6843	  6844	  6845	  6846	  6847
	  6848	  6849	  6849#	  6852	  6853	  6855	  6856	  6857	  6858	  6859	  6860	  6861	  6862	  6863
	  6864	  6864#	  6867	  6868	  6870	  6871	  6872	  6873	  6874	  6875	  6876	  6877	  6878	  6879
	  6879#	  6882	  6883	  6885	  6886	  6887	  6888	  6889	  6890	  6891	  6892	  6893	  6894	  6894#
	  6897	  6898	  6900	  6901	  6902	  6903	  6904	  6905	  6906	  6907	  6908	  6909	  6909#	  6912
	  6913	  6915	  6916	  6917	  6918	  6919	  6920	  6921	  6922	  6923	  6924	  6924#	  6927	  6928
	  6930	  6931	  6932	  6933	  6934	  6935	  6936	  6937	  6938	  6939	  6939#	  6942	  6943	  6945
	  6946	  6947	  6948	  6949	  6950	  6951	  6952	  6953	  6954	  6954#	  6957	  6958	  6960	  6961
	  6962	  6963	  6964	  6965	  6966	  6967	  6968	  6969	  6969#	  6972	  6973	  6975	  6976	  6977
	  6978	  6979	  6980	  6981	  6982	  6983	  6984	  6984#	  6987	  6988	  6990	  6991	  6992	  6993
	  6994	  6995	  6996	  6997	  6998	  6999	  6999#	  7002	  7003	  7005	  7006	  7007	  7008	  7009
	  7010	  7011	  7012	  7013	  7014	  7014#	  7017	  7018	  7020	  7021	  7022	  7023	  7024	  7025
	  7026	  7027	  7028	  7029	  7029#	  7032	  7033	  7035	  7036	  7037	  7038	  7039	  7040	  7041
	  7042	  7043	  7044	  7044#	  7047	  7048	  7050	  7051	  7052	  7053	  7054	  7055	  7056	  7057
	  7058	  7059	  7059#	  7062	  7063	  7065	  7066	  7067	  7068	  7069	  7070	  7071	  7072	  7073
	  7074	  7074#	  7077	  7078	  7080	  7081	  7082	  7083	  7084	  7085	  7086	  7087	  7088	  7089
	  7089#	  7092	  7093	  7095	  7096	  7097	  7098	  7099	  7100	  7101	  7102	  7103	  7104	  7104#
	  7107	  7108	  7110	  7111	  7112	  7113	  7114	  7115	  7116	  7117	  7118	  7119	  7119#	  7122
	  7123	  7125	  7126	  7127	  7128	  7129	  7130	  7131	  7132	  7133	  7134	  7134#	  7137	  7138 *** SEQ 0333
	  7140	  7141	  7142	  7143	  7144	  7145	  7146	  7147	  7148	  7149	  7149#	  7152	  7153	  7155
	  7156	  7157	  7158	  7159	  7160	  7161	  7162	  7163	  7164	  7164#	  7167	  7168	  7170	  7171
	  7172	  7173	  7174	  7175	  7176	  7177	  7178	  7179	  7179#	  7182	  7183	  7185	  7186	  7187
	  7188	  7189	  7190	  7191	  7192	  7193	  7194	  7194#	  7197	  7198	  7200	  7201	  7202	  7203
	  7204	  7205	  7206	  7207	  7208	  7209	  7209#	  7212	  7213	  7215	  7216	  7217	  7218	  7219
	  7220	  7221	  7222	  7223	  7224	  7224#	  7227	  7228	  7230	  7231	  7232	  7233	  7234	  7235
	  7236	  7237	  7238	  7239	  7239#	  7242	  7243	  7245	  7246	  7247	  7248	  7249	  7250	  7251
	  7252	  7253	  7254	  7254#	  7257	  7258	  7260	  7261	  7262	  7263	  7264	  7265	  7266	  7267
	  7268	  7269	  7269#	  7272	  7273	  7275	  7276	  7277	  7278	  7279	  7280	  7281	  7282	  7283
	  7284	  7284#	  7287	  7288	  7290	  7291	  7292	  7293	  7294	  7295	  7296	  7297	  7298	  7299
	  7299#	  7302	  7303	  7305	  7306	  7307	  7308	  7309	  7310	  7311	  7312	  7313	  7314	  7314#
	  7317	  7318	  7320	  7321	  7322	  7323	  7324	  7325	  7326	  7327	  7328	  7329	  7329#	  7341#
	  7350	  7351	  7353	  7354	  7354#	  7356	  7357	  7359	  7360	  7360#	  7362	  7363	  7365	  7366
	  7366#	  7368	  7369	  7371	  7372	  7372#	  7374	  7375	  7377	  7378	  7378#
NEGAD	 10733#	 10733	 10735	 11127	 11129
NEGADX	 10737#	 10737	 11128
NEWFLG	   791#	   791	   795	   946	   957
NEWTAB	  2101	  2441#
NEWTST	  1981	  2098#
NOPNT	   162#
NOSKPF	  1000	  1002	  1005	  1008	  1011	  1014	  1017	  1021#	  1110	  1113
NRAZRO	  9705	  9707	  9735#	  9883
NRNEG	  9659#	  9659	  9679	  9683	  9717	  9751	  9759	  9798
NRPOS	  9658#	  9658	  9668	  9676	  9709	  9722	  9750	  9763	  9767	  9778	  9793
NRRND	  9657#	  9657	  9664	  9686	  9710	  9724	  9749	  9756	  9765	  9780	  9795
NRT1	  2841	  7854	  9532	  9653#	 10415
NRT12C	  9723	  9725	  9732#	  9787	  9791
NRT13C	  9713#	  9720	  9796	  9801
NRT14C	  9727#	  9783
NRT1I	  9738#	  9970	  9980	 10000	 10005	 10192
NRT1NR	  9690	  9698#
NRT1X	  9666	  9673	  9678#
NRT1Y	  9686#
NRT1Z	  9687	  9692	  9694	  9696	  9703#
NRT1ZX	  9711	  9717#
NRT2	  2842	  9732	  9742#
NRT24C	  9783#
NRT2NR	  9768	  9775#
NRT2X	  9766	  9769	  9771	  9773	  9778#
NRT2XX	  9803#
NRT2Y	  9779	  9781	  9785#
NRT2Z	  9793#
NRT3	  2843	  9713	  9804#
NRT3A	  9810	  9818#
NRT4	  2844	  9727	  9821#
NRT4A	  9829	  9833#
NRT4B	  9838	  9844#
NRT4D	  9832#
NRT5	  2845	  9841	  9851#
NRT6	  2846	  9857#
NWINST	   858	   957#
NXMU	   426#
OFFSET	   107#	  2290	 11253	 11361                                                                                 *** SEQ 0334
ONEPRT	    82#
ONETIM	  1509#	  1509	  1517
OPRSEL	   176#
OPTIME	   594#
OUT	  1167	  1201#	  1278	  1455	  1499
OUT1	  1230#	  1258
OUT2	  1246#	  1266	  1322
OUT3	  1260#
OUT4	  1261	  1267#
OUT5	  1277#
OUTX	  1213	  1216	  1220#
P	   219	   220	   221	   222	   426#	   514	  1056	  1439	  1441	  1487	  1489	  1588	  1589	  1590
	  1591	  1592	  1698	  1699	  1700	  1701	  1702	  1703	  1729	  1730	  1731	  1755	  1764	  1765
	  1766	  1767	  1768	  1769	  1770	  1771	  1785	  1788	  1790	  1855	  1880	  1987	  2002	  2128
	  2151	  2154	  2158	  2162	  2167	  2171	  2175	  2180	  2186	  2189	  2193	  2198	  2203	  2207
	  2211	  2216	  2219	  2225	  2233	  2241	  2249	  2257	  2262	  2270	  2276	  2280	  2286	  2296
	  2326	  3164#	  7436	  7456	  7459	  7465	  7470	  7471	  7477	  7480	  7482	  7487	  7490	  7491
	  7498	  7502	  7504	  7508	  7512	  7518	  7527	  7535	  7541	  7549	  7558	  7575	  7576	  7584
	  7586	  7598	  7602	  7605	  7611	  7617	  7621	  7624	  7631	  7641	  7663	  7675	  7682	  7695
	  7699	  7711	  7722	  7730	  7754	  7758	  7762	  7770	  7784	  7790	  7794	  7826	  7832	  7838
	  7848	  7863	  7865	  7872	  7874	  7920	  7928	  7932	  7939	  7953	  7956	  7969	  7973	  8005
	  8015	  8029	  8090	  8103	  8119	  8122	  8130	  8133	  8136	  8142	  8144	  8147	  8150	  8153
	  8156	  8159	  8162	  8165	  8177	  8180	  8183	  8186	  8189	  8195	  8203	  8215	  8217	  8221
	  8226	  8228	  8232	  8249	  8297	  8302	  8306	  8308	  8310	  8312	  8315	  8317	  8323	  8325
	  8329	  8331	  8336	  8339	  8348	  8494	  8495	  8496	  8497	  8498	  8500	  8520	  8526	  8544
	  8545	  8547	  8548	  8549	  8550	  8551	  8552	  8577	  8579	  8583	  8584	  8586	  8598	  8724
	  8786	  8817	  8821	  8824	  8879	  8884	  8886	  8900	  8934	  8974	  9004	  9066	  9069	  9070
	  9072	  9074	  9075	  9076	  9077	  9099	  9100	  9106	  9137	  9139	  9155	  9188	  9189	  9192
	  9193	  9198	  9200	  9201	  9203	  9210	  9211	  9216	  9218	  9220	  9228	  9230	  9252	  9255
	  9281	  9385	  9412	  9452	  9463	  9483	  9500	  9509	  9536	  9544	  9560	  9599	  9603	  9608
	  9617	  9633	  9655	  9715	  9730	  9733	  9740	  9825	  9849	  9853	  9865	  9916	  9986	  9990
	 10013	 10033	 10044	 10102	 10109	 10144	 10159	 10180	 10187	 10197	 10250	 10281	 10296	 10332
	 10344	 10418	 10428	 10437	 10441	 10470	 10494	 10506	 10517	 10544	 10566	 10570	 10580	 10589
	 10613	 10615	 10617	 10619	 10621	 10641	 10659	 10720	 10722	 10724	 10726	 10730	 10750	 10788
	 10790	 10792	 10797	 10805	 10807	 10809	 10811	 10813	 10822	 10834	 10837	 10839	 10841	 10847
	 10857	 10880	 10894	 10904	 10919	 10921	 10922	 10923	 10929	 10944	 11190	 11202	 11215	 11233
	 11273	 11279	 11285	 11313	 11338	 11342	 11345	 11346	 11352	 11371	 11393	 11394	 11395	 11398
	 11399	 11400	 11411	 11412	 11416	 11417	 11422	 11423	 11424
PAG	   426#
PAGDLY	  3260#	 11159
PALERS	   168#	  1166
PARCLR	   426#
PARDIS	   426#
PAREA1	   140#	   470
PAREA2	   141#	   471
PAREA3	   142#	   468
PAREA4	   143#	   469
PAREA5	   144#	   481
PAREA6	   145#	   482
PAREA7	   481#
PAREA8	   482#
PARENB	   426#	   823
PARU	   426#                                                                                                        *** SEQ 0335
PASCNT	   496#	   833#	   833	  1090
PATCH	 11833#
PC	   122#	  1492	  1524	  1627	  1786	  1811	  2301	  3160#	  7451	  7455	  7479	  7481	  7534	  7540
	  7585	  7769	  7926	  8192	  8197	  8206	  8208	  8210	  8212	  8238	  8241	  8244	  8246	  8446
	  8447	  8468	  8572	  8573	  8576	  8616	  8927	  9145	  9148	  9190	  9450	  9461	  9493	  9497
	  9831	  9832	  9962	  9964	 10147	 10366	 10453	 10476	 10548	 10605	 11330	 11382
PCCHNG	  3190#	  3327	  3331	  3336	  3340	  3377	  3381	  3399	  3404	  3964	  4001	  4013	  4018	  4025
	  4030	  4035	  4040	  4069	  4074	  4079	  4084	  4089	  4164	  4169	  4174	  4179	  4184	  4189
	  4194	  4199	  4204	  4209	  4214	  4219	  4224	  4229	  4234	  4239	  4256	  4264	  4272	  4280
	  4288	  4296	  4304	  4312	  4320	  4328	  4336	  4344	  4352	  4360	  4368	  4376	  4384	  4392
	  4400	  4408	  4416	  4424	  4432	  4440	  4448	  4456	  4464	  4472	  4480	  4488	  4496	  4504
	  4512	  4520	  4528	  4536	  4544	  4552	  4560	  4568	  4576	  4584	  4592	  4600	  4608	  4616
	  4624	  4632	  6408	  6423	  6438	  6453	  6468	  6483	  6528	  6543	  6558	  6573	  6588	  6603
	  6648	  6663	  6678	  6693	  6708	  6723	  6768	  6783	  6798	  6813	  6828	  6843	  6888	  6903
	  6918	  6933	  6948	  6963	  7008	  7023	  7038	  7053	  7068	  7083	  7128	  7143	  7158	  7173
	  7188	  7203	  7248	  7263	  7278	  7293	  7308	  7323	  7357	  7363	  7369	  7375	  7391	  7395
	  7399	  7403	  8987	  8989	  9011	  9015	  9183	  9213
PCCLK	  3175#	  4003	  4053	  4076	  4085	  6442	  6457	  6562	  6577	  6682	  6697	  6802	  6817	  6922
	  6937	  7042	  7057	  7162	  7177	  7282	  7297	  7463	  7475	  7515	  7517	  7600	  8575	  9338
	 10540
PCINCL	  4076	  4085	  7547#	  7548
PCP1	  8192#	  8577
PCP1FF	  7530	  7548	  7599	  7835	  8193#	  8193	  8333	  8444	  9151	 10135	 10163	 10528	 11333	 11385
PCP1G	  8192#	  8192	  8194	  8447	 10574	 10608	 11283	 11373
PDISF	   591#
PDLOVU	   426#
PDOVTP	   426#
PERIOD	   621#
PFF1	  9142#	  9142	  9416	 10520	 10529	 10541
PFSTRT	   448#
PFX1	  9417	  9478#
PGFTRP	   426#
PGMEND	    79#	 11839
PGMNAM	   473	   751#
PI	   823	   826	   828	  1177	  1195	  1196
PICHN1	   426#	   828
PICHN2	   426#
PICHN3	   426#
PICHN4	   426#
PICHN5	   426#
PICHN6	   426#
PICHN7	   426#
PICHNA	   426#	   823
PICLR	   426#	   826
PICYC	  8483	  8931#	  8931
PIOFF	   426#	   826	  1196
PION	   426#	   823	   828
PIRDYS	  8485	  9096#	  9096
PIT1	  9154	  9157#
PIT1A	  9097	  9154#
PLIST	   660#	   660	  1056	  1439	  1487
PLISTE	   660	   662#	   746
PLISTS	   661#                                                                                                        *** SEQ 0336
PLUS	   626#
PNTCTL	  1504#	  1504	  1601	  1756	  1773	  1791
PNTENB	   590#
PNTEXT	   469#
PNTFLG	   589#	  1399
PNTIND	  1832	  1882#
PNTINH	   592#
PNTINS	  1816	  1956#
PNTLPT	   163#	  1658	  1861	  2340
PNTNAM	   468#
PNTRP	   426#
PNTSPC	   593#	   792	  1229	  1237	  1309	  1317	  1624	  1810	  1821	  1834	  1835	  1837	  2308
PNTTOT	  1089	  1361#	  1381	  1563
POPS	  4061	  7537#	  7538
PRNT	   838#	   838	  1165	  1267
PSE	  3190#	  3190	  3191	  3192	  9178	  9314	  9388
PSINFT	  8487	  9105#	  9105	 10455	 11300	 11329	 11332	 11335	 11354	 11356	 11381	 11384	 11386
PTINDX	  2001#	  2001	  2126	  2314
PTINS1	  1987#
PTRP	   426#
PUSH1	  4057	  7520#	  7521
PUSH2	  4058	  7532#	  7533
PUSHD	  4045	  8169#
PUSHES	  4052	  7523#	  7524
PUSHJ1	  4053	  7529#	  7530
PVPAGI	   687#
PWFCLR	   426#
QUEST	   632#
RADIX	   635#
RADLSC	   637#
RADLSP	   636#
RANBAS	    88#	   782
RAND	   848	   850	   989	   991	  1041	  1247	  1457#	  1478
RANDBS	   470#	   781	   789	   834	  1086	  1273	  1375
RDRST	 11180	 11181	 11240#	 11240	 11315
REENTR	   450#
RELIAB	   170#	  1091
RENTR1	   131	  1562#
REPT	   426#
REPT1	   426#
REPTU	   548#
REQSET	   426#
RESRT1	   130	   525#
RESRT2	   526#
RETURN	   457#
RSTART	   159#	  1088	  1380
RTP	   630#	  1848
RUN	  8234#	  8234	  8448	 10461#	 10461
RUNFLG	   497#
RUNTIM	  1219	  1337#	  1341	  1366
S	   116#	  3154#	  7464	  7476	  7497	  7616	  7620	  7659	  7704	  7773	  7775	  7837	  7841	  7854
	  7899	  7927	  7952	  7961	  8001	  8022	  8049	  8248	  8449	  8499	  8505	  8521	  8933	  8935
	  8984	  9052	  9060	  9063	  9064	  9068	  9098	  9154	  9166	  9169	  9202	  9206	  9215	  9219 *** SEQ 0337
	  9225	  9238	  9240	  9242	  9270	  9272	  9283	  9284	  9287	  9300	  9320	  9322	  9397	  9401
	  9429	  9432	  9443	  9451	  9462	  9482	  9491	  9514	  9522	  9532	  9540	  9548	  9579	  9584
	  9590	  9595	  9597	  9602	  9614	  9624	  9627	  9637	  9646	  9713	  9727	  9732	  9739	  9819
	  9836	  9841	  9844	  9855	  9858	  9871	  9888	  9893	  9909	  9915	  9918	  9940	  9948	  9954
	  9967	  9976	  9985	  9989	 10032	 10043	 10047	 10065	 10070	 10083	 10093	 10103	 10113	 10119
	 10125	 10131	 10143	 10146	 10150	 10154	 10158	 10166	 10184	 10196	 10205	 10217	 10231	 10236
	 10253	 10275	 10277	 10304	 10312	 10351	 10381	 10386	 10389	 10397	 10400	 10410	 10415	 10426
	 10432	 10439	 10469	 10486	 10493	 10501	 10505	 10509	 10516	 10521	 10524	 10533	 10538	 10543
	 11165	 11167	 11168	 11170	 11185	 11186	 11187	 11194	 11195	 11197	 11200	 11220	 11221	 11222
	 11224	 11231	 11237	 11242	 11246	 11247	 11255	 11297	 11307	 11308	 11393	 11399	 11411	 11417
	 11418	 11419	 11423
SA	  1529	  1690	  7688	  7706	  7726	  7924	  7975	  7997	  8566	  8801#	  8801	  8816	  8818	  8820
	  8823	  9558	  9826	  9859	  9979	 10212	 10278	 10626	 10642	 10823
SAADD	  3245#	  7677	  7685	  7714	  7725	  7845	  7851	  7877	  7909	  7916	  7941	  7960	  7968	  7976
	  8008	  8027	  8125	  8320	  8812	  9009	  9512	  9611	  9641	  9714	  9728	  9805	  9854	  9895
	  9908	  9914	  9939	  9947	  9975	 10036	 10108	 10213	 10260	 10385	 10403	 10913
SAAREX	  3245#	  7845	  7877	  7938	  7941	  7960	  7968	  7985	  7987	  8008	  8027	  8139	  8337	  8810
	  9611	 10222	 10225
SAARPO	  3245#	  7728	  8125	  8305	  8808
SAC0	   983	   987	  1034	  1038	  1567#	  1567	  1572
SAC10	  1105#	  1105	  1114	  1143
SAC2	  3190#	  3327	  3331	  3336	  3340	  3377	  3381	  3486	  3546	  3604	  3661	  3850	  3856	  3868
	  3884	  3891	  3905	  3912	  3919	  3933	  3974	  3978	  3982	  9332	  9384	  9427
SACBR	  3190#	  3193	  3340	  3425	  3996	  4046	  4064	  4084	  8977
SACBRF	  8471	  8939	  8978	  9336	  9618	  9845#	  9845	 10064	 10075	 10124	 10902
SACINH	  3190#	  3193	  3351	  3356	  3361	  3366	  3392	  3399	  3404	  3460	  3464	  3492	  3516	  3552
	  3576	  3610	  3634	  3668	  3692	  3729	  3753	  3777	  3801	  3837	  3861	  3897	  3925	  3989
	  4025	  4030	  4035	  4074	  4118	  4142	  4164	  4169	  4174	  4179	  4184	  4189	  4194	  4199
	  4204	  4209	  4214	  4219	  4224	  4229	  4234	  4239	  4703	  4759	  4815	  4871	  4927	  4983
	  5039	  5095	  5151	  5207	  5263	  5319	  5375	  5431	  5487	  5543	  5609	  5657	  5705	  5753
	  5801	  5849	  5897	  5945	  5993	  6041	  6089	  6137	  6185	  6233	  6281	  6329	  6378	  6393
	  6408	  6423	  6438	  6453	  6468	  6483	  6498	  6513	  6528	  6543	  6558	  6573	  6588	  6603
	  7350	  7356	  7362	  7368	  7374	  7382	  7391	  7395	  7399	  7403	  7408	  7412	  7468	  9310
	  9317	  9325	  9542	  9737
SADR1	   129#	   446
SADR10	   137#	   462
SADR11	   138#	   463
SADR2	   130#	   448
SADR3	   131#	   450
SADR5	   132#	   511
SADR6	   133#	   512
SADR7	   134#	   459
SADR8	   135#	   460
SADR9	   136#	   461
SAEQV	  3245#	  7989	  7996	  8139	  8814	 10179	 10229	 10230
SAFEEN	  3245#	  7987	  8794	 10036	 10086	 10179	 10225	 10262	 10380	 10385	 10401	 10431
SAIAC0	  3193#	  3735	  3759	  3783	  3807	  4321	  4329	  4337	  4345	  4353	  4361	  4369	  4377	  4449
	  4457	  4465	  4473	  4481	  4489	  4497	  4505	  4577	  4585	  4593	  4601	  4609	  4617	  4625
	  4633	  5618	  5666	  5714	  5762	  5810	  5858	  5906	  5954	  6002	  6050	  6098	  6146	  6194
	  6242	  6290	  6338	  8975	  9305	  9306	  9308
SAM100	  3243#	  8322
SAM110	  3234#	  7710
SAMAGN	  8806	  8832#                                                                                                *** SEQ 0338
SAMI16	  3236#	  7951	 10388
SAMI22	  3229#	  8100
SAMI32	  3238#	  9589	 10123
SAMI33	  3237#	  7909	  9588	  9821	  9854
SAMI4	  3239#	  8311
SAMI42	  3235#	  8299	 10162
SAMI43	  3241#	  8021	 10412
SAMSIZ	  3245#	  7725	  8125	  8799
SAP110	  3233#	  7685
SAP220	  3232#	  7677
SAPL1	  3245#	  7681	  7694	  7714	  7725	  7847	  7851	  7880	  7916	  7943	  7960	  7968	  7976	  8031
	  8125	  8320	  8819	  9512	  9613	  9641	  9728	  9808	  9854	  9914	  9947	  9975	 10036	 10108
	 10213	 10260	 10385	 10403
SAPL10	  3240#	  7916
SAPL43	  3242#	  9895
SAPL44	  3230#	  7729
SASCMI	  3245#	  7681	  7694	  7714	  7847	  7853	  7877	  7888	  7898	  7901	  7911	  7916	  7960	  7968
	  7976	  7989	  8027	  8038	  8139	  8320	  8796	  9513	  9621	  9623	  9643	  9728	  9808	  9854
	  9914	  9947	  9958	  9975	 10213	 10229
SASCPL	  3245#	  7680	  7693	  7709	  7719	  7845	  7847	  7851	  7853	  7888	  7901	  7909	  7911	  7941
	  7989	  8008	  8016	  8035	  8038	  8139	  8792	  9534	  9611	  9623	  9641	  9643	  9714	  9807
	  9869	  9895	  9908	  9919	  9939	  9956	  9958	 10108	 10229
SAV0	  1161#	  1161	  1164
SAVAC	  1432	  1433	  1434	  1444	  1446	  1461#	  1474	  1475	  1495
SAZERO	  3231#	  7714	  7851	  7976	  7996	  8320	  9512	  9641	  9728	  9808	  9914	  9947	  9975	 10036
	 10108	 10179	 10213	 10230	 10260	 10385	 10403
SBINIT	   232	   456#
SC	   124#	  1526	  1680	  3162#	  7692	  7713	  7741	  7749	  7923	  7983	  8321	  8492	  8565	  8793
	  8797	  9628	  9959	 10016	 10017	 10018	 10027	 10028	 10051	 10052	 10057	 10058	 10219	 10240
	 10241	 10242	 10248	 10249	 10319	 10329	 10330	 10345	 10801	 10803
SCAD	  8498	  8790#
SCAD1	  8813	  8818#
SCAD2	  8815	  8823#
SCAD3	  8812#	  8830
SCAD4	  8811	  8826#
SCADEN	  8546#	  8546	  8567	 10564	 10785	 10799	 10830	 10846	 10874
SCADFF	  8631	  8734	  8790	  9886	 10339	 10875#	 10875	 10907
SCAREN	  3246#	  7677	  7845	 10808
SCCLK	  8564#	  8564	 10800	 10821
SCE	  3190#	  3258	  3399	  3404	  3460	  3464	  3491	  3497	  3515	  3521	  3552	  3558	  3576	  3582
	  3609	  3615	  3633	  3639	  3668	  3674	  3692	  3698	  3729	  3753	  3777	  3801	  3837	  3843
	  3861	  3867	  3897	  3904	  3925	  3932	  4040	  4064	  4074	  4084	  4703	  4717	  4759	  4773
	  4815	  4829	  4871	  4885	  4927	  4941	  4983	  4997	  5039	  5053	  5095	  5109	  5151	  5165
	  5207	  5221	  5263	  5277	  5319	  5333	  5375	  5389	  5431	  5445	  5487	  5501	  5543	  5557
	  5705	  5753	  5801	  5849	  5897	  5945	  6089	  6137	  6185	  6233	  6281	  6329	  7574	  9003
	  9014	  9019	  9023	  9183	  9196	  9315	  9389	  9499	  9508	  9824	 11267	 11302
SCENAC	  9018#	  9018	  9022	  9032	  9036
SCMIX	  8565#	  8565	 10812
SCMIX1	 10811	 10823#
SCMIX3	 10805	 10820#	 10827
SCMIX4	 10807	 10819#
SCMIX5	 10809	 10814#
SCMIXR	  8552	 10799#                                                                                                *** SEQ 0339
SCOPE	   549#
SCP1IN	  3221#	  8590	  8591	 10802
SCP1S	  3220#	  8589	 10141
SCSAEN	  3246#	  7554	  7626	  7690	  7709	  7710	  7740	  7748	  7919	  7984	  9513	  9521	  9592	  9611
	  9635	  9653	  9816	  9875	  9946	  9978	 10108	 10142	 10179	 10220	 10268	 10810
SCSCP1	  3246#	  9606	  9743	  9919	 10354	 10804
SCSHRT	  3246#	 10318	 10806
SCT1	  2832	  9989	 10032	 10093	 10236	 10277	 10318#
SCT2	  1610	  2833	  7841	  9602	  9637	  9985	 10103	 10143	 10275	 10353#
SCT2R	 10356	 10369#
SCTC	 10320	 10329#	 10362	 10367	 10375
SCTC1	 10333	 10342	 10345#
SCTC2	 10346	 10376#
SCTC3	 10383	 10387	 10391#
SCTC4	 10392	 10395	 10398	 10404#
SCTC5	  7559	  7560	  7562	  7752	  9489	 10349#
SENSE1	   426#
SENSE2	   426#
SENSE3	   426#
SENSE4	   426#
SENSE5	   426#
SENSE6	   426#
SENTRY	   106	   766	  1442	  1490	  1504#
SEQ	  1781#	  1781	  1798
SEQPNT	    91#	  1793
SETLST	  2127	  2134#	  2320
SFSRT1	   129	   770#
SFSTRT	   446#	  1382
SHFT1	  3951	  3955	  3959	  3975	  3979	  3983	  7684#	  7685
SHFT1A	  7689	  7692#
SHFT2A	  7707	  7713#
SHFT2B	  7713	  7717#
SHFT2C	  7715	  7720#
SHFT2E	  7710#	  7723
SHLONG	  7687#	  7687	  7691	  7718	  7720
SIMASB	    83#	  1543	  1562	  1615	  1774	  1907	  1909	  1989	  2089	  2461	  2743	  2894	  3117	  3263
	  3297	  7332	  7416	  7801	  8053	  8080	  8251	  8349	  8958	  8962	  8964	  9081	  9108	  9159
	  9257	  9262	  9464	  9470	 10479
SIMBLK	  1123	  1124	  1294	  1462#
SIMBRK	  1511	  1514	  1541	  8521#
SIMCON	  1781#
SIMDDT	   766#
SIMFLG	   790#	   790	   797	  1115	  1277
SIMFS1	  1482#	  1494
SIMFST	  1280	  1467#
SIMGO	  1538	  8441#
SIMMT	  1296	  1451#
SIMNST	  1126	  1431#	  1447	  1452
SIMPN1	  1512	  1513	  1539#
SINDEX	  7557	  7608	  7640	  7742	  7751	  7885	  7918	  8003	 10271	 10674#	 10674	 10695	 10706	 10732
	 10744	 10752	 10765	 10835
SKIPS	  4324	  4332	  4340	  4348	  4356	  4364	  4372	  4380	  4452	  4460	  4468	  4476	  4484	  4492
	  4500	  4508	  4580	  4588	  4596	  4604	  4612	  4620	  4628	  4636	  7467#	  7468	  8973	  9369 *** SEQ 0340
SKPFD	  4164	  4169	  4174	  4179	  4184	  4189	  4194	  4199	  4204	  4209	  4214	  4219	  4224	  4229
	  4234	  4239	  4256	  4264	  4272	  4280	  4288	  4296	  4304	  4312	  4320	  4328	  4336	  4344
	  4352	  4360	  4368	  4376	  4448	  4456	  4464	  4472	  4480	  4488	  4496	  4504	  4512	  4520
	  4528	  4536	  4544	  4552	  4560	  4568	  4576	  4584	  4592	  4600	  4608	  4616	  4624	  4632
	  8109#
SLASH	   633#
SLO	   904	   970#
SLO1	   983#	  1153
SLSHSP	  1242	  1297#	  1300	  1311	  1319
SMLUSR	   426#
SNGFL	    97#	   799
SNGL2	  1438	  1486	  1760#	  1760	  1772
SNGLIN	  1437	  1485	  1758#	  1758
SNTRP	   426#
SPACE	   622#	  1303	  1722	  1814
SRINST	  3377	  3381	  3943	  8115#
SRT1	  2834	  7704	 10268#
SRTAB	 10270	 10283#
SRTDDT	   133	   452#
SSHFT0	  3951	  3955	  3959	  7676#	  7677
SSHFT2	  3952	  3956	  3960	  7701#	  7702
ST1	  2811	  7464	  7476	  7497	  7620	  8248	  9320	  9336#	  9540	  9739	  9836	 10543	 11462
ST1A	  9330#	  9391
ST1B	  9331	  9393#
ST1C	  9363	  9473#
ST1D	  9379#	  9476
ST2	  2812	  9399#
ST2A	  9406	  9414#
ST2B	  9422	  9454#
ST2C	  9424	  9471#
ST3	  2813	  9431#
ST3A	  9334	  9432#
ST4	  2814	  9401	  9434#
ST4A	  9428	  9443#
ST5	  2815	  9445#	  9627	  9858	 10158
ST5A	  9333	  9451#	  9501	 10279
STAB	  1617	  2798#
STAB1	  1705	  2925#
START	   440	   775#
START1	   459#
START2	   460#
START3	   461#
START4	   462#
START5	   463#
STARTA	   455	   783	   790#
STARTB	   807#
STARTC	   808	   826#
STATE	  1593	  1603	  1609	  8505#	  8505	  8545	 10561	 10675
STATSV	  1594#	  1594	  1596
STINAC	  9393	  9402#	  9402	  9404#	  9404	 11157	 11290	 11305	 11324	 11415
STINH	  7935	  8116	  8227	  8301	  8314	  8330	  8920	  9319#	  9319	  9323#	  9323
STORE	  3190#	  3351	  3356	  3361	  3366	  3392	  3989	  4046	  7408	  7412	  8987	  8989	  9011	  9183
	  9243	  9273	  9296	  9315	  9389                                                                         *** SEQ 0341
STRP	   426#
SUBLNK	   194#	   456
SVAB	  1537#	  1537	  1638	  1640	  1708	  1710	  1879
SVAB1	  2121#	  2121	  2258	  2264
SVAB2	  2131#	  2131	  2278
SVAC	  1825#	  1825	  2220
SVAD	  1522#	  1522	  1648	  1650	  1871
SVADX	  1532#	  1532	  1713	  1715	  1867
SVAR	  1519#	  1519	  1653	  1655	  1866
SVARX	  1534#	  1534	  1718	  1720	  1876
SVBR	  1521#	  1521	  1671	  1673	  1870
SVFE	  1535#	  1535	  1686	  1688	  1877
SVFM	  1533#	  1533	  1666	  1668	  1868
SVINPC	   982#	   982
SVMA	  1525#	  1525	  1633	  1635	  1874
SVMB	  1523#	  1523	  1643	  1645	  1872
SVMQ	  1520#	  1520	  1676	  1678	  1869
SVPC	  1524#	  1524	  1628	  1630	  1873
SVPC1	  1812#	  1812	  2300
SVSA	  1536#	  1536	  1691	  1693	  1878
SVSC	  1526#	  1526	  1681	  1683	  1875
SWITCH	  1580#
SWTEXR	   471#
SX1	  1510	  1519#
SYSEXR	   444#
T	   112#	  1589	  1593	  1594	  1596	  1599	  1603	  1604	  1609	  1610	  1617	  1701	  1768	  1853
	  1854	  1861	  1958	  1959	  1960	  1961	  1992	  1993	  1994	  1996	  1997	  1998	  1999	  2004
	  2005	  2006	  2009	  2010	  2011	  2013	  2014	  2017	  2018	  2019	  2020	  2022	  2023	  2025
	  2026	  2027	  2030	  2032	  2033	  2034	  2037	  2038	  2039	  2042	  2043	  2044	  2046	  2047
	  2048	  2051	  2052	  2054	  2055	  2056	  2057	  2062	  2063	  2065	  2066	  2067	  2068	  2073
	  2075	  2077	  2078	  2080	  2081	  2082	  2085	  2086	  2098	  2099	  2101	  2102	  3150#	  7433
	  7435	  7445	  7463	  7475	  7495	  7505	  7506	  7507	  7515	  7517	  7553	  7568	  7569	  7571
	  7600	  7603	  7610	  7615	  7628	  7629	  7634	  7635	  7638	  7644	  7655	  7661	  7662	  7668
	  7671	  7698	  7727	  7735	  7746	  7753	  7757	  7782	  7829	  7831	  7860	  7870	  7871	  7879
	  7892	  7893	  7903	  8009	  8034	  8037	  8040	  8047	  8214	  8219	  8220	  8225	  8229	  8230
	  8296	  8300	  8506	  8509	  8532	  8533	  8541	  8542	  8570	  8571	  8575	  8580	  8582	  8595
	  8911	  8913	  8940	  8945	  8990	  9000	  9002	  9027	  9031	  9065	  9102	  9104	  9138	  9165
	  9168	  9179	  9181	  9205	  9207	  9222	  9237	  9247	  9248	  9276	  9277	  9288	  9338	  9342
	  9344	  9346	  9348	  9350	  9352	  9356	  9360	  9368	  9370	  9372	  9374	  9376	  9378	  9454
	  9455	  9475	  9487	  9503	  9510	  9517	  9519	  9520	  9525	  9535	  9546	  9547	  9550	  9554
	  9567	  9568	  9574	  9578	  9581	  9582	  9586	  9593	  9601	  9609	  9619	  9631	  9636	  9644
	  9645	  9654	  9698	  9735	  9742	  9747	  9775	  9811	  9815	  9818	  9839	  9847	  9848	  9863
	  9868	  9876	  9882	  9891	  9907	  9913	  9920	  9942	  9950	  9966	  9981	  9995	 10004	 10012
	 10021	 10030	 10038	 10042	 10045	 10050	 10062	 10067	 10074	 10081	 10085	 10089	 10096	 10101
	 10106	 10115	 10122	 10127	 10133	 10153	 10156	 10168	 10176	 10178	 10191	 10194	 10202	 10207
	 10221	 10237	 10239	 10243	 10246	 10251	 10258	 10259	 10265	 10280	 10298	 10301	 10306	 10309
	 10314	 10321	 10325	 10337	 10349	 10357	 10369	 10372	 10408	 10414	 10420	 10438	 10482	 10483
	 10488	 10500	 10503	 10508	 10511	 10519	 10523	 10526	 10531	 10536	 10540	 10556	 10592	 10595
	 10597	 10599	 10601	 10603	 10604	 10606	 10607	 10609	 10616	 10618	 10620	 10622	 10719	 10721
	 10723	 10725	 10727	 10830	 10831	 10833	 10836	 10838	 10840	 10846	 10871	 10872	 10873	 10882
	 10884	 10885	 10886	 10888	 10890	 10892	 10933	 10937	 10938
T.	  2070	  2700#
T1	   113#	  1590	  1614	  1617	  1619	  1700	  1705	  1767	  1960	  1962	  1964	  1966	  1968	  1970 *** SEQ 0342
	  1972	  1974	  1976	  1978	  1980	  1982	  1984	  2016	  3151#	  7448	  7449	  7451	  7454	  7460
	  7461	  7462	  7472	  7473	  7474	  7492	  7493	  7494	  7524	  7525	  7538	  7539	  7556	  7557
	  7573	  7574	  7639	  7640	  7647	  7648	  7656	  7657	  7787	  7788	  7878	  7886	  7887	  7942
	  7964	  7975	  7977	  7978	  8002	  8003	  8030	  8050	  8197	  8198	  8199	  8201	  8237	  8239
	  8242	  8243	  8244	  8343	  8344	  8529	  8530	  8531	  8536	  8538	  8539	  8540	  8555	  8557
	  8566	  8569	  8630	  8633	  8634	  8636	  8639	  8644	  8646	  8647	  8660	  8662	  8663	  8665
	  8675	  8676	  8677	  8686	  8688	  8689	  8690	  8691	  8693	  8695	  8696	  8699	  8700	  8701
	  8704	  8705	  8707	  8709	  8710	  8711	  8715	  8717	  8719	  8721	  8726	  8727	  8731	  8732
	  8733	  8736	  8738	  8740	  8741	  8742	  8743	  8753	  8761	  8765	  8770	  8772	  8775	  8776
	  8778	  8780	  8782	  8783	  8785	  8791	  8793	  8795	  8797	  8800	  8801	  8802	  8806	  8809
	  8816	  8818	  8823	  8829	  8880	  8885	  8890	  8894	  8899	  8909	  8910	  8914	  8915	  8916
	  8918	  8967	  8976	  8986	  8987	  8989	  8993	  8998	  9001	  9003	  9005	  9010	  9011	  9014
	  9015	  9019	  9021	  9023	  9025	  9028	  9030	  9034	  9038	  9040	  9041	  9043	  9044	  9046
	  9048	  9050	  9059	  9061	  9062	  9144	  9146	  9147	  9148	  9149	  9175	  9176	  9178	  9183
	  9196	  9212	  9232	  9233	  9235	  9239	  9241	  9243	  9250	  9266	  9267	  9268	  9269	  9276
	  9278	  9279	  9280	  9291	  9292	  9293	  9304	  9309	  9311	  9312	  9332	  9339	  9340	  9341
	  9343	  9345	  9347	  9349	  9351	  9353	  9357	  9361	  9362	  9364	  9365	  9366	  9367	  9369
	  9371	  9373	  9375	  9377	  9383	  9384	  9386	  9387	  9388	  9389	  9399	  9413	  9427	  9436
	  9437	  9438	  9440	  9441	  9473	  9474	  9494	  9495	  9496	  9498	  9499	  9507	  9508	  9526
	  9528	  9529	  9541	  9542	  9570	  9571	  9572	  9628	  9629	  9823	  9824	  9826	  9827	  9828
	  9859	  9860	  9861	  9922	  9923	  9926	  9943	  9945	  9959	  9960	  9992	  9993	  9994	 10039
	 10040	 10138	 10139	 10171	 10172	 10173	 10174	 10203	 10204	 10212	 10214	 10215	 10255	 10256
	 10257	 10269	 10270	 10307	 10308	 10322	 10323	 10324	 10353	 10360	 10361	 10363	 10364	 10365
	 10370	 10371	 10376	 10377	 10382	 10391	 10405	 10406	 10407	 10411	 10436	 10489	 10490	 10498
	 10499	 10513	 10514	 10547	 10549	 10550	 10559	 10560	 10563	 10568	 10569	 10572	 10574	 10576
	 10578	 10579	 10584	 10585	 10586	 10587	 10591	 10596	 10598	 10600	 10602	 10605	 10608	 10610
	 10629	 10634	 10636	 10638	 10646	 10657	 10671	 10688	 10698	 10703	 10709	 10718	 10729	 10739
	 10747	 10748	 10755	 10768	 10771	 10774	 10786	 10791	 10794	 10795	 10800	 10812	 10820	 10829
	 10842	 10843	 10844	 10845	 10851	 10853	 10855	 10861	 10874	 10875	 10896	 10897	 10898	 10899
	 10901	 10903	 10924	 10926	 10927	 10928	 11158	 11159	 11160	 11161	 11171	 11179	 11183	 11184
	 11185	 11186	 11187	 11188	 11191	 11194	 11195	 11196	 11197	 11199	 11200	 11204	 11209	 11218
	 11219	 11220	 11221	 11228	 11229	 11231	 11234	 11237	 11238	 11239	 11240	 11241	 11243	 11245
	 11246	 11247	 11249	 11250	 11251	 11253	 11254	 11255	 11256	 11264	 11266	 11267	 11274	 11275
	 11276	 11277	 11278	 11288	 11289	 11293	 11294	 11295	 11296	 11298	 11306	 11308	 11317	 11318
	 11323	 11325	 11336	 11337	 11339	 11340	 11343	 11344	 11362	 11363	 11366	 11367	 11368	 11373
	 11375	 11376	 11377	 11387	 11388	 11390	 11391	 11392	 11396	 11397	 11406	 11410	 11420	 11421
T2	   114#	  1591	  1699	  1766	  1998	  2001	  2005	  2013	  2026	  2033	  2038	  2043	  2056	  2067
	  2072	  2074	  2101	  2105	  2109	  2113	  2120	  2121	  2126	  2127	  2314	  2315	  2320	  3152#
	  7554	  7626	  7669	  7677	  7680	  7681	  7685	  7690	  7693	  7694	  7709	  7710	  7714	  7719
	  7725	  7728	  7729	  7733	  7740	  7748	  7772	  7783	  7845	  7847	  7851	  7853	  7864	  7869
	  7877	  7880	  7888	  7894	  7898	  7901	  7909	  7911	  7916	  7919	  7931	  7938	  7941	  7943
	  7951	  7960	  7963	  7968	  7974	  7976	  7982	  7984	  7985	  7987	  7989	  7996	  8008	  8016
	  8021	  8026	  8031	  8035	  8038	  8041	  8046	  8100	  8125	  8139	  8174	  8299	  8304	  8305
	  8311	  8320	  8322	  8328	  8337	  8507	  8537	  8543	  8546	  8567	  8568	  8631	  8632	  8635
	  8637	  8673	  8697	  8698	  8701	  8702	  8703	  8704	  8746	  8747	  8749	  8750	  8751	  8752
	  8753	  8756	  8757	  8758	  8759	  8761	  8762	  8763	  8764	  8765	  8767	  8798	  8800	  8803
	  8804	  8806	  8807	  8809	  8826	  8827	  8828	  8829	  8907	  8912	  9009	  9223	  9396	  9512
	  9513	  9521	  9534	  9569	  9588	  9589	  9592	  9606	  9611	  9613	  9621	  9623	  9635	  9641
	  9643	  9653	  9714	  9728	  9743	  9805	  9807	  9808	  9816	  9821	  9854	  9869	  9875	  9890
	  9895	  9908	  9914	  9919	  9939	  9946	  9947	  9951	  9956	  9958	  9975	  9978	 10011	 10020
	 10036	 10037	 10046	 10049	 10063	 10069	 10072	 10082	 10086	 10090	 10097	 10108	 10112	 10116
	 10123	 10128	 10134	 10142	 10152	 10162	 10170	 10175	 10179	 10195	 10213	 10220	 10222	 10225
	 10229	 10230	 10233	 10260	 10262	 10268	 10311	 10318	 10327	 10354	 10359	 10374	 10380	 10385 *** SEQ 0343
	 10388	 10401	 10403	 10412	 10431	 10485	 10561	 10562	 10626	 10628	 10633	 10639	 10642	 10643
	 10644	 10645	 10646	 10647	 10651	 10654	 10655	 10656	 10657	 10665	 10667	 10669	 10670	 10671
	 10672	 10675	 10676	 10677	 10678	 10679	 10680	 10683	 10684	 10685	 10687	 10688	 10689	 10692
	 10696	 10697	 10698	 10699	 10702	 10707	 10708	 10709	 10710	 10712	 10713	 10716	 10736	 10737
	 10738	 10739	 10740	 10743	 10744	 10745	 10753	 10754	 10755	 10756	 10758	 10759	 10762	 10766
	 10767	 10768	 10769	 10770	 10771	 10772	 10773	 10774	 10775	 10777	 10778	 10781	 10801	 10803
	 10814	 10815	 10817	 10819	 10820	 10823	 10824	 10825	 10826	 10849	 10850	 10851	 10852	 10853
	 10858	 10859	 10860	 10861	 10862	 10863	 10866	 10867	 10906	 10908	 10911	 10915	 10917	 10918
	 10921	 10923	 10934	 10939	 10940	 10943
T3	   115#	  1592	  1698	  1765	  2130	  2131	  2220	  2221	  2227	  2228	  2229	  2235	  2237	  2243
	  2245	  2251	  2253	  2264	  2266	  2272	  2278	  2279	  2282	  2288	  2290	  2292	  3153#	  7468
	  7702	  7703	  7708	  7717	  7721	  7884	  7885	  7917	  7918	  8640	  8641	  8642	  8643	  8645
	  8646	  8734	  8735	  8737	  8739	  8744	  8769	  8771	  8773	  8779	  8781	  8784	  8790	  8792
	  8794	  8796	  8799	  8804	  8805	  8808	  8810	  8812	  8814	  8819	  8848	  8849	  8850	  8852
	  8854	  8865	  8866	  8867	  8870	  8871	  8872	  8873	  8874	  8875	  8877	  8878	  8887	  8888
	  8889	  8890	  8891	  8892	  8893	  8894	  8895	  8896	  8898	  8899	  8903	  8905	  8906	  8943
	  8944	  8946	  8947	  8959	  8961	  8965	  8966	  8967	  8971	  8972	  8973	  8975	  8976	  8977
	  9079	  9119	  9120	  9122	  9124	  9127	  9128	  9130	  9131	  9132	  9135	  9136	  9226	  9227
	  9235	  9236	  9237	  9250	  9251	  9253	  9254	  9267	  9271	  9273	  9295	  9296	  9303	  9305
	  9306	  9308	  9310	  9313	  9314	  9315	  9317	  9325	  9402	  9405	  9406	  9407	  9408	  9409
	  9410	  9411	  9418	  9419	  9420	  9421	  9445	  9446	  9447	  9456	  9458	  9459	  9480	  9481
	  9670	  9671	  9672	  9680	  9681	  9682	  9736	  9737	  9744	  9745	  9746	  9812	  9813	  9814
	  9833	  9834	  9835	  9837	  9840	  9877	  9899	  9900	  9924	  9925	  9927	  9931	 10270	 10271
	 10272	 10273	 10274	 10291	 10292	 10293	 10294	 10295	 10339	 10341	 10345	 10346	 10404	 10405
	 10417	 10419	 10421	 10422	 10424	 10425	 10427	 10429	 10433	 10434	 10446	 10447	 10448	 10450
	 10454	 10458	 10459	 10463	 10464	 10564	 10565	 10627	 10628	 10629	 10648	 10649	 10650	 10661
	 10662	 10663	 10674	 10687	 10689	 10690	 10691	 10695	 10696	 10699	 10700	 10701	 10703	 10706
	 10707	 10710	 10711	 10713	 10714	 10715	 10732	 10738	 10740	 10741	 10742	 10746	 10747	 10752
	 10753	 10756	 10757	 10759	 10760	 10761	 10763	 10765	 10766	 10769	 10772	 10775	 10776	 10778
	 10779	 10780	 10782	 10785	 10787	 10789	 10799	 10804	 10806	 10808	 10810	 10835	 10852	 10862
	 10907	 10909	 10913	 11176	 11180	 11181	 11182	 11183	 11184	 11191	 11192	 11193	 11204	 11205
	 11206	 11209	 11210	 11211	 11212	 11213	 11214	 11217	 11218	 11219	 11226	 11227	 11228	 11229
	 11234	 11235	 11236	 11283	 11284	 11301	 11302	 11315	 11316	 11317	 11318	 11364	 11365	 11366
	 11367	 11368
TAB	   623#	  1622	  1817
TABLE	  3284#	  8965
TBLAD1	  1999	  2034	  2039	  2057	  2586#
TBLBOL	  2052	  2633#
TBLBYT	  2006	  2493#
TBLCM	  2048	  2618#
TBLCOM	  2044	  2601#
TBLFLT	  1994	  2476#
TBLH	  2063	  2668#
TBLMO	  2014	  2537#
TBLMOV	  2027	  2068	  2530#
TBLMUO	  2110	  2791#
TBLMUX	  2114	  2794#
TBLMV	  2020	  2509#
TBLNEW	  2102	  2753#
TBLTA	  2078	  2702#
TBLTA1	  2082	  2718#
TBLTB	  2086	  2727#
TBLUUO	  2106	  2788#                                                                                                *** SEQ 0344
TCONSX	  8107#
TEST	  6412	  6427	  6472	  6487	  6532	  6547	  6592	  6607	  6652	  6667	  6712	  6727	  6772	  6787
	  6832	  6847	  6892	  6907	  6952	  6967	  7012	  7027	  7072	  7087	  7132	  7147	  7192	  7207
	  7252	  7267	  7312	  7327	  7514#	  7515
TEST1	  6410	  6425	  6470	  6485	  6530	  6545	  6590	  6605	  6650	  6665	  6710	  6725	  6770	  6785
	  6830	  6845	  6890	  6905	  6950	  6965	  7010	  7025	  7070	  7085	  7130	  7145	  7190	  7205
	  7250	  7265	  7310	  7325	  7510#	  7511
TESTPC	   498#
TICKS	   501#	   771	  1217	  1348	  1387	  1404
TIMAC1	  1409#	  1409	  1413	  1415	  1419
TIMC1	 10909	 10914	 10918#
TIMCAL	  8579	 10906#
TIME	  8459	  8905#	  8905	  8906	  8915	  9227	  9407	  9411	 10459	 10918	 11158	 11179	 11241	 11275
	 11276	 11278	 11289	 11294	 11338	 11340	 11343	 11345	 11362	 11394	 11396	 11398	 11420
TIMFRC	  1394	  1405#	  1405	  1423
TN0	   426#	  3278#	  7534	  7540	  8616	  8927
TN1	   426#	  3279#	  7455	  7585	  7926	  8616	  8927	  9493	  9831	  9832	  9962	 10147	 10366
TNCLRI	  8338#	  8338	  8341	  8347	  9245	  9298
TOTALS	   160#	  1088
TRP3TP	   426#
TRPCSE	  8486	  8612#	  8612	  8614	  9141
TRPCYC	  8482	  8613	  8618	  8929#	  8929	  9194
TRPENB	   426#
TRPSAT	  8484	  8615	  8617	  8619	  9246#	  9246	  9249	  9299	 10149	 10165	 10492
TSTIMA	  1339	  1395	  1398#	  1400	  1424
TSTIMB	  1391	  1426#
TSTIMC	  1394#	  1428
TSTIME	  1351	  1386#	  1393	  1396	  1427
TSTIMR	   772#	   772	  1388	  1406
TSTTST	   869	   897#
TTNBRF	   681#
TTODD	  2076	  2085#
TTST	  8465#	  8465
TTSTA	  2079#	  2087
TTTST	  1967	  2070#
TTYFIL	   597#
TTYSPD	   598#
TXTINH	   171#
UFA2	  3422	  7955#	  7956
UOLIP	   426#	  3277#
UOUSR	   426#
UPRPC	  1579#	  1789
USER	   488#	   778	   804	  1157	  1176	  1182	  1212	  1328	  1362	  1506
USERF	   426#	  3274#	  7479	  8238	  9145	  9190	 10548
USR420	  9146	  9160#
USR427	  9161#	 10549
USR436	  9162#	  9192
USRASB	    78#	   478
USRCMP	   426#
USRCRF	   607#
USRLFF	   606#
USRPFW	   426#
UUO1	  7543#	  7544                                                                                                 *** SEQ 0345
UUODIS	   560#
UUOEXT	   516#
UUOF	  8183	  8341#
UUOFD	  8182#
UUORTN	   517#
UUOSKP	   514#
UUOTAB	  2105	  2109	  2458#
UUOTST	  1985	  2105#
VERTIM	  9226	 10917	 11277	 11453#
VIT	   851#	   905
VITEXT	   901#	   944
VM	   106#
VMEM	  1463#	  2279
WARN	 11194	 11237	 11432#
WARNDL	  3261#	 11196	 11239
WARNED	  8458	 11226#	 11226	 11238
WRCYC	 11366	 11447#
WRRST	  9412	 11358#
XASHC	   888	   927#
XCONVT	   856	   946#
XCT2	  4037	  7478#	  7479
XCTF	  1762	  8342#	  8342	  8346	  8463	  8908	 11327	 11331	 11379	 11383
XCTFD	  4035	  8164#
XCTFD1	  8165	  8177	  8346#
XCTPAC	  8922#	  8922	  8926	  8955	  8957
XCTPRD	  7486#	  7486	  8924	  8954
XCTPWR	  7484#	  7484	  8925	  8956
XDFAD	   930#	   949
XDFDV	   939#	   955	   963	   967
XDFMP	   936#	   953
XDFSB	   933#	   951
XFDVR	   898	   919#
XFMPR	   871	   921#
XFSBR	   867	   924#
XIMUL	   862	   876	   878	   894	   916#
XROTC	   913#	   947	   956	   958
$$MUUO	   712#
$$OUTE	   718#
$$TAX1	   730#
$$TAX2	   731#
$$TOGG	   724#
$$UUO	   701#
$ACC0	   539#
$BEND1	   509#
$BEND2	   510#
$CHRIN	   600#
$CRLF	   602#
$DEVCH	   426#
$DSKUP	   479#
$DVCH1	   426#
$DVOFF	   596#
$EMODE	   477#
$ENDFX	   746#	   747                                                                                                 *** SEQ 0346
$FFF	   604#
$IBUF	   652#
$INEXT	   654#
$INNM	   653#
$ITRHL	   520#	   810
$ITRX1	   521#
$LPAPE	 11474
$MMAP	   480#
$MODVL	   475#
$MODVU	   476#
$OBUF	   643#
$ONETM	   503#
$OUTEX	   645#
$OUTNM	   644#
$PAPER	   426
$PARER	   527#
$PNAME	   473#
$PSHER	   531#	  1057	  1440	  1488
$PVER	   474#
$RSRTX	   523#
$RSRTY	   524#
$SPAG1	   543#
$START	   440#
$SVAPR	   541#	  1194
$SVPAG	   542#
$SVPI	   540#	  1195
$SVUPC	   546#
$SVUUO	   545#
$TABF	   603#
$TTCHR	   599#
$TWCNT	   595#
$TYPNB	   601#
$UMODE	   478#
$UORTX	   518#
$USRHL	   522#
$UUOER	   519#	   560
$VTF	   605#
%ACTFL	   552#
%ACTUL	   553#
%COREC	   551#
%CORFL	   550#
%DISCR	   554#
%ERHI1	   693#
%ERHI2	   694#
%ERHI3	   695#
.FOO.	  3175#	  3175	  3177#	  3177	  3181#	  3181	  3190#	  3190	  3196#	  3196	  3198	  3198#	  3202#	  3202
	  3208	  3208#	  3213#	  3213	  3245#	  3245	  3246	  3246#	  3247	  3247#	  3250#	  3250	  3251	  3251#
	  3252	  3252#	  3253	  3253#	  3257	  3257#
.JB41	   426#
.JBAPR	   426#
.JBCNI	   426#
.JBDDT	   426#
.JBFF	   426#                                                                                                        *** SEQ 0347
.JBOPC	   426#
.JBREL	   426#
.JBREN	   426#
.JBSA	   426#
.JBSYM	   426#
.JBTPC	   426#
.JBUSY	   426#
.JBUUO	   426#
.JBVER	   426#
ASYM	  8094#	  8099	  8102	  8105	  8107	  8109	  8111	  8113	  8115	  8118	  8121	  8124	  8127	  8129
	  8132	  8135	  8138	  8141	  8143	  8146	  8149	  8152	  8155	  8158	  8161	  8164	  8167	  8169 *** SEQ 0348
	  8171	  8173	  8176	  8179	  8182	  8185	  8188
BITS	  3165#	  3174	  3176	  3179	  3188	  3195	  3197	  3201	  3207	  3212	  3244	  3245	  3246	  3249
	  3250	  3251	  3252	  3256
CFLUSH	   343#
CINVAL	   342#
CLOKOP	   337#
CMP	  4646#	  4666	  4667	  4668	  4669	  4670	  4671	  4672	  4680	  4681	  4682	  4683	  4684	  4685
	  4686	  4694	  4695	  4696	  4697	  4698	  4699	  4700	  4708	  4709	  4710	  4711	  4712	  4713
	  4714	  4722	  4723	  4724	  4725	  4726	  4727	  4728	  4736	  4737	  4738	  4739	  4740	  4741
	  4742	  4750	  4751	  4752	  4753	  4754	  4755	  4756	  4764	  4765	  4766	  4767	  4768	  4769
	  4770	  4778	  4779	  4780	  4781	  4782	  4783	  4784	  4792	  4793	  4794	  4795	  4796	  4797
	  4798	  4806	  4807	  4808	  4809	  4810	  4811	  4812	  4820	  4821	  4822	  4823	  4824	  4825
	  4826	  4834	  4835	  4836	  4837	  4838	  4839	  4840	  4848	  4849	  4850	  4851	  4852	  4853
	  4854	  4862	  4863	  4864	  4865	  4866	  4867	  4868	  4876	  4877	  4878	  4879	  4880	  4881
	  4882	  4890	  4891	  4892	  4893	  4894	  4895	  4896	  4904	  4905	  4906	  4907	  4908	  4909
	  4910	  4918	  4919	  4920	  4921	  4922	  4923	  4924	  4932	  4933	  4934	  4935	  4936	  4937
	  4938	  4946	  4947	  4948	  4949	  4950	  4951	  4952	  4960	  4961	  4962	  4963	  4964	  4965
	  4966	  4974	  4975	  4976	  4977	  4978	  4979	  4980	  4988	  4989	  4990	  4991	  4992	  4993
	  4994	  5002	  5003	  5004	  5005	  5006	  5007	  5008	  5016	  5017	  5018	  5019	  5020	  5021
	  5022	  5030	  5031	  5032	  5033	  5034	  5035	  5036	  5044	  5045	  5046	  5047	  5048	  5049
	  5050	  5058	  5059	  5060	  5061	  5062	  5063	  5064	  5072	  5073	  5074	  5075	  5076	  5077
	  5078	  5086	  5087	  5088	  5089	  5090	  5091	  5092	  5100	  5101	  5102	  5103	  5104	  5105
	  5106	  5114	  5115	  5116	  5117	  5118	  5119	  5120	  5128	  5129	  5130	  5131	  5132	  5133
	  5134	  5142	  5143	  5144	  5145	  5146	  5147	  5148	  5156	  5157	  5158	  5159	  5160	  5161
	  5162	  5170	  5171	  5172	  5173	  5174	  5175	  5176	  5184	  5185	  5186	  5187	  5188	  5189
	  5190	  5198	  5199	  5200	  5201	  5202	  5203	  5204	  5212	  5213	  5214	  5215	  5216	  5217
	  5218	  5226	  5227	  5228	  5229	  5230	  5231	  5232	  5240	  5241	  5242	  5243	  5244	  5245
	  5246	  5254	  5255	  5256	  5257	  5258	  5259	  5260	  5268	  5269	  5270	  5271	  5272	  5273
	  5274	  5282	  5283	  5284	  5285	  5286	  5287	  5288	  5296	  5297	  5298	  5299	  5300	  5301
	  5302	  5310	  5311	  5312	  5313	  5314	  5315	  5316	  5324	  5325	  5326	  5327	  5328	  5329
	  5330	  5338	  5339	  5340	  5341	  5342	  5343	  5344	  5352	  5353	  5354	  5355	  5356	  5357
	  5358	  5366	  5367	  5368	  5369	  5370	  5371	  5372	  5380	  5381	  5382	  5383	  5384	  5385
	  5386	  5394	  5395	  5396	  5397	  5398	  5399	  5400	  5408	  5409	  5410	  5411	  5412	  5413
	  5414	  5422	  5423	  5424	  5425	  5426	  5427	  5428	  5436	  5437	  5438	  5439	  5440	  5441
	  5442	  5450	  5451	  5452	  5453	  5454	  5455	  5456	  5464	  5465	  5466	  5467	  5468	  5469
	  5470	  5478	  5479	  5480	  5481	  5482	  5483	  5484	  5492	  5493	  5494	  5495	  5496	  5497
	  5498	  5506	  5507	  5508	  5509	  5510	  5511	  5512	  5520	  5521	  5522	  5523	  5524	  5525
	  5526	  5534	  5535	  5536	  5537	  5538	  5539	  5540	  5548	  5549	  5550	  5551	  5552	  5553
	  5554
CWRTBI	   344#
DROPDV	   304#	  1564
DSYM	  7428#	  7432	  7438	  7440	  7443	  7447	  7458	  7467	  7478	  7489	  7500	  7510	  7514	  7520
	  7523	  7529	  7532	  7537	  7543	  7547	  7551	  7565	  7570	  7577	  7581	  7589	  7596	  7607
	  7623	  7625	  7633	  7643	  7653	  7665	  7674	  7676	  7684	  7697	  7701	  7724	  7732	  7739
	  7745	  7756	  7760	  7764	  7767	  7771	  7778	  7781	  7786	  7792	  7796	  7799	  7822	  7828
	  7834	  7840	  7844	  7850	  7858	  7867	  7876	  7890	  7897	  7908	  7914	  7922	  7937	  7940
	  7947	  7955	  7958	  7967	  7972	  7981	  8007	  8014	  8020	  8025	  8033	  8045	  8081	  8084
	  8088
ENDUUO	   350#	   508
EOPUUO	   351#	   510
ERLOOP	   395#
ERLP1	   396#
ERLP2	   397#                                                                                                        *** SEQ 0349
ERRHLT	   239#	  1910	  1990
ERROR	   404#
ERROR1	   416#
ERUUO	   394#
FATAL	   238#
FRD36	   379#
FRD8	   380#
FREAD	   378#
FSELEC	   377#
GET	   222#	  1837
GO	   219#	  1442	  1490	  1539	  1600	  1605	  1629	  1634	  1639	  1644	  1649	  1654	  1667	  1672
	  1677	  1682	  1687	  1692	  1709	  1714	  1719	  1757	  1800	  1816	  1906	  2127	  2153	  2156
	  2157	  2160	  2161	  2164	  2165	  2166	  2169	  2170	  2173	  2174	  2177	  2178	  2179	  2182
	  2183	  2184	  2185	  2188	  2191	  2192	  2195	  2196	  2197	  2200	  2201	  2202	  2205	  2206
	  2209	  2210	  2213	  2214	  2215	  2218	  2236	  2244	  2252	  2265	  2281	  2309	  2320	  2321
HALT	   136	   137	   138	   224#	   529	  1197	 10473
INX	  2473#	  2476	  2478	  2480	  2482	  2484	  2486	  2488	  2490	  2493	  2495	  2497	  2499	  2501
	  2503	  2505	  2507	  2509	  2511	  2513	  2515	  2517	  2519	  2521	  2523	  2525	  2527	  2531
	  2533	  2535	  2537	  2539	  2541	  2543	  2545	  2547	  2549	  2552	  2554	  2556	  2558	  2560
	  2562	  2564	  2566	  2568	  2570	  2572	  2574	  2576	  2578	  2580	  2582	  2584	  2587	  2589
	  2591	  2594	  2596	  2598	  2601	  2603	  2605	  2607	  2609	  2611	  2613	  2615	  2619	  2621
	  2623	  2625	  2627	  2629	  2631	  2633	  2635	  2637	  2639	  2641	  2643	  2645	  2647	  2649
	  2651	  2653	  2655	  2657	  2659	  2661	  2663	  2666	  2668	  2670	  2672	  2674	  2676	  2678
	  2680	  2682	  2684	  2686	  2688	  2690	  2692	  2694	  2696	  2698	  2700	  2702	  2704	  2706
	  2708	  2710	  2712	  2714	  2716	  2719	  2721	  2723	  2727	  2729	  2731	  2733	  2735	  2737
	  2739	  2741	  2753	  2755	  2757	  2759	  2761	  2763	  2765	  2767	  2769	  2771	  2773	  2775
	  2777	  2779	  2781	  2783	  2788	  2791	  2794	  2925	  2927	  2929	  2931	  2933	  2935	  2937
	  2939	  2941	  2943	  2945	  2947	  2949	  2951	  2953	  2955	  2957	  2959	  2961	  2963	  2965
	  2967	  2969	  2971	  2973	  2975	  2977	  2979	  2981	  2983	  2985	  2987	  2989	  2991	  2993
	  2995	  2997	  2999	  3001	  3003	  3005	  3007	  3009	  3011	  3013	  3015	  3017	  3019	  3021
	  3023	  3025	  3027	  3029	  3031	  3033	  3035	  3037	  3039	  3041	  3043	  3045	  3047	  3049
	  3051	  3053	  3055	  3057	  3059	  3061	  3063	  3065	  3067	  3069	  3071	  3073	  3075	  3077
	  3079	  3081	  3083	  3085	  3087	  3089	  3091	  3093	  3095	  3097	  3099	  3101	  3103	  3105
	  3107	  3109	  3111	  3113	  3115
JEN	   226#	  1359
JRSTF	   225#	   994	  1047	  1347
MAPADR	   360#
MAPCNK	   361#
MAPMEM	   357#
MAPPNT	   363#
MAPSET	   362#
MEMSEG	   359#
MEMZRO	   358#
MODPCP	   370#
MODPCU	   369#
MTROP	   338#
NAME	     8#	    11
PBELL	   313#
PCRL	   307#
PCRL2	   311#
PCRL2F	   312#
PCRLF	   308#
PFORCE	   315#                                                                                                        *** SEQ 0350
PGMINT	   232#	   775
PJRST	   223#
PMSG	   317#
PMSGF	   320#
PNT1	   273#	  1239	  1241	  1289	  1310
PNT11	   287#
PNT11F	   288#
PNT1F	   274#
PNT2	   275#	  1318
PNT2F	   276#
PNT3	   277#	  1684	  1689	  1694
PNT3F	   278#
PNT4	   279#
PNT4F	   280#
PNT5	   281#
PNT5F	   282#
PNT6	   283#	  1631	  1636	  1641	  1711	  1813	  1836
PNT6F	   284#	  1902
PNT7	   285#
PNT7F	   286#
PNTA	   259#	  1236	  1269	  1276	  1304	  1315	  1378	  1454	  1498	  1621	  1623	  1661	  1664	  1696
	  1723	  1806	  1808	  1815	  1818	  1828	  1843	  1849	  1851	  1883	  1995	  2000	  2021	  2045
	  2053	  2061	  2064	  2071	  2079	  2304	  2343
PNTADF	   290#
PNTADR	   289#
PNTAF	   260#	  1181	  1412	  1418	  1422
PNTAL	   261#	  1211	  1224	  1228	  1264	  1272	  1284	  1293	  1299	  1321	  1369	  1374	  1472	  1728
	  1797	  1859	  1863	  1865	  2299	  2307	  2319	  2325	  2330	  2336	  2347	  2353
PNTALF	   262#	   786	  1403	  1571	  1895	  1900	  1905
PNTCHF	   272#
PNTCHR	   271#
PNTCI	   269#
PNTCIF	   270#
PNTCW	   305#
PNTCWF	   306#
PNTDCF	   298#	  1410	  1416	  1420
PNTDEC	   297#	  1371	  1799
PNTDS	   299#
PNTDSF	   300#
PNTHW	   293#	  1244	  1248	  1251	  1256	  1274	  1376	  2302	  2332	  2338	  2349	  2355
PNTHWF	   294#
PNTMGN	   384#	  1220
PNTMSF	   266#
PNTMSG	   265#
PNTNM	   301#	  1208
PNTOCF	   296#
PNTOCS	   295#	  1826	  1847	  1889
PNTOCT	   291#	  1646	  1651	  1656	  1669	  1674	  1679	  1716	  1721
PNTOTF	   292#
PNTSIX	   302#
PNTSXF	   303#
PSIXL	   263#
PSIXLF	   264#                                                                                                        *** SEQ 0351
PSIXM	   267#
PSIXMF	   268#
PSP	   309#
PSPF	   310#
PT	 10949#	 10951	 10952	 10953	 10954	 10955	 10956	 10957	 10959	 10961	 10964	 10965	 10966	 10968
	 10969	 10970	 10971	 10972	 10973	 10976	 10977	 10979	 10980	 10983	 10988	 10989	 10991	 10992
	 10993	 10995	 10999	 11000	 11002	 11003	 11004	 11005	 11006	 11011	 11012	 11013	 11014	 11015
	 11016	 11017	 11018	 11019	 11030	 11032	 11043	 11047	 11049	 11050	 11052	 11053	 11056	 11061
	 11062	 11064	 11065	 11073	 11074	 11076	 11077	 11078	 11085	 11086	 11088	 11097	 11098	 11100
	 11102	 11104	 11109	 11110	 11112	 11113	 11114	 11121	 11127	 11128	 11129	 11133	 11134	 11136
	 11137	 11138	 11139	 11146	 11147	 11149	 11150	 11151	 11152	 11153
PUT	   221#	  1058	  1834
REPTUO	   398#
RTN	   220#	   516	  1852	  2291	  2293	  2356
S	   150#	   152	   156	   185	   187	   196	   199	   214	   215	   217	   228	   230	   234	   236
	   241	   245	   390	   392	   426	   431	   437	   464	   466	   484	   486	   504	   506	   535
	   537	   555	   557	   575	   577	   585	   587	   608	   613	   639	   641	   648	   650	   656
	   658	   664	   666	   670	   672	   677	   679	   683	   685	   689	   691	   697	   699	   702
	   704	   708	   710	   714	   716	   720	   722	   726	   728	   733	   738	   742	   744
SIXBTZ	   326#
SWCHES	  3814#	  3825	  3831	  3837	  3843	  3849	  3855	  3861	  3867	  3883	  3890	  3897	  3904	  3911
	  3918	  3925	  3932
SWITCH	   332#	   777	   793	  1087	  1100	  1150	  1162	  1171	  1379	  1802	  2294
TTALTM	   254#	   984	  1035
TTICHR	   247#
TTICNV	   252#
TTIDEC	   251#
TTINO	   249#
TTIOCT	   250#	   787
TTIYES	   248#
TTLOOK	   253#
TTSIXB	   255#
TTYINP	   256#