Trailing-Edge
-
PDP-10 Archives
-
klad_sources
-
klad.sources/dskce.seq
There are no other files named dskce.seq in the archive.
;DSKCE
IDENTIFICATION
--------------
PRODUCT CODE: AH-E333A-DD
DIAGNOSTIC CODE: DSKCE
PRODUCT NAME: DSKCEA0 DECSYSTEM 2020 ADVANCED
INSTRUCTION DIAGNOSTIC (5)
VERSION: 0.1
DATE RELEASED: JUNE 1978
MAINTAINED BY: DIAGNOSTIC ENGINEERING
AUTHOR: JOHN R. KIRCHOFF
COPYRIGHT (C) 1978
DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASS.
THIS SOFTWARE IS FURNISHED UNDER A LICENSE FOR USE ONLY ON A
SINGLE COMPUTER SYSTEM AND MAY BE COPIED ONLY WITH THE INCLUSION
OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE, OR ANY OTHER
COPIES THEREOF, MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE
TO ANY OTHER PERSON EXCEPT FOR USE ON SUCH SYSTEM AND TO ONE WHO
AGREES TO THESE LICENSE TERMS. TITLE TO AND OWNERSHIP OF THE
SOFTWARE SHALL AT ALL TIMES REMAIN IN DIGITAL EQUIPMENT
CORPORATION.
THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT
NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL
EQUIPMENT CORPORATION.
DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY FOR THE
USE OR RELIABILITY OF ITS SOFTWARE IN EQUIPMENT WHICH IS NOT
SUPPLIED BY DIGITAL EQUIPMENT CORPORATION.
MAINDEC-10-DSKCE.TXT
PAGE 2 SEQ 0003
TABLE OF CONTENTS
-----------------
1.0 ABSTRACT
2.0 REQUIREMENTS
2.1 EQUIPMENT
2.2 STORAGE
2.3 PRELIMINARY PROGRAMS
3.0 PROGRAM PROCEDURES
3.1 LOADING PROCEDURE
3.2 STARTING PROCEDURE
3.3 OPERATING PROCEDURE
4.0 DATA SWITCH FUNCTIONS
5.0 ERRORS
6.0 ITERATION COUNTER
7.0 CYCLE TIME
8.0 OPERATIONAL VARIATIONS
9.0 MISCELLANEOUS
10.0 LISTING
MAINDEC-10-DSKCE.TXT
PAGE 3 SEQ 0004
1.0 ABSTRACT
THIS DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC IS THE
FIFTH IN A SERIES OF DECSYSTEM 2020 ADVANCED PROCESSOR
DIAGNOSTICS.
THE DIAGNOSTIC PERFORMS LOGIC TESTING OF THE PROCESSOR
AND MICRO-CODE DOUBLE PRECISION FLOATING POINT
INSTRUCTIONS: DFAD, DFSB, DFMP AND DFDV.
2.0 REQUIREMENTS
2.1 EQUIPMENT
A DECSYSTEM 2020 EQUIPPED WITH A MINIMUM OF 32K OF MEMORY
CONSOLE PROCESSOR
CONSOLE TELETYPE
LOAD DEVICE
2.2 STORAGE
THE PROGRAM RUNS WITHIN 32K OF MEMORY.
2.3 PRELIMINARY PROGRAMS
PREVIOUS PROCESSOR DIAGNOSTICS
3.0 PROGRAM PROCEDURES
3.1 LOADING PROCEDURE
****** NOTE ******
THIS DIAGNOSTIC REQUIRES THAT THE DECSYSTEM 2020 SUBROUTINE
PROGRAM BE RESIDENT IN THE DECSYSTEM 2020.
FOLLOW THE APPROPRIATE DIAGNOSTIC LOADING PROCEDURES.
MAINDEC-10-DSKCE.TXT
PAGE 4 SEQ 0005
3.2 STARTING PROCEDURE
A. SELECT OPERATIONAL CONSOLE DATA SWITCH SETTINGS (REFER TO
4.0 DATA SWITCH FUNCTIONS).
RUN UNDER "SMMON".
THE FOLLOWING QUESTIONS WILL BE ASKED TO
SELECT THE OPERATIONAL SWITCHES:
TELETYPE SWITCH CONTROL ? 0,S OR Y (CR) -
IF THE OPERATOR TYPES "Y", THE FOLLOWING QUESTIONS
ARE ASKED AND THE OPERATOR RESPONDS BY TYPING
THE ANSWER AS SIX OCTAL DIGITS REPRESENTING
THE DESIRED SWITCH SETTINGS.
SPECIFY LH SWITCHES IN OCTAL-
SPECIFY RH SWITCHES IN OCTAL-
IF THE OPERATOR TYPES "0", ZERO'S ARE USED FOR
THE SWITCH SETTINGS.
IF THE OPERATOR TYPES "S", PREVIOUSLY SET SWITCHES
ARE USED. THIS IS ONLY VALID UPON RESTARTING
OF AN INTERRUPTED PROGRAM.
MAINDEC-10-DSKCE.TXT
PAGE 5 SEQ 0006
3.3 OPERATING PROCEDURE
A. TO THROUGHLY TEST ALL HARDWARE, ALL TEST CONTROL DATA
SWITCHES SHOULD BE SET TO 0.
B. WHEN DEBUGGING HARDWARE, SET SWITCHES TO 0. ALLOW THE
TELETYPE TO PRINT THE ERROR MESSAGES. THIS ALLOWS THE
PROGRAM TO RUN A COMPLETE PASS AND THEN THE ERROR MESSAGES
MAY BE CORRELATED TO QUICKLY DIAGNOSE THE FAILURE. IF A
HARDWARE PROBLEM IS SUCH THAT THE ERROR MESSAGES, AFTER THE
FIRST ONE, HAVE NO MEANING (FIRST ERROR CAUSES ALL FOLLOWING
TESTS TO FAIL) SET THE LOOP ON ERROR SWITCH AND RESTART THE
TEST FROM THE BEGINNING. THE FIRST FAILURE WILL THEN CAUSE
THE PROGRAM TO ENTER A LOOP SUITABLE FOR SCOPING.
THE ERROR MESSAGE USED IN CONJUNCTION WITH THE LISTING AND
SCOPING IF NECESSARY SHOULD ALLOW THE FAILING CONPONENT
TO BE ISOLATED AND REPLACED AND/OR REPAIRED.
C. WHEN TAKING MARGINS, SET DATA SWITCHES 'NOPNT' AND 'DING'.
THIS WILL INHIBIT PRINTOUT BUT WILL ALLOW THE TELETYPE
BELL TO BE RUNG WHEN A ERROR OCCURS. IF THE MARGIN OBTAINED
IS UNACCEPTABLE, THE OPERATOR MAY REVERT TO STANDARD SWITCH
SETTINGS FOR DEBUGGING PURPOSES.
D. ERROR INFORMATION MAY BE OBTAINED QUICKLY BY PRINTING
ERRORS ON THE LINE PRINTER.
E. IN THE EVENT OF A PRINT ROUTINE FAILURE THE 'NOPNT' SWITCH
AND THE 'ERSTOP' SWITCH MAY BE SET TO INHIBIT PRINTOUT
BUT HALT THE PROGRAM POINTING TO THE ERROR.
MAINDEC-10-DSKCE.TXT
PAGE 6 SEQ 0007
4.0 DATA SWITCH FUNCTIONS
SWITCH STATE FUNCTION
------ ----- --------
0 ABORT 0 NORMAL OPERATION
1 ABORT AT END OF PASS
1 RSTART NOT USED
2 TOTALS NOT USED
3 NOPNT 0 NORMAL TYPEOUT
1 INHIBIT ALL PRINT/TYPEOUT
(EXCEPT FORCED)
4 PNTLPT 0 NORMAL OUTPUT TO TTY
1 PRINT ALL DATA ON LPT
(LOGICAL DEVICE, USER MODE)
5 DING 0 NO FUNCTION
1 RING TTY BELL ON ERROR
6 LOOPER 0 PROCEED TO NEXT TEST
1 ENTER SCOPE LOOP ON TEST ERROR
7 ERSTOP 0 NO FUNCTION
1 HALT ON TEST ERROR
8 PALERS 0 PRINT ONLY FIRST ERROR WHEN LOOPING
1 PRINT ALL ERRORS, EVEN IF SAME ERROR
9 RELIAB NOT USED
10 TXTINH 0 PRINT FULL ERROR MESSAGES.
1 INHIBIT COMMENT PORTION OF
ERROR MESSAGES.
11 INHPAG 0 ALLOW PAGING AND TRAP ENABLE
1 INHIBIT PAGING AND TRAPPING
12 MODDVC NOT USED
13 INHCSH 0 ALLOW CACHE USE
1 INHIBIT CACHE
MAINDEC-10-DSKCE.TXT
PAGE 7 SEQ 0008
5.0 ERRORS
ERRORS ARE PRINTED ON THE TTY OR LINE PRINTER. THE ERROR
PRINTOUT CONTAINS THE TEST TITLE, THE PC OF THE FAILURE, ERROR
NUMBER AND THE CONTENTS OF AN APPLICABLE AC.
THE PC VALUE IS USEFUL IN RELATING THE FAILURE TO THE LISTING.
THE ERROR NUMBER IS PROVIDED SUCH THAT AN ERROR DICTIONARY MAY
BE MADE AT SOME FUTURE DATE.
IF AN AUDIO INDICATION OF A CONTINUING ERROR IS DESIRED
THE 'DING' SWITCH MAY BE SET.
6.0 ITERATION COUNTER
THE ITERATION COUNT OF THE PROGRAM IS PRINTED BY THE
CONSOLE PROCESSOR.
7.0 CYCLE TIME
THE CYCLE TIME OF THE PROGRAM IS IN THE MILLISECOND RANGE AND
IS THEREFORE SUITABLE FOR TAKING MARGINS, VIBRATION TESTS,
ETC.
MAINDEC-10-DSKCE.TXT
PAGE 8 SEQ 0009
8.0 OPERATIONAL VARIATIONS
A. DIAGNOSTIC MONITOR
THE PROGRAM IS USABLE WITH THE DIAGNOSTIC MONITOR TO PROVIDE
RELIABILITY TESTS, ACCEPTANCE TESTS, AND/OR TO PROVIDE A
QUICK METHOD OF ISOLATION OF A FAULT TO A PARTICULAR AREA
OF THE PROCESSOR. CERTAIN PROCEDURES ARE USED WHEN THE
PROGRAM IS USED IN THIS MANNER. THEY ARE:
1. THE DIAGNOSTIC MONITOR TRANSFERS CONTROL TO THE PROGRAM
AND STARTS IT AT LOCATION 30002.
2. MONCTL - LOCATION 30043 IS USED AS THE DIAGNOSTIC MONITOR
CONTROL WORD.
LH = 0, STAND-ALONE OPERATION
-1, RUNNING UNDER DIAGNOSTIC MONITOR
RH = RIGHT HALF OF CONSOLE SWITCHES IF UNDER
DIAGNOSTIC MONITOR CONTROL.
B. USER MODE
TO OUTPUT THE PRINTED ERROR MESSAGES TO A USER SPECIFIED
DEVICE IN USER MODE, ASSIGN THE DESIRED OUTPUT DEVICE TO
DEVICE NAME 'DEV' AND SET SWITCH 'PNTLPT'. THE PHYSICAL
DEVICE USED CAN BE ANY DEVICE THAT CAN ACCEPT ASCII OUTPUT
FORMAT SUCH AS LPT, DSK, DTA, ETC. THE CORRESPONDING
OUTPUT FILE IS 'DSKCE.LPT'
EXAMPLE DEVICE ASSIGNMENT:
.ASSIGN DSK DEV
IN USER MODE THE PROGRAM WILL MAKE 1000(8) PASSES AND THEN
RETURN TO DIAMON COMMAND MODE.
MAINDEC-10-DSKCE.TXT
PAGE 9 SEQ 0010
8.0 OPERATIONAL VARIATIONS (CON'T)
THE OUTPUT FILE (IF USED) MAY THEN BE LISTED BY USING THE
NORMAL MONITOR COMMANDS (PRINT, LIST, TYPE, PIP, ETC.).
IF THE PROGRAM IS ABORTED BEFORE COMPLETION (BY ^C, ETC.) THE
OUTPUT FILE MAY BE CLOSED BY USING THE MONITOR 'REENTER'
COMMAND.
C. SYSTEM EXERCISER
START ADDRESS IS 30003. DATA SWITCHES ARE PRESTORED IN
'SWTEXR' LOC 30023.
9.0 MISCELLANEOUS
THE NON-EX-MEMORY AND PARITY STOP SWITCHES SHOULD BE RESET
(0). THESE ERRORS, ILLEGAL UUO'S AND OTHER ERRORS OF THIS
TYPE ARE HANDLED BY PRINTOUT ON THE TELETYPE.
10.0 LISTING
HISTORY FILE FOR DSKCE SEQ 0011
----------------------
---------------------------------------------------------------
CODE: MAINDEC-10-DSKCE
TITLE: DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC (5)
VERSION: 0.1
DATE: JUNE 1978
REASON: ORIGINAL RELEASE OF THIS PROGRAM FOR KS-10.
PREVIOUS MARCH RELEASE MODIFIED FOR TEST S73400 DUE TO
SPECIFICATION CHANGE ON LEAST SIGNIFICANT BIT FOR
DOUBLE FLOATING DIVIDE.
---------------------------------------------------------------
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 1
DSKCET MAC 21-Jun-78 09:35 CONSOLE DATA SWITCH ASSIGNMENTS, MARCH 1978 SEQ 0012
1 ;MAINDEC-10-DSKCE
2
3 000000 MCNVER=0
4 000001 DECVER=1
5
6 XLIST
7 LIST
8 LALL
9
10 NAME \MCNVER,\DECVER^
11
12 TITLE DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 ^
13
14 XALL
15
16 ;COPYRIGHT 1978
17 ;DIGITAL EQUIPMENT CORPORATION
18 ;MARLBORO, MASS. 01752
19
20 ;JOHN R. KIRCHOFF
21
22 000137 LOC 137
23 000137 000000 000001 MCNVER,,DECVER
24 NOSYM
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 2
DSKCET MAC 21-Jun-78 09:35 DIAGNOSTIC PARAMETERS SEQ 0013
25 SUBTTL DIAGNOSTIC PARAMETERS
26
27 ;OPERATOR DEFINITIONS
28
29 001000 000000 OPDEF ER1 [1B8]
30 002000 000000 OPDEF ER2 [2B8]
31 003000 000000 OPDEF ER3 [3B8]
32 004000 000000 OPDEF ER4 [4B8]
33 005000 000000 OPDEF ER5 [5B8]
34 006000 000000 OPDEF ER6 [6B8]
35 007000 000000 OPDEF ER7 [7B8]
36 010000 000000 OPDEF ER10 [10B8]
37 011000 000000 OPDEF ER11 [11B8]
38 012000 000000 OPDEF ER12 [12B8]
39 013000 000000 OPDEF ER13 [13B8]
40
41 037666 LUUO1==ERRMES
42 037666 LUUO2==ERRMES
43 037666 LUUO3==ERRMES
44 037666 LUUO4==ERRMES
45 037666 LUUO5==ERRMES
46 037666 LUUO6==ERRMES
47 037666 LUUO7==ERRMES
48 037666 LUUO10==ERRMES
49 037666 LUUO11==ERRMES
50 037666 LUUO12==ERRMES
51 037666 LUUO13==ERRMES
52
53 ;SUBROUTINE ASSEMBLY DEFINITIONS
54
55 000100 DEBUG=100
56 000001 EXCASB=1
57 000001 USRASB=1
58 000001 PGMEND=1
59 000001 ERDIAG=1
60 000001 EROLD=1
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 3
DSKCET MAC 21-Jun-78 09:35 DIAGNOSTIC PARAMETERS SEQ 0014
61 ;MACROS
62
63 DEFINE SAVEAC (A,B)<
64 MOVEI AC+2,.
65 MOVEM AC+2,TESTPC ;SETUP SUBTEST PC
66 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
67 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION>
68
69 ;BEGIN ASSEMBLY PARAMETERS
70
71 030000 SADR1=BEGIN
72 030076 SADR2=RESRT1
73 030600 SADR3=RENTR1
74 030007 SADR4=SRTDDT
75 030061 SADR5=$BEND2
76 030000 SADR6=BEGIN
77 254200 030000 SADR7=HALT BEGIN
78 254200 030000 SADR8=HALT BEGIN
79 254200 030000 SADR9=HALT BEGIN
80 254200 030000 SADR10=HALT BEGIN
81 254200 030000 SADR11=HALT BEGIN
82
83 000000 PAREA1=0
84 000000 PAREA2=0
85 446353 434500 PAREA3=SIXBIT/DSKCE/
86 546064 000000 PAREA4=SIXBIT/LPT/
87 000000 PAREA5=0
88 000000 PAREA6=0
89
90 000001 ITERAT=1
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 4
DSKCET MAC 21-Jun-78 09:35 DIAGNOSTIC PARAMETERS SEQ 0015
91 DEFINE DMVE (L,A,B,C,D) <
92 ;THIS MACRO TESTS THE DMOVE INSTRUCTION
93 ;FIRST, AC, AC+1 ARE PRELOADED WITH DATA OTHER THAN THE TEST WORDS.
94 ;THEN, THE DATA SPECIFIED BY [XWD A,B] AND [XWD C,D] IS MOVED
95 ;FROM MEMORY TO AC, AC+1 VIA THE DMOVE INSTRUCTION.
96 ;C(AC) AND C(AC+1) ARE THEN COMPARED WITH THE TEST WORDS
97 ;[XWD A,B] AND [XWD C,D], RESPECTIVELY. THE TEST PASSES IF THESE
98 ;COMPARISONS AGREE.
99
100 Q'L'0: MOVE AC+5,[XWD A,B] ;INITIALIZE TEST WORDS
101 MOVE AC+6,[XWD C,D] ;FOR COMPARISON
102 MOVE AC,[XWD 707070,707070]
103 MOVE AC+1,[XWD 070707,070707] ;INITIALIZE AC,AC+1
104 DMOVE AC,[XWD A,B ;*MOVE DOUBLE WORD A,B ; C,D
105 XWD C,D] ;FROM MEMORY TO AC, AC+1
106 CAME AC,<AC+5>&17 ;WAS AC LOADED CORRECTLY?
107 ER3 AC,L'1 ;FAIL IF CONTENTS(AC) NOT = A,B
108 CAME AC+1,<AC+6>&17 ;WAS AC+1 LOADED CORRECTLY?
109 ER4 AC+1,L'2 ;FAIL IF CONTENTS(AC+1) NOT = C,D
110 JUMPL SAC,Q'L'0 ;LOOP ON ERROR SWITCH>
111
112
113 DEFINE DMVE17 (L,T,A,B,C,D) <
114 ;THIS MACRO TESTS THE DMOVE INSTRUCTION
115 ;FIRST, AC, AC+1 ARE PRELOADED WITH DATA OTHER THAN THE TEST WORDS.
116 ;THEN, THE DATA SPECIFIED BY [XWD A,B] AND [XWD C,D] IS MOVED
117 ;FROM MEMORY TO AC, AC+1 VIA THE DMOVE INSTRUCTION.
118 ;C(AC) AND C(AC+1) ARE THEN COMPARED WITH THE TEST
119 ;WORDS [XWD A,B] AND [XWD C,D], RESPECTIVELY.
120 ;THE TEST PASSES IF THESE COMPARISONS AGREE.
121
122 Q'T'0: MOVEM AC,%SV17# ;SAVE AC17
123 Q'L'0: MOVE AC+5,[XWD A,B] ;INITIALIZE TEST WORDS
124 MOVE AC+6,[XWD C,D] ;FOR COMPARISON
125 MOVE AC,[XWD 707070,707070]
126 MOVE AC+1,[XWD 070707,070707] ;INITIALIZE AC,AC+1
127 DMOVE AC,[XWD A,B ;*MOVE DOUBLE WORD A,B ; C,D
128 XWD C,D] ;FROM MEMORY TO AC, AC+1
129 Q'T'3: CAMN AC,<AC+5>&17 ;WAS AC LOADED CORRECTLY?
130 JRST .+4 ;HERE IF NO ERROR
131 MOVEM AC,AC-1 ;STORE INCORRECT RESULTS
132 MOVE AC,%SV17 ;RESTORE P
133 ER3 AC-1,L'1 ;FAIL IF CONTENTS(AC) NOT = A,B
134 CAMN AC+1,<AC+6>&17 ;WAS AC+1 LOADED CORRECTLY?
135 JRST .+4 ;HERE IF NO ERROR
136 MOVEM AC+1,AC-1 ;STORE INCORRECT WORD
137 MOVE AC,%SV17 ;RESTORE P
138 ER4 AC-1,L'2
139 MOVE AC,%SV17 ;RESTORE AC UNCONDITIONALLY
140 JUMPL SAC,Q'T'0 ;LOOP ON ERROR SWITCH>
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 5
DSKCET MAC 21-Jun-78 09:35 DIAGNOSTIC PARAMETERS SEQ 0016
141 DEFINE DMVN (L,A,B,C,D) <
142 ;THIS MACRO TESTS THE DMOVN INSTRUCTION
143 ;FIRST, AC, AC+1 ARE PRELOADED WITH DATA OTHER THAN THE TEST WORDS.
144 ;THEN, THE NEGATIVE (TWOS COMPLEMENT) OF THE DATA SPECIFIED BY
145 ;[XWD A,B] AND [XWD C,D] IS MOVED FROM MEMORY TO AC, AC+1 VIA
146 ;THE DMOVN INSTRUCTION. C(AC) AND C(AC+1) ARE THEN COMPARED
147 ;WITH THE NEGATIVE (TWOS COMPLEMENT) OF THE TEST
148 ;WORDS [XWD A,B] AND [XWD C,D], RESPECTIVELY.
149 ;THE TEST PASSES IF THESE COMPARISONS AGREE.
150
151 Q'L'0: DMOVE AC,[XWD 707070,707070
152 XWD 070707,070707] ;INITIALIZE AC,AC+1
153 SETCM AC+5,[XWD A,B] ;INITIALIZE TEST WORDS FOR COMPARISON
154 IFIDN <C,D><0,0>,<
155 SETZ AC+6,
156 ADDI AC+5,1 >
157 IFIDN <C,D><400000,0>,<
158 SETZ AC+6,
159 ADDI AC+5,1 >
160 IFDIF <C,D><0,0>,<
161 IFDIF <C,D><400000,0>,<
162 MOVN AC+6,[XWD C,D]
163 TLZ AC+6,1B18 ;CLEAR SIGN BIT OF LOW ORDER WORD >>
164 DMOVN AC,[XWD A,B ;*MOVE NEGATIVE OF DOUBLE WORD A,B ;
165 XWD C,D] ;C,D FROM MEMORY TO AC, AC+1
166 CAME AC,<AC+5>&17 ;WAS AC LOADED CORRECTLY?
167 ER3 AC,L'1 ;FAIL IF CONTENTS(AC) NOT = COMPLEMENT OF A,B
168 CAME AC+1,<AC+6>&17 ;WAS AC+1 LOADED CORRECTLY?
169 ER4 AC+1,L'2 ;FAIL IF CONTENTS(AC+1) NOT = MINUS C,D
170 JUMPL SAC,Q'L'0 ;LOOP ON ERROR SWITCH>
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 6
DSKCET MAC 21-Jun-78 09:35 DIAGNOSTIC PARAMETERS SEQ 0017
171 DEFINE DMVN17 (L,A,B,C,D) <
172 ;THIS MACRO TESTS THE DMOVN INSTRUCTION
173 ;FIRST, AC, AC+1 ARE PRELOADED WITH DATA OTHER THAN THE TEST WORDS.
174 ;THEN, THE NEGATIVE (TWOS COMPLEMENT) OF THE DATA SPECIFIED BY
175 ;[XWD A,B] AND [XWD C,D] IS MOVED FROM MEMORY TO AC, AC+1 VIA
176 ;THE DMOVN INSTRUCTION. C(AC) AND C(AC+1) ARE THEN COMPARED
177 ;WITH THE NEGATIVE (TWOS COMPLEMENT) OF THE TEST
178 ;WORDS [XWD A,B] AND [XWD C,D], RESPECTIVELY.
179 ;THE TEST PASSES IF THESE COMPARISONS AGREE.
180
181 Q'L'0: MOVEM AC,%SV17 ;SAVE P
182 DMOVE AC,[XWD 707070,707070
183 XWD 070707,070707] ;INITIALIZE AC,AC+1
184 SETCM AC+5,[XWD A,B] ;INITIALIZE TEST WORDS FOR COMPARISON
185 IFIDN <C,D><0,0>,<
186 SETZ AC+6,
187 ADDI AC+5,1 >
188 IFIDN <C,D><400000,0>,<
189 SETZ AC+6,
190 ADDI AC+5,1 >
191 IFDIF <C,D><0,0>,<
192 IFDIF <C,D><400000,0>,<
193 MOVN AC+6,[XWD C,D]
194 TLZ AC+6,1B18 ;CLEAR SIGN BIT OF LOW ORDER WORD >>
195 DMOVN AC,[XWD A,B ;*MOVE NEGATIVE OF DOUBLE WORD A,B ;
196 XWD C,D] ;C,D FROM MEMORY TO AC, AC+1
197 CAMN AC,<AC+5>&17 ;WAS AC LOADED CORRECTLY?
198 JRST .+4 ;HERE IF TESTS OK
199 MOVEM AC,AC-1 ;SAVE BAD WORD
200 MOVE AC,%SV17 ;RESTORE P
201 ER3 AC-1,L'1 ;FAIL IF CONTENTS(AC) NOT = COMPLEMENT OF A,B
202 CAMN AC+1,<AC+6>&17 ;WAS AC+1 LOADED CORRECTLY?
203 JRST .+4 ;HERE IF TESTS OK
204 MOVEM AC,AC-1
205 MOVE AC,%SV17 ;RESTORE P
206 ER4 AC+1,L'2 ;FAIL IF CONTENTS(AC+1) NOT = MINUS C,D
207 MOVE AC,%SV17 ;RESTORE P UNCODITIONALLY
208 JUMPL SAC,Q'L'0 ;LOOP ON ERROR SWITCH>
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 7
DSKCET MAC 21-Jun-78 09:35 DIAGNOSTIC PARAMETERS SEQ 0018
209 DEFINE DMVNF (L,A,B,C,D,KSEF,KSUF,KLEF,KLUF) <
210 ;**KS10**
211 ;THIS MACRO VERIFIES THAT THE DMOVN INSTRUCTION DOES SET OVERFLOW
212 ;OR CARRY FLAGS ON THE KS10. FIRST, OVFL AND CRY0,1 FLAGS ARE CLEARED;
213 ;THEN,DMOVN IS EXECUTED. NEXT, OVFL AND CRY0,1 FLAGS ARE EXAMINED.
214 ;IF THE PROPER FLAGS ARE NOT SET, THE TEST FAILS.
215
216 ;**KL10**
217 ;THIS MACRO VERIFIES THAT THE DMOVN INSTRUCTION DOES SET OVERFLOW
218 ;OR CARRY FLAGS ON THE KL10. FIRST, OVFL AND CRY0,1 FLAGS ARE CLEARED;
219 ;THEN,DMOVN IS EXECUTED. NEXT, OVFL AND CRY0,1 FLAGS ARE EXAMINED.
220 ;IF THE PROPER FLAGS ARE NOT SET, THE TEST FAILS.
221
222 Q'L'0: JFCL 17,.+1 ;CLEAR OVFL AND CRY0,1 FLAGS
223 DMOVN AC+1,[XWD A,B ;*DMOVN TEST
224 XWD C,D]
225 JSP AC,.+1 ;READ FLAGS
226 Q'L'1: TLZ AC,027777 ;CLEAR EXTRA JUNK
227 TLNE AC,USERF ;IN USER MODE ?
228 JRST Q'L'4 ;YES
229 SKIPN SM10 ;KL10 ?
230 JRST Q'L'3 ;YES
231 ;KS10 EXEC MODE
232 CAME AC,[KSEF,,Q'L'1]
233 ER13 AC,L'1 ;FAIL IF FLAGS NOT SET
234 Q'L'2: JUMPL SAC,Q'L'0 ;LOOP ON ERROR SWITCH
235 JRST Q'L'6
236 ;KL10 EXEC MODE
237 Q'L'3: CAME AC,[KLEF,,Q'L'1]
238 ER13 AC,L'1 ;FAIL IF FLAGS NOT SET
239 JRST Q'L'2
240 ;KL10/KS10 USER MODE
241 Q'L'4: SKIPN SM10 ;KL10 ?
242 JRST Q'L'5 ;YES
243 ;KS10 USER MODE
244 CAME AC,[KSUF,,Q'L'1]
245 ER13 AC,L'1 ;FAIL IF FLAGS NOT SET
246 JRST Q'L'2
247 ;KL10 USER MODE
248 Q'L'5: CAME AC,[KLUF,,Q'L'1]
249 ER13 AC,L'1 ;FAIL IF FLAGS NOT SET
250 JRST Q'L'2
251
252 Q'L'6: JRST .+1>
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 8
DSKCET MAC 21-Jun-78 09:35 DIAGNOSTIC PARAMETERS SEQ 0019
253 DEFINE DMVM (L,A,B,C,D) <
254 ;THIS MACRO TESTS THE DMOVEM INSTRUCTION
255 ;FIRST, TSTWD, TSTWD+1 ARE PRELOADED WITH DATA OTHER THAN THE
256 ;TEST WORDS AND AC,AC+1 ARE LOADED WITH THE TEST WORDS.
257 ;THEN, THE DATA SPECIFIED BY [XWD A,B] AND [XWD C,D] IS MOVED
258 ;FROM AC, AC+1 TO MEMORY (TSTWD, TSTWD+1) VIA
259 ;THE DMOVEM INSTRUCTION. C(TSTWD) AND C(TSTWD+1) ARE THEN
260 ;COMPARED WITH THE TEST WORDS [XWD A,B] AND [XWD C,D], RESPECTIVELY.
261 ;THE TEST PASSES IF THESE COMPARISONS AGREE.
262
263 Q'L'0: DMOVE AC,[XWD 707070,707070
264 XWD 070707,070707] ;INITIALIZE TEST WORDS
265 MOVEM AC,TSTWD ;TSTWD, TSTWD+1 ARE IN MEMORY JUST
266 MOVEM AC+1,TSTWD+1 ;AFTER THE FINAL TEST OF THIS PROGRAM
267 DMOVE AC,[XWD A,B
268 XWD C,D] ;INITIALIZE AC,AC+1
269 DMOVEM AC,TSTWD ;*MOVE DOUBLE WORD FROM AC, AC+1
270 ;TO MEMORY (TSTWD, TSTWD+1)
271 DMOVE AC,TSTWD ;PUT RESULTS OF TEST IN AC,AC+1 FOR COMPARISON
272 CAME AC,[XWD A,B] ;WAS TSTWD LOADED CORRECTLY?
273 ER5 AC,L'1 ;FAIL IF CONTENTS(TSTWD) NOT = A,B
274 CAME AC+1,[XWD C,D] ;WAS TSTWD+1 LOADED CORRECTLY?
275 ER6 AC+1,L'2 ;FAIL IF CONTENTS(TSTWD+1) NOT = C,D
276 JUMPL SAC,Q'L'0 ;LOOP ON ERROR SWITCH>
277
278 DEFINE DMVNM (L,A,B,C,D) <
279 ;THIS MACRO TESTS THE DMOVNM INSTRUCTION
280 ;FIRST, TSTWD, TSTWD+1 ARE PRELOADED WITH DATA OTHER THAN THE
281 ;TEST WORDS AND AC, AC+1 ARE LOADED WITH THE TEST WORDS.
282 ;THEN, THE NEGATIVE (TWOS COMPLEMENT) OF THE DATA SPECIFIED BY
283 ;[XWD A,B] AND [XWD C,D] IS MOVED FROM AC, AC+1 TO MEMORY
284 ;(TSTWD, TSTWD+1) VIA THE DMOVNM INSTRUCTION.
285 ;C(TSTWD) AND C(TSTWD+1) ARE THEN COMPARED WITH THE
286 ;NEGATIVE (TWOS COMPLEMENT) OF THE TEST
287 ;WORDS [XWD A,B] AND [XWD C,D], RESPECTIVELY.
288 ;THE TEST PASSES IF THESE COMPARISONS AGREE.
289
290 Q'L'0: DMOVE AC,[XWD 707070,707070
291 XWD 070707,070707]
292 DMOVEM AC,TSTWD ;INITIALIZE TEST WORDS
293 DMOVE AC,[XWD A,B
294 XWD C,D] ;INITIALIZE AC,AC+1
295 DMOVN AC+5,[XWD A,B
296 XWD C,D] ;SET-UP TO CHECK RESULTS
297 DMOVNM AC,TSTWD ;*MOVE NEGATIVE OF DOUBLE WORD FROM AC, AC+1
298 ;TO MEMORY (TSTWD, TSTWD+1)
299 DMOVE AC,TSTWD ;PUT TEST RESULTS IN AC,AC+1
300 CAME AC,<AC+5>&17 ;WAS TSTWD LOADED CORRECTLY?
301 ER5 AC,L'1 ;FAIL IF CONTENTS(TSTWD) NOT = COMPLEMENT OF A,B
302 CAME AC+1,<AC+6>&17 ;WAS TSTWD+1 LOADED CORRECTLY?
303 ER6 AC+1,L'2 ;FAIL IF CONTENTS(TSTWD) NOT = MINUS C,D
304 JUMPL SAC,Q'L'0 ;LOOP ON ERROR SWITCH>
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 9
DSKCET MAC 21-Jun-78 09:35 DIAGNOSTIC PARAMETERS SEQ 0020
305 DEFINE DMVM17 (L,A,B,C,D) <
306 ;THIS MACRO TESTS THE DMOVEM INSTRUCTION
307 ;FIRST, TSTWD, TSTWD+1 ARE PRELOADED WITH DATA OTHER THAN THE
308 ;TEST WORDS AND AC,AC+1 ARE LOADED WITH THE TEST WORDS.
309 ;THEN, THE DATA SPECIFIED BY [XWD A,B] AND [XWD C,D] IS MOVED
310 ;FROM AC, AC+1 TO MEMORY (TSTWD, TSTWD+1) VIA THE DMOVEM INSTRUCTION.
311 ;C(TSTWD) AND C(TSTWD+1) ARE THEN COMPARED WITH THE TEST
312 ;WORDS [XWD A,B] AND [XWD C,D], RESPECTIVELY.
313 ;THE TEST PASSES IF THESE COMPARISONS AGREE.
314
315 Q'L'0: MOVEM AC,%SV17 ;SAVE AC17 CAUSE IT HAS PDP
316 DMOVE AC,[XWD 707070,707070
317 XWD 070707,070707] ;INITIALIZE TEST WORDS
318 MOVEM AC,TSTWD ;TSTWD, TSTWD+1 ARE IN MEMORY JUST
319 MOVEM AC+1,TSTWD+1 ;AFTER THE FINAL TEST OF THIS PROGRAM
320 DMOVE AC,[XWD A,B
321 XWD C,D] ;INITIALIZE AC,AC+1
322 DMOVEM AC,TSTWD ;*MOVE DOUBLE WORD FROM AC, AC+1
323 ;TO MEMORY (TSTWD, TSTWD+1)
324 DMOVE AC,TSTWD ;PUT RESULTS OF TEST IN AC,AC+1 FOR COMPARISON
325 CAMN AC,[XWD A,B] ;WAS TSTWD LOADED CORRECTLY?
326 JRST .+4 ;HERE IF TESTS OK
327 MOVEM AC,AC-1 ;SAVE BAD WORD
328 MOVE AC,%SV17 ;RESTORE P
329 ER5 AC-1,L'1 ;FAIL IF CONTENTS(TSTWD) NOT = A,B
330 CAMN AC+1,[XWD C,D] ;WAS TSTWD+1 LOADED CORRECTLY?
331 JRST .+4 ;HERE IF TESTS OK
332 MOVEM AC,AC-1 ;SAVE BAD WORD
333 MOVE AC,%SV17 ;RESTORE P
334 ER6 AC+1,L'2 ;FAIL IF CONTENTS(TSTWD+1) NOT = C,D
335 MOVE AC,%SV17 ;RESTORE AC UNCONDITIONALLY
336 JUMPL SAC,Q'L'0 ;LOOP ON ERROR SWITCH>
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 10
DSKCET MAC 21-Jun-78 09:35 DIAGNOSTIC PARAMETERS SEQ 0021
337 DEFINE DMVNM17 (L,A,B,C,D) <
338 ;THIS MACRO TESTS THE DMOVNM INSTRUCTION
339 ;FIRST, TSTWD, TSTWD+1 ARE PRELOADED WITH DATA OTHER THAN THE
340 ;TEST WORDS AND AC, AC+1 ARE LOADED WITH THE TEST WORDS.
341 ;THEN, THE NEGATIVE (TWOS COMPLEMENT) OF THE DATA SPECIFIED BY
342 ;[XWD A,B] AND [XWD C,D] IS MOVED FROM AC, AC+1 TO MEMORY
343 ;(TSTWD, TSTWD+1) VIA THE DMOVNM INSTRUCTION.
344 ;C(TSTWD) AND C(TSTWD+1) ARE THEN COMPARED WITH THE
345 ;NEGATIVE (TWOS COMPLEMENT) OF THE TEST
346 ;WORDS [XWD A,B] AND [XWD C,D], RESPECTIVELY.
347 ;THE TEST PASSES IF THESE COMPARISONS AGREE.
348
349 Q'L'0: DMOVE AC,[XWD 707070,707070
350 XWD 070707,070707]
351 DMOVEM AC,TSTWD ;INITIALIZE TEST WORDS
352 DMOVE AC,[XWD A,B
353 XWD C,D] ;INITIALIZE AC,AC+1
354 DMOVN AC+5,[XWD A,B
355 XWD C,D] ;SET-UP TO CHECK RESULTS
356 DMOVNM AC,TSTWD ;*MOVE NEGATIVE OF DOUBLE WORD FROM AC, AC+1
357 ;TO MEMORY (TSTWD, TSTWD+1)
358
359 DMOVE AC,TSTWD ;PUT TEST RESULTS IN AC,AC+1
360 CAMN AC,<AC+5>&17 ;WAS TSTWD LOADED CORRECTLY?
361 JRST .+4
362 MOVEM AC,AC-1 ;SAVE BAD WORD
363 MOVE AC,%SV17 ;RESTORE P
364 ER5 AC-1,L'1 ;FAIL IF CONTENTS(TSTWD) NOT = COMPLEMENT OF A,B
365 CAMN AC+1,<AC+6>&17 ;WAS TSTWD+1 LOADED CORRECTLY?
366 JRST .+4 ;HERE IF TESTS OK
367 MOVEM AC,AC-1 ;SAVE BAD WORD
368 MOVE AC,%SV17
369 ER6 AC+1,L'2 ;FAIL IF CONTENTS(TSTWD) NOT = MINUS C,D
370 MOVE AC,%SV17
371 JUMPL SAC,Q'L'0 ;LOOP ON ERROR SWITCH>
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 11
DSKCET MAC 21-Jun-78 09:35 DIAGNOSTIC PARAMETERS SEQ 0022
372 DEFINE DMVNMF (L,A,B,C,D,KSEF,KSUF,KLEF,KLUF) <
373 ;**KS10**
374 ;THIS MACRO VERIFIES THAT THE DMOVN INSTRUCTION DOES SET OVERFLOW
375 ;OR CARRY FLAGS ON THE KS10. FIRST, OVFL AND CRY0,1 FLAGS ARE CLEARED;
376 ;THEN,DMOVN IS EXECUTED. NEXT, OVFL AND CRY0,1 FLAGS ARE EXAMINED.
377 ;IF THE PROPER FLAGS ARE NOT SET, THE TEST FAILS.
378
379 ;**KL10**
380 ;THIS MACRO VERIFIES THAT THE DMOVN INSTRUCTION DOES SET OVERFLOW
381 ;OR CARRY FLAGS ON THE KL10. FIRST, OVFL AND CRY0,1 FLAGS ARE CLEARED;
382 ;THEN,DMOVN IS EXECUTED. NEXT, OVFL AND CRY0,1 FLAGS ARE EXAMINED.
383 ;IF THE PROPER FLAGS ARE NOT SET, THE TEST FAILS.
384
385 Q'L'0: JFCL 17,.+1 ;CLEAR OVFL AND CRY0,1 FLAGS
386 DMOVE AC,[XWD A,B
387 XWD C,D] ;SETUP INITIAL
388 DMOVNM AC,TSTWD ;*DMOVNM TEST
389 JSP AC,.+1 ;READ FLAGS
390 Q'L'1: TLZ AC,027777 ;CLEAR EXTRA JUNK
391 TLNE AC,USERF ;IN USER MODE ?
392 JRST Q'L'4 ;YES
393 SKIPN SM10 ;KL10 ?
394 JRST Q'L'3 ;YES
395 ;KS10 EXEC MODE
396 CAME AC,[KSEF,,Q'L'1]
397 ER13 AC,L'1 ;FAIL IF FLAGS NOT SET
398 Q'L'2: JUMPL SAC,Q'L'0 ;LOOP ON ERROR SWITCH
399 JRST Q'L'6
400 ;KL10 EXEC MODE
401 Q'L'3: CAME AC,[KLEF,,Q'L'1]
402 ER13 AC,L'1 ;FAIL IF FLAGS NOT SET
403 JRST Q'L'2
404 ;KL10/KS10 USER MODE
405 Q'L'4: SKIPN SM10 ;KL10 ?
406 JRST Q'L'5 ;YES
407 ;KS10 USER MODE
408 CAME AC,[KSUF,,Q'L'1]
409 ER13 AC,L'1 ;FAIL IF FLAGS NOT SET
410 JRST Q'L'2
411 ;KL10 USER MODE
412 Q'L'5: CAME AC,[KLUF,,Q'L'1]
413 ER13 AC,L'1 ;FAIL IF FLAGS NOT SET
414 JRST Q'L'2
415
416 Q'L'6: JRST .+1>
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 12
DSKCET MAC 21-Jun-78 09:35 DIAGNOSTIC PARAMETERS SEQ 0023
417 DEFINE DFA (T,A,B,C,D,E,F,G,H,I,M,K,L) <
418 R'T'00: DMOVE AC,[A,,B
419 C,,D]
420 DFAD AC,[E,,F
421 G,,H]
422 CAME AC,[I,,M]
423 ER3 AC,T'01
424 CAME AC+1,[K,,L]
425 ER4 AC+1,T'01
426 JUMPL AC+4,R'T'00 ;LOOP ON ERROR SWITCH>
427
428 DEFINE DFS (T,A,B,C,D,E,F,G,H,I,M,K,L) <
429 R'T'00: DMOVE AC,[A,,B
430 C,,D]
431 DFSB AC,[E,,F
432 G,,H]
433 CAME AC,[I,,M]
434 ER3 AC,T'01
435 CAME AC+1,[K,,L]
436 ER4 AC+1,T'01
437 JUMPL AC+4,R'T'00 ;LOOP ON ERROR SWITCH>
438
439 DEFINE DFM (T,A,B,C,D,E,F,G,H,I,M,K,L) <
440 R'T'00: DMOVE AC,[A,,B
441 C,,D]
442 DFMP AC,[E,,F
443 G,,H]
444 CAME AC,[I,,M]
445 ER3 AC,T'01
446 CAME AC+1,[K,,L]
447 ER4 AC+1,T'01
448 JUMPL AC+4,R'T'00 ;LOOP ON ERROR SWITCH>
449
450 DEFINE DFD (T,A,B,C,D,E,F,G,H,I,M,K,L) <
451 R'T'00: DMOVE AC,[A,,B
452 C,,D]
453 DFDV AC,[E,,F
454 G,,H]
455 CAME AC,[I,,M]
456 ER3 AC,T'01
457 CAME AC+1,[K,,L]
458 ER4 AC+1,T'01
459 JUMPL AC+4,R'T'00 ;LOOP ON ERROR SWITCH>
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 13
DSKCET MAC 21-Jun-78 09:35 DIAGNOSTIC PARAMETERS SEQ 0024
460 DEFINE DFARP (T,A,B,C,D,E,F,G,H,I,M,K,L) <
461 DMOVE AC,[A,,B
462 C,,D]
463 DFAD AC,[E,,F
464 G,,H]
465 CAME AC,[I,,M]
466 ER3 AC,T
467 CAME AC+1,[K,,L]
468 ER4 AC+1,T
469 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH>
470
471 DEFINE SDFA (T,A,B,C,D,E,F,G,H,I,M,K,L) <
472 S'T'00: DMOVE AC,[A,,B
473 C,,D]
474 DFAD AC,[E,,F
475 G,,H]
476 CAME AC,[I,,M]
477 ER3 AC,T'01
478 CAME AC+1,[K,,L]
479 ER4 AC+1,T'01
480 JUMPL AC+4,S'T'00 ;LOOP ON ERROR SWITCH>
481
482 DEFINE SDFS (T,A,B,C,D,E,F,G,H,I,M,K,L) <
483 S'T'00: DMOVE AC,[A,,B
484 C,,D]
485 DFSB AC,[E,,F
486 G,,H]
487 CAME AC,[I,,M]
488 ER3 AC,T'01
489 CAME AC+1,[K,,L]
490 ER4 AC+1,T'01
491 JUMPL AC+4,S'T'00 ;LOOP ON ERROR SWITCH>
492
493 DEFINE SDFM (T,A,B,C,D,E,F,G,H,I,M,K,L) <
494 S'T'00: DMOVE AC,[A,,B
495 C,,D]
496 DFMP AC,[E,,F
497 G,,H]
498 CAME AC,[I,,M]
499 ER3 AC,T'01
500 CAME AC+1,[K,,L]
501 ER4 AC+1,T'01
502 JUMPL AC+4,S'T'00 ;LOOP ON ERROR SWITCH>
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 14
DSKCET MAC 21-Jun-78 09:35 DIAGNOSTIC PARAMETERS SEQ 0025
503 DEFINE SDFMKL (T,A,B,C,D,E,F,G,H,I,M,K,L,KL1,KL2,KL3,KL4) <
504 S'T'00: DMOVE AC,[A,,B
505 C,,D]
506 DFMP AC,[E,,F
507 G,,H]
508 SKIPE KLFLG
509 JRST S'T'05
510 CAME AC,[I,,M]
511 ER3 AC,T'01
512 CAME AC+1,[K,,L]
513 ER4 AC+1,T'01
514 S'T'06: JUMPL AC+4,S'T'00 ;LOOP ON ERROR SWITCH
515 JRST S'T'07
516
517 S'T'05: CAME AC,[KL1,,KL2]
518 ER3 AC,T'01
519 CAME AC+1,[KL3,,KL4]
520 ER4 AC+1,T'01
521 JRST S'T'06
522
523 S'T'07: JRST .+1 >
524
525 DEFINE SDFD (T,A,B,C,D,E,F,G,H,I,M,K,L) <
526 S'T'00: DMOVE AC,[A,,B
527 C,,D]
528 DFDV AC,[E,,F
529 G,,H]
530 CAME AC,[I,,M]
531 ER3 AC,T'01
532 CAME AC+1,[K,,L]
533 ER4 AC+1,T'01
534 JUMPL AC+4,S'T'00 ;LOOP ON ERROR SWITCH>
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 15
DSKCET MAC 21-Jun-78 09:35 DIAGNOSTIC PARAMETERS SEQ 0026
535 DEFINE SDFDKL (T,A,B,C,D,E,F,G,H,I,M,K,L,KL1,KL2,KL3,KL4) <
536 S'T'00: DMOVE AC,[A,,B
537 C,,D]
538 DFDV AC,[E,,F
539 G,,H]
540 SKIPN SM10
541 JRST S'T'05
542 CAME AC,[I,,M]
543 ER3 AC,T'01
544 CAME AC+1,[K,,L]
545 ER4 AC+1,T'01
546 S'T'06: JUMPL AC+4,S'T'00 ;LOOP ON ERROR SWITCH
547 JRST S'T'07
548
549 S'T'05: CAME AC,[KL1,,KL2]
550 ER3 AC,T'01
551 CAME AC+1,[KL3,,KL4]
552 ER4 AC+1,T'01
553 JRST S'T'06
554
555 S'T'07: JRST .+1 >
556
557 DEFINE SDFARP (T,A,B,C,D,E,F,G,H,I,M,K,L) <
558 DMOVE AC,[A,,B
559 C,,D]
560 DFAD AC,[E,,F
561 G,,H]
562 CAME AC,[I,,M]
563 ER3 AC,T
564 CAME AC+1,[K,,L]
565 ER4 AC+1,T
566 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH>
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 1
PARAM KSM 28-Mar-78 16:27 CONSOLE DATA SWITCH ASSIGNMENTS, MARCH 1978 SEQ 0027
567 SUBTTL CONSOLE DATA SWITCH ASSIGNMENTS, MARCH 1978
568
569 DEFINE S,<;*********************************************************************>
570
571 S^;*********************************************************************^
572 ;*DATA SWITCHES
573 ;*LEFT HALF SWITCHES ARE PRE-ASSIGNED FOR SUBROUTINE PACKAGE USE
574 ;*AND CONTROL LOOPING, PRINTING (TTY OR OTHER DEVICE) AND MISC. FUNCTIONS
575 S^;*********************************************************************^
576
577 400000 ABORT== 400000 ;ABORT PROGRAM ON PASS COMPLETION
578 200000 RSTART==200000 ;RESTART TEST, PRINT TOTALS
579 100000 TOTALS==100000 ;PRINT TOTALS, CONTINUE
580
581 040000 NOPNT== 040000 ;INHIBIT ALL PRINT/TYPE OUT (EXCEPT FORCED)
582 020000 PNTLPT==020000 ;PRINT ALL DATA ON LPT (LOGICAL DEVICE, USER MODE)
583 010000 DING== 010000 ;RING BELL ON ERROR
584
585 004000 LOOPER==004000 ;ENTER EXERCISE/CHECK LOOP ON ERROR
586 002000 ERSTOP==002000 ;HALT ON TEST ERROR
587 001000 PALERS==001000 ;PRINT ALL ERRORS
588
589 000400 RELIAB==000400 ;RELIABILITY MODE
590 000200 TXTINH==000200 ;INHIBIT ERROR TEXT
591 000100 INHPAG==000100 ;INHIBIT PAGING
592
593 000040 MODDVC==000040 ;MODIFY DEVICE CODE
594 000020 INHCSH==000020 ;INHIBIT CACHE
595 000010 OPRSEL==000010 ;OPERATOR SELECTION
596
597 000004 CHAIN== 000004 ;CHAIN CONTROL SWITCH
598
599 ;SWITCH 16 RESERVED
600
601 ;SWITCH 17 RESERVED !!!
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 2
PARAM KSM 28-Mar-78 16:27 PROGRAM/SUBROUTINE PARAMETERS SEQ 0028
602 SUBTTL PROGRAM/SUBROUTINE PARAMETERS
603
604 S^;*********************************************************************^
605 ;*SPECIAL SUBPROGRAM LINKAGES
606 S^;*********************************************************************^
607
608 027772 FSELNK= 27772 ;FILE SELECT LINK
609 027773 FRDLNK= 27773 ;FILE READ LINK
610 027774 LDLNK= 27774 ;LOAD LINKAGE ADDRESS
611 027775 DDTLNK= 27775 ;DDT LINKAGE ADDRESS
612 027776 MODLNK= 27776 ;OPERATIONAL MODE CHECK LINKAGE ADDRESS
613 027777 SUBLNK= 27777 ;SUBROUTINE LINKAGE ADDRESS
614
615 S^;*********************************************************************^
616 ;*SPECIAL SUBROUTINE FATAL HALTS
617 ;*USED TO REPORT ERRORS THAT CAUSE THE SUBROUTINES TO BE UNUSABLE
618 S^;*********************************************************************^
619
620 ;ADDRESS TAG REASON
621 ;---------------------
622
623 ; 1010 NOEXEC ;PROGRAM NOT CODED FOR EXEC MODE OPERATION
624 ; 1011 PLERR ;FATAL PUSH LIST POINTER ERROR
625 ; 1012 PLERR1 ;INITIAL PUSH LIST POINTER ERROR
626 ; 1013 MUOERR ;MUUO WITH LUUO HANDLER WIPED OUT
627 ; 1014 SMBER ;KS-10 INTERRUPT WITHOUT DOORBELL
628 ; 1015 SMCER ;KS-10 CLOCK INTERRUPT WITHOUT FLAG SET
629 ; 1016 CPIERR ;CPU INITIALIZATION ERROR
630 ; 1017 EOPERR ;END OF PROGRAM ERROR
631 ; 1020 LUOERR ;INTERRUPT WITH LUUO HANDLER WIPED OUT
632
633 S^;*********************************************************************^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 3
PARAM KSM 28-Mar-78 16:27 PROGRAM/SUBROUTINE PARAMETERS SEQ 0029
634 S^;*********************************************************************^
635 ;OPERATOR DEFINITIONS (NON-UUO'S)
636 S^;*********************************************************************^
637
638 260740 000000 OPDEF GO [PUSHJ P,] ;SUBROUTINE CALL
639 263740 000000 OPDEF RTN [POPJ P,] ;SUBROUTINE RETURN
640 261740 000000 OPDEF PUT [PUSH P,] ;PUT DATA ON PUSH LIST
641 262740 000000 OPDEF GET [POP P,] ;GET DATA FROM PUSH LIST
642 254000 000000 OPDEF PJRST [JRST ] ;JRST TO ROUTINE THAT RTN'S
643 254200 000000 OPDEF HALT [JRST 4,] ;DEFINITION FOR DDT
644 254100 000000 OPDEF JRSTF [JRST 2,] ;DEFINITION FOR DDT
645 254500 000000 OPDEF JEN [JRST 12,] ;DEFINITION FOR DDT
646
647 S^;*********************************************************************^
648 ;*SUBROUTINE INITIALIZATION CALL
649 S^;*********************************************************************^
650
651 265000 030011 OPDEF PGMINT [JSP 0,SBINIT] ;SUBROUTINE INITIALIZATION
652
653 S^;*********************************************************************^
654 ;*HALTING UUO'S (A MORE GRACEFUL HALT THAN SIMPLY USING THE HALT INSTRUCTION).
655 S^;*********************************************************************^
656
657 037640 000004 OPDEF FATAL [37B8!15B12!4] ;FATAL PROGRAMMING HALT
658 037600 000004 OPDEF ERRHLT [37B8!14B12!4] ;PROGRAM ERROR HALT
659
660 S^;*********************************************************************^
661 ;*TERMINAL INPUT UUO'S
662 ;*ALWAYS COME FROM THE CONSOLE TERMINAL IN EXEC MODE OR THE
663 ;*CONTROLLING TERMINAL (REAL TERMINAL OR PTY) IN USER MODE.
664 S^;*********************************************************************^
665
666 037000 000003 OPDEF TTICHR [37B8!0B12!3] ;TTY, INPUT ANY CHARACTER
667 037040 000003 OPDEF TTIYES [37B8!1B12!3] ;TTY, NORMAL RETURN Y
668 037100 000003 OPDEF TTINO [37B8!2B12!3] ;TTY, NORMAL RETURN N
669 037140 000003 OPDEF TTIOCT [37B8!3B12!3] ;TTY, INPUT OCTAL WORD
670 037200 000003 OPDEF TTIDEC [37B8!4B12!3] ;TTY, INPUT DECIMAL WORD
671 037240 000003 OPDEF TTICNV [37B8!5B12!3] ;TTY, INPUT CONVERTABLE WORD
672 037300 000003 OPDEF TTLOOK [37B8!6B12!3] ;TTY, KEYBOARD CHECK
673 037340 000003 OPDEF TTALTM [37B8!7B12!3] ;TTY, ALT-MODE CHECK
674 037400 000003 OPDEF TTSIXB [37B8!10B12!3] ;TTY, INPUT SIXBIT WORD
675 037440 000003 OPDEF TTYINP [37B8!11B12!3] ;TTY, IMAGE MODE INPUT
676 037500 000003 OPDEF TTICLR [37B8!12B12!3] ;TTY, CLEAR INPUT
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 4
PARAM KSM 28-Mar-78 16:27 PROGRAM/SUBROUTINE PARAMETERS SEQ 0030
677 ;*TERMINAL OUTPUT UUO'S.
678
679 037000 000000 OPDEF PNTA [37B8!0B12!0] ;PRINT ASCII WORD
680 037000 000001 OPDEF PNTAF [37B8!0B12!1] ;PRINT ASCII WORD FORCED
681 037740 000000 OPDEF PNTAL [37B8!17B12!0] ;PRINT ASCIZ LINE
682 037740 000001 OPDEF PNTALF [37B8!17B12!1] ;PRINT ASCIZ LINE FORCED
683 037600 000003 OPDEF PSIXL [37B8!14B12!3] ;PRINT SIXBIT'Z LINE
684 037640 000003 OPDEF PSIXLF [37B8!15B12!3] ;PRINT SIXBIT'Z LINE FORCED
685 037000 000000 OPDEF PNTMSG [37B8!0B12!0] ;PRINT MESSAGE IMMEDIATE
686 037040 000000 OPDEF PNTMSF [37B8!1B12!0] ;PRINT MESSAGE IMMEDIATE FORCED
687 037100 000000 OPDEF PSIXM [37B8!2B12!0] ;PRINT SIXBIT'Z MSG IMMEDIATE
688 037200 000000 OPDEF PSIXMF [37B8!4B12!0] ;PRINT SIXBIT'Z MSG IMM FORCED
689 037000 000000 OPDEF PNTCI [37B8!0B12!0] ;PRINT CHARACTER IMMEDIATE
690 037040 000000 OPDEF PNTCIF [37B8!1B12!0] ;PRINT CHARACTER IMMEDIATE FORCED
691 037500 000000 OPDEF PNTCHR [37B8!12B12!0] ;PRINT CHARACTER
692 037500 000001 OPDEF PNTCHF [37B8!12B12!1] ;PRINT CHARACTER FORCED
693 037040 000000 OPDEF PNT1 [37B8!1B12!0] ;PRINT ONE OCTAL DIGIT
694 037040 000001 OPDEF PNT1F [37B8!1B12!1] ;PRINT 1 OCTAL DIGIT FORCED
695 037100 000000 OPDEF PNT2 [37B8!2B12!0] ;PRINT TWO OCTAL DIGITS
696 037100 000001 OPDEF PNT2F [37B8!2B12!1] ;PRINT 2 OCTAL DIGITS FORCED
697 037140 000000 OPDEF PNT3 [37B8!3B12!0] ;PRINT THREE OCTAL DIGITS
698 037140 000001 OPDEF PNT3F [37B8!3B12!1] ;PRINT THREE OCTAL DIGITS FORCED
699 037200 000000 OPDEF PNT4 [37B8!4B12!0] ;PRINT FOUR OCTAL DIGITS
700 037200 000001 OPDEF PNT4F [37B8!4B12!1] ;PRINT FOUR OCTAL DIGITS FORCED
701 037240 000000 OPDEF PNT5 [37B8!5B12!0] ;PRINT FIVE OCTAL DIGITS
702 037240 000001 OPDEF PNT5F [37B8!5B12!1] ;PRINT FIVE OCTAL DIGITS FORCED
703 037300 000000 OPDEF PNT6 [37B8!6B12!0] ;PRINT SIX OCTAL DIGITS
704 037300 000001 OPDEF PNT6F [37B8!6B12!1] ;PRINT SIX OCTAL DIGITS FORCED
705 037340 000000 OPDEF PNT7 [37B8!7B12!0] ;PRINT 7 OCTAL DIGITS
706 037340 000001 OPDEF PNT7F [37B8!7B12!1] ;PRINT 7 OCTAL DIGITS FORCED
707 037440 000000 OPDEF PNT11 [37B8!11B12!0] ;PRINT 11 OCTAL DIGITS
708 037440 000001 OPDEF PNT11F [37B8!11B12!1] ;PRINT 11 OCTAL DIGITS FORCED.
709 037400 000000 OPDEF PNTADR [37B8!10B12!0] ;PRINT PHYSICAL ADDRESS
710 037400 000001 OPDEF PNTADF [37B8!10B12!1] ;PRINT PHYSICAL ADDRESS FORCED
711 037600 000000 OPDEF PNTOCT [37B8!14B12!0] ;PRINT FULL WORD OCTAL
712 037600 000001 OPDEF PNTOTF [37B8!14B12!1] ;PRINT FULL WORD OCTAL FORCED
713 037540 000000 OPDEF PNTHW [37B8!13B12!0] ;PRINT OCTAL HALF WORDS, 6 SP 6
714 037540 000001 OPDEF PNTHWF [37B8!13B12!1] ;PRINT OCTAL HALF WORDS, 6 SP 6 FORCED
715 037700 000003 OPDEF PNTOCS [37B8!16B12!3] ;PRINT OCTAL, SUPPRESS LEADING 0'S
716 037740 000003 OPDEF PNTOCF [37B8!17B12!3] ;PRINT OCTAL, SUPPRESS LEADING 0'S FORCED
717 037640 000000 OPDEF PNTDEC [37B8!15B12!0] ;PRINT DECIMAL, SUPRESS LEADING 0'S
718 037640 000001 OPDEF PNTDCF [37B8!15B12!1] ;PRINT DECIMAL, SUPRESS LEADING 0'S FORCED
719 037700 000000 OPDEF PNTDS [37B8!16B12!0] ;PRINT DECIMAL, SPACES FOR LD 0'S
720 037700 000001 OPDEF PNTDSF [37B8!16B12!1] ;PRINT DECIMAL, SPACES FOR LD 0'S FORCED
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 5
PARAM KSM 28-Mar-78 16:27 PROGRAM/SUBROUTINE PARAMETERS SEQ 0031
721 037200 000002 OPDEF PNTNM [37B8!4B12!2] ;PRINT PROGRAM NAME
722 037000 000002 OPDEF PNTSIX [37B8!0B12!2] ;PRINT SIXBIT WORD
723 037040 000002 OPDEF PNTSXF [37B8!1B12!2] ;PRINT SIXBIT WORD FORCED
724 037240 000002 OPDEF DROPDV [37B8!5B12!2] ;CLOSE LOGICAL FILE, USER MODE
725 037100 000002 OPDEF PNTCW [37B8!2B12!2] ;PRINT DF10 CONTROL WORD
726 037140 000002 OPDEF PNTCWF [37B8!3B12!2] ;PRINT DF10 CONTROL WORD FORCED
727 037000 030242 OPDEF PCRL [37B8!0B12!CRLF] ;PRINT CARRIAGE RETURN/LINE FEED
728 037040 030242 OPDEF PCRLF [37B8!1B12!CRLF] ;PRINT CARRIAGE RETURN/LINE FEED FORCED
729 037000 000040 OPDEF PSP [37B8!0B12!40] ;PRINT SPACE
730 037040 000040 OPDEF PSPF [37B8!1B12!40] ;PRINT SPACE FORCED
731 037000 030243 OPDEF PCRL2 [37B8!0B12!CRLF2] ;PRINT CARRIAGE RETURN/LINE FEED (TWICE)
732 037040 030243 OPDEF PCRL2F [37B8!1B12!CRLF2] ;PRINT CARRIAGE RETURN/LINE FEED (TWICE) FORCED
733 037040 000007 OPDEF PBELL [37B8!1B12!7] ;PRINT TTY BELL
734
735 037040 000026 OPDEF PFORCE [37B8!1B12!26] ;PRINT FORCE, CONTROL O OVERRIDE
736
737 DEFINE PMSG (ARG),<
738 PSIXM [SIXBIT\ARG'_\]>
739
740 DEFINE PMSGF (ARG),<
741 PSIXMF [SIXBIT\ARG'_\]>
742
743 ;*SIXBTZ -- MACRO TO GENERATE SIXBIT DATA FOR PRINTING
744 ;* CONSERVES CORE OVER ASCIZ
745
746 DEFINE SIXBTZ (ARG),< [SIXBIT\ARG'_\]>
747
748 ;*CONSOLE SWITCH INPUT UUO.
749 ;*READS CONSOLE SWITCHES IF IN EXEC MODE OR ASKS FOR THEM IF
750 ;* USER MODE.
751
752 037400 000002 OPDEF SWITCH [37B8!10B12!2] ;INPUT CONSOLE SWITCHES
753
754 ;*CLOCK INITIALIZATION UUO - TO SET DESIRED CLOCK OPERATION
755 ;*EITHER IGNORE CLOCK, ONLY LET IT TICK OR CAUSE INTERRUPT TO OCCUR.
756
757 037540 000004 OPDEF CLOKOP [37B8!13B12!4] ;CLOCK OPERATION UUO - CLOCK
758 037200 000004 OPDEF MTROP [37B8!4B12!4] ;CLOCK OPERATION UUO - METER
759
760 ;*KS-10 CACHE OPERATION UUO'S
761
762 037040 000004 OPDEF CINVAL [37B8!1B12!4] ;CACHE INVALIDATE
763 037100 000004 OPDEF CFLUSH [37B8!2B12!4] ;CACHE FLUSH
764 037140 000004 OPDEF CWRTBI [37B8!3B12!4] ;CACHE WRITE-BACK & INVALIDATE
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 6
PARAM KSM 28-Mar-78 16:27 PROGRAM/SUBROUTINE PARAMETERS SEQ 0032
765 ;*END OF PASS/PROGRAM UUOS
766
767 ;PERFORMS THE END OF PASS FUNCTIONS. INCREMENT PASS COUNT,
768 ;*DECREMENT ITERATION COUNT, CHECK IF FINISHED WITH THIS PROGRAM ETC.
769
770 037500 000004 OPDEF ENDUUO [37B8!12B12!4] ;UUO TO DISPLAY LIGHTS
771 037700 000004 OPDEF EOPUUO [37B8!16B12!4] ;END OF PROGRAM UUO
772
773 ;*MEMORY MANAGEMENT UUO'S
774 ;*UUO'S TO PERFORM VARIOUS MEMORY FUNCTIONS. MAPPING, ZEROING, PAGING,
775 ;*ADDRESS CONVERSION, ETC...
776
777 037000 000004 OPDEF MAPMEM [37B8!0B12!4] ;MAP MEMORY
778 037500 000002 OPDEF MEMZRO [37B8!12B12!2] ;ZERO MEMORY
779 037440 000002 OPDEF MEMSEG [37B8!11B12!2] ;SETUP MEMORY SEGMENT
780 037540 000002 OPDEF MAPADR [37B8!13B12!2] ;VIRTUAL TO PHYSICAL ADR CONVERT
781 037640 000002 OPDEF MAPCNK [37B8!15B12!2] ;MAP MEMORY CHUNK
782 037600 000002 OPDEF MAPSET [37B8!14B12!2] ;SET KI10 EXEC PAGE MAP
783 037740 000002 OPDEF MAPPNT [37B8!17B12!2] ;PRINT MEMORY MAP
784
785 ;*DEVICE CODE MODIFICATION UUO
786 ;*ALLOWS THE MODIFICATION OF IOT'S TO ONE DEVICE TO BE CHANGED TO
787 ;*IOT'S TO A DIFFERENT DEVICE CODE.
788
789 037340 000002 OPDEF MODPCU [37B8!7B12!2] ;MODIFY PERHIPERAL CODE, USER
790 037300 000002 OPDEF MODPCP [37B8!6B12!2] ;MODIFY PERHIPERAL CODE, PROGRAM
791
792 030000 IFNDEF MODDVL,<MODDVL==BEGIN>
793 030000 IFNDEF MODDVU,<MODDVU==BEGIN>
794
795 ;*"DIAMON" FILE SELECTION AND READ UUOS
796
797 037240 000004 OPDEF FSELECT [37B8!5B12!4] ;FILE SELECTION
798 037300 000004 OPDEF FREAD [37B8!6B12!4] ;FILE READ - ASCII DATA
799 037340 000004 OPDEF FRD36 [37B8!7B12!4] ;FILE READ - 36 BIT DATA
800 037400 000004 OPDEF FRD8 [37B8!10B12!4] ;FILE READ - 8 BIT DATA
801
802 XLIST
803 LIST
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 1
FIXED KSM 28-Mar-78 16:28 *FIXED* FIXED CONTROL AND DISPATCH STORAGE, MARCH 1978 SEQ 0033
804 SUBTTL *FIXED* FIXED CONTROL AND DISPATCH STORAGE, MARCH 1978
805
806 030000 LOC 30000
807
808 S^;*********************************************************************^
809 ;*PROGRAM STARTING ADDRESSES
810 ;*THESE ADDRESSES CALL VARIOUS SPECIAL START ROUTINES AND OR OPTIONS
811 ;*NORMAL START ADDRESS IS 30000 ALL OTHERS ARE SPECIAL. INVOKED BECAUSE
812 ;*OF END OF PASS, POWER FAILURE, DDT START, RE-ENTERING(TYPICALLY USER
813 ;*MODE), OR ANY NUMBER OF SPECIAL FEATURE TESTS.
814 S^;*********************************************************************^
815
816 030000 254 00 1 00 027776 BEGIN: JRST @MODLNK ;STAND-ALONE START
817 030001 254 00 0 00 030617 $START: JRST START ;MODE CHECK STARTING ADDRESS
818
819 030002 254 00 1 00 027774 DIAGMN: JRST @LDLNK ;DIAGNOSTIC MONITOR START
820
821 030003 254 00 1 00 027774 SYSEXR: JRST @LDLNK ;SYSTEM EXERCISER START
822
823 030004 254 00 0 00 030000 SFSTRT: JRST SADR1 ;SPECIAL FEATURE START
824
825 030005 254 00 0 00 030076 PFSTRT: JRST SADR2 ;POWER FAIL RESTART
826
827 030006 254 00 0 00 030600 REENTR: JRST SADR3 ;REENTER START(USUALLY USER MODE ONLY)
828
829 030007 SRTDDT: ;COMMONLY MISTAKEN NAME FOR "DDTSRT"
830 030007 254 00 1 00 027775 DDTSRT: JRST @DDTLNK ;DDT START
831
832 030010 254 00 0 00 030622 BEGIN1: JRST STARTA ;LOOP START(END OF PASS COMES HERE)
833 030011 254 00 1 00 027777 SBINIT: JRST @SUBLNK ;PMGINT LINKAGE
834 030012 000000 000000 RETURN: 0 ;RETURN ADDRESS STORAGE
835
836 030013 254200 030000 START1: SADR7 ;OPTIONAL STARTING ADR/INSTRUCTIONS
837 030014 254200 030000 START2: SADR8 ; "
838 030015 254200 030000 START3: SADR9 ; "
839 030016 254200 030000 START4: SADR10 ; "
840 030017 254200 030000 START5: SADR11 ; "
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 2
FIXED KSM 28-Mar-78 16:28 *FIXED* FIXED CONTROL AND DISPATCH STORAGE, MARCH 1978 SEQ 0034
841 S^;*********************************************************************^
842 ;*PROGRAM FIXED PARAMETER AREA
843 S^;*********************************************************************^
844
845 030020 446353 434500 PNTNAM: PAREA3 ;SIXBIT PROGRAM NAME
846 030021 546064 000000 PNTEXT: PAREA4 ;SIXBIT PROGRAM EXTENSION
847 030022 000000 000000 RANDBS: PAREA1 ;RANDOM BASE NUMBER
848 030023 000000 000000 SWTEXR: PAREA2 ;SYSTEM EXERCISER SWITCHES
849 030024 000000 000001 ITRCNT: ITERAT ;PROGRAM ITERATIONS
850 030025 000000 030602 $PNAME: PGMNAM ;POINTER TO PROGRAMS NAME
851 030026 000000 000001 $PVER: MCNVER,,DECVER ;MCN & DEC VERSION LEVEL
852 030027 000000 030000 $MODVL: MODDVL ;DEVICE CODE CHANGE LOWER LIMIT
853 030030 000000 030000 $MODVU: MODDVU ;DEVICE CODE CHANGE UPPER LIMIT
854 030031 777777 777777 $EMODE: IFNDEF EXCASB,<0> IFDEF EXCASB,<-1> ;EXEC ALLOWED
855 030032 777777 777777 $UMODE: IFNDEF USRASB,<0> IFDEF USRASB,<-1> ;USER ALLOWED
856 030033 000000 000000 $DSKUP: IFNDEF DSKUPD,<0> IFDEF DSKUPD,<-1> ;DISK UPDATE MODE
857 030034 000000 000000 $MMAP: IFNDEF MEMMAP,<0> IFDEF MEMMAP,<-1> ;ALLOW MEMORY RTNS
858 030035 000000 000000 PAREA7: PAREA5 ;OPTIONAL PARAMETER
859 030036 000000 000000 PAREA8: PAREA6 ;OPTIONAL PARAMETER
860
861 S^;*********************************************************************^
862 ;*PROGRAM VARIABLE PARAMETER AREA
863 S^;*********************************************************************^
864
865 030037 000000 000000 USER: 0 ; 0 = EXEC, -1 = USER MODE FLAG
866 030040 000000 000000 KAIFLG: 0 ;PROCESSOR TYPE, 0 = KA10, -1 = KI10
867 030041 000000 000000 KLFLG: 0 ;PROCESSOR TYPE, 0 = KA/KI, -1 = KL10
868 030042 777777 777777 MONFLG: -1 ;DIAG MONITOR SPECIAL USER FLAG
869 030043 000000 000000 MONCTL: 0 ;DIAG MON/SYS EXR FLAG
870 030044 000000 000000 MONTEN: 0 ;-1= LOADED BY 10
871 030045 000000 000000 CLOCKF: 0 ;CLOCK TICKED FLAG
872 030046 000000 000000 CONSW: 0 ;CONSOLE SWITCH SETTINGS
873 030047 000000 000000 PASCNT: 0 ;PROGRAM PASS COUNT
874 030050 000000 000000 RUNFLG: 0 ;PROGRAM RUN FLAG
875 030051 000000 000000 TESTPC: 0 ;SUBTEST PC
876 030052 000000 000000 ERRPC: 0 ;ERROR PC
877 030053 000000 000000 ERRTLS: 0 ;ERROR TOTALS
878 030054 000000 000000 TICKS: 0 ;PROGRAM RUNNING TIME
879 030055 000000 000000 MARGIN: 0 ;KI10 MARGIN WORD VALUE
880 030056 000000 000000 $ONETM: 0 ;SUBROUTINE INITIALIZATION FLAG
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 3
FIXED KSM 28-Mar-78 16:28 *FIXED* FIXED CONTROL AND DISPATCH STORAGE, MARCH 1978 SEQ 0035
881 S^;*********************************************************************^
882 ;*SPECIAL PROGRAM DISPATCH ADDRESSES
883 S^;*********************************************************************^
884
885 030057 037 12 0 00 000004 BEGEND: ENDUUO ;END OF PASS
886 030060 254 00 0 00 030010 $BEND1: JRST BEGIN1 ;KEEP RUNNING PROGRAM
887 030061 037 16 0 00 000004 $BEND2: EOPUUO ;END OF PROGRAM - NO RETURN
888 030062 000000 030061 CNTLC: SADR5 ;CONTROL C XFER ADDRESS
889 030063 000000 030000 ALTMGO: SADR6 ;ALTMODE XFER ADDRESS
890 030064 CPOPJ1: ;SKIP RETURN
891 030064 350 00 0 17 000000 UUOSKP: AOS (P) ;SKIP RETURN FROM UUO
892 030065 CPOPJ: ;NON-SKIP REGULAR RETURN
893 030065 263 17 0 00 000000 UUOEXT: RTN ;UUO RETURN
894 030066 255 00 0 00 000000 UUORTN: JFCL ;ADDITIONAL USERS UUO ROUTINE
895 030067 255 00 0 00 000000 $UORTX: JFCL ;ADDITIONAL UUO LINKAGE
896 030070 255 00 0 00 000000 $UUOER: JFCL ;INITED AS (JRST $UOERX)
897 030071 255 00 0 00 000000 $ITRHL: JFCL ;ADDITIONAL INTERRUPT LINKAGE
898 030072 255 00 0 00 000000 $ITRX1: JFCL ; "
899 030073 255 00 0 00 000000 $USRHL: JFCL ; "
900 030074 255 00 0 00 000000 $RSRTX: JFCL ;ADDITIONAL POWER FAIL LINKAGE
901 030075 255 00 0 00 000000 $RSRTY: JFCL ; "
902 030076 255 00 0 00 000000 RESRT1: JFCL ; INITED AS (JRST RESRTX)
903 030077 255 00 0 00 000000 RESRT2: JFCL ; "
904 030100 255 00 0 00 000000 $PARER: JFCL ;ADDITIONAL PARITY ERROR LINKAGE
905 030101 255 00 0 00 000000 ERMORE: JFCL ;ADDITIONAL ERROR HANDLER LINKAGE
906 030102 254 04 0 00 030102 HALT . ;IMPROPER TRANSFER HALT
907
908 030103 000000 000000 $PSHER: 0 ;INITED AS (JRST PSHERR)
909 030104 000000 000000 ITRCH1: 0 ;PC & FLAGS OF CURRENT INTERRUPT
910 030105 000000 000000 0 ;INITED AS (JRST $ITRC1)
911
912 S^;*********************************************************************^
913 ;*PROCESSOR CONTROL STORAGE
914 S^;*********************************************************************^
915
916 030106 000000 000000 $ACC0: 0 ;INTERRUPT SAVED AC0
917 030107 000000 000000 $SVPI: 0 ;INTERRUPT SAVED PI
918 030110 000000 000000 $SVAPR: 0 ;INTERRUPT SAVED APR
919 030111 000000 000000 $SVPAG: 0 ;INTERRUPT SAVED PAG (DATAI)
920 030112 000000 000000 $SPAG1: 0 ;INTERRUPT SAVED PAG (CONI)
921
922 030113 000000 000000 $SVUUO: 0 ;CURRENT USERS UUO
923 030114 000000 000000 $SVUPC: 0 ;PC OF CURRENT USERS UUO
924
925 030115 000000 000000 REPTU: 0 ;REPEAT UUO ITERATIONS
926 030116 000000 000000 SCOPE: 0 ;ERROR HANDLER SCOPE LOOP FLAG
927 030117 000000 000000 %CORFLG:0 ; " CORRECT FLAG
928 030120 000000 000000 %COREC: 0 ; " CORRECT DATA
929 030121 000000 000000 %ACTFL: 0 ; " ACTUAL FLAG
930 030122 000000 000000 %ACTUL: 0 ; " ACTUAL DATA
931 030123 000000 000000 %DISCR: 0 ; " DISCREPENCY DATA
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 4
FIXED KSM 28-Mar-78 16:28 *FIXED* FIXED CONTROL AND DISPATCH STORAGE, MARCH 1978 SEQ 0036
932 S^;*********************************************************************^
933 ;*UUO DISPATCH TABLE
934 S^;*********************************************************************^
935 XLIST
936 LIST
937 030124 037666 030070 UUODIS: LUUO1,,$UUOER
938 030125 037666 037666 LUUO3,,LUUO2
939 030126 037666 037666 LUUO5,,LUUO4
940 030127 037666 037666 LUUO7,,LUUO6
941 030130 037666 037666 LUUO11,,LUUO10
942 030131 037666 037666 LUUO13,,LUUO12
943 030132 030070 030070 LUUO15,,LUUO14
944 030133 030070 030070 LUUO17,,LUUO16
945 030134 030070 030070 LUUO21,,LUUO20
946 030135 030070 030070 LUUO23,,LUUO22
947 030136 030070 030070 LUUO25,,LUUO24
948 030137 030070 030070 LUUO27,,LUUO26
949 030140 030070 030070 LUUO31,,LUUO30
950 030141 030070 030070 LUUO33,,LUUO32
951
952 S^;*********************************************************************^
953 ;*MEMORY MANAGMENT STORAGE
954 S^;*********************************************************************^
955
956 030142 000000 000000 DF22F: 0 ;DF10 CONTROL FLAG, 0 = 18, -1 = 22 BIT
957 030143 000000 000000 MAPNEW: 0 ;MEMORY MAPPING CONTROL FLAG, -1 = 4096K MAPPING
958 030144 000000 000000 MEMTOT: 0 ;TOTAL MEMORY SIZE IN K (1024.)
959 030145 000000 000000 MEMLOW: 0 ;LOWEST USABLE MEMORY
960 030146 MEMSIZ: BLOCK ^D41 ;MEMORY SEGMENT POINTER TABLE
961
962 S^;*********************************************************************^
963 ;*PRINT CONTROL STORAGE
964 S^;*********************************************************************^
965
966 030217 000000 000000 PNTFLG: 0 ;PRINT FLAG, -1 WHILE IN PRINT ROUTINE
967 030220 000000 000000 PNTENB: 0 ;PRINT ENABLE
968 030221 000000 000000 PDISF: 0 ;PRINT DISABLED FLAG
969 030222 000000 000000 PNTINH: 0 ;INHIBIT PRINT INPUT CHECKS
970 030223 000000 000000 PNTSPC: 0 ;PRINT SPACE CONTROL
971 030224 000000 000000 OPTIME: 0 ;TYPE-IN WAIT TIME
972 030225 000000 000000 $TWCNT: 0 ;TIME WAITED
973 030226 000000 000000 $DVOFF: 0 ;LOGICAL DEVICE INITED FLAG
974 030227 000000 000000 TTYFIL: 0 ;TTY EXEC FILLERS FLAG
975 030230 000000 000000 TTYSPD: 0 ;TTY EXEC BAUD RATE
976 030231 000000 000000 $TTCHR: 0 ;ACTUAL TYPED IN CHAR
977 030232 000000 000000 $CHRIN: 0 ;UPPER CASED & PARITY STRIPPED CHAR
978 030233 000000 000000 $TYPNB: 0 ;TYPED IN NUMBER
979 030234 000000 000000 $CRLF: 0 ;FREE CR/LF FLAG
980 030235 000000 000000 $TABF: 0 ;TAB CONVERSION FLAG
981 030236 000000 000000 $FFF: 0 ;FORM FEED CONVERSION FLAG
982 030237 000000 000000 $VTF: 0 ;VERTICAL TAB CONVERSION FLAG
983 030240 000000 000000 USRLFF: 0 ;USER LF FILLERS
984 030241 000000 000000 USRCRF: 0 ;USER CR FILLERS
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 5
FIXED KSM 28-Mar-78 16:28 *FIXED* FIXED CONTROL AND DISPATCH STORAGE, MARCH 1978 SEQ 0037
985 S^;*********************************************************************^
986 ;*THE FOLLOWING MISCELLANEOUS PRINT CHARACTERS ARE INCLUDED
987 ;*TO FACILITATE PRINTING AND ARE CALLED AS FOLLOWS:
988 ;* MOVEI NAME
989 ;* PNTA ;OR PNTAF
990 S^;*********************************************************************^
991
992 030242 CRLF: ASCII/
993 030242 015 012 000 000 000 /
994 030243 CRLF2: ASCII/
995
996 030243 015 012 015 012 000 /
997 030244 054 000 000 000 000 COMMA: ASCII/,/
998 030245 056 000 000 000 000 PERIOD: ASCII/./
999 030246 040 000 000 000 000 SPACE: ASCII/ /
1000 030247 011 000 000 000 000 TAB: ASCII/ /
1001 030250 MINUS:
1002 030250 055 000 000 000 000 HYPEN: ASCII/-/
1003 030251 053 000 000 000 000 PLUS: ASCII/+/
1004 030252 052 000 000 000 000 AST: ASCII/*/
1005 030253 100 000 000 000 000 ATSIN: ASCII/@/
1006 030254 050 000 000 000 000 LFP: ASCII/(/
1007 030255 051 000 000 000 000 RTP: ASCII/)/
1008 030256 007 0000000000 BELL: BYTE (7) 007
1009 030257 077 000 000 000 000 QUEST: ASCII/?/
1010 030260 057 000 000 000 000 SLASH: ASCII!/!
1011 030261 044 000 000 000 000 DOLLAR: ASCII/$/
1012 030262 000000 000012 RADIX: ^D10 ;DECIMAL PRINT RADIX
1013 030263 000000 000040 RADLSP: 40 ;DECIMAL PRINT LEADING CHAR
1014 030264 000000 000012 RADLSC: ^D10 ;DECIMAL PRINT LEADING CHAR COUNT
1015
1016 S^;*********************************************************************^
1017 ;*USER MODE OUTPUT FILE INFORMATION
1018 S^;*********************************************************************^
1019
1020 030265 $OBUF: BLOCK 3 ;LOGICAL FILE OUTPUT BUFFER HEADER
1021 030270 60 62 51 56 64 00 $OUTNM: SIXBIT /PRINT/ ;FILE NAME
1022 030271 60 56 64 00 00 00 $OUTEX: SIXBIT /PNT/ ;FILE NAME EXTENSION
1023 030272 BLOCK 2
1024
1025 S^;*********************************************************************^
1026 ;*DISK UPDATE MODE FILE INFORMATION
1027 S^;*********************************************************************^
1028
1029 030274 $IBUF: BLOCK 3
1030 030277 60 62 51 56 64 00 $INNM: SIXBIT /PRINT/
1031 030300 60 56 64 00 00 00 $INEXT: SIXBIT /PNT/
1032 030301 BLOCK 2
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 6
FIXED KSM 28-Mar-78 16:28 *FIXED* FIXED CONTROL AND DISPATCH STORAGE, MARCH 1978 SEQ 0038
1033 S^;*********************************************************************^
1034 ;*PUSHDOWN LIST CONTROL INFORMATION
1035 S^;*********************************************************************^
1036
1037 030303 777577 030303 PLIST: PLIST-PLISTE,,PLIST
1038 030304 PLISTS: BLOCK 200
1039 030504 000000 000000 PLISTE: 0 ;END OF PUSHDOWN LIST
1040
1041 S^;*********************************************************************^
1042 ;*POWER LINE CLOCK FREQUENCY FLAG
1043 S^;*********************************************************************^
1044
1045 030505 000000 000000 CYCL60: 0 ;0 = 60, -1 = 50 CYCLE
1046
1047 S^;*********************************************************************^
1048 ;*KL10 CACHE CONTROL FLAGS
1049 S^;*********************************************************************^
1050
1051 030506 000000 000000 CSHFLG: 0 ;ALLOW CACHE IF 0
1052 030507 000000 000000 CSHMEM: 0 ;CACHE MEMORY SEGMENTS IF 0
1053
1054 S^;*********************************************************************^
1055 ;*NUMBER INPUT DIGIT FLAG
1056 S^;*********************************************************************^
1057
1058 030510 000000 000000 TTNBRF: 0 ;-1 IF ANY DIGIT TYPED
1059
1060 S^;*********************************************************************^
1061 ;*KL10 & KI10 "INHPAG" SWITCH PAGING PREVENTION
1062 S^;*********************************************************************^
1063
1064 030511 000000 000000 PVPAGI: 0 ;IF NON-ZERO, OVERRIDE "INHPAG" SWITCH ACTION
1065
1066 S^;*********************************************************************^
1067 ;*ERROR REPORTING ROUTINE ADDITIONAL USERS CONTROL INSTRUCTIONS
1068 S^;*********************************************************************^
1069
1070 030512 000000 000000 %ERHI1: 0 ;IF NON-ZERO, XCT'D AT START OF %ERUUO
1071 030513 000000 000000 %ERHI2: 0 ;IF NON-ZERO, XCT'D AT END OF %ERUUO
1072 030514 000000 000000 %ERHI3: 0 ;IF NON-ZERO, XCT'D AFTER "PC" OF %ERUUO
1073
1074 S^;*********************************************************************^
1075 ;*SPECIAL USERS UUO INTERCEPT INSTRUCTION
1076 S^;*********************************************************************^
1077
1078 030515 000000 000000 $$UUO: 0 ;IF NON-ZERO, XCT'D AT START OF $UORTN
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 7
FIXED KSM 28-Mar-78 16:28 *FIXED* FIXED CONTROL AND DISPATCH STORAGE, MARCH 1978 SEQ 0039
1079 S^;*********************************************************************^
1080 ;*USER MODE MONITOR TYPE FLAG
1081 S^;*********************************************************************^
1082
1083 030516 000000 000000 MONTYP: 0 ;0 = TOPS10, -1 = TOPS20
1084
1085 S^;*********************************************************************^
1086 ;*SPECIAL USERS MUUO INTERCEPT INSTRUCTION
1087 S^;*********************************************************************^
1088
1089 030517 000000 000000 $$MUUO: 0 ;IF NON-ZERO, XCT'D AT START OF MUUOER
1090
1091 S^;*********************************************************************^
1092 ;*SPECIAL USERS USER MODE OUTPUT ERROR INTERCEPT INSTUCTION
1093 S^;*********************************************************************^
1094
1095 030520 000000 000000 $$OUTER:0 ;IF NON-ZERO, XCT'D AT END OF USER MODE ERROR
1096
1097 S^;*********************************************************************^
1098 ;*"SWITCH" CALL USAGE CONTROL
1099 S^;*********************************************************************^
1100
1101 030521 000000 000000 $$TOGGLE:0 ;IF NON-ZERO, USE C(CONSW) FOR SWITCHES
1102
1103 S^;*********************************************************************^
1104 ;*SPECIAL USERS ALTMODE SWITCH CALL INTERCEPT INSTRUCTIONS
1105 S^;*********************************************************************^
1106
1107 030522 000000 000000 $$TAX1: 0 ;IF NON-ZERO, XCT'D AT START OF ALTMODE SWITCH CALL
1108 030523 000000 000000 $$TAX2: 0 ;IF NON-ZERO, XCT'D AT END OF ALTMODE SWITCH CALL
1109
1110 S^;*********************************************************************^
1111 ;*SM10 (KS-10) PROCESSOR TYPE FLAG
1112 S^;*********************************************************************^
1113
1114 030524 000000 000000 SM10: 0 ;IF -1 THIS IS AN KS-10
1115
1116 S^;*********************************************************************^
1117 ;*RIGHT HALF SWITCHES PROMPT TABLE ADDRESS
1118 S^;*********************************************************************^
1119
1120 030525 000000 000000 SWPTAB: 0 ;0 = NO PROMPT, ADR = ADR OF SIXBIT PROMPT TABLE
1121
1122 S^;*********************************************************************^
1123 ;*SPECIAL FUTURE EXPANSION ROOM
1124 S^;*********************************************************************^
1125
1126 S^;*********************************************************************^
1127 ;*END OF FIXED STORAGE
1128 S^;*********************************************************************^
1129
1130 030577 LOC 30577
1131 030577 000000 000000 ENDFIX: 0 ;END OF FIXED STORAGE
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 1
DSKCE1 MAC 21-Jun-78 10:46 *FIXED* FIXED CONTROL AND DISPATCH STORAGE, MARCH 1978 SEQ 0040
1132 030600 037 05 0 00 000002 RENTR1: DROPDV ;CLOSE LOGICAL OUTPUT FILE
1133 030601 040 00 0 00 040054 CALL [SIXBIT .EXIT.]
1134
1135 030602 PGMNAM: ASCIZ?
1136 030602 015 012 104 105 103 DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5 (DSKCE)
1137 030603 123 131 123 124 105
1138 030604 115 040 062 060 062
1139 030605 060 040 101 104 126
1140 030606 101 116 103 105 104
1141 030607 040 111 116 123 124
1142 030610 122 125 103 124 111
1143 030611 117 116 040 104 111
1144 030612 101 107 116 117 123
1145 030613 124 111 103 040 043
1146 030614 065 040 050 104 123
1147 030615 113 103 105 051 015
1148 030616 012 000 000 000 000 ?
1149 ;INITIALIZE SUBROUTINES
1150
1151 030617 265 00 0 00 030011 START: PGMINT
1152 030620 200 00 0 00 040055 MOVE [ASCIZ/CE/]
1153 030621 202 00 0 00 037775 MOVEM TLET ;INITIALIZE TEST LETTER
1154
1155 030622 254 00 0 00 030623 STARTA: JRST .+1 ;GO PERFORM DIAGNOSTIC
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 2
DSKCE1 MAC 21-Jun-78 10:46 CHECK NORMALIZATION FOR DOUBLE PRECISION FLOATING POINT NUMBERS SEQ 0041
1156 SUBTTL CHECK NORMALIZATION FOR DOUBLE PRECISION FLOATING POINT NUMBERS
1157
1158 000004 AC=4
1159 030623 CE00: SAVEAC (1,1)^
1160 030623 201 06 0 00 030623 MOVEI AC+2,.
1161 030624 202 06 0 00 030051 MOVEM AC+2,TESTPC ;SETUP SUBTEST PC
1162 030625 201 06 0 00 000006 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
1163 030626 202 06 0 00 042157 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
1164 030627 254 02 1 00 040056 JRSTF @[.+1] ;CLEAR ALL FLAGS
1165
1166 000101 T=101
1167 030630 S100: SDFARP T,201400,0,0,0,577400,0,0,0,200400,0,0,0^
1168 DMOVE AC,[201400,,0
1169 030630 120 04 0 00 040057 0,,0]
1170 DFAD AC,[577400,,0
1171 030631 110 04 0 00 040061 0,,0]
1172 030632 312 04 0 00 040063 CAME AC,[200400,,0]
1173 030633 003 04 0 00 000101 ER3 AC,T
1174 030634 312 05 0 00 040060 CAME AC+1,[0,,0]
1175 030635 004 05 0 00 000101 ER4 AC+1,T
1176 030636 321 10 0 00 030630 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1177
1178 000400 XX=400
1179 200400 ZZ=200400
1180
1181 REPEAT ^D8,
1182 <T=T+1
1183 XX=XX/2
1184 ZZ=ZZ-1000
1185 SDFARP T,200400+XX,0,0,0,577400,0,0,0,ZZ,0,0,0
1186 >
1187 000102 T=T+1
1188 000200 XX=XX/2
1189 177400 ZZ=ZZ-1000
1190 SDFARP T,200400+XX,0,0,0,577400,0,0,0,ZZ,0,0,0^
1191 DMOVE AC,[200400+XX,,0
1192 030637 120 04 0 00 040064 0,,0]
1193 DFAD AC,[577400,,0
1194 030640 110 04 0 00 040061 0,,0]
1195 030641 312 04 0 00 040066 CAME AC,[ZZ,,0]
1196 030642 003 04 0 00 000102 ER3 AC,T
1197 030643 312 05 0 00 040060 CAME AC+1,[0,,0]
1198 030644 004 05 0 00 000102 ER4 AC+1,T
1199 030645 321 10 0 00 030637 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1200
1201 000103 T=T+1
1202 000100 XX=XX/2
1203 176400 ZZ=ZZ-1000
1204 SDFARP T,200400+XX,0,0,0,577400,0,0,0,ZZ,0,0,0^
1205 DMOVE AC,[200400+XX,,0
1206 030646 120 04 0 00 040067 0,,0]
1207 DFAD AC,[577400,,0
1208 030647 110 04 0 00 040061 0,,0]
1209 030650 312 04 0 00 040071 CAME AC,[ZZ,,0]
1210 030651 003 04 0 00 000103 ER3 AC,T
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 2-1
DSKCE1 MAC 21-Jun-78 10:46 CHECK NORMALIZATION FOR DOUBLE PRECISION FLOATING POINT NUMBERS SEQ 0042
1211 030652 312 05 0 00 040060 CAME AC+1,[0,,0]
1212 030653 004 05 0 00 000103 ER4 AC+1,T
1213 030654 321 10 0 00 030646 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1214
1215 000104 T=T+1
1216 000040 XX=XX/2
1217 175400 ZZ=ZZ-1000
1218 SDFARP T,200400+XX,0,0,0,577400,0,0,0,ZZ,0,0,0^
1219 DMOVE AC,[200400+XX,,0
1220 030655 120 04 0 00 040072 0,,0]
1221 DFAD AC,[577400,,0
1222 030656 110 04 0 00 040061 0,,0]
1223 030657 312 04 0 00 040074 CAME AC,[ZZ,,0]
1224 030660 003 04 0 00 000104 ER3 AC,T
1225 030661 312 05 0 00 040060 CAME AC+1,[0,,0]
1226 030662 004 05 0 00 000104 ER4 AC+1,T
1227 030663 321 10 0 00 030655 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1228
1229 000105 T=T+1
1230 000020 XX=XX/2
1231 174400 ZZ=ZZ-1000
1232 SDFARP T,200400+XX,0,0,0,577400,0,0,0,ZZ,0,0,0^
1233 DMOVE AC,[200400+XX,,0
1234 030664 120 04 0 00 040075 0,,0]
1235 DFAD AC,[577400,,0
1236 030665 110 04 0 00 040061 0,,0]
1237 030666 312 04 0 00 040077 CAME AC,[ZZ,,0]
1238 030667 003 04 0 00 000105 ER3 AC,T
1239 030670 312 05 0 00 040060 CAME AC+1,[0,,0]
1240 030671 004 05 0 00 000105 ER4 AC+1,T
1241 030672 321 10 0 00 030664 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1242
1243 000106 T=T+1
1244 000010 XX=XX/2
1245 173400 ZZ=ZZ-1000
1246 SDFARP T,200400+XX,0,0,0,577400,0,0,0,ZZ,0,0,0^
1247 DMOVE AC,[200400+XX,,0
1248 030673 120 04 0 00 040100 0,,0]
1249 DFAD AC,[577400,,0
1250 030674 110 04 0 00 040061 0,,0]
1251 030675 312 04 0 00 040102 CAME AC,[ZZ,,0]
1252 030676 003 04 0 00 000106 ER3 AC,T
1253 030677 312 05 0 00 040060 CAME AC+1,[0,,0]
1254 030700 004 05 0 00 000106 ER4 AC+1,T
1255 030701 321 10 0 00 030673 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1256
1257 000107 T=T+1
1258 000004 XX=XX/2
1259 172400 ZZ=ZZ-1000
1260 SDFARP T,200400+XX,0,0,0,577400,0,0,0,ZZ,0,0,0^
1261 DMOVE AC,[200400+XX,,0
1262 030702 120 04 0 00 040103 0,,0]
1263 DFAD AC,[577400,,0
1264 030703 110 04 0 00 040061 0,,0]
1265 030704 312 04 0 00 040105 CAME AC,[ZZ,,0]
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 2-2
DSKCE1 MAC 21-Jun-78 10:46 CHECK NORMALIZATION FOR DOUBLE PRECISION FLOATING POINT NUMBERS SEQ 0043
1266 030705 003 04 0 00 000107 ER3 AC,T
1267 030706 312 05 0 00 040060 CAME AC+1,[0,,0]
1268 030707 004 05 0 00 000107 ER4 AC+1,T
1269 030710 321 10 0 00 030702 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1270
1271 000110 T=T+1
1272 000002 XX=XX/2
1273 171400 ZZ=ZZ-1000
1274 SDFARP T,200400+XX,0,0,0,577400,0,0,0,ZZ,0,0,0^
1275 DMOVE AC,[200400+XX,,0
1276 030711 120 04 0 00 040106 0,,0]
1277 DFAD AC,[577400,,0
1278 030712 110 04 0 00 040061 0,,0]
1279 030713 312 04 0 00 040110 CAME AC,[ZZ,,0]
1280 030714 003 04 0 00 000110 ER3 AC,T
1281 030715 312 05 0 00 040060 CAME AC+1,[0,,0]
1282 030716 004 05 0 00 000110 ER4 AC+1,T
1283 030717 321 10 0 00 030711 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1284
1285 000111 T=T+1
1286 000001 XX=XX/2
1287 170400 ZZ=ZZ-1000
1288 SDFARP T,200400+XX,0,0,0,577400,0,0,0,ZZ,0,0,0^
1289 DMOVE AC,[200400+XX,,0
1290 030720 120 04 0 00 040111 0,,0]
1291 DFAD AC,[577400,,0
1292 030721 110 04 0 00 040061 0,,0]
1293 030722 312 04 0 00 040113 CAME AC,[ZZ,,0]
1294 030723 003 04 0 00 000111 ER3 AC,T
1295 030724 312 05 0 00 040060 CAME AC+1,[0,,0]
1296 030725 004 05 0 00 000111 ER4 AC+1,T
1297 030726 321 10 0 00 030720 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1298
1299
1300 000001 000000 XX=1000000
1301
1302 REPEAT ^D18,
1303 <T=T+1
1304 XX=XX/2
1305 ZZ=ZZ-1000
1306 SDFARP T,200400,XX,0,0,577400,0,0,0,ZZ,0,0,0
1307 >
1308 000112 T=T+1
1309 400000 XX=XX/2
1310 167400 ZZ=ZZ-1000
1311 SDFARP T,200400,XX,0,0,577400,0,0,0,ZZ,0,0,0^
1312 DMOVE AC,[200400,,XX
1313 030727 120 04 0 00 040114 0,,0]
1314 DFAD AC,[577400,,0
1315 030730 110 04 0 00 040061 0,,0]
1316 030731 312 04 0 00 040116 CAME AC,[ZZ,,0]
1317 030732 003 04 0 00 000112 ER3 AC,T
1318 030733 312 05 0 00 040060 CAME AC+1,[0,,0]
1319 030734 004 05 0 00 000112 ER4 AC+1,T
1320 030735 321 10 0 00 030727 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 2-3
DSKCE1 MAC 21-Jun-78 10:46 CHECK NORMALIZATION FOR DOUBLE PRECISION FLOATING POINT NUMBERS SEQ 0044
1321
1322 000113 T=T+1
1323 200000 XX=XX/2
1324 166400 ZZ=ZZ-1000
1325 SDFARP T,200400,XX,0,0,577400,0,0,0,ZZ,0,0,0^
1326 DMOVE AC,[200400,,XX
1327 030736 120 04 0 00 040117 0,,0]
1328 DFAD AC,[577400,,0
1329 030737 110 04 0 00 040061 0,,0]
1330 030740 312 04 0 00 040121 CAME AC,[ZZ,,0]
1331 030741 003 04 0 00 000113 ER3 AC,T
1332 030742 312 05 0 00 040060 CAME AC+1,[0,,0]
1333 030743 004 05 0 00 000113 ER4 AC+1,T
1334 030744 321 10 0 00 030736 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1335
1336 000114 T=T+1
1337 100000 XX=XX/2
1338 165400 ZZ=ZZ-1000
1339 SDFARP T,200400,XX,0,0,577400,0,0,0,ZZ,0,0,0^
1340 DMOVE AC,[200400,,XX
1341 030745 120 04 0 00 040122 0,,0]
1342 DFAD AC,[577400,,0
1343 030746 110 04 0 00 040061 0,,0]
1344 030747 312 04 0 00 040124 CAME AC,[ZZ,,0]
1345 030750 003 04 0 00 000114 ER3 AC,T
1346 030751 312 05 0 00 040060 CAME AC+1,[0,,0]
1347 030752 004 05 0 00 000114 ER4 AC+1,T
1348 030753 321 10 0 00 030745 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1349
1350 000115 T=T+1
1351 040000 XX=XX/2
1352 164400 ZZ=ZZ-1000
1353 SDFARP T,200400,XX,0,0,577400,0,0,0,ZZ,0,0,0^
1354 DMOVE AC,[200400,,XX
1355 030754 120 04 0 00 040125 0,,0]
1356 DFAD AC,[577400,,0
1357 030755 110 04 0 00 040061 0,,0]
1358 030756 312 04 0 00 040127 CAME AC,[ZZ,,0]
1359 030757 003 04 0 00 000115 ER3 AC,T
1360 030760 312 05 0 00 040060 CAME AC+1,[0,,0]
1361 030761 004 05 0 00 000115 ER4 AC+1,T
1362 030762 321 10 0 00 030754 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1363
1364 000116 T=T+1
1365 020000 XX=XX/2
1366 163400 ZZ=ZZ-1000
1367 SDFARP T,200400,XX,0,0,577400,0,0,0,ZZ,0,0,0^
1368 DMOVE AC,[200400,,XX
1369 030763 120 04 0 00 040130 0,,0]
1370 DFAD AC,[577400,,0
1371 030764 110 04 0 00 040061 0,,0]
1372 030765 312 04 0 00 040132 CAME AC,[ZZ,,0]
1373 030766 003 04 0 00 000116 ER3 AC,T
1374 030767 312 05 0 00 040060 CAME AC+1,[0,,0]
1375 030770 004 05 0 00 000116 ER4 AC+1,T
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 2-4
DSKCE1 MAC 21-Jun-78 10:46 CHECK NORMALIZATION FOR DOUBLE PRECISION FLOATING POINT NUMBERS SEQ 0045
1376 030771 321 10 0 00 030763 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1377
1378 000117 T=T+1
1379 010000 XX=XX/2
1380 162400 ZZ=ZZ-1000
1381 SDFARP T,200400,XX,0,0,577400,0,0,0,ZZ,0,0,0^
1382 DMOVE AC,[200400,,XX
1383 030772 120 04 0 00 040133 0,,0]
1384 DFAD AC,[577400,,0
1385 030773 110 04 0 00 040061 0,,0]
1386 030774 312 04 0 00 040135 CAME AC,[ZZ,,0]
1387 030775 003 04 0 00 000117 ER3 AC,T
1388 030776 312 05 0 00 040060 CAME AC+1,[0,,0]
1389 030777 004 05 0 00 000117 ER4 AC+1,T
1390 031000 321 10 0 00 030772 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1391
1392 000120 T=T+1
1393 004000 XX=XX/2
1394 161400 ZZ=ZZ-1000
1395 SDFARP T,200400,XX,0,0,577400,0,0,0,ZZ,0,0,0^
1396 DMOVE AC,[200400,,XX
1397 031001 120 04 0 00 040136 0,,0]
1398 DFAD AC,[577400,,0
1399 031002 110 04 0 00 040061 0,,0]
1400 031003 312 04 0 00 040140 CAME AC,[ZZ,,0]
1401 031004 003 04 0 00 000120 ER3 AC,T
1402 031005 312 05 0 00 040060 CAME AC+1,[0,,0]
1403 031006 004 05 0 00 000120 ER4 AC+1,T
1404 031007 321 10 0 00 031001 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1405
1406 000121 T=T+1
1407 002000 XX=XX/2
1408 160400 ZZ=ZZ-1000
1409 SDFARP T,200400,XX,0,0,577400,0,0,0,ZZ,0,0,0^
1410 DMOVE AC,[200400,,XX
1411 031010 120 04 0 00 040141 0,,0]
1412 DFAD AC,[577400,,0
1413 031011 110 04 0 00 040061 0,,0]
1414 031012 312 04 0 00 040143 CAME AC,[ZZ,,0]
1415 031013 003 04 0 00 000121 ER3 AC,T
1416 031014 312 05 0 00 040060 CAME AC+1,[0,,0]
1417 031015 004 05 0 00 000121 ER4 AC+1,T
1418 031016 321 10 0 00 031010 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1419
1420 000122 T=T+1
1421 001000 XX=XX/2
1422 157400 ZZ=ZZ-1000
1423 SDFARP T,200400,XX,0,0,577400,0,0,0,ZZ,0,0,0^
1424 DMOVE AC,[200400,,XX
1425 031017 120 04 0 00 040144 0,,0]
1426 DFAD AC,[577400,,0
1427 031020 110 04 0 00 040061 0,,0]
1428 031021 312 04 0 00 040146 CAME AC,[ZZ,,0]
1429 031022 003 04 0 00 000122 ER3 AC,T
1430 031023 312 05 0 00 040060 CAME AC+1,[0,,0]
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 2-5
DSKCE1 MAC 21-Jun-78 10:46 CHECK NORMALIZATION FOR DOUBLE PRECISION FLOATING POINT NUMBERS SEQ 0046
1431 031024 004 05 0 00 000122 ER4 AC+1,T
1432 031025 321 10 0 00 031017 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1433
1434 000123 T=T+1
1435 000400 XX=XX/2
1436 156400 ZZ=ZZ-1000
1437 SDFARP T,200400,XX,0,0,577400,0,0,0,ZZ,0,0,0^
1438 DMOVE AC,[200400,,XX
1439 031026 120 04 0 00 040147 0,,0]
1440 DFAD AC,[577400,,0
1441 031027 110 04 0 00 040061 0,,0]
1442 031030 312 04 0 00 040151 CAME AC,[ZZ,,0]
1443 031031 003 04 0 00 000123 ER3 AC,T
1444 031032 312 05 0 00 040060 CAME AC+1,[0,,0]
1445 031033 004 05 0 00 000123 ER4 AC+1,T
1446 031034 321 10 0 00 031026 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1447
1448 000124 T=T+1
1449 000200 XX=XX/2
1450 155400 ZZ=ZZ-1000
1451 SDFARP T,200400,XX,0,0,577400,0,0,0,ZZ,0,0,0^
1452 DMOVE AC,[200400,,XX
1453 031035 120 04 0 00 040152 0,,0]
1454 DFAD AC,[577400,,0
1455 031036 110 04 0 00 040061 0,,0]
1456 031037 312 04 0 00 040154 CAME AC,[ZZ,,0]
1457 031040 003 04 0 00 000124 ER3 AC,T
1458 031041 312 05 0 00 040060 CAME AC+1,[0,,0]
1459 031042 004 05 0 00 000124 ER4 AC+1,T
1460 031043 321 10 0 00 031035 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1461
1462 000125 T=T+1
1463 000100 XX=XX/2
1464 154400 ZZ=ZZ-1000
1465 SDFARP T,200400,XX,0,0,577400,0,0,0,ZZ,0,0,0^
1466 DMOVE AC,[200400,,XX
1467 031044 120 04 0 00 040155 0,,0]
1468 DFAD AC,[577400,,0
1469 031045 110 04 0 00 040061 0,,0]
1470 031046 312 04 0 00 040157 CAME AC,[ZZ,,0]
1471 031047 003 04 0 00 000125 ER3 AC,T
1472 031050 312 05 0 00 040060 CAME AC+1,[0,,0]
1473 031051 004 05 0 00 000125 ER4 AC+1,T
1474 031052 321 10 0 00 031044 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1475
1476 000126 T=T+1
1477 000040 XX=XX/2
1478 153400 ZZ=ZZ-1000
1479 SDFARP T,200400,XX,0,0,577400,0,0,0,ZZ,0,0,0^
1480 DMOVE AC,[200400,,XX
1481 031053 120 04 0 00 040160 0,,0]
1482 DFAD AC,[577400,,0
1483 031054 110 04 0 00 040061 0,,0]
1484 031055 312 04 0 00 040162 CAME AC,[ZZ,,0]
1485 031056 003 04 0 00 000126 ER3 AC,T
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 2-6
DSKCE1 MAC 21-Jun-78 10:46 CHECK NORMALIZATION FOR DOUBLE PRECISION FLOATING POINT NUMBERS SEQ 0047
1486 031057 312 05 0 00 040060 CAME AC+1,[0,,0]
1487 031060 004 05 0 00 000126 ER4 AC+1,T
1488 031061 321 10 0 00 031053 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1489
1490 000127 T=T+1
1491 000020 XX=XX/2
1492 152400 ZZ=ZZ-1000
1493 SDFARP T,200400,XX,0,0,577400,0,0,0,ZZ,0,0,0^
1494 DMOVE AC,[200400,,XX
1495 031062 120 04 0 00 040163 0,,0]
1496 DFAD AC,[577400,,0
1497 031063 110 04 0 00 040061 0,,0]
1498 031064 312 04 0 00 040165 CAME AC,[ZZ,,0]
1499 031065 003 04 0 00 000127 ER3 AC,T
1500 031066 312 05 0 00 040060 CAME AC+1,[0,,0]
1501 031067 004 05 0 00 000127 ER4 AC+1,T
1502 031070 321 10 0 00 031062 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1503
1504 000130 T=T+1
1505 000010 XX=XX/2
1506 151400 ZZ=ZZ-1000
1507 SDFARP T,200400,XX,0,0,577400,0,0,0,ZZ,0,0,0^
1508 DMOVE AC,[200400,,XX
1509 031071 120 04 0 00 040166 0,,0]
1510 DFAD AC,[577400,,0
1511 031072 110 04 0 00 040061 0,,0]
1512 031073 312 04 0 00 040170 CAME AC,[ZZ,,0]
1513 031074 003 04 0 00 000130 ER3 AC,T
1514 031075 312 05 0 00 040060 CAME AC+1,[0,,0]
1515 031076 004 05 0 00 000130 ER4 AC+1,T
1516 031077 321 10 0 00 031071 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1517
1518 000131 T=T+1
1519 000004 XX=XX/2
1520 150400 ZZ=ZZ-1000
1521 SDFARP T,200400,XX,0,0,577400,0,0,0,ZZ,0,0,0^
1522 DMOVE AC,[200400,,XX
1523 031100 120 04 0 00 040171 0,,0]
1524 DFAD AC,[577400,,0
1525 031101 110 04 0 00 040061 0,,0]
1526 031102 312 04 0 00 040173 CAME AC,[ZZ,,0]
1527 031103 003 04 0 00 000131 ER3 AC,T
1528 031104 312 05 0 00 040060 CAME AC+1,[0,,0]
1529 031105 004 05 0 00 000131 ER4 AC+1,T
1530 031106 321 10 0 00 031100 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1531
1532 000132 T=T+1
1533 000002 XX=XX/2
1534 147400 ZZ=ZZ-1000
1535 SDFARP T,200400,XX,0,0,577400,0,0,0,ZZ,0,0,0^
1536 DMOVE AC,[200400,,XX
1537 031107 120 04 0 00 040174 0,,0]
1538 DFAD AC,[577400,,0
1539 031110 110 04 0 00 040061 0,,0]
1540 031111 312 04 0 00 040176 CAME AC,[ZZ,,0]
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 2-7
DSKCE1 MAC 21-Jun-78 10:46 CHECK NORMALIZATION FOR DOUBLE PRECISION FLOATING POINT NUMBERS SEQ 0048
1541 031112 003 04 0 00 000132 ER3 AC,T
1542 031113 312 05 0 00 040060 CAME AC+1,[0,,0]
1543 031114 004 05 0 00 000132 ER4 AC+1,T
1544 031115 321 10 0 00 031107 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1545
1546 000133 T=T+1
1547 000001 XX=XX/2
1548 146400 ZZ=ZZ-1000
1549 SDFARP T,200400,XX,0,0,577400,0,0,0,ZZ,0,0,0^
1550 DMOVE AC,[200400,,XX
1551 031116 120 04 0 00 040177 0,,0]
1552 DFAD AC,[577400,,0
1553 031117 110 04 0 00 040061 0,,0]
1554 031120 312 04 0 00 040201 CAME AC,[ZZ,,0]
1555 031121 003 04 0 00 000133 ER3 AC,T
1556 031122 312 05 0 00 040060 CAME AC+1,[0,,0]
1557 031123 004 05 0 00 000133 ER4 AC+1,T
1558 031124 321 10 0 00 031116 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1559
1560
1561 400000 XX=400000
1562
1563 REPEAT ^D17,
1564 <T=T+1
1565 XX=XX/2
1566 ZZ=ZZ-1000
1567 SDFARP T,200400,0,XX,0,577400,0,0,0,ZZ,0,0,0
1568 >
1569 000134 T=T+1
1570 200000 XX=XX/2
1571 145400 ZZ=ZZ-1000
1572 SDFARP T,200400,0,XX,0,577400,0,0,0,ZZ,0,0,0^
1573 DMOVE AC,[200400,,0
1574 031125 120 04 0 00 040202 XX,,0]
1575 DFAD AC,[577400,,0
1576 031126 110 04 0 00 040061 0,,0]
1577 031127 312 04 0 00 040204 CAME AC,[ZZ,,0]
1578 031130 003 04 0 00 000134 ER3 AC,T
1579 031131 312 05 0 00 040060 CAME AC+1,[0,,0]
1580 031132 004 05 0 00 000134 ER4 AC+1,T
1581 031133 321 10 0 00 031125 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1582
1583 000135 T=T+1
1584 100000 XX=XX/2
1585 144400 ZZ=ZZ-1000
1586 SDFARP T,200400,0,XX,0,577400,0,0,0,ZZ,0,0,0^
1587 DMOVE AC,[200400,,0
1588 031134 120 04 0 00 040205 XX,,0]
1589 DFAD AC,[577400,,0
1590 031135 110 04 0 00 040061 0,,0]
1591 031136 312 04 0 00 040207 CAME AC,[ZZ,,0]
1592 031137 003 04 0 00 000135 ER3 AC,T
1593 031140 312 05 0 00 040060 CAME AC+1,[0,,0]
1594 031141 004 05 0 00 000135 ER4 AC+1,T
1595 031142 321 10 0 00 031134 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 2-8
DSKCE1 MAC 21-Jun-78 10:46 CHECK NORMALIZATION FOR DOUBLE PRECISION FLOATING POINT NUMBERS SEQ 0049
1596
1597 000136 T=T+1
1598 040000 XX=XX/2
1599 143400 ZZ=ZZ-1000
1600 SDFARP T,200400,0,XX,0,577400,0,0,0,ZZ,0,0,0^
1601 DMOVE AC,[200400,,0
1602 031143 120 04 0 00 040210 XX,,0]
1603 DFAD AC,[577400,,0
1604 031144 110 04 0 00 040061 0,,0]
1605 031145 312 04 0 00 040212 CAME AC,[ZZ,,0]
1606 031146 003 04 0 00 000136 ER3 AC,T
1607 031147 312 05 0 00 040060 CAME AC+1,[0,,0]
1608 031150 004 05 0 00 000136 ER4 AC+1,T
1609 031151 321 10 0 00 031143 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1610
1611 000137 T=T+1
1612 020000 XX=XX/2
1613 142400 ZZ=ZZ-1000
1614 SDFARP T,200400,0,XX,0,577400,0,0,0,ZZ,0,0,0^
1615 DMOVE AC,[200400,,0
1616 031152 120 04 0 00 040213 XX,,0]
1617 DFAD AC,[577400,,0
1618 031153 110 04 0 00 040061 0,,0]
1619 031154 312 04 0 00 040215 CAME AC,[ZZ,,0]
1620 031155 003 04 0 00 000137 ER3 AC,T
1621 031156 312 05 0 00 040060 CAME AC+1,[0,,0]
1622 031157 004 05 0 00 000137 ER4 AC+1,T
1623 031160 321 10 0 00 031152 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1624
1625 000140 T=T+1
1626 010000 XX=XX/2
1627 141400 ZZ=ZZ-1000
1628 SDFARP T,200400,0,XX,0,577400,0,0,0,ZZ,0,0,0^
1629 DMOVE AC,[200400,,0
1630 031161 120 04 0 00 040216 XX,,0]
1631 DFAD AC,[577400,,0
1632 031162 110 04 0 00 040061 0,,0]
1633 031163 312 04 0 00 040220 CAME AC,[ZZ,,0]
1634 031164 003 04 0 00 000140 ER3 AC,T
1635 031165 312 05 0 00 040060 CAME AC+1,[0,,0]
1636 031166 004 05 0 00 000140 ER4 AC+1,T
1637 031167 321 10 0 00 031161 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1638
1639 000141 T=T+1
1640 004000 XX=XX/2
1641 140400 ZZ=ZZ-1000
1642 SDFARP T,200400,0,XX,0,577400,0,0,0,ZZ,0,0,0^
1643 DMOVE AC,[200400,,0
1644 031170 120 04 0 00 040221 XX,,0]
1645 DFAD AC,[577400,,0
1646 031171 110 04 0 00 040061 0,,0]
1647 031172 312 04 0 00 040223 CAME AC,[ZZ,,0]
1648 031173 003 04 0 00 000141 ER3 AC,T
1649 031174 312 05 0 00 040060 CAME AC+1,[0,,0]
1650 031175 004 05 0 00 000141 ER4 AC+1,T
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 2-9
DSKCE1 MAC 21-Jun-78 10:46 CHECK NORMALIZATION FOR DOUBLE PRECISION FLOATING POINT NUMBERS SEQ 0050
1651 031176 321 10 0 00 031170 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1652
1653 000142 T=T+1
1654 002000 XX=XX/2
1655 137400 ZZ=ZZ-1000
1656 SDFARP T,200400,0,XX,0,577400,0,0,0,ZZ,0,0,0^
1657 DMOVE AC,[200400,,0
1658 031177 120 04 0 00 040224 XX,,0]
1659 DFAD AC,[577400,,0
1660 031200 110 04 0 00 040061 0,,0]
1661 031201 312 04 0 00 040226 CAME AC,[ZZ,,0]
1662 031202 003 04 0 00 000142 ER3 AC,T
1663 031203 312 05 0 00 040060 CAME AC+1,[0,,0]
1664 031204 004 05 0 00 000142 ER4 AC+1,T
1665 031205 321 10 0 00 031177 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1666
1667 000143 T=T+1
1668 001000 XX=XX/2
1669 136400 ZZ=ZZ-1000
1670 SDFARP T,200400,0,XX,0,577400,0,0,0,ZZ,0,0,0^
1671 DMOVE AC,[200400,,0
1672 031206 120 04 0 00 040227 XX,,0]
1673 DFAD AC,[577400,,0
1674 031207 110 04 0 00 040061 0,,0]
1675 031210 312 04 0 00 040231 CAME AC,[ZZ,,0]
1676 031211 003 04 0 00 000143 ER3 AC,T
1677 031212 312 05 0 00 040060 CAME AC+1,[0,,0]
1678 031213 004 05 0 00 000143 ER4 AC+1,T
1679 031214 321 10 0 00 031206 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1680
1681 000144 T=T+1
1682 000400 XX=XX/2
1683 135400 ZZ=ZZ-1000
1684 SDFARP T,200400,0,XX,0,577400,0,0,0,ZZ,0,0,0^
1685 DMOVE AC,[200400,,0
1686 031215 120 04 0 00 040232 XX,,0]
1687 DFAD AC,[577400,,0
1688 031216 110 04 0 00 040061 0,,0]
1689 031217 312 04 0 00 040234 CAME AC,[ZZ,,0]
1690 031220 003 04 0 00 000144 ER3 AC,T
1691 031221 312 05 0 00 040060 CAME AC+1,[0,,0]
1692 031222 004 05 0 00 000144 ER4 AC+1,T
1693 031223 321 10 0 00 031215 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1694
1695 000145 T=T+1
1696 000200 XX=XX/2
1697 134400 ZZ=ZZ-1000
1698 SDFARP T,200400,0,XX,0,577400,0,0,0,ZZ,0,0,0^
1699 DMOVE AC,[200400,,0
1700 031224 120 04 0 00 040235 XX,,0]
1701 DFAD AC,[577400,,0
1702 031225 110 04 0 00 040061 0,,0]
1703 031226 312 04 0 00 040237 CAME AC,[ZZ,,0]
1704 031227 003 04 0 00 000145 ER3 AC,T
1705 031230 312 05 0 00 040060 CAME AC+1,[0,,0]
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 2-10
DSKCE1 MAC 21-Jun-78 10:46 CHECK NORMALIZATION FOR DOUBLE PRECISION FLOATING POINT NUMBERS SEQ 0051
1706 031231 004 05 0 00 000145 ER4 AC+1,T
1707 031232 321 10 0 00 031224 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1708
1709 000146 T=T+1
1710 000100 XX=XX/2
1711 133400 ZZ=ZZ-1000
1712 SDFARP T,200400,0,XX,0,577400,0,0,0,ZZ,0,0,0^
1713 DMOVE AC,[200400,,0
1714 031233 120 04 0 00 040240 XX,,0]
1715 DFAD AC,[577400,,0
1716 031234 110 04 0 00 040061 0,,0]
1717 031235 312 04 0 00 040242 CAME AC,[ZZ,,0]
1718 031236 003 04 0 00 000146 ER3 AC,T
1719 031237 312 05 0 00 040060 CAME AC+1,[0,,0]
1720 031240 004 05 0 00 000146 ER4 AC+1,T
1721 031241 321 10 0 00 031233 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1722
1723 000147 T=T+1
1724 000040 XX=XX/2
1725 132400 ZZ=ZZ-1000
1726 SDFARP T,200400,0,XX,0,577400,0,0,0,ZZ,0,0,0^
1727 DMOVE AC,[200400,,0
1728 031242 120 04 0 00 040243 XX,,0]
1729 DFAD AC,[577400,,0
1730 031243 110 04 0 00 040061 0,,0]
1731 031244 312 04 0 00 040245 CAME AC,[ZZ,,0]
1732 031245 003 04 0 00 000147 ER3 AC,T
1733 031246 312 05 0 00 040060 CAME AC+1,[0,,0]
1734 031247 004 05 0 00 000147 ER4 AC+1,T
1735 031250 321 10 0 00 031242 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1736
1737 000150 T=T+1
1738 000020 XX=XX/2
1739 131400 ZZ=ZZ-1000
1740 SDFARP T,200400,0,XX,0,577400,0,0,0,ZZ,0,0,0^
1741 DMOVE AC,[200400,,0
1742 031251 120 04 0 00 040246 XX,,0]
1743 DFAD AC,[577400,,0
1744 031252 110 04 0 00 040061 0,,0]
1745 031253 312 04 0 00 040250 CAME AC,[ZZ,,0]
1746 031254 003 04 0 00 000150 ER3 AC,T
1747 031255 312 05 0 00 040060 CAME AC+1,[0,,0]
1748 031256 004 05 0 00 000150 ER4 AC+1,T
1749 031257 321 10 0 00 031251 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1750
1751 000151 T=T+1
1752 000010 XX=XX/2
1753 130400 ZZ=ZZ-1000
1754 SDFARP T,200400,0,XX,0,577400,0,0,0,ZZ,0,0,0^
1755 DMOVE AC,[200400,,0
1756 031260 120 04 0 00 040251 XX,,0]
1757 DFAD AC,[577400,,0
1758 031261 110 04 0 00 040061 0,,0]
1759 031262 312 04 0 00 040253 CAME AC,[ZZ,,0]
1760 031263 003 04 0 00 000151 ER3 AC,T
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 2-11
DSKCE1 MAC 21-Jun-78 10:46 CHECK NORMALIZATION FOR DOUBLE PRECISION FLOATING POINT NUMBERS SEQ 0052
1761 031264 312 05 0 00 040060 CAME AC+1,[0,,0]
1762 031265 004 05 0 00 000151 ER4 AC+1,T
1763 031266 321 10 0 00 031260 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1764
1765 000152 T=T+1
1766 000004 XX=XX/2
1767 127400 ZZ=ZZ-1000
1768 SDFARP T,200400,0,XX,0,577400,0,0,0,ZZ,0,0,0^
1769 DMOVE AC,[200400,,0
1770 031267 120 04 0 00 040254 XX,,0]
1771 DFAD AC,[577400,,0
1772 031270 110 04 0 00 040061 0,,0]
1773 031271 312 04 0 00 040256 CAME AC,[ZZ,,0]
1774 031272 003 04 0 00 000152 ER3 AC,T
1775 031273 312 05 0 00 040060 CAME AC+1,[0,,0]
1776 031274 004 05 0 00 000152 ER4 AC+1,T
1777 031275 321 10 0 00 031267 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1778
1779 000153 T=T+1
1780 000002 XX=XX/2
1781 126400 ZZ=ZZ-1000
1782 SDFARP T,200400,0,XX,0,577400,0,0,0,ZZ,0,0,0^
1783 DMOVE AC,[200400,,0
1784 031276 120 04 0 00 040257 XX,,0]
1785 DFAD AC,[577400,,0
1786 031277 110 04 0 00 040061 0,,0]
1787 031300 312 04 0 00 040261 CAME AC,[ZZ,,0]
1788 031301 003 04 0 00 000153 ER3 AC,T
1789 031302 312 05 0 00 040060 CAME AC+1,[0,,0]
1790 031303 004 05 0 00 000153 ER4 AC+1,T
1791 031304 321 10 0 00 031276 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1792
1793 000154 T=T+1
1794 000001 XX=XX/2
1795 125400 ZZ=ZZ-1000
1796 SDFARP T,200400,0,XX,0,577400,0,0,0,ZZ,0,0,0^
1797 DMOVE AC,[200400,,0
1798 031305 120 04 0 00 040262 XX,,0]
1799 DFAD AC,[577400,,0
1800 031306 110 04 0 00 040061 0,,0]
1801 031307 312 04 0 00 040264 CAME AC,[ZZ,,0]
1802 031310 003 04 0 00 000154 ER3 AC,T
1803 031311 312 05 0 00 040060 CAME AC+1,[0,,0]
1804 031312 004 05 0 00 000154 ER4 AC+1,T
1805 031313 321 10 0 00 031305 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1806
1807
1808 000001 000000 XX=1000000
1809
1810 REPEAT ^D18,
1811 <T=T+1
1812 XX=XX/2
1813 ZZ=ZZ-1000
1814 SDFARP T,200400,0,0,XX,577400,0,0,0,ZZ,0,0,0
1815 >
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 2-12
DSKCE1 MAC 21-Jun-78 10:46 CHECK NORMALIZATION FOR DOUBLE PRECISION FLOATING POINT NUMBERS SEQ 0053
1816 000155 T=T+1
1817 400000 XX=XX/2
1818 124400 ZZ=ZZ-1000
1819 SDFARP T,200400,0,0,XX,577400,0,0,0,ZZ,0,0,0^
1820 DMOVE AC,[200400,,0
1821 031314 120 04 0 00 040265 0,,XX]
1822 DFAD AC,[577400,,0
1823 031315 110 04 0 00 040061 0,,0]
1824 031316 312 04 0 00 040267 CAME AC,[ZZ,,0]
1825 031317 003 04 0 00 000155 ER3 AC,T
1826 031320 312 05 0 00 040060 CAME AC+1,[0,,0]
1827 031321 004 05 0 00 000155 ER4 AC+1,T
1828 031322 321 10 0 00 031314 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1829
1830 000156 T=T+1
1831 200000 XX=XX/2
1832 123400 ZZ=ZZ-1000
1833 SDFARP T,200400,0,0,XX,577400,0,0,0,ZZ,0,0,0^
1834 DMOVE AC,[200400,,0
1835 031323 120 04 0 00 040270 0,,XX]
1836 DFAD AC,[577400,,0
1837 031324 110 04 0 00 040061 0,,0]
1838 031325 312 04 0 00 040272 CAME AC,[ZZ,,0]
1839 031326 003 04 0 00 000156 ER3 AC,T
1840 031327 312 05 0 00 040060 CAME AC+1,[0,,0]
1841 031330 004 05 0 00 000156 ER4 AC+1,T
1842 031331 321 10 0 00 031323 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1843
1844 000157 T=T+1
1845 100000 XX=XX/2
1846 122400 ZZ=ZZ-1000
1847 SDFARP T,200400,0,0,XX,577400,0,0,0,ZZ,0,0,0^
1848 DMOVE AC,[200400,,0
1849 031332 120 04 0 00 040273 0,,XX]
1850 DFAD AC,[577400,,0
1851 031333 110 04 0 00 040061 0,,0]
1852 031334 312 04 0 00 040275 CAME AC,[ZZ,,0]
1853 031335 003 04 0 00 000157 ER3 AC,T
1854 031336 312 05 0 00 040060 CAME AC+1,[0,,0]
1855 031337 004 05 0 00 000157 ER4 AC+1,T
1856 031340 321 10 0 00 031332 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1857
1858 000160 T=T+1
1859 040000 XX=XX/2
1860 121400 ZZ=ZZ-1000
1861 SDFARP T,200400,0,0,XX,577400,0,0,0,ZZ,0,0,0^
1862 DMOVE AC,[200400,,0
1863 031341 120 04 0 00 040276 0,,XX]
1864 DFAD AC,[577400,,0
1865 031342 110 04 0 00 040061 0,,0]
1866 031343 312 04 0 00 040300 CAME AC,[ZZ,,0]
1867 031344 003 04 0 00 000160 ER3 AC,T
1868 031345 312 05 0 00 040060 CAME AC+1,[0,,0]
1869 031346 004 05 0 00 000160 ER4 AC+1,T
1870 031347 321 10 0 00 031341 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 2-13
DSKCE1 MAC 21-Jun-78 10:46 CHECK NORMALIZATION FOR DOUBLE PRECISION FLOATING POINT NUMBERS SEQ 0054
1871
1872 000161 T=T+1
1873 020000 XX=XX/2
1874 120400 ZZ=ZZ-1000
1875 SDFARP T,200400,0,0,XX,577400,0,0,0,ZZ,0,0,0^
1876 DMOVE AC,[200400,,0
1877 031350 120 04 0 00 040301 0,,XX]
1878 DFAD AC,[577400,,0
1879 031351 110 04 0 00 040061 0,,0]
1880 031352 312 04 0 00 040303 CAME AC,[ZZ,,0]
1881 031353 003 04 0 00 000161 ER3 AC,T
1882 031354 312 05 0 00 040060 CAME AC+1,[0,,0]
1883 031355 004 05 0 00 000161 ER4 AC+1,T
1884 031356 321 10 0 00 031350 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1885
1886 000162 T=T+1
1887 010000 XX=XX/2
1888 117400 ZZ=ZZ-1000
1889 SDFARP T,200400,0,0,XX,577400,0,0,0,ZZ,0,0,0^
1890 DMOVE AC,[200400,,0
1891 031357 120 04 0 00 040304 0,,XX]
1892 DFAD AC,[577400,,0
1893 031360 110 04 0 00 040061 0,,0]
1894 031361 312 04 0 00 040306 CAME AC,[ZZ,,0]
1895 031362 003 04 0 00 000162 ER3 AC,T
1896 031363 312 05 0 00 040060 CAME AC+1,[0,,0]
1897 031364 004 05 0 00 000162 ER4 AC+1,T
1898 031365 321 10 0 00 031357 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1899
1900 000163 T=T+1
1901 004000 XX=XX/2
1902 116400 ZZ=ZZ-1000
1903 SDFARP T,200400,0,0,XX,577400,0,0,0,ZZ,0,0,0^
1904 DMOVE AC,[200400,,0
1905 031366 120 04 0 00 040307 0,,XX]
1906 DFAD AC,[577400,,0
1907 031367 110 04 0 00 040061 0,,0]
1908 031370 312 04 0 00 040311 CAME AC,[ZZ,,0]
1909 031371 003 04 0 00 000163 ER3 AC,T
1910 031372 312 05 0 00 040060 CAME AC+1,[0,,0]
1911 031373 004 05 0 00 000163 ER4 AC+1,T
1912 031374 321 10 0 00 031366 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1913
1914 000164 T=T+1
1915 002000 XX=XX/2
1916 115400 ZZ=ZZ-1000
1917 SDFARP T,200400,0,0,XX,577400,0,0,0,ZZ,0,0,0^
1918 DMOVE AC,[200400,,0
1919 031375 120 04 0 00 040312 0,,XX]
1920 DFAD AC,[577400,,0
1921 031376 110 04 0 00 040061 0,,0]
1922 031377 312 04 0 00 040314 CAME AC,[ZZ,,0]
1923 031400 003 04 0 00 000164 ER3 AC,T
1924 031401 312 05 0 00 040060 CAME AC+1,[0,,0]
1925 031402 004 05 0 00 000164 ER4 AC+1,T
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 2-14
DSKCE1 MAC 21-Jun-78 10:46 CHECK NORMALIZATION FOR DOUBLE PRECISION FLOATING POINT NUMBERS SEQ 0055
1926 031403 321 10 0 00 031375 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1927
1928 000165 T=T+1
1929 001000 XX=XX/2
1930 114400 ZZ=ZZ-1000
1931 SDFARP T,200400,0,0,XX,577400,0,0,0,ZZ,0,0,0^
1932 DMOVE AC,[200400,,0
1933 031404 120 04 0 00 040315 0,,XX]
1934 DFAD AC,[577400,,0
1935 031405 110 04 0 00 040061 0,,0]
1936 031406 312 04 0 00 040317 CAME AC,[ZZ,,0]
1937 031407 003 04 0 00 000165 ER3 AC,T
1938 031410 312 05 0 00 040060 CAME AC+1,[0,,0]
1939 031411 004 05 0 00 000165 ER4 AC+1,T
1940 031412 321 10 0 00 031404 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1941
1942 000166 T=T+1
1943 000400 XX=XX/2
1944 113400 ZZ=ZZ-1000
1945 SDFARP T,200400,0,0,XX,577400,0,0,0,ZZ,0,0,0^
1946 DMOVE AC,[200400,,0
1947 031413 120 04 0 00 040320 0,,XX]
1948 DFAD AC,[577400,,0
1949 031414 110 04 0 00 040061 0,,0]
1950 031415 312 04 0 00 040322 CAME AC,[ZZ,,0]
1951 031416 003 04 0 00 000166 ER3 AC,T
1952 031417 312 05 0 00 040060 CAME AC+1,[0,,0]
1953 031420 004 05 0 00 000166 ER4 AC+1,T
1954 031421 321 10 0 00 031413 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1955
1956 000167 T=T+1
1957 000200 XX=XX/2
1958 112400 ZZ=ZZ-1000
1959 SDFARP T,200400,0,0,XX,577400,0,0,0,ZZ,0,0,0^
1960 DMOVE AC,[200400,,0
1961 031422 120 04 0 00 040323 0,,XX]
1962 DFAD AC,[577400,,0
1963 031423 110 04 0 00 040061 0,,0]
1964 031424 312 04 0 00 040325 CAME AC,[ZZ,,0]
1965 031425 003 04 0 00 000167 ER3 AC,T
1966 031426 312 05 0 00 040060 CAME AC+1,[0,,0]
1967 031427 004 05 0 00 000167 ER4 AC+1,T
1968 031430 321 10 0 00 031422 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1969
1970 000170 T=T+1
1971 000100 XX=XX/2
1972 111400 ZZ=ZZ-1000
1973 SDFARP T,200400,0,0,XX,577400,0,0,0,ZZ,0,0,0^
1974 DMOVE AC,[200400,,0
1975 031431 120 04 0 00 040326 0,,XX]
1976 DFAD AC,[577400,,0
1977 031432 110 04 0 00 040061 0,,0]
1978 031433 312 04 0 00 040330 CAME AC,[ZZ,,0]
1979 031434 003 04 0 00 000170 ER3 AC,T
1980 031435 312 05 0 00 040060 CAME AC+1,[0,,0]
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 2-15
DSKCE1 MAC 21-Jun-78 10:46 CHECK NORMALIZATION FOR DOUBLE PRECISION FLOATING POINT NUMBERS SEQ 0056
1981 031436 004 05 0 00 000170 ER4 AC+1,T
1982 031437 321 10 0 00 031431 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1983
1984 000171 T=T+1
1985 000040 XX=XX/2
1986 110400 ZZ=ZZ-1000
1987 SDFARP T,200400,0,0,XX,577400,0,0,0,ZZ,0,0,0^
1988 DMOVE AC,[200400,,0
1989 031440 120 04 0 00 040331 0,,XX]
1990 DFAD AC,[577400,,0
1991 031441 110 04 0 00 040061 0,,0]
1992 031442 312 04 0 00 040333 CAME AC,[ZZ,,0]
1993 031443 003 04 0 00 000171 ER3 AC,T
1994 031444 312 05 0 00 040060 CAME AC+1,[0,,0]
1995 031445 004 05 0 00 000171 ER4 AC+1,T
1996 031446 321 10 0 00 031440 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
1997
1998 000172 T=T+1
1999 000020 XX=XX/2
2000 107400 ZZ=ZZ-1000
2001 SDFARP T,200400,0,0,XX,577400,0,0,0,ZZ,0,0,0^
2002 DMOVE AC,[200400,,0
2003 031447 120 04 0 00 040334 0,,XX]
2004 DFAD AC,[577400,,0
2005 031450 110 04 0 00 040061 0,,0]
2006 031451 312 04 0 00 040336 CAME AC,[ZZ,,0]
2007 031452 003 04 0 00 000172 ER3 AC,T
2008 031453 312 05 0 00 040060 CAME AC+1,[0,,0]
2009 031454 004 05 0 00 000172 ER4 AC+1,T
2010 031455 321 10 0 00 031447 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2011
2012 000173 T=T+1
2013 000010 XX=XX/2
2014 106400 ZZ=ZZ-1000
2015 SDFARP T,200400,0,0,XX,577400,0,0,0,ZZ,0,0,0^
2016 DMOVE AC,[200400,,0
2017 031456 120 04 0 00 040337 0,,XX]
2018 DFAD AC,[577400,,0
2019 031457 110 04 0 00 040061 0,,0]
2020 031460 312 04 0 00 040341 CAME AC,[ZZ,,0]
2021 031461 003 04 0 00 000173 ER3 AC,T
2022 031462 312 05 0 00 040060 CAME AC+1,[0,,0]
2023 031463 004 05 0 00 000173 ER4 AC+1,T
2024 031464 321 10 0 00 031456 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2025
2026 000174 T=T+1
2027 000004 XX=XX/2
2028 105400 ZZ=ZZ-1000
2029 SDFARP T,200400,0,0,XX,577400,0,0,0,ZZ,0,0,0^
2030 DMOVE AC,[200400,,0
2031 031465 120 04 0 00 040342 0,,XX]
2032 DFAD AC,[577400,,0
2033 031466 110 04 0 00 040061 0,,0]
2034 031467 312 04 0 00 040344 CAME AC,[ZZ,,0]
2035 031470 003 04 0 00 000174 ER3 AC,T
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 2-16
DSKCE1 MAC 21-Jun-78 10:46 CHECK NORMALIZATION FOR DOUBLE PRECISION FLOATING POINT NUMBERS SEQ 0057
2036 031471 312 05 0 00 040060 CAME AC+1,[0,,0]
2037 031472 004 05 0 00 000174 ER4 AC+1,T
2038 031473 321 10 0 00 031465 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2039
2040 000175 T=T+1
2041 000002 XX=XX/2
2042 104400 ZZ=ZZ-1000
2043 SDFARP T,200400,0,0,XX,577400,0,0,0,ZZ,0,0,0^
2044 DMOVE AC,[200400,,0
2045 031474 120 04 0 00 040345 0,,XX]
2046 DFAD AC,[577400,,0
2047 031475 110 04 0 00 040061 0,,0]
2048 031476 312 04 0 00 040347 CAME AC,[ZZ,,0]
2049 031477 003 04 0 00 000175 ER3 AC,T
2050 031500 312 05 0 00 040060 CAME AC+1,[0,,0]
2051 031501 004 05 0 00 000175 ER4 AC+1,T
2052 031502 321 10 0 00 031474 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2053
2054 000176 T=T+1
2055 000001 XX=XX/2
2056 103400 ZZ=ZZ-1000
2057 SDFARP T,200400,0,0,XX,577400,0,0,0,ZZ,0,0,0^
2058 DMOVE AC,[200400,,0
2059 031503 120 04 0 00 040350 0,,XX]
2060 DFAD AC,[577400,,0
2061 031504 110 04 0 00 040061 0,,0]
2062 031505 312 04 0 00 040352 CAME AC,[ZZ,,0]
2063 031506 003 04 0 00 000176 ER3 AC,T
2064 031507 312 05 0 00 040060 CAME AC+1,[0,,0]
2065 031510 004 05 0 00 000176 ER4 AC+1,T
2066 031511 321 10 0 00 031503 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2067
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 3
DSKCE1 MAC 21-Jun-78 10:46 CHECK NORMALIZATION FOR DOUBLE PRECISION FLOATING POINT NUMBERS SEQ 0058
2068 000200 T=200
2069 776777 XX=776777
2070 577377 YY=577377
2071 000000 ZZ=0
2072
2073 S200: REPEAT ^D9,
2074 <T=T+1
2075 XX=<XX-1>/2
2076 YY=YY+1000
2077 ZZ=ZZ+ZZ
2078 IFE ZZ,<ZZ=-1>
2079 SDFARP T,600000+XX&777,-1,-1,-1,0,0,0,0,YY,-1,377777,ZZ
2080 >
2081 000201 T=T+1
2082 377377 XX=<XX-1>/2
2083 600377 YY=YY+1000
2084 000000 ZZ=ZZ+ZZ
2085 777777 777777 IFE ZZ,<ZZ=-1>
2086 SDFARP T,600000+XX&777,-1,-1,-1,0,0,0,0,YY,-1,377777,ZZ^
2087 DMOVE AC,[600000+XX&777,,-1
2088 031512 120 04 0 00 040353 -1,,-1]
2089 DFAD AC,[0,,0
2090 031513 110 04 0 00 040355 0,,0]
2091 031514 312 04 0 00 040353 CAME AC,[YY,,-1]
2092 031515 003 04 0 00 000201 ER3 AC,T
2093 031516 312 05 0 00 040357 CAME AC+1,[377777,,ZZ]
2094 031517 004 05 0 00 000201 ER4 AC+1,T
2095 031520 321 10 0 00 031512 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2096
2097 000202 T=T+1
2098 177577 XX=<XX-1>/2
2099 601377 YY=YY+1000
2100 777777 777776 ZZ=ZZ+ZZ
2101 IFE ZZ,<ZZ=-1>
2102 SDFARP T,600000+XX&777,-1,-1,-1,0,0,0,0,YY,-1,377777,ZZ^
2103 DMOVE AC,[600000+XX&777,,-1
2104 031521 120 04 0 00 040360 -1,,-1]
2105 DFAD AC,[0,,0
2106 031522 110 04 0 00 040355 0,,0]
2107 031523 312 04 0 00 040362 CAME AC,[YY,,-1]
2108 031524 003 04 0 00 000202 ER3 AC,T
2109 031525 312 05 0 00 040363 CAME AC+1,[377777,,ZZ]
2110 031526 004 05 0 00 000202 ER4 AC+1,T
2111 031527 321 10 0 00 031521 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2112
2113 000203 T=T+1
2114 077677 XX=<XX-1>/2
2115 602377 YY=YY+1000
2116 777777 777774 ZZ=ZZ+ZZ
2117 IFE ZZ,<ZZ=-1>
2118 SDFARP T,600000+XX&777,-1,-1,-1,0,0,0,0,YY,-1,377777,ZZ^
2119 DMOVE AC,[600000+XX&777,,-1
2120 031530 120 04 0 00 040364 -1,,-1]
2121 DFAD AC,[0,,0
2122 031531 110 04 0 00 040355 0,,0]
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 3-1
DSKCE1 MAC 21-Jun-78 10:46 CHECK NORMALIZATION FOR DOUBLE PRECISION FLOATING POINT NUMBERS SEQ 0059
2123 031532 312 04 0 00 040366 CAME AC,[YY,,-1]
2124 031533 003 04 0 00 000203 ER3 AC,T
2125 031534 312 05 0 00 040367 CAME AC+1,[377777,,ZZ]
2126 031535 004 05 0 00 000203 ER4 AC+1,T
2127 031536 321 10 0 00 031530 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2128
2129 000204 T=T+1
2130 037737 XX=<XX-1>/2
2131 603377 YY=YY+1000
2132 777777 777770 ZZ=ZZ+ZZ
2133 IFE ZZ,<ZZ=-1>
2134 SDFARP T,600000+XX&777,-1,-1,-1,0,0,0,0,YY,-1,377777,ZZ^
2135 DMOVE AC,[600000+XX&777,,-1
2136 031537 120 04 0 00 040370 -1,,-1]
2137 DFAD AC,[0,,0
2138 031540 110 04 0 00 040355 0,,0]
2139 031541 312 04 0 00 040372 CAME AC,[YY,,-1]
2140 031542 003 04 0 00 000204 ER3 AC,T
2141 031543 312 05 0 00 040373 CAME AC+1,[377777,,ZZ]
2142 031544 004 05 0 00 000204 ER4 AC+1,T
2143 031545 321 10 0 00 031537 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2144
2145 000205 T=T+1
2146 017757 XX=<XX-1>/2
2147 604377 YY=YY+1000
2148 777777 777760 ZZ=ZZ+ZZ
2149 IFE ZZ,<ZZ=-1>
2150 SDFARP T,600000+XX&777,-1,-1,-1,0,0,0,0,YY,-1,377777,ZZ^
2151 DMOVE AC,[600000+XX&777,,-1
2152 031546 120 04 0 00 040374 -1,,-1]
2153 DFAD AC,[0,,0
2154 031547 110 04 0 00 040355 0,,0]
2155 031550 312 04 0 00 040376 CAME AC,[YY,,-1]
2156 031551 003 04 0 00 000205 ER3 AC,T
2157 031552 312 05 0 00 040377 CAME AC+1,[377777,,ZZ]
2158 031553 004 05 0 00 000205 ER4 AC+1,T
2159 031554 321 10 0 00 031546 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2160
2161 000206 T=T+1
2162 007767 XX=<XX-1>/2
2163 605377 YY=YY+1000
2164 777777 777740 ZZ=ZZ+ZZ
2165 IFE ZZ,<ZZ=-1>
2166 SDFARP T,600000+XX&777,-1,-1,-1,0,0,0,0,YY,-1,377777,ZZ^
2167 DMOVE AC,[600000+XX&777,,-1
2168 031555 120 04 0 00 040400 -1,,-1]
2169 DFAD AC,[0,,0
2170 031556 110 04 0 00 040355 0,,0]
2171 031557 312 04 0 00 040402 CAME AC,[YY,,-1]
2172 031560 003 04 0 00 000206 ER3 AC,T
2173 031561 312 05 0 00 040403 CAME AC+1,[377777,,ZZ]
2174 031562 004 05 0 00 000206 ER4 AC+1,T
2175 031563 321 10 0 00 031555 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2176
2177 000207 T=T+1
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 3-2
DSKCE1 MAC 21-Jun-78 10:46 CHECK NORMALIZATION FOR DOUBLE PRECISION FLOATING POINT NUMBERS SEQ 0060
2178 003773 XX=<XX-1>/2
2179 606377 YY=YY+1000
2180 777777 777700 ZZ=ZZ+ZZ
2181 IFE ZZ,<ZZ=-1>
2182 SDFARP T,600000+XX&777,-1,-1,-1,0,0,0,0,YY,-1,377777,ZZ^
2183 DMOVE AC,[600000+XX&777,,-1
2184 031564 120 04 0 00 040404 -1,,-1]
2185 DFAD AC,[0,,0
2186 031565 110 04 0 00 040355 0,,0]
2187 031566 312 04 0 00 040406 CAME AC,[YY,,-1]
2188 031567 003 04 0 00 000207 ER3 AC,T
2189 031570 312 05 0 00 040407 CAME AC+1,[377777,,ZZ]
2190 031571 004 05 0 00 000207 ER4 AC+1,T
2191 031572 321 10 0 00 031564 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2192
2193 000210 T=T+1
2194 001775 XX=<XX-1>/2
2195 607377 YY=YY+1000
2196 777777 777600 ZZ=ZZ+ZZ
2197 IFE ZZ,<ZZ=-1>
2198 SDFARP T,600000+XX&777,-1,-1,-1,0,0,0,0,YY,-1,377777,ZZ^
2199 DMOVE AC,[600000+XX&777,,-1
2200 031573 120 04 0 00 040410 -1,,-1]
2201 DFAD AC,[0,,0
2202 031574 110 04 0 00 040355 0,,0]
2203 031575 312 04 0 00 040412 CAME AC,[YY,,-1]
2204 031576 003 04 0 00 000210 ER3 AC,T
2205 031577 312 05 0 00 040413 CAME AC+1,[377777,,ZZ]
2206 031600 004 05 0 00 000210 ER4 AC+1,T
2207 031601 321 10 0 00 031573 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2208
2209 000211 T=T+1
2210 000776 XX=<XX-1>/2
2211 610377 YY=YY+1000
2212 777777 777400 ZZ=ZZ+ZZ
2213 IFE ZZ,<ZZ=-1>
2214 SDFARP T,600000+XX&777,-1,-1,-1,0,0,0,0,YY,-1,377777,ZZ^
2215 DMOVE AC,[600000+XX&777,,-1
2216 031602 120 04 0 00 040414 -1,,-1]
2217 DFAD AC,[0,,0
2218 031603 110 04 0 00 040355 0,,0]
2219 031604 312 04 0 00 040416 CAME AC,[YY,,-1]
2220 031605 003 04 0 00 000211 ER3 AC,T
2221 031606 312 05 0 00 040417 CAME AC+1,[377777,,ZZ]
2222 031607 004 05 0 00 000211 ER4 AC+1,T
2223 031610 321 10 0 00 031602 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2224
2225
2226 777776 777777 XX=777776777777
2227
2228 REPEAT ^D10,
2229 <T=T+1
2230 XX=<XX-1>/2
2231 YY=YY+1000
2232 ZZ=ZZ+ZZ
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 3-3
DSKCE1 MAC 21-Jun-78 10:46 CHECK NORMALIZATION FOR DOUBLE PRECISION FLOATING POINT NUMBERS SEQ 0061
2233 SDFARP T,600777,XX&777777,-1,-1,0,0,0,0,YY,-1,377777,ZZ
2234 >
2235 000212 T=T+1
2236 777777 377777 XX=<XX-1>/2
2237 611377 YY=YY+1000
2238 777777 777000 ZZ=ZZ+ZZ
2239 SDFARP T,600777,XX&777777,-1,-1,0,0,0,0,YY,-1,377777,ZZ^
2240 DMOVE AC,[600777,,XX&777777
2241 031611 120 04 0 00 040420 -1,,-1]
2242 DFAD AC,[0,,0
2243 031612 110 04 0 00 040355 0,,0]
2244 031613 312 04 0 00 040422 CAME AC,[YY,,-1]
2245 031614 003 04 0 00 000212 ER3 AC,T
2246 031615 312 05 0 00 040423 CAME AC+1,[377777,,ZZ]
2247 031616 004 05 0 00 000212 ER4 AC+1,T
2248 031617 321 10 0 00 031611 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2249
2250 000213 T=T+1
2251 777777 577777 XX=<XX-1>/2
2252 612377 YY=YY+1000
2253 777777 776000 ZZ=ZZ+ZZ
2254 SDFARP T,600777,XX&777777,-1,-1,0,0,0,0,YY,-1,377777,ZZ^
2255 DMOVE AC,[600777,,XX&777777
2256 031620 120 04 0 00 040424 -1,,-1]
2257 DFAD AC,[0,,0
2258 031621 110 04 0 00 040355 0,,0]
2259 031622 312 04 0 00 040426 CAME AC,[YY,,-1]
2260 031623 003 04 0 00 000213 ER3 AC,T
2261 031624 312 05 0 00 040427 CAME AC+1,[377777,,ZZ]
2262 031625 004 05 0 00 000213 ER4 AC+1,T
2263 031626 321 10 0 00 031620 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2264
2265 000214 T=T+1
2266 777777 677777 XX=<XX-1>/2
2267 613377 YY=YY+1000
2268 777777 774000 ZZ=ZZ+ZZ
2269 SDFARP T,600777,XX&777777,-1,-1,0,0,0,0,YY,-1,377777,ZZ^
2270 DMOVE AC,[600777,,XX&777777
2271 031627 120 04 0 00 040430 -1,,-1]
2272 DFAD AC,[0,,0
2273 031630 110 04 0 00 040355 0,,0]
2274 031631 312 04 0 00 040432 CAME AC,[YY,,-1]
2275 031632 003 04 0 00 000214 ER3 AC,T
2276 031633 312 05 0 00 040433 CAME AC+1,[377777,,ZZ]
2277 031634 004 05 0 00 000214 ER4 AC+1,T
2278 031635 321 10 0 00 031627 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2279
2280 000215 T=T+1
2281 777777 737777 XX=<XX-1>/2
2282 614377 YY=YY+1000
2283 777777 770000 ZZ=ZZ+ZZ
2284 SDFARP T,600777,XX&777777,-1,-1,0,0,0,0,YY,-1,377777,ZZ^
2285 DMOVE AC,[600777,,XX&777777
2286 031636 120 04 0 00 040434 -1,,-1]
2287 DFAD AC,[0,,0
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 3-4
DSKCE1 MAC 21-Jun-78 10:46 CHECK NORMALIZATION FOR DOUBLE PRECISION FLOATING POINT NUMBERS SEQ 0062
2288 031637 110 04 0 00 040355 0,,0]
2289 031640 312 04 0 00 040436 CAME AC,[YY,,-1]
2290 031641 003 04 0 00 000215 ER3 AC,T
2291 031642 312 05 0 00 040437 CAME AC+1,[377777,,ZZ]
2292 031643 004 05 0 00 000215 ER4 AC+1,T
2293 031644 321 10 0 00 031636 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2294
2295 000216 T=T+1
2296 777777 757777 XX=<XX-1>/2
2297 615377 YY=YY+1000
2298 777777 760000 ZZ=ZZ+ZZ
2299 SDFARP T,600777,XX&777777,-1,-1,0,0,0,0,YY,-1,377777,ZZ^
2300 DMOVE AC,[600777,,XX&777777
2301 031645 120 04 0 00 040440 -1,,-1]
2302 DFAD AC,[0,,0
2303 031646 110 04 0 00 040355 0,,0]
2304 031647 312 04 0 00 040442 CAME AC,[YY,,-1]
2305 031650 003 04 0 00 000216 ER3 AC,T
2306 031651 312 05 0 00 040443 CAME AC+1,[377777,,ZZ]
2307 031652 004 05 0 00 000216 ER4 AC+1,T
2308 031653 321 10 0 00 031645 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2309
2310 000217 T=T+1
2311 777777 767777 XX=<XX-1>/2
2312 616377 YY=YY+1000
2313 777777 740000 ZZ=ZZ+ZZ
2314 SDFARP T,600777,XX&777777,-1,-1,0,0,0,0,YY,-1,377777,ZZ^
2315 DMOVE AC,[600777,,XX&777777
2316 031654 120 04 0 00 040444 -1,,-1]
2317 DFAD AC,[0,,0
2318 031655 110 04 0 00 040355 0,,0]
2319 031656 312 04 0 00 040446 CAME AC,[YY,,-1]
2320 031657 003 04 0 00 000217 ER3 AC,T
2321 031660 312 05 0 00 040447 CAME AC+1,[377777,,ZZ]
2322 031661 004 05 0 00 000217 ER4 AC+1,T
2323 031662 321 10 0 00 031654 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2324
2325 000220 T=T+1
2326 777777 773777 XX=<XX-1>/2
2327 617377 YY=YY+1000
2328 777777 700000 ZZ=ZZ+ZZ
2329 SDFARP T,600777,XX&777777,-1,-1,0,0,0,0,YY,-1,377777,ZZ^
2330 DMOVE AC,[600777,,XX&777777
2331 031663 120 04 0 00 040450 -1,,-1]
2332 DFAD AC,[0,,0
2333 031664 110 04 0 00 040355 0,,0]
2334 031665 312 04 0 00 040452 CAME AC,[YY,,-1]
2335 031666 003 04 0 00 000220 ER3 AC,T
2336 031667 312 05 0 00 040453 CAME AC+1,[377777,,ZZ]
2337 031670 004 05 0 00 000220 ER4 AC+1,T
2338 031671 321 10 0 00 031663 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2339
2340 000221 T=T+1
2341 777777 775777 XX=<XX-1>/2
2342 620377 YY=YY+1000
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 3-5
DSKCE1 MAC 21-Jun-78 10:46 CHECK NORMALIZATION FOR DOUBLE PRECISION FLOATING POINT NUMBERS SEQ 0063
2343 777777 600000 ZZ=ZZ+ZZ
2344 SDFARP T,600777,XX&777777,-1,-1,0,0,0,0,YY,-1,377777,ZZ^
2345 DMOVE AC,[600777,,XX&777777
2346 031672 120 04 0 00 040454 -1,,-1]
2347 DFAD AC,[0,,0
2348 031673 110 04 0 00 040355 0,,0]
2349 031674 312 04 0 00 040456 CAME AC,[YY,,-1]
2350 031675 003 04 0 00 000221 ER3 AC,T
2351 031676 312 05 0 00 040457 CAME AC+1,[377777,,ZZ]
2352 031677 004 05 0 00 000221 ER4 AC+1,T
2353 031700 321 10 0 00 031672 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2354
2355 000222 T=T+1
2356 777777 776777 XX=<XX-1>/2
2357 621377 YY=YY+1000
2358 777777 400000 ZZ=ZZ+ZZ
2359 SDFARP T,600777,XX&777777,-1,-1,0,0,0,0,YY,-1,377777,ZZ^
2360 DMOVE AC,[600777,,XX&777777
2361 031701 120 04 0 00 040460 -1,,-1]
2362 DFAD AC,[0,,0
2363 031702 110 04 0 00 040355 0,,0]
2364 031703 312 04 0 00 040462 CAME AC,[YY,,-1]
2365 031704 003 04 0 00 000222 ER3 AC,T
2366 031705 312 05 0 00 040463 CAME AC+1,[377777,,ZZ]
2367 031706 004 05 0 00 000222 ER4 AC+1,T
2368 031707 321 10 0 00 031701 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2369
2370 000223 T=T+1
2371 777777 777377 XX=<XX-1>/2
2372 622377 YY=YY+1000
2373 777777 000000 ZZ=ZZ+ZZ
2374 SDFARP T,600777,XX&777777,-1,-1,0,0,0,0,YY,-1,377777,ZZ^
2375 DMOVE AC,[600777,,XX&777777
2376 031710 120 04 0 00 040464 -1,,-1]
2377 DFAD AC,[0,,0
2378 031711 110 04 0 00 040355 0,,0]
2379 031712 312 04 0 00 040466 CAME AC,[YY,,-1]
2380 031713 003 04 0 00 000223 ER3 AC,T
2381 031714 312 05 0 00 040467 CAME AC+1,[377777,,ZZ]
2382 031715 004 05 0 00 000223 ER4 AC+1,T
2383 031716 321 10 0 00 031710 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2384
2385
2386 777777 777777 ZZ=-1
2387
2388 REPEAT ^D8,
2389 <T=T+1
2390 XX=<XX-1>/2
2391 YY=YY+1000
2392 ZZ=ZZ+ZZ
2393 SDFARP T,600777,XX,-1,-1,0,0,0,0,YY,-1,ZZ&377777,0
2394 >
2395 000224 T=T+1
2396 777777 777577 XX=<XX-1>/2
2397 623377 YY=YY+1000
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 3-6
DSKCE1 MAC 21-Jun-78 10:46 CHECK NORMALIZATION FOR DOUBLE PRECISION FLOATING POINT NUMBERS SEQ 0064
2398 777777 777776 ZZ=ZZ+ZZ
2399 SDFARP T,600777,XX,-1,-1,0,0,0,0,YY,-1,ZZ&377777,0^
2400 DMOVE AC,[600777,,XX
2401 031717 120 04 0 00 040470 -1,,-1]
2402 DFAD AC,[0,,0
2403 031720 110 04 0 00 040355 0,,0]
2404 031721 312 04 0 00 040472 CAME AC,[YY,,-1]
2405 031722 003 04 0 00 000224 ER3 AC,T
2406 031723 312 05 0 00 040473 CAME AC+1,[ZZ&377777,,0]
2407 031724 004 05 0 00 000224 ER4 AC+1,T
2408 031725 321 10 0 00 031717 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2409
2410 000225 T=T+1
2411 777777 777677 XX=<XX-1>/2
2412 624377 YY=YY+1000
2413 777777 777774 ZZ=ZZ+ZZ
2414 SDFARP T,600777,XX,-1,-1,0,0,0,0,YY,-1,ZZ&377777,0^
2415 DMOVE AC,[600777,,XX
2416 031726 120 04 0 00 040474 -1,,-1]
2417 DFAD AC,[0,,0
2418 031727 110 04 0 00 040355 0,,0]
2419 031730 312 04 0 00 040476 CAME AC,[YY,,-1]
2420 031731 003 04 0 00 000225 ER3 AC,T
2421 031732 312 05 0 00 040477 CAME AC+1,[ZZ&377777,,0]
2422 031733 004 05 0 00 000225 ER4 AC+1,T
2423 031734 321 10 0 00 031726 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2424
2425 000226 T=T+1
2426 777777 777737 XX=<XX-1>/2
2427 625377 YY=YY+1000
2428 777777 777770 ZZ=ZZ+ZZ
2429 SDFARP T,600777,XX,-1,-1,0,0,0,0,YY,-1,ZZ&377777,0^
2430 DMOVE AC,[600777,,XX
2431 031735 120 04 0 00 040500 -1,,-1]
2432 DFAD AC,[0,,0
2433 031736 110 04 0 00 040355 0,,0]
2434 031737 312 04 0 00 040502 CAME AC,[YY,,-1]
2435 031740 003 04 0 00 000226 ER3 AC,T
2436 031741 312 05 0 00 040503 CAME AC+1,[ZZ&377777,,0]
2437 031742 004 05 0 00 000226 ER4 AC+1,T
2438 031743 321 10 0 00 031735 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2439
2440 000227 T=T+1
2441 777777 777757 XX=<XX-1>/2
2442 626377 YY=YY+1000
2443 777777 777760 ZZ=ZZ+ZZ
2444 SDFARP T,600777,XX,-1,-1,0,0,0,0,YY,-1,ZZ&377777,0^
2445 DMOVE AC,[600777,,XX
2446 031744 120 04 0 00 040504 -1,,-1]
2447 DFAD AC,[0,,0
2448 031745 110 04 0 00 040355 0,,0]
2449 031746 312 04 0 00 040506 CAME AC,[YY,,-1]
2450 031747 003 04 0 00 000227 ER3 AC,T
2451 031750 312 05 0 00 040507 CAME AC+1,[ZZ&377777,,0]
2452 031751 004 05 0 00 000227 ER4 AC+1,T
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 3-7
DSKCE1 MAC 21-Jun-78 10:46 CHECK NORMALIZATION FOR DOUBLE PRECISION FLOATING POINT NUMBERS SEQ 0065
2453 031752 321 10 0 00 031744 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2454
2455 000230 T=T+1
2456 777777 777767 XX=<XX-1>/2
2457 627377 YY=YY+1000
2458 777777 777740 ZZ=ZZ+ZZ
2459 SDFARP T,600777,XX,-1,-1,0,0,0,0,YY,-1,ZZ&377777,0^
2460 DMOVE AC,[600777,,XX
2461 031753 120 04 0 00 040510 -1,,-1]
2462 DFAD AC,[0,,0
2463 031754 110 04 0 00 040355 0,,0]
2464 031755 312 04 0 00 040512 CAME AC,[YY,,-1]
2465 031756 003 04 0 00 000230 ER3 AC,T
2466 031757 312 05 0 00 040513 CAME AC+1,[ZZ&377777,,0]
2467 031760 004 05 0 00 000230 ER4 AC+1,T
2468 031761 321 10 0 00 031753 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2469
2470 000231 T=T+1
2471 777777 777773 XX=<XX-1>/2
2472 630377 YY=YY+1000
2473 777777 777700 ZZ=ZZ+ZZ
2474 SDFARP T,600777,XX,-1,-1,0,0,0,0,YY,-1,ZZ&377777,0^
2475 DMOVE AC,[600777,,XX
2476 031762 120 04 0 00 040514 -1,,-1]
2477 DFAD AC,[0,,0
2478 031763 110 04 0 00 040355 0,,0]
2479 031764 312 04 0 00 040516 CAME AC,[YY,,-1]
2480 031765 003 04 0 00 000231 ER3 AC,T
2481 031766 312 05 0 00 040517 CAME AC+1,[ZZ&377777,,0]
2482 031767 004 05 0 00 000231 ER4 AC+1,T
2483 031770 321 10 0 00 031762 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2484
2485 000232 T=T+1
2486 777777 777775 XX=<XX-1>/2
2487 631377 YY=YY+1000
2488 777777 777600 ZZ=ZZ+ZZ
2489 SDFARP T,600777,XX,-1,-1,0,0,0,0,YY,-1,ZZ&377777,0^
2490 DMOVE AC,[600777,,XX
2491 031771 120 04 0 00 040520 -1,,-1]
2492 DFAD AC,[0,,0
2493 031772 110 04 0 00 040355 0,,0]
2494 031773 312 04 0 00 040522 CAME AC,[YY,,-1]
2495 031774 003 04 0 00 000232 ER3 AC,T
2496 031775 312 05 0 00 040523 CAME AC+1,[ZZ&377777,,0]
2497 031776 004 05 0 00 000232 ER4 AC+1,T
2498 031777 321 10 0 00 031771 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2499
2500 000233 T=T+1
2501 777777 777776 XX=<XX-1>/2
2502 632377 YY=YY+1000
2503 777777 777400 ZZ=ZZ+ZZ
2504 SDFARP T,600777,XX,-1,-1,0,0,0,0,YY,-1,ZZ&377777,0^
2505 DMOVE AC,[600777,,XX
2506 032000 120 04 0 00 040524 -1,,-1]
2507 DFAD AC,[0,,0
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 3-8
DSKCE1 MAC 21-Jun-78 10:46 CHECK NORMALIZATION FOR DOUBLE PRECISION FLOATING POINT NUMBERS SEQ 0066
2508 032001 110 04 0 00 040355 0,,0]
2509 032002 312 04 0 00 040526 CAME AC,[YY,,-1]
2510 032003 003 04 0 00 000233 ER3 AC,T
2511 032004 312 05 0 00 040527 CAME AC+1,[ZZ&377777,,0]
2512 032005 004 05 0 00 000233 ER4 AC+1,T
2513 032006 321 10 0 00 032000 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2514
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 4
DSKCE1 MAC 21-Jun-78 10:46 CHECK NORMALIZATION FOR DOUBLE PRECISION FLOATING POINT NUMBERS SEQ 0067
2515 777777 377777 XX=777777377777
2516
2517 REPEAT ^D9,
2518 <T=T+1
2519 XX=<XX-1>/2
2520 YY=YY+1000
2521 ZZ=ZZ+ZZ
2522 SDFARP T,600777,-1,XX,-1,0,0,0,0,YY,-1,ZZ&377777,0
2523 >
2524 000234 T=T+1
2525 777777 577777 XX=<XX-1>/2
2526 633377 YY=YY+1000
2527 777777 777000 ZZ=ZZ+ZZ
2528 SDFARP T,600777,-1,XX,-1,0,0,0,0,YY,-1,ZZ&377777,0^
2529 DMOVE AC,[600777,,-1
2530 032007 120 04 0 00 040530 XX,,-1]
2531 DFAD AC,[0,,0
2532 032010 110 04 0 00 040355 0,,0]
2533 032011 312 04 0 00 040532 CAME AC,[YY,,-1]
2534 032012 003 04 0 00 000234 ER3 AC,T
2535 032013 312 05 0 00 040533 CAME AC+1,[ZZ&377777,,0]
2536 032014 004 05 0 00 000234 ER4 AC+1,T
2537 032015 321 10 0 00 032007 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2538
2539 000235 T=T+1
2540 777777 677777 XX=<XX-1>/2
2541 634377 YY=YY+1000
2542 777777 776000 ZZ=ZZ+ZZ
2543 SDFARP T,600777,-1,XX,-1,0,0,0,0,YY,-1,ZZ&377777,0^
2544 DMOVE AC,[600777,,-1
2545 032016 120 04 0 00 040534 XX,,-1]
2546 DFAD AC,[0,,0
2547 032017 110 04 0 00 040355 0,,0]
2548 032020 312 04 0 00 040536 CAME AC,[YY,,-1]
2549 032021 003 04 0 00 000235 ER3 AC,T
2550 032022 312 05 0 00 040537 CAME AC+1,[ZZ&377777,,0]
2551 032023 004 05 0 00 000235 ER4 AC+1,T
2552 032024 321 10 0 00 032016 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2553
2554 000236 T=T+1
2555 777777 737777 XX=<XX-1>/2
2556 635377 YY=YY+1000
2557 777777 774000 ZZ=ZZ+ZZ
2558 SDFARP T,600777,-1,XX,-1,0,0,0,0,YY,-1,ZZ&377777,0^
2559 DMOVE AC,[600777,,-1
2560 032025 120 04 0 00 040540 XX,,-1]
2561 DFAD AC,[0,,0
2562 032026 110 04 0 00 040355 0,,0]
2563 032027 312 04 0 00 040542 CAME AC,[YY,,-1]
2564 032030 003 04 0 00 000236 ER3 AC,T
2565 032031 312 05 0 00 040543 CAME AC+1,[ZZ&377777,,0]
2566 032032 004 05 0 00 000236 ER4 AC+1,T
2567 032033 321 10 0 00 032025 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2568
2569 000237 T=T+1
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 4-1
DSKCE1 MAC 21-Jun-78 10:46 CHECK NORMALIZATION FOR DOUBLE PRECISION FLOATING POINT NUMBERS SEQ 0068
2570 777777 757777 XX=<XX-1>/2
2571 636377 YY=YY+1000
2572 777777 770000 ZZ=ZZ+ZZ
2573 SDFARP T,600777,-1,XX,-1,0,0,0,0,YY,-1,ZZ&377777,0^
2574 DMOVE AC,[600777,,-1
2575 032034 120 04 0 00 040544 XX,,-1]
2576 DFAD AC,[0,,0
2577 032035 110 04 0 00 040355 0,,0]
2578 032036 312 04 0 00 040546 CAME AC,[YY,,-1]
2579 032037 003 04 0 00 000237 ER3 AC,T
2580 032040 312 05 0 00 040547 CAME AC+1,[ZZ&377777,,0]
2581 032041 004 05 0 00 000237 ER4 AC+1,T
2582 032042 321 10 0 00 032034 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2583
2584 000240 T=T+1
2585 777777 767777 XX=<XX-1>/2
2586 637377 YY=YY+1000
2587 777777 760000 ZZ=ZZ+ZZ
2588 SDFARP T,600777,-1,XX,-1,0,0,0,0,YY,-1,ZZ&377777,0^
2589 DMOVE AC,[600777,,-1
2590 032043 120 04 0 00 040550 XX,,-1]
2591 DFAD AC,[0,,0
2592 032044 110 04 0 00 040355 0,,0]
2593 032045 312 04 0 00 040552 CAME AC,[YY,,-1]
2594 032046 003 04 0 00 000240 ER3 AC,T
2595 032047 312 05 0 00 040553 CAME AC+1,[ZZ&377777,,0]
2596 032050 004 05 0 00 000240 ER4 AC+1,T
2597 032051 321 10 0 00 032043 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2598
2599 000241 T=T+1
2600 777777 773777 XX=<XX-1>/2
2601 640377 YY=YY+1000
2602 777777 740000 ZZ=ZZ+ZZ
2603 SDFARP T,600777,-1,XX,-1,0,0,0,0,YY,-1,ZZ&377777,0^
2604 DMOVE AC,[600777,,-1
2605 032052 120 04 0 00 040554 XX,,-1]
2606 DFAD AC,[0,,0
2607 032053 110 04 0 00 040355 0,,0]
2608 032054 312 04 0 00 040556 CAME AC,[YY,,-1]
2609 032055 003 04 0 00 000241 ER3 AC,T
2610 032056 312 05 0 00 040557 CAME AC+1,[ZZ&377777,,0]
2611 032057 004 05 0 00 000241 ER4 AC+1,T
2612 032060 321 10 0 00 032052 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2613
2614 000242 T=T+1
2615 777777 775777 XX=<XX-1>/2
2616 641377 YY=YY+1000
2617 777777 700000 ZZ=ZZ+ZZ
2618 SDFARP T,600777,-1,XX,-1,0,0,0,0,YY,-1,ZZ&377777,0^
2619 DMOVE AC,[600777,,-1
2620 032061 120 04 0 00 040560 XX,,-1]
2621 DFAD AC,[0,,0
2622 032062 110 04 0 00 040355 0,,0]
2623 032063 312 04 0 00 040562 CAME AC,[YY,,-1]
2624 032064 003 04 0 00 000242 ER3 AC,T
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 4-2
DSKCE1 MAC 21-Jun-78 10:46 CHECK NORMALIZATION FOR DOUBLE PRECISION FLOATING POINT NUMBERS SEQ 0069
2625 032065 312 05 0 00 040563 CAME AC+1,[ZZ&377777,,0]
2626 032066 004 05 0 00 000242 ER4 AC+1,T
2627 032067 321 10 0 00 032061 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2628
2629 000243 T=T+1
2630 777777 776777 XX=<XX-1>/2
2631 642377 YY=YY+1000
2632 777777 600000 ZZ=ZZ+ZZ
2633 SDFARP T,600777,-1,XX,-1,0,0,0,0,YY,-1,ZZ&377777,0^
2634 DMOVE AC,[600777,,-1
2635 032070 120 04 0 00 040564 XX,,-1]
2636 DFAD AC,[0,,0
2637 032071 110 04 0 00 040355 0,,0]
2638 032072 312 04 0 00 040566 CAME AC,[YY,,-1]
2639 032073 003 04 0 00 000243 ER3 AC,T
2640 032074 312 05 0 00 040203 CAME AC+1,[ZZ&377777,,0]
2641 032075 004 05 0 00 000243 ER4 AC+1,T
2642 032076 321 10 0 00 032070 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2643
2644 000244 T=T+1
2645 777777 777377 XX=<XX-1>/2
2646 643377 YY=YY+1000
2647 777777 400000 ZZ=ZZ+ZZ
2648 SDFARP T,600777,-1,XX,-1,0,0,0,0,YY,-1,ZZ&377777,0^
2649 DMOVE AC,[600777,,-1
2650 032077 120 04 0 00 040567 XX,,-1]
2651 DFAD AC,[0,,0
2652 032100 110 04 0 00 040355 0,,0]
2653 032101 312 04 0 00 040571 CAME AC,[YY,,-1]
2654 032102 003 04 0 00 000244 ER3 AC,T
2655 032103 312 05 0 00 040060 CAME AC+1,[ZZ&377777,,0]
2656 032104 004 05 0 00 000244 ER4 AC+1,T
2657 032105 321 10 0 00 032077 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2658
2659
2660 777777 777777 ZZ=-1
2661
2662 REPEAT ^D8,
2663 <T=T+1
2664 XX=<XX-1>/2
2665 YY=YY+1000
2666 ZZ=ZZ+ZZ
2667 SDFARP T,600777,-1,XX,-1,0,0,0,0,YY,ZZ,0,0
2668 >
2669 000245 T=T+1
2670 777777 777577 XX=<XX-1>/2
2671 644377 YY=YY+1000
2672 777777 777776 ZZ=ZZ+ZZ
2673 SDFARP T,600777,-1,XX,-1,0,0,0,0,YY,ZZ,0,0^
2674 DMOVE AC,[600777,,-1
2675 032106 120 04 0 00 040572 XX,,-1]
2676 DFAD AC,[0,,0
2677 032107 110 04 0 00 040355 0,,0]
2678 032110 312 04 0 00 040574 CAME AC,[YY,,ZZ]
2679 032111 003 04 0 00 000245 ER3 AC,T
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 4-3
DSKCE1 MAC 21-Jun-78 10:46 CHECK NORMALIZATION FOR DOUBLE PRECISION FLOATING POINT NUMBERS SEQ 0070
2680 032112 312 05 0 00 040060 CAME AC+1,[0,,0]
2681 032113 004 05 0 00 000245 ER4 AC+1,T
2682 032114 321 10 0 00 032106 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2683
2684 000246 T=T+1
2685 777777 777677 XX=<XX-1>/2
2686 645377 YY=YY+1000
2687 777777 777774 ZZ=ZZ+ZZ
2688 SDFARP T,600777,-1,XX,-1,0,0,0,0,YY,ZZ,0,0^
2689 DMOVE AC,[600777,,-1
2690 032115 120 04 0 00 040575 XX,,-1]
2691 DFAD AC,[0,,0
2692 032116 110 04 0 00 040355 0,,0]
2693 032117 312 04 0 00 040577 CAME AC,[YY,,ZZ]
2694 032120 003 04 0 00 000246 ER3 AC,T
2695 032121 312 05 0 00 040060 CAME AC+1,[0,,0]
2696 032122 004 05 0 00 000246 ER4 AC+1,T
2697 032123 321 10 0 00 032115 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2698
2699 000247 T=T+1
2700 777777 777737 XX=<XX-1>/2
2701 646377 YY=YY+1000
2702 777777 777770 ZZ=ZZ+ZZ
2703 SDFARP T,600777,-1,XX,-1,0,0,0,0,YY,ZZ,0,0^
2704 DMOVE AC,[600777,,-1
2705 032124 120 04 0 00 040600 XX,,-1]
2706 DFAD AC,[0,,0
2707 032125 110 04 0 00 040355 0,,0]
2708 032126 312 04 0 00 040602 CAME AC,[YY,,ZZ]
2709 032127 003 04 0 00 000247 ER3 AC,T
2710 032130 312 05 0 00 040060 CAME AC+1,[0,,0]
2711 032131 004 05 0 00 000247 ER4 AC+1,T
2712 032132 321 10 0 00 032124 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2713
2714 000250 T=T+1
2715 777777 777757 XX=<XX-1>/2
2716 647377 YY=YY+1000
2717 777777 777760 ZZ=ZZ+ZZ
2718 SDFARP T,600777,-1,XX,-1,0,0,0,0,YY,ZZ,0,0^
2719 DMOVE AC,[600777,,-1
2720 032133 120 04 0 00 040603 XX,,-1]
2721 DFAD AC,[0,,0
2722 032134 110 04 0 00 040355 0,,0]
2723 032135 312 04 0 00 040605 CAME AC,[YY,,ZZ]
2724 032136 003 04 0 00 000250 ER3 AC,T
2725 032137 312 05 0 00 040060 CAME AC+1,[0,,0]
2726 032140 004 05 0 00 000250 ER4 AC+1,T
2727 032141 321 10 0 00 032133 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2728
2729 000251 T=T+1
2730 777777 777767 XX=<XX-1>/2
2731 650377 YY=YY+1000
2732 777777 777740 ZZ=ZZ+ZZ
2733 SDFARP T,600777,-1,XX,-1,0,0,0,0,YY,ZZ,0,0^
2734 DMOVE AC,[600777,,-1
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 4-4
DSKCE1 MAC 21-Jun-78 10:46 CHECK NORMALIZATION FOR DOUBLE PRECISION FLOATING POINT NUMBERS SEQ 0071
2735 032142 120 04 0 00 040606 XX,,-1]
2736 DFAD AC,[0,,0
2737 032143 110 04 0 00 040355 0,,0]
2738 032144 312 04 0 00 040610 CAME AC,[YY,,ZZ]
2739 032145 003 04 0 00 000251 ER3 AC,T
2740 032146 312 05 0 00 040060 CAME AC+1,[0,,0]
2741 032147 004 05 0 00 000251 ER4 AC+1,T
2742 032150 321 10 0 00 032142 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2743
2744 000252 T=T+1
2745 777777 777773 XX=<XX-1>/2
2746 651377 YY=YY+1000
2747 777777 777700 ZZ=ZZ+ZZ
2748 SDFARP T,600777,-1,XX,-1,0,0,0,0,YY,ZZ,0,0^
2749 DMOVE AC,[600777,,-1
2750 032151 120 04 0 00 040611 XX,,-1]
2751 DFAD AC,[0,,0
2752 032152 110 04 0 00 040355 0,,0]
2753 032153 312 04 0 00 040613 CAME AC,[YY,,ZZ]
2754 032154 003 04 0 00 000252 ER3 AC,T
2755 032155 312 05 0 00 040060 CAME AC+1,[0,,0]
2756 032156 004 05 0 00 000252 ER4 AC+1,T
2757 032157 321 10 0 00 032151 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2758
2759 000253 T=T+1
2760 777777 777775 XX=<XX-1>/2
2761 652377 YY=YY+1000
2762 777777 777600 ZZ=ZZ+ZZ
2763 SDFARP T,600777,-1,XX,-1,0,0,0,0,YY,ZZ,0,0^
2764 DMOVE AC,[600777,,-1
2765 032160 120 04 0 00 040614 XX,,-1]
2766 DFAD AC,[0,,0
2767 032161 110 04 0 00 040355 0,,0]
2768 032162 312 04 0 00 040616 CAME AC,[YY,,ZZ]
2769 032163 003 04 0 00 000253 ER3 AC,T
2770 032164 312 05 0 00 040060 CAME AC+1,[0,,0]
2771 032165 004 05 0 00 000253 ER4 AC+1,T
2772 032166 321 10 0 00 032160 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2773
2774 000254 T=T+1
2775 777777 777776 XX=<XX-1>/2
2776 653377 YY=YY+1000
2777 777777 777400 ZZ=ZZ+ZZ
2778 SDFARP T,600777,-1,XX,-1,0,0,0,0,YY,ZZ,0,0^
2779 DMOVE AC,[600777,,-1
2780 032167 120 04 0 00 040617 XX,,-1]
2781 DFAD AC,[0,,0
2782 032170 110 04 0 00 040355 0,,0]
2783 032171 312 04 0 00 040621 CAME AC,[YY,,ZZ]
2784 032172 003 04 0 00 000254 ER3 AC,T
2785 032173 312 05 0 00 040060 CAME AC+1,[0,,0]
2786 032174 004 05 0 00 000254 ER4 AC+1,T
2787 032175 321 10 0 00 032167 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2788
2789
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 4-5
DSKCE1 MAC 21-Jun-78 10:46 CHECK NORMALIZATION FOR DOUBLE PRECISION FLOATING POINT NUMBERS SEQ 0072
2790 777776 777777 XX=777776777777
2791
2792 REPEAT ^D10,
2793 <T=T+1
2794 XX=<XX-1>/2
2795 YY=YY+1000
2796 ZZ=ZZ+ZZ
2797 SDFARP T,600777,-1,-1,XX,0,0,0,0,YY,ZZ,0,0
2798 >
2799 000255 T=T+1
2800 777777 377777 XX=<XX-1>/2
2801 654377 YY=YY+1000
2802 777777 777000 ZZ=ZZ+ZZ
2803 SDFARP T,600777,-1,-1,XX,0,0,0,0,YY,ZZ,0,0^
2804 DMOVE AC,[600777,,-1
2805 032176 120 04 0 00 040622 -1,,XX]
2806 DFAD AC,[0,,0
2807 032177 110 04 0 00 040355 0,,0]
2808 032200 312 04 0 00 040624 CAME AC,[YY,,ZZ]
2809 032201 003 04 0 00 000255 ER3 AC,T
2810 032202 312 05 0 00 040060 CAME AC+1,[0,,0]
2811 032203 004 05 0 00 000255 ER4 AC+1,T
2812 032204 321 10 0 00 032176 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2813
2814 000256 T=T+1
2815 777777 577777 XX=<XX-1>/2
2816 655377 YY=YY+1000
2817 777777 776000 ZZ=ZZ+ZZ
2818 SDFARP T,600777,-1,-1,XX,0,0,0,0,YY,ZZ,0,0^
2819 DMOVE AC,[600777,,-1
2820 032205 120 04 0 00 040625 -1,,XX]
2821 DFAD AC,[0,,0
2822 032206 110 04 0 00 040355 0,,0]
2823 032207 312 04 0 00 040627 CAME AC,[YY,,ZZ]
2824 032210 003 04 0 00 000256 ER3 AC,T
2825 032211 312 05 0 00 040060 CAME AC+1,[0,,0]
2826 032212 004 05 0 00 000256 ER4 AC+1,T
2827 032213 321 10 0 00 032205 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2828
2829 000257 T=T+1
2830 777777 677777 XX=<XX-1>/2
2831 656377 YY=YY+1000
2832 777777 774000 ZZ=ZZ+ZZ
2833 SDFARP T,600777,-1,-1,XX,0,0,0,0,YY,ZZ,0,0^
2834 DMOVE AC,[600777,,-1
2835 032214 120 04 0 00 040630 -1,,XX]
2836 DFAD AC,[0,,0
2837 032215 110 04 0 00 040355 0,,0]
2838 032216 312 04 0 00 040632 CAME AC,[YY,,ZZ]
2839 032217 003 04 0 00 000257 ER3 AC,T
2840 032220 312 05 0 00 040060 CAME AC+1,[0,,0]
2841 032221 004 05 0 00 000257 ER4 AC+1,T
2842 032222 321 10 0 00 032214 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2843
2844 000260 T=T+1
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 4-6
DSKCE1 MAC 21-Jun-78 10:46 CHECK NORMALIZATION FOR DOUBLE PRECISION FLOATING POINT NUMBERS SEQ 0073
2845 777777 737777 XX=<XX-1>/2
2846 657377 YY=YY+1000
2847 777777 770000 ZZ=ZZ+ZZ
2848 SDFARP T,600777,-1,-1,XX,0,0,0,0,YY,ZZ,0,0^
2849 DMOVE AC,[600777,,-1
2850 032223 120 04 0 00 040633 -1,,XX]
2851 DFAD AC,[0,,0
2852 032224 110 04 0 00 040355 0,,0]
2853 032225 312 04 0 00 040635 CAME AC,[YY,,ZZ]
2854 032226 003 04 0 00 000260 ER3 AC,T
2855 032227 312 05 0 00 040060 CAME AC+1,[0,,0]
2856 032230 004 05 0 00 000260 ER4 AC+1,T
2857 032231 321 10 0 00 032223 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2858
2859 000261 T=T+1
2860 777777 757777 XX=<XX-1>/2
2861 660377 YY=YY+1000
2862 777777 760000 ZZ=ZZ+ZZ
2863 SDFARP T,600777,-1,-1,XX,0,0,0,0,YY,ZZ,0,0^
2864 DMOVE AC,[600777,,-1
2865 032232 120 04 0 00 040636 -1,,XX]
2866 DFAD AC,[0,,0
2867 032233 110 04 0 00 040355 0,,0]
2868 032234 312 04 0 00 040640 CAME AC,[YY,,ZZ]
2869 032235 003 04 0 00 000261 ER3 AC,T
2870 032236 312 05 0 00 040060 CAME AC+1,[0,,0]
2871 032237 004 05 0 00 000261 ER4 AC+1,T
2872 032240 321 10 0 00 032232 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2873
2874 000262 T=T+1
2875 777777 767777 XX=<XX-1>/2
2876 661377 YY=YY+1000
2877 777777 740000 ZZ=ZZ+ZZ
2878 SDFARP T,600777,-1,-1,XX,0,0,0,0,YY,ZZ,0,0^
2879 DMOVE AC,[600777,,-1
2880 032241 120 04 0 00 040641 -1,,XX]
2881 DFAD AC,[0,,0
2882 032242 110 04 0 00 040355 0,,0]
2883 032243 312 04 0 00 040643 CAME AC,[YY,,ZZ]
2884 032244 003 04 0 00 000262 ER3 AC,T
2885 032245 312 05 0 00 040060 CAME AC+1,[0,,0]
2886 032246 004 05 0 00 000262 ER4 AC+1,T
2887 032247 321 10 0 00 032241 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2888
2889 000263 T=T+1
2890 777777 773777 XX=<XX-1>/2
2891 662377 YY=YY+1000
2892 777777 700000 ZZ=ZZ+ZZ
2893 SDFARP T,600777,-1,-1,XX,0,0,0,0,YY,ZZ,0,0^
2894 DMOVE AC,[600777,,-1
2895 032250 120 04 0 00 040644 -1,,XX]
2896 DFAD AC,[0,,0
2897 032251 110 04 0 00 040355 0,,0]
2898 032252 312 04 0 00 040646 CAME AC,[YY,,ZZ]
2899 032253 003 04 0 00 000263 ER3 AC,T
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 4-7
DSKCE1 MAC 21-Jun-78 10:46 CHECK NORMALIZATION FOR DOUBLE PRECISION FLOATING POINT NUMBERS SEQ 0074
2900 032254 312 05 0 00 040060 CAME AC+1,[0,,0]
2901 032255 004 05 0 00 000263 ER4 AC+1,T
2902 032256 321 10 0 00 032250 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2903
2904 000264 T=T+1
2905 777777 775777 XX=<XX-1>/2
2906 663377 YY=YY+1000
2907 777777 600000 ZZ=ZZ+ZZ
2908 SDFARP T,600777,-1,-1,XX,0,0,0,0,YY,ZZ,0,0^
2909 DMOVE AC,[600777,,-1
2910 032257 120 04 0 00 040647 -1,,XX]
2911 DFAD AC,[0,,0
2912 032260 110 04 0 00 040355 0,,0]
2913 032261 312 04 0 00 040651 CAME AC,[YY,,ZZ]
2914 032262 003 04 0 00 000264 ER3 AC,T
2915 032263 312 05 0 00 040060 CAME AC+1,[0,,0]
2916 032264 004 05 0 00 000264 ER4 AC+1,T
2917 032265 321 10 0 00 032257 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2918
2919 000265 T=T+1
2920 777777 776777 XX=<XX-1>/2
2921 664377 YY=YY+1000
2922 777777 400000 ZZ=ZZ+ZZ
2923 SDFARP T,600777,-1,-1,XX,0,0,0,0,YY,ZZ,0,0^
2924 DMOVE AC,[600777,,-1
2925 032266 120 04 0 00 040652 -1,,XX]
2926 DFAD AC,[0,,0
2927 032267 110 04 0 00 040355 0,,0]
2928 032270 312 04 0 00 040654 CAME AC,[YY,,ZZ]
2929 032271 003 04 0 00 000265 ER3 AC,T
2930 032272 312 05 0 00 040060 CAME AC+1,[0,,0]
2931 032273 004 05 0 00 000265 ER4 AC+1,T
2932 032274 321 10 0 00 032266 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2933
2934 000266 T=T+1
2935 777777 777377 XX=<XX-1>/2
2936 665377 YY=YY+1000
2937 777777 000000 ZZ=ZZ+ZZ
2938 SDFARP T,600777,-1,-1,XX,0,0,0,0,YY,ZZ,0,0^
2939 DMOVE AC,[600777,,-1
2940 032275 120 04 0 00 040655 -1,,XX]
2941 DFAD AC,[0,,0
2942 032276 110 04 0 00 040355 0,,0]
2943 032277 312 04 0 00 040657 CAME AC,[YY,,ZZ]
2944 032300 003 04 0 00 000266 ER3 AC,T
2945 032301 312 05 0 00 040060 CAME AC+1,[0,,0]
2946 032302 004 05 0 00 000266 ER4 AC+1,T
2947 032303 321 10 0 00 032275 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2948
2949
2950 665000 YY=YY-377
2951 777777 777777 ZZ=-1
2952
2953 REPEAT ^D7,
2954 <T=T+1
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 4-8
DSKCE1 MAC 21-Jun-78 10:46 CHECK NORMALIZATION FOR DOUBLE PRECISION FLOATING POINT NUMBERS SEQ 0075
2955 XX=<XX-1>/2
2956 YY=YY+1000
2957 ZZ=ZZ+ZZ
2958 SDFARP T,600777,-1,-1,XX,0,0,0,0,YY+ZZ&377,0,0,0
2959 >
2960 000267 T=T+1
2961 777777 777577 XX=<XX-1>/2
2962 666000 YY=YY+1000
2963 777777 777776 ZZ=ZZ+ZZ
2964 SDFARP T,600777,-1,-1,XX,0,0,0,0,YY+ZZ&377,0,0,0^
2965 DMOVE AC,[600777,,-1
2966 032304 120 04 0 00 040660 -1,,XX]
2967 DFAD AC,[0,,0
2968 032305 110 04 0 00 040355 0,,0]
2969 032306 312 04 0 00 040662 CAME AC,[YY+ZZ&377,,0]
2970 032307 003 04 0 00 000267 ER3 AC,T
2971 032310 312 05 0 00 040060 CAME AC+1,[0,,0]
2972 032311 004 05 0 00 000267 ER4 AC+1,T
2973 032312 321 10 0 00 032304 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2974
2975 000270 T=T+1
2976 777777 777677 XX=<XX-1>/2
2977 667000 YY=YY+1000
2978 777777 777774 ZZ=ZZ+ZZ
2979 SDFARP T,600777,-1,-1,XX,0,0,0,0,YY+ZZ&377,0,0,0^
2980 DMOVE AC,[600777,,-1
2981 032313 120 04 0 00 040663 -1,,XX]
2982 DFAD AC,[0,,0
2983 032314 110 04 0 00 040355 0,,0]
2984 032315 312 04 0 00 040665 CAME AC,[YY+ZZ&377,,0]
2985 032316 003 04 0 00 000270 ER3 AC,T
2986 032317 312 05 0 00 040060 CAME AC+1,[0,,0]
2987 032320 004 05 0 00 000270 ER4 AC+1,T
2988 032321 321 10 0 00 032313 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
2989
2990 000271 T=T+1
2991 777777 777737 XX=<XX-1>/2
2992 670000 YY=YY+1000
2993 777777 777770 ZZ=ZZ+ZZ
2994 SDFARP T,600777,-1,-1,XX,0,0,0,0,YY+ZZ&377,0,0,0^
2995 DMOVE AC,[600777,,-1
2996 032322 120 04 0 00 040666 -1,,XX]
2997 DFAD AC,[0,,0
2998 032323 110 04 0 00 040355 0,,0]
2999 032324 312 04 0 00 040670 CAME AC,[YY+ZZ&377,,0]
3000 032325 003 04 0 00 000271 ER3 AC,T
3001 032326 312 05 0 00 040060 CAME AC+1,[0,,0]
3002 032327 004 05 0 00 000271 ER4 AC+1,T
3003 032330 321 10 0 00 032322 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
3004
3005 000272 T=T+1
3006 777777 777757 XX=<XX-1>/2
3007 671000 YY=YY+1000
3008 777777 777760 ZZ=ZZ+ZZ
3009 SDFARP T,600777,-1,-1,XX,0,0,0,0,YY+ZZ&377,0,0,0^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 4-9
DSKCE1 MAC 21-Jun-78 10:46 CHECK NORMALIZATION FOR DOUBLE PRECISION FLOATING POINT NUMBERS SEQ 0076
3010 DMOVE AC,[600777,,-1
3011 032331 120 04 0 00 040671 -1,,XX]
3012 DFAD AC,[0,,0
3013 032332 110 04 0 00 040355 0,,0]
3014 032333 312 04 0 00 040673 CAME AC,[YY+ZZ&377,,0]
3015 032334 003 04 0 00 000272 ER3 AC,T
3016 032335 312 05 0 00 040060 CAME AC+1,[0,,0]
3017 032336 004 05 0 00 000272 ER4 AC+1,T
3018 032337 321 10 0 00 032331 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
3019
3020 000273 T=T+1
3021 777777 777767 XX=<XX-1>/2
3022 672000 YY=YY+1000
3023 777777 777740 ZZ=ZZ+ZZ
3024 SDFARP T,600777,-1,-1,XX,0,0,0,0,YY+ZZ&377,0,0,0^
3025 DMOVE AC,[600777,,-1
3026 032340 120 04 0 00 040674 -1,,XX]
3027 DFAD AC,[0,,0
3028 032341 110 04 0 00 040355 0,,0]
3029 032342 312 04 0 00 040676 CAME AC,[YY+ZZ&377,,0]
3030 032343 003 04 0 00 000273 ER3 AC,T
3031 032344 312 05 0 00 040060 CAME AC+1,[0,,0]
3032 032345 004 05 0 00 000273 ER4 AC+1,T
3033 032346 321 10 0 00 032340 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
3034
3035 000274 T=T+1
3036 777777 777773 XX=<XX-1>/2
3037 673000 YY=YY+1000
3038 777777 777700 ZZ=ZZ+ZZ
3039 SDFARP T,600777,-1,-1,XX,0,0,0,0,YY+ZZ&377,0,0,0^
3040 DMOVE AC,[600777,,-1
3041 032347 120 04 0 00 040677 -1,,XX]
3042 DFAD AC,[0,,0
3043 032350 110 04 0 00 040355 0,,0]
3044 032351 312 04 0 00 040701 CAME AC,[YY+ZZ&377,,0]
3045 032352 003 04 0 00 000274 ER3 AC,T
3046 032353 312 05 0 00 040060 CAME AC+1,[0,,0]
3047 032354 004 05 0 00 000274 ER4 AC+1,T
3048 032355 321 10 0 00 032347 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
3049
3050 000275 T=T+1
3051 777777 777775 XX=<XX-1>/2
3052 674000 YY=YY+1000
3053 777777 777600 ZZ=ZZ+ZZ
3054 SDFARP T,600777,-1,-1,XX,0,0,0,0,YY+ZZ&377,0,0,0^
3055 DMOVE AC,[600777,,-1
3056 032356 120 04 0 00 040702 -1,,XX]
3057 DFAD AC,[0,,0
3058 032357 110 04 0 00 040355 0,,0]
3059 032360 312 04 0 00 040704 CAME AC,[YY+ZZ&377,,0]
3060 032361 003 04 0 00 000275 ER3 AC,T
3061 032362 312 05 0 00 040060 CAME AC+1,[0,,0]
3062 032363 004 05 0 00 000275 ER4 AC+1,T
3063 032364 321 10 0 00 032356 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
3064
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 4-10
DSKCE1 MAC 21-Jun-78 10:46 CHECK NORMALIZATION FOR DOUBLE PRECISION FLOATING POINT NUMBERS SEQ 0077
3065
3066 000276 T=T+1
3067 777777 777776 XX=<XX-1>/2
3068 777777 777400 ZZ=ZZ+ZZ
3069 SDFARP T,600777,-1,-1,XX,0,0,0,0,YY+ZZ&777,0,0,0^
3070 DMOVE AC,[600777,,-1
3071 032365 120 04 0 00 040705 -1,,XX]
3072 DFAD AC,[0,,0
3073 032366 110 04 0 00 040355 0,,0]
3074 032367 312 04 0 00 040707 CAME AC,[YY+ZZ&777,,0]
3075 032370 003 04 0 00 000276 ER3 AC,T
3076 032371 312 05 0 00 040060 CAME AC+1,[0,,0]
3077 032372 004 05 0 00 000276 ER4 AC+1,T
3078 032373 321 10 0 00 032365 JUMPL AC+4,.-^D6 ;LOOP ON ERROR SWITCH^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 5
DSKCE1 MAC 21-Jun-78 10:46 CHECK NORMALIZATION FOR DOUBLE PRECISION FLOATING POINT NUMBERS SEQ 0078
3079
3080 SUBTTL DFAD TEST-DOUBLE FLOATING POINT ADD AND ROUND
3081
3082 ;CHECK THAT DFAD AC,E DOES NOT ALTER C(E) OR C(E+1)
3083
3084 S10100: DMOVE AC,[200777,,-1
3085 032374 120 04 0 00 040710 -1,,-1]
3086 DMOVE AC+2,[200000,,0
3087 032375 120 06 0 00 040712 400000,,-1]
3088 032376 110 04 0 00 000006 DFAD AC,AC+2
3089 032377 312 06 0 00 040203 CAME AC+2,[200000,,0]
3090 032400 005 06 0 00 010101 ER5 AC+2,10101 ;C(E) WAS ALTERED
3091 032401 312 07 0 00 040713 CAME AC+3,[400000,,-1]
3092 032402 006 07 0 00 010101 ER6 AC+3,10101 ;C(E+1) WAS ALTERED
3093 032403 321 10 0 00 032374 JUMPL AC+4,S10100 ;LOOP ON ERROR SWITCH
3094
3095 SDFA 102,600,0,0,0,400,0,0,0,1500,0,0,0^
3096 S10200: DMOVE AC,[600,,0
3097 032404 120 04 0 00 040714 0,,0]
3098 DFAD AC,[400,,0
3099 032405 110 04 0 00 040716 0,,0]
3100 032406 312 04 0 00 040720 CAME AC,[1500,,0]
3101 032407 003 04 0 00 010201 ER3 AC,10201
3102 032410 312 05 0 00 040060 CAME AC+1,[0,,0]
3103 032411 004 05 0 00 010201 ER4 AC+1,10201
3104 032412 321 10 0 00 032404 JUMPL AC+4,S10200 ;LOOP ON ERROR SWITCH^
3105
3106 SDFA 103,377000,0,0,0,377600,0,0,0,377600,0,0,0^
3107 S10300: DMOVE AC,[377000,,0
3108 032413 120 04 0 00 040721 0,,0]
3109 DFAD AC,[377600,,0
3110 032414 110 04 0 00 040723 0,,0]
3111 032415 312 04 0 00 040523 CAME AC,[377600,,0]
3112 032416 003 04 0 00 010301 ER3 AC,10301
3113 032417 312 05 0 00 040060 CAME AC+1,[0,,0]
3114 032420 004 05 0 00 010301 ER4 AC+1,10301
3115 032421 321 10 0 00 032413 JUMPL AC+4,S10300 ;LOOP ON ERROR SWITCH^
3116
3117 SDFA 104,600400,0,0,0,177400,0,0,0,0,0,0,0^
3118 S10400: DMOVE AC,[600400,,0
3119 032422 120 04 0 00 040725 0,,0]
3120 DFAD AC,[177400,,0
3121 032423 110 04 0 00 040727 0,,0]
3122 032424 312 04 0 00 040060 CAME AC,[0,,0]
3123 032425 003 04 0 00 010401 ER3 AC,10401
3124 032426 312 05 0 00 040060 CAME AC+1,[0,,0]
3125 032427 004 05 0 00 010401 ER4 AC+1,10401
3126 032430 321 10 0 00 032422 JUMPL AC+4,S10400 ;LOOP ON ERROR SWITCH^
3127
3128 SDFA 105,200400,0,0,0,205400,0,0,0,205410,0,0,0^
3129 S10500: DMOVE AC,[200400,,0
3130 032431 120 04 0 00 040731 0,,0]
3131 DFAD AC,[205400,,0
3132 032432 110 04 0 00 040733 0,,0]
3133 032433 312 04 0 00 040735 CAME AC,[205410,,0]
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 5-1
DSKCE1 MAC 21-Jun-78 10:46 DFAD TEST-DOUBLE FLOATING POINT ADD AND ROUND SEQ 0079
3134 032434 003 04 0 00 010501 ER3 AC,10501
3135 032435 312 05 0 00 040060 CAME AC+1,[0,,0]
3136 032436 004 05 0 00 010501 ER4 AC+1,10501
3137 032437 321 10 0 00 032431 JUMPL AC+4,S10500 ;LOOP ON ERROR SWITCH^
3138
3139 SDFA 106,200400,0,0,0,205600,0,0,0,205610,0,0,0^
3140 S10600: DMOVE AC,[200400,,0
3141 032440 120 04 0 00 040731 0,,0]
3142 DFAD AC,[205600,,0
3143 032441 110 04 0 00 040736 0,,0]
3144 032442 312 04 0 00 040740 CAME AC,[205610,,0]
3145 032443 003 04 0 00 010601 ER3 AC,10601
3146 032444 312 05 0 00 040060 CAME AC+1,[0,,0]
3147 032445 004 05 0 00 010601 ER4 AC+1,10601
3148 032446 321 10 0 00 032440 JUMPL AC+4,S10600 ;LOOP ON ERROR SWITCH^
3149
3150 SDFA 107,600,0,0,0,200400,0,0,0,200400,0,0,0^
3151 S10700: DMOVE AC,[600,,0
3152 032447 120 04 0 00 040714 0,,0]
3153 DFAD AC,[200400,,0
3154 032450 110 04 0 00 040731 0,,0]
3155 032451 312 04 0 00 040063 CAME AC,[200400,,0]
3156 032452 003 04 0 00 010701 ER3 AC,10701
3157 032453 312 05 0 00 040060 CAME AC+1,[0,,0]
3158 032454 004 05 0 00 010701 ER4 AC+1,10701
3159 032455 321 10 0 00 032447 JUMPL AC+4,S10700 ;LOOP ON ERROR SWITCH^
3160
3161 SDFA 110,200700,0,0,0,0,0,0,0,200700,0,0,0^
3162 S11000: DMOVE AC,[200700,,0
3163 032456 120 04 0 00 040741 0,,0]
3164 DFAD AC,[0,,0
3165 032457 110 04 0 00 040355 0,,0]
3166 032460 312 04 0 00 040741 CAME AC,[200700,,0]
3167 032461 003 04 0 00 011001 ER3 AC,11001
3168 032462 312 05 0 00 040060 CAME AC+1,[0,,0]
3169 032463 004 05 0 00 011001 ER4 AC+1,11001
3170 032464 321 10 0 00 032456 JUMPL AC+4,S11000 ;LOOP ON ERROR SWITCH^
3171
3172 SDFA 111,201400,0,0,0,200400,0,0,0,201600,0,0,0^
3173 S11100: DMOVE AC,[201400,,0
3174 032465 120 04 0 00 040057 0,,0]
3175 DFAD AC,[200400,,0
3176 032466 110 04 0 00 040731 0,,0]
3177 032467 312 04 0 00 040743 CAME AC,[201600,,0]
3178 032470 003 04 0 00 011101 ER3 AC,11101
3179 032471 312 05 0 00 040060 CAME AC+1,[0,,0]
3180 032472 004 05 0 00 011101 ER4 AC+1,11101
3181 032473 321 10 0 00 032465 JUMPL AC+4,S11100 ;LOOP ON ERROR SWITCH^
3182
3183 SDFA 112,202400,0,0,0,200400,0,0,0,202500,0,0,0^
3184 S11200: DMOVE AC,[202400,,0
3185 032474 120 04 0 00 040744 0,,0]
3186 DFAD AC,[200400,,0
3187 032475 110 04 0 00 040731 0,,0]
3188 032476 312 04 0 00 040746 CAME AC,[202500,,0]
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 5-2
DSKCE1 MAC 21-Jun-78 10:46 DFAD TEST-DOUBLE FLOATING POINT ADD AND ROUND SEQ 0080
3189 032477 003 04 0 00 011201 ER3 AC,11201
3190 032500 312 05 0 00 040060 CAME AC+1,[0,,0]
3191 032501 004 05 0 00 011201 ER4 AC+1,11201
3192 032502 321 10 0 00 032474 JUMPL AC+4,S11200 ;LOOP ON ERROR SWITCH^
3193
3194 SDFA 113,204400,0,0,0,200400,0,0,0,204420,0,0,0^
3195 S11300: DMOVE AC,[204400,,0
3196 032503 120 04 0 00 040747 0,,0]
3197 DFAD AC,[200400,,0
3198 032504 110 04 0 00 040731 0,,0]
3199 032505 312 04 0 00 040751 CAME AC,[204420,,0]
3200 032506 003 04 0 00 011301 ER3 AC,11301
3201 032507 312 05 0 00 040060 CAME AC+1,[0,,0]
3202 032510 004 05 0 00 011301 ER4 AC+1,11301
3203 032511 321 10 0 00 032503 JUMPL AC+4,S11300 ;LOOP ON ERROR SWITCH^
3204
3205 SDFA 114,210400,0,0,0,200400,0,0,0,210401,0,0,0^
3206 S11400: DMOVE AC,[210400,,0
3207 032512 120 04 0 00 040752 0,,0]
3208 DFAD AC,[200400,,0
3209 032513 110 04 0 00 040731 0,,0]
3210 032514 312 04 0 00 040754 CAME AC,[210401,,0]
3211 032515 003 04 0 00 011401 ER3 AC,11401
3212 032516 312 05 0 00 040060 CAME AC+1,[0,,0]
3213 032517 004 05 0 00 011401 ER4 AC+1,11401
3214 032520 321 10 0 00 032512 JUMPL AC+4,S11400 ;LOOP ON ERROR SWITCH^
3215
3216 SDFA 115,220400,0,0,0,200400,0,0,0,220400,2000,0,0^
3217 S11500: DMOVE AC,[220400,,0
3218 032521 120 04 0 00 040755 0,,0]
3219 DFAD AC,[200400,,0
3220 032522 110 04 0 00 040731 0,,0]
3221 032523 312 04 0 00 040757 CAME AC,[220400,,2000]
3222 032524 003 04 0 00 011501 ER3 AC,11501
3223 032525 312 05 0 00 040060 CAME AC+1,[0,,0]
3224 032526 004 05 0 00 011501 ER4 AC+1,11501
3225 032527 321 10 0 00 032521 JUMPL AC+4,S11500 ;LOOP ON ERROR SWITCH^
3226
3227 SDFA 116,240400,0,0,0,200400,0,0,0,240400,0,4000,0^
3228 S11600: DMOVE AC,[240400,,0
3229 032530 120 04 0 00 040760 0,,0]
3230 DFAD AC,[200400,,0
3231 032531 110 04 0 00 040731 0,,0]
3232 032532 312 04 0 00 040760 CAME AC,[240400,,0]
3233 032533 003 04 0 00 011601 ER3 AC,11601
3234 032534 312 05 0 00 040222 CAME AC+1,[4000,,0]
3235 032535 004 05 0 00 011601 ER4 AC+1,11601
3236 032536 321 10 0 00 032530 JUMPL AC+4,S11600 ;LOOP ON ERROR SWITCH^
3237
3238 SDFA 117,300400,0,0,0,200400,0,0,0,300400,0,0,0^
3239 S11700: DMOVE AC,[300400,,0
3240 032537 120 04 0 00 040762 0,,0]
3241 DFAD AC,[200400,,0
3242 032540 110 04 0 00 040731 0,,0]
3243 032541 312 04 0 00 040762 CAME AC,[300400,,0]
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 5-3
DSKCE1 MAC 21-Jun-78 10:46 DFAD TEST-DOUBLE FLOATING POINT ADD AND ROUND SEQ 0081
3244 032542 003 04 0 00 011701 ER3 AC,11701
3245 032543 312 05 0 00 040060 CAME AC+1,[0,,0]
3246 032544 004 05 0 00 011701 ER4 AC+1,11701
3247 032545 321 10 0 00 032537 JUMPL AC+4,S11700 ;LOOP ON ERROR SWITCH^
3248
3249 SDFA 120,600400,0,0,0,600400,0,0,0,577400,0,0,0^
3250 S12000: DMOVE AC,[600400,,0
3251 032546 120 04 0 00 040725 0,,0]
3252 DFAD AC,[600400,,0
3253 032547 110 04 0 00 040725 0,,0]
3254 032550 312 04 0 00 040061 CAME AC,[577400,,0]
3255 032551 003 04 0 00 012001 ER3 AC,12001
3256 032552 312 05 0 00 040060 CAME AC+1,[0,,0]
3257 032553 004 05 0 00 012001 ER4 AC+1,12001
3258 032554 321 10 0 00 032546 JUMPL AC+4,S12000 ;LOOP ON ERROR SWITCH^
3259
3260 SDFA 121,0,0,0,0,205400,0,0,0,205400,0,0,0^
3261 S12100: DMOVE AC,[0,,0
3262 032555 120 04 0 00 040355 0,,0]
3263 DFAD AC,[205400,,0
3264 032556 110 04 0 00 040733 0,,0]
3265 032557 312 04 0 00 040733 CAME AC,[205400,,0]
3266 032560 003 04 0 00 012101 ER3 AC,12101
3267 032561 312 05 0 00 040060 CAME AC+1,[0,,0]
3268 032562 004 05 0 00 012101 ER4 AC+1,12101
3269 032563 321 10 0 00 032555 JUMPL AC+4,S12100 ;LOOP ON ERROR SWITCH^
3270
3271 SDFA 122,200400,0,0,0,200400,0,0,0,201400,0,0,0^
3272 S12200: DMOVE AC,[200400,,0
3273 032564 120 04 0 00 040731 0,,0]
3274 DFAD AC,[200400,,0
3275 032565 110 04 0 00 040731 0,,0]
3276 032566 312 04 0 00 040057 CAME AC,[201400,,0]
3277 032567 003 04 0 00 012201 ER3 AC,12201
3278 032570 312 05 0 00 040060 CAME AC+1,[0,,0]
3279 032571 004 05 0 00 012201 ER4 AC+1,12201
3280 032572 321 10 0 00 032564 JUMPL AC+4,S12200 ;LOOP ON ERROR SWITCH^
3281
3282 SDFA 123,577400,0,0,0,577400,0,0,0,576400,0,0,0^
3283 S12300: DMOVE AC,[577400,,0
3284 032573 120 04 0 00 040061 0,,0]
3285 DFAD AC,[577400,,0
3286 032574 110 04 0 00 040061 0,,0]
3287 032575 312 04 0 00 040764 CAME AC,[576400,,0]
3288 032576 003 04 0 00 012301 ER3 AC,12301
3289 032577 312 05 0 00 040060 CAME AC+1,[0,,0]
3290 032600 004 05 0 00 012301 ER4 AC+1,12301
3291 032601 321 10 0 00 032573 JUMPL AC+4,S12300 ;LOOP ON ERROR SWITCH^
3292
3293 SDFA 124,205600,0,0,0,177400,0,0,0,205604,0,0,0^
3294 S12400: DMOVE AC,[205600,,0
3295 032602 120 04 0 00 040736 0,,0]
3296 DFAD AC,[177400,,0
3297 032603 110 04 0 00 040727 0,,0]
3298 032604 312 04 0 00 040765 CAME AC,[205604,,0]
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 5-4
DSKCE1 MAC 21-Jun-78 10:46 DFAD TEST-DOUBLE FLOATING POINT ADD AND ROUND SEQ 0082
3299 032605 003 04 0 00 012401 ER3 AC,12401
3300 032606 312 05 0 00 040060 CAME AC+1,[0,,0]
3301 032607 004 05 0 00 012401 ER4 AC+1,12401
3302 032610 321 10 0 00 032602 JUMPL AC+4,S12400 ;LOOP ON ERROR SWITCH^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 6
DSKCE1 MAC 21-Jun-78 10:46 DFAD TEST-DOUBLE FLOATING POINT ADD AND ROUND SEQ 0083
3303
3304 SDFA 125,201000,0,0,0,202000,0,0,0,0,0,0,0^
3305 S12500: DMOVE AC,[201000,,0
3306 032611 120 04 0 00 040766 0,,0]
3307 DFAD AC,[202000,,0
3308 032612 110 04 0 00 040770 0,,0]
3309 032613 312 04 0 00 040060 CAME AC,[0,,0]
3310 032614 003 04 0 00 012501 ER3 AC,12501
3311 032615 312 05 0 00 040060 CAME AC+1,[0,,0]
3312 032616 004 05 0 00 012501 ER4 AC+1,12501
3313 032617 321 10 0 00 032611 JUMPL AC+4,S12500 ;LOOP ON ERROR SWITCH^
3314
3315 SDFA 126,202000,0,0,0,204000,0,0,0,0,0,0,0^
3316 S12600: DMOVE AC,[202000,,0
3317 032620 120 04 0 00 040770 0,,0]
3318 DFAD AC,[204000,,0
3319 032621 110 04 0 00 040772 0,,0]
3320 032622 312 04 0 00 040060 CAME AC,[0,,0]
3321 032623 003 04 0 00 012601 ER3 AC,12601
3322 032624 312 05 0 00 040060 CAME AC+1,[0,,0]
3323 032625 004 05 0 00 012601 ER4 AC+1,12601
3324 032626 321 10 0 00 032620 JUMPL AC+4,S12600 ;LOOP ON ERROR SWITCH^
3325
3326 SDFA 127,204000,0,0,0,207000,0,0,0,0,0,0,0^
3327 S12700: DMOVE AC,[204000,,0
3328 032627 120 04 0 00 040772 0,,0]
3329 DFAD AC,[207000,,0
3330 032630 110 04 0 00 040774 0,,0]
3331 032631 312 04 0 00 040060 CAME AC,[0,,0]
3332 032632 003 04 0 00 012701 ER3 AC,12701
3333 032633 312 05 0 00 040060 CAME AC+1,[0,,0]
3334 032634 004 05 0 00 012701 ER4 AC+1,12701
3335 032635 321 10 0 00 032627 JUMPL AC+4,S12700 ;LOOP ON ERROR SWITCH^
3336
3337 SDFA 130,210000,0,0,0,214000,0,0,0,0,0,0,0^
3338 S13000: DMOVE AC,[210000,,0
3339 032636 120 04 0 00 040776 0,,0]
3340 DFAD AC,[214000,,0
3341 032637 110 04 0 00 041000 0,,0]
3342 032640 312 04 0 00 040060 CAME AC,[0,,0]
3343 032641 003 04 0 00 013001 ER3 AC,13001
3344 032642 312 05 0 00 040060 CAME AC+1,[0,,0]
3345 032643 004 05 0 00 013001 ER4 AC+1,13001
3346 032644 321 10 0 00 032636 JUMPL AC+4,S13000 ;LOOP ON ERROR SWITCH^
3347
3348 SDFA 131,220000,0,0,0,225000,0,0,0,0,0,0,0^
3349 S13100: DMOVE AC,[220000,,0
3350 032645 120 04 0 00 041002 0,,0]
3351 DFAD AC,[225000,,0
3352 032646 110 04 0 00 041004 0,,0]
3353 032647 312 04 0 00 040060 CAME AC,[0,,0]
3354 032650 003 04 0 00 013101 ER3 AC,13101
3355 032651 312 05 0 00 040060 CAME AC+1,[0,,0]
3356 032652 004 05 0 00 013101 ER4 AC+1,13101
3357 032653 321 10 0 00 032645 JUMPL AC+4,S13100 ;LOOP ON ERROR SWITCH^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 6-1
DSKCE1 MAC 21-Jun-78 10:46 DFAD TEST-DOUBLE FLOATING POINT ADD AND ROUND SEQ 0084
3358
3359 SDFA 132,240000,0,0,0,246000,0,0,0,0,0,0,0^
3360 S13200: DMOVE AC,[240000,,0
3361 032654 120 04 0 00 041006 0,,0]
3362 DFAD AC,[246000,,0
3363 032655 110 04 0 00 041010 0,,0]
3364 032656 312 04 0 00 040060 CAME AC,[0,,0]
3365 032657 003 04 0 00 013201 ER3 AC,13201
3366 032660 312 05 0 00 040060 CAME AC+1,[0,,0]
3367 032661 004 05 0 00 013201 ER4 AC+1,13201
3368 032662 321 10 0 00 032654 JUMPL AC+4,S13200 ;LOOP ON ERROR SWITCH^
3369
3370 SDFA 133,300000,0,0,0,307000,0,0,0,0,0,0,0^
3371 S13300: DMOVE AC,[300000,,0
3372 032663 120 04 0 00 041012 0,,0]
3373 DFAD AC,[307000,,0
3374 032664 110 04 0 00 041014 0,,0]
3375 032665 312 04 0 00 040060 CAME AC,[0,,0]
3376 032666 003 04 0 00 013301 ER3 AC,13301
3377 032667 312 05 0 00 040060 CAME AC+1,[0,,0]
3378 032670 004 05 0 00 013301 ER4 AC+1,13301
3379 032671 321 10 0 00 032663 JUMPL AC+4,S13300 ;LOOP ON ERROR SWITCH^
3380
3381 SDFA 134,200000,0,0,0,600400,0,0,0,600400,0,0,0^
3382 S13400: DMOVE AC,[200000,,0
3383 032672 120 04 0 00 041016 0,,0]
3384 DFAD AC,[600400,,0
3385 032673 110 04 0 00 040725 0,,0]
3386 032674 312 04 0 00 040725 CAME AC,[600400,,0]
3387 032675 003 04 0 00 013401 ER3 AC,13401
3388 032676 312 05 0 00 040060 CAME AC+1,[0,,0]
3389 032677 004 05 0 00 013401 ER4 AC+1,13401
3390 032700 321 10 0 00 032672 JUMPL AC+4,S13400 ;LOOP ON ERROR SWITCH^
3391
3392 SDFA 135,201000,0,0,0,600400,0,0,0,600400,0,0,0^
3393 S13500: DMOVE AC,[201000,,0
3394 032701 120 04 0 00 040766 0,,0]
3395 DFAD AC,[600400,,0
3396 032702 110 04 0 00 040725 0,,0]
3397 032703 312 04 0 00 040725 CAME AC,[600400,,0]
3398 032704 003 04 0 00 013501 ER3 AC,13501
3399 032705 312 05 0 00 040060 CAME AC+1,[0,,0]
3400 032706 004 05 0 00 013501 ER4 AC+1,13501
3401 032707 321 10 0 00 032701 JUMPL AC+4,S13500 ;LOOP ON ERROR SWITCH^
3402
3403 SDFA 136,202000,0,0,0,600400,0,0,0,600400,0,0,0^
3404 S13600: DMOVE AC,[202000,,0
3405 032710 120 04 0 00 040770 0,,0]
3406 DFAD AC,[600400,,0
3407 032711 110 04 0 00 040725 0,,0]
3408 032712 312 04 0 00 040725 CAME AC,[600400,,0]
3409 032713 003 04 0 00 013601 ER3 AC,13601
3410 032714 312 05 0 00 040060 CAME AC+1,[0,,0]
3411 032715 004 05 0 00 013601 ER4 AC+1,13601
3412 032716 321 10 0 00 032710 JUMPL AC+4,S13600 ;LOOP ON ERROR SWITCH^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 6-2
DSKCE1 MAC 21-Jun-78 10:46 DFAD TEST-DOUBLE FLOATING POINT ADD AND ROUND SEQ 0085
3413
3414 SDFA 137,203000,0,0,0,600400,0,0,0,600400,0,0,0^
3415 S13700: DMOVE AC,[203000,,0
3416 032717 120 04 0 00 041020 0,,0]
3417 DFAD AC,[600400,,0
3418 032720 110 04 0 00 040725 0,,0]
3419 032721 312 04 0 00 040725 CAME AC,[600400,,0]
3420 032722 003 04 0 00 013701 ER3 AC,13701
3421 032723 312 05 0 00 040060 CAME AC+1,[0,,0]
3422 032724 004 05 0 00 013701 ER4 AC+1,13701
3423 032725 321 10 0 00 032717 JUMPL AC+4,S13700 ;LOOP ON ERROR SWITCH^
3424
3425 SDFA 140,204000,0,0,0,600400,0,0,0,600400,0,0,0^
3426 S14000: DMOVE AC,[204000,,0
3427 032726 120 04 0 00 040772 0,,0]
3428 DFAD AC,[600400,,0
3429 032727 110 04 0 00 040725 0,,0]
3430 032730 312 04 0 00 040725 CAME AC,[600400,,0]
3431 032731 003 04 0 00 014001 ER3 AC,14001
3432 032732 312 05 0 00 040060 CAME AC+1,[0,,0]
3433 032733 004 05 0 00 014001 ER4 AC+1,14001
3434 032734 321 10 0 00 032726 JUMPL AC+4,S14000 ;LOOP ON ERROR SWITCH^
3435
3436 SDFA 141,206000,0,0,0,600400,0,0,0,600400,0,0,0^
3437 S14100: DMOVE AC,[206000,,0
3438 032735 120 04 0 00 041022 0,,0]
3439 DFAD AC,[600400,,0
3440 032736 110 04 0 00 040725 0,,0]
3441 032737 312 04 0 00 040725 CAME AC,[600400,,0]
3442 032740 003 04 0 00 014101 ER3 AC,14101
3443 032741 312 05 0 00 040060 CAME AC+1,[0,,0]
3444 032742 004 05 0 00 014101 ER4 AC+1,14101
3445 032743 321 10 0 00 032735 JUMPL AC+4,S14100 ;LOOP ON ERROR SWITCH^
3446
3447 SDFA 142,207000,0,0,0,600400,0,0,0,600400,0,0,0^
3448 S14200: DMOVE AC,[207000,,0
3449 032744 120 04 0 00 040774 0,,0]
3450 DFAD AC,[600400,,0
3451 032745 110 04 0 00 040725 0,,0]
3452 032746 312 04 0 00 040725 CAME AC,[600400,,0]
3453 032747 003 04 0 00 014201 ER3 AC,14201
3454 032750 312 05 0 00 040060 CAME AC+1,[0,,0]
3455 032751 004 05 0 00 014201 ER4 AC+1,14201
3456 032752 321 10 0 00 032744 JUMPL AC+4,S14200 ;LOOP ON ERROR SWITCH^
3457
3458 SDFA 143,400200,0,0,0,377400,0,0,0,401400,0,0,0^
3459 S14300: DMOVE AC,[400200,,0
3460 032753 120 04 0 00 041024 0,,0]
3461 DFAD AC,[377400,,0
3462 032754 110 04 0 00 041026 0,,0]
3463 032755 312 04 0 00 041030 CAME AC,[401400,,0]
3464 032756 003 04 0 00 014301 ER3 AC,14301
3465 032757 312 05 0 00 040060 CAME AC+1,[0,,0]
3466 032760 004 05 0 00 014301 ER4 AC+1,14301
3467 032761 321 10 0 00 032753 JUMPL AC+4,S14300 ;LOOP ON ERROR SWITCH^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 6-3
DSKCE1 MAC 21-Jun-78 10:46 DFAD TEST-DOUBLE FLOATING POINT ADD AND ROUND SEQ 0086
3468
3469 SDFA 144,377400,0,0,0,400200,0,0,0,401400,0,0,0^
3470 S14400: DMOVE AC,[377400,,0
3471 032762 120 04 0 00 041026 0,,0]
3472 DFAD AC,[400200,,0
3473 032763 110 04 0 00 041024 0,,0]
3474 032764 312 04 0 00 041030 CAME AC,[401400,,0]
3475 032765 003 04 0 00 014401 ER3 AC,14401
3476 032766 312 05 0 00 040060 CAME AC+1,[0,,0]
3477 032767 004 05 0 00 014401 ER4 AC+1,14401
3478 032770 321 10 0 00 032762 JUMPL AC+4,S14400 ;LOOP ON ERROR SWITCH^
3479
3480 SDFA 145,200400,0,0,0,600400,0,0,0,177400,0,0,0^
3481 S14500: DMOVE AC,[200400,,0
3482 032771 120 04 0 00 040731 0,,0]
3483 DFAD AC,[600400,,0
3484 032772 110 04 0 00 040725 0,,0]
3485 032773 312 04 0 00 040066 CAME AC,[177400,,0]
3486 032774 003 04 0 00 014501 ER3 AC,14501
3487 032775 312 05 0 00 040060 CAME AC+1,[0,,0]
3488 032776 004 05 0 00 014501 ER4 AC+1,14501
3489 032777 321 10 0 00 032771 JUMPL AC+4,S14500 ;LOOP ON ERROR SWITCH^
3490
3491 SDFA 146,200600,0,0,0,201400,0,0,0,201700,0,0,0^
3492 S14600: DMOVE AC,[200600,,0
3493 033000 120 04 0 00 040064 0,,0]
3494 DFAD AC,[201400,,0
3495 033001 110 04 0 00 040057 0,,0]
3496 033002 312 04 0 00 041031 CAME AC,[201700,,0]
3497 033003 003 04 0 00 014601 ER3 AC,14601
3498 033004 312 05 0 00 040060 CAME AC+1,[0,,0]
3499 033005 004 05 0 00 014601 ER4 AC+1,14601
3500 033006 321 10 0 00 033000 JUMPL AC+4,S14600 ;LOOP ON ERROR SWITCH^
3501
3502 SDFA 147,577600,0,0,0,200400,0,0,0,177400,0,0,0^
3503 S14700: DMOVE AC,[577600,,0
3504 033007 120 04 0 00 041032 0,,0]
3505 DFAD AC,[200400,,0
3506 033010 110 04 0 00 040731 0,,0]
3507 033011 312 04 0 00 040066 CAME AC,[177400,,0]
3508 033012 003 04 0 00 014701 ER3 AC,14701
3509 033013 312 05 0 00 040060 CAME AC+1,[0,,0]
3510 033014 004 05 0 00 014701 ER4 AC+1,14701
3511 033015 321 10 0 00 033007 JUMPL AC+4,S14700 ;LOOP ON ERROR SWITCH^
3512
3513 SDFA 150,600400,0,0,0,577200,0,0,0,576400,0,0,0^
3514 S15000: DMOVE AC,[600400,,0
3515 033016 120 04 0 00 040725 0,,0]
3516 DFAD AC,[577200,,0
3517 033017 110 04 0 00 041034 0,,0]
3518 033020 312 04 0 00 040764 CAME AC,[576400,,0]
3519 033021 003 04 0 00 015001 ER3 AC,15001
3520 033022 312 05 0 00 040060 CAME AC+1,[0,,0]
3521 033023 004 05 0 00 015001 ER4 AC+1,15001
3522 033024 321 10 0 00 033016 JUMPL AC+4,S15000 ;LOOP ON ERROR SWITCH^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 6-4
DSKCE1 MAC 21-Jun-78 10:46 DFAD TEST-DOUBLE FLOATING POINT ADD AND ROUND SEQ 0087
3523
3524 SDFA 151,576400,0,0,0,200400,0,0,0,577400,0,0,0^
3525 S15100: DMOVE AC,[576400,,0
3526 033025 120 04 0 00 041036 0,,0]
3527 DFAD AC,[200400,,0
3528 033026 110 04 0 00 040731 0,,0]
3529 033027 312 04 0 00 040061 CAME AC,[577400,,0]
3530 033030 003 04 0 00 015101 ER3 AC,15101
3531 033031 312 05 0 00 040060 CAME AC+1,[0,,0]
3532 033032 004 05 0 00 015101 ER4 AC+1,15101
3533 033033 321 10 0 00 033025 JUMPL AC+4,S15100 ;LOOP ON ERROR SWITCH^
3534
3535 SDFA 152,200440,0,0,0,200400,0,0,0,201420,0,0,0^
3536 S15200: DMOVE AC,[200440,,0
3537 033034 120 04 0 00 040072 0,,0]
3538 DFAD AC,[200400,,0
3539 033035 110 04 0 00 040731 0,,0]
3540 033036 312 04 0 00 041040 CAME AC,[201420,,0]
3541 033037 003 04 0 00 015201 ER3 AC,15201
3542 033040 312 05 0 00 040060 CAME AC+1,[0,,0]
3543 033041 004 05 0 00 015201 ER4 AC+1,15201
3544 033042 321 10 0 00 033034 JUMPL AC+4,S15200 ;LOOP ON ERROR SWITCH^
3545
3546 SDFA 153,577400,0,0,0,577400,0,0,0,576400,0,0,0^
3547 S15300: DMOVE AC,[577400,,0
3548 033043 120 04 0 00 040061 0,,0]
3549 DFAD AC,[577400,,0
3550 033044 110 04 0 00 040061 0,,0]
3551 033045 312 04 0 00 040764 CAME AC,[576400,,0]
3552 033046 003 04 0 00 015301 ER3 AC,15301
3553 033047 312 05 0 00 040060 CAME AC+1,[0,,0]
3554 033050 004 05 0 00 015301 ER4 AC+1,15301
3555 033051 321 10 0 00 033043 JUMPL AC+4,S15300 ;LOOP ON ERROR SWITCH^
3556
3557 SDFA 154,200400,77,0,0,206400,0,0,0,206404,0,374000,0^
3558 S15400: DMOVE AC,[200400,,77
3559 033052 120 04 0 00 041041 0,,0]
3560 DFAD AC,[206400,,0
3561 033053 110 04 0 00 041043 0,,0]
3562 033054 312 04 0 00 041045 CAME AC,[206404,,0]
3563 033055 003 04 0 00 015401 ER3 AC,15401
3564 033056 312 05 0 00 040543 CAME AC+1,[374000,,0]
3565 033057 004 05 0 00 015401 ER4 AC+1,15401
3566 033060 321 10 0 00 033052 JUMPL AC+4,S15400 ;LOOP ON ERROR SWITCH^
3567
3568 SDFA 155,30400,3,0,0,32400,0,0,0,32500,0,300000,0^
3569 S15500: DMOVE AC,[30400,,3
3570 033061 120 04 0 00 041046 0,,0]
3571 DFAD AC,[32400,,0
3572 033062 110 04 0 00 041050 0,,0]
3573 033063 312 04 0 00 041052 CAME AC,[32500,,0]
3574 033064 003 04 0 00 015501 ER3 AC,15501
3575 033065 312 05 0 00 040563 CAME AC+1,[300000,,0]
3576 033066 004 05 0 00 015501 ER4 AC+1,15501
3577 033067 321 10 0 00 033061 JUMPL AC+4,S15500 ;LOOP ON ERROR SWITCH^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 6-5
DSKCE1 MAC 21-Jun-78 10:46 DFAD TEST-DOUBLE FLOATING POINT ADD AND ROUND SEQ 0088
3578
3579 SDFA 156,200400,1,0,0,201600,0,0,0,202400,0,100000,0^
3580 S15600: DMOVE AC,[200400,,1
3581 033070 120 04 0 00 040177 0,,0]
3582 DFAD AC,[201600,,0
3583 033071 110 04 0 00 041053 0,,0]
3584 033072 312 04 0 00 040744 CAME AC,[202400,,0]
3585 033073 003 04 0 00 015601 ER3 AC,15601
3586 033074 312 05 0 00 040206 CAME AC+1,[100000,,0]
3587 033075 004 05 0 00 015601 ER4 AC+1,15601
3588 033076 321 10 0 00 033070 JUMPL AC+4,S15600 ;LOOP ON ERROR SWITCH^
3589
3590 SDFA 157,577400,3,0,0,202400,0,0,0,201600,1,200000,0^
3591 S15700: DMOVE AC,[577400,,3
3592 033077 120 04 0 00 041055 0,,0]
3593 DFAD AC,[202400,,0
3594 033100 110 04 0 00 040744 0,,0]
3595 033101 312 04 0 00 041057 CAME AC,[201600,,1]
3596 033102 003 04 0 00 015701 ER3 AC,15701
3597 033103 312 05 0 00 040203 CAME AC+1,[200000,,0]
3598 033104 004 05 0 00 015701 ER4 AC+1,15701
3599 033105 321 10 0 00 033077 JUMPL AC+4,S15700 ;LOOP ON ERROR SWITCH^
3600
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 7
DSKCE1 MAC 21-Jun-78 10:46 DFAD TEST-DOUBLE FLOATING POINT ADD AND ROUND SEQ 0089
3601
3602 SDFA 160,200400,3,0,0,202400,0,0,0,202500,0,300000,0^
3603 S16000: DMOVE AC,[200400,,3
3604 033106 120 04 0 00 041060 0,,0]
3605 DFAD AC,[202400,,0
3606 033107 110 04 0 00 040744 0,,0]
3607 033110 312 04 0 00 040746 CAME AC,[202500,,0]
3608 033111 003 04 0 00 016001 ER3 AC,16001
3609 033112 312 05 0 00 040563 CAME AC+1,[300000,,0]
3610 033113 004 05 0 00 016001 ER4 AC+1,16001
3611 033114 321 10 0 00 033106 JUMPL AC+4,S16000 ;LOOP ON ERROR SWITCH^
3612
3613 SDFA 161,200400,-1,0,0,202400,0,0,0,202500,177777,300000,0^
3614 S16100: DMOVE AC,[200400,,-1
3615 033115 120 04 0 00 041062 0,,0]
3616 DFAD AC,[202400,,0
3617 033116 110 04 0 00 040744 0,,0]
3618 033117 312 04 0 00 041064 CAME AC,[202500,,177777]
3619 033120 003 04 0 00 016101 ER3 AC,16101
3620 033121 312 05 0 00 040563 CAME AC+1,[300000,,0]
3621 033122 004 05 0 00 016101 ER4 AC+1,16101
3622 033123 321 10 0 00 033115 JUMPL AC+4,S16100 ;LOOP ON ERROR SWITCH^
3623
3624 SDFA 162,200200,1,0,0,200200,1,0,0,200400,2,0,0^
3625 S16200: DMOVE AC,[200200,,1
3626 033124 120 04 0 00 041065 0,,0]
3627 DFAD AC,[200200,,1
3628 033125 110 04 0 00 041065 0,,0]
3629 033126 312 04 0 00 040174 CAME AC,[200400,,2]
3630 033127 003 04 0 00 016201 ER3 AC,16201
3631 033130 312 05 0 00 040060 CAME AC+1,[0,,0]
3632 033131 004 05 0 00 016201 ER4 AC+1,16201
3633 033132 321 10 0 00 033124 JUMPL AC+4,S16200 ;LOOP ON ERROR SWITCH^
3634
3635 SDFA 163,200200,2,0,0,200200,2,0,0,200400,4,0,0^
3636 S16300: DMOVE AC,[200200,,2
3637 033133 120 04 0 00 041067 0,,0]
3638 DFAD AC,[200200,,2
3639 033134 110 04 0 00 041067 0,,0]
3640 033135 312 04 0 00 040171 CAME AC,[200400,,4]
3641 033136 003 04 0 00 016301 ER3 AC,16301
3642 033137 312 05 0 00 040060 CAME AC+1,[0,,0]
3643 033140 004 05 0 00 016301 ER4 AC+1,16301
3644 033141 321 10 0 00 033133 JUMPL AC+4,S16300 ;LOOP ON ERROR SWITCH^
3645
3646 SDFA 164,200200,4,0,0,200200,4,0,0,200400,10,0,0^
3647 S16400: DMOVE AC,[200200,,4
3648 033142 120 04 0 00 041071 0,,0]
3649 DFAD AC,[200200,,4
3650 033143 110 04 0 00 041071 0,,0]
3651 033144 312 04 0 00 040166 CAME AC,[200400,,10]
3652 033145 003 04 0 00 016401 ER3 AC,16401
3653 033146 312 05 0 00 040060 CAME AC+1,[0,,0]
3654 033147 004 05 0 00 016401 ER4 AC+1,16401
3655 033150 321 10 0 00 033142 JUMPL AC+4,S16400 ;LOOP ON ERROR SWITCH^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 7-1
DSKCE1 MAC 21-Jun-78 10:46 DFAD TEST-DOUBLE FLOATING POINT ADD AND ROUND SEQ 0090
3656
3657 SDFA 165,200200,10,0,0,200200,10,0,0,200400,20,0,0^
3658 S16500: DMOVE AC,[200200,,10
3659 033151 120 04 0 00 041073 0,,0]
3660 DFAD AC,[200200,,10
3661 033152 110 04 0 00 041073 0,,0]
3662 033153 312 04 0 00 040163 CAME AC,[200400,,20]
3663 033154 003 04 0 00 016501 ER3 AC,16501
3664 033155 312 05 0 00 040060 CAME AC+1,[0,,0]
3665 033156 004 05 0 00 016501 ER4 AC+1,16501
3666 033157 321 10 0 00 033151 JUMPL AC+4,S16500 ;LOOP ON ERROR SWITCH^
3667
3668 SDFA 166,200200,20,0,0,200200,20,0,0,200400,40,0,0^
3669 S16600: DMOVE AC,[200200,,20
3670 033160 120 04 0 00 041075 0,,0]
3671 DFAD AC,[200200,,20
3672 033161 110 04 0 00 041075 0,,0]
3673 033162 312 04 0 00 040160 CAME AC,[200400,,40]
3674 033163 003 04 0 00 016601 ER3 AC,16601
3675 033164 312 05 0 00 040060 CAME AC+1,[0,,0]
3676 033165 004 05 0 00 016601 ER4 AC+1,16601
3677 033166 321 10 0 00 033160 JUMPL AC+4,S16600 ;LOOP ON ERROR SWITCH^
3678
3679 SDFA 167,200200,40,0,0,200200,40,0,0,200400,100,0,0^
3680 S16700: DMOVE AC,[200200,,40
3681 033167 120 04 0 00 041077 0,,0]
3682 DFAD AC,[200200,,40
3683 033170 110 04 0 00 041077 0,,0]
3684 033171 312 04 0 00 040155 CAME AC,[200400,,100]
3685 033172 003 04 0 00 016701 ER3 AC,16701
3686 033173 312 05 0 00 040060 CAME AC+1,[0,,0]
3687 033174 004 05 0 00 016701 ER4 AC+1,16701
3688 033175 321 10 0 00 033167 JUMPL AC+4,S16700 ;LOOP ON ERROR SWITCH^
3689
3690 SDFA 170,200200,100,0,0,200200,100,0,0,200400,200,0,0^
3691 S17000: DMOVE AC,[200200,,100
3692 033176 120 04 0 00 041101 0,,0]
3693 DFAD AC,[200200,,100
3694 033177 110 04 0 00 041101 0,,0]
3695 033200 312 04 0 00 040152 CAME AC,[200400,,200]
3696 033201 003 04 0 00 017001 ER3 AC,17001
3697 033202 312 05 0 00 040060 CAME AC+1,[0,,0]
3698 033203 004 05 0 00 017001 ER4 AC+1,17001
3699 033204 321 10 0 00 033176 JUMPL AC+4,S17000 ;LOOP ON ERROR SWITCH^
3700
3701 SDFA 171,200200,200,0,0,200200,200,0,0,200400,400,0,0^
3702 S17100: DMOVE AC,[200200,,200
3703 033205 120 04 0 00 041103 0,,0]
3704 DFAD AC,[200200,,200
3705 033206 110 04 0 00 041103 0,,0]
3706 033207 312 04 0 00 040147 CAME AC,[200400,,400]
3707 033210 003 04 0 00 017101 ER3 AC,17101
3708 033211 312 05 0 00 040060 CAME AC+1,[0,,0]
3709 033212 004 05 0 00 017101 ER4 AC+1,17101
3710 033213 321 10 0 00 033205 JUMPL AC+4,S17100 ;LOOP ON ERROR SWITCH^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 7-2
DSKCE1 MAC 21-Jun-78 10:46 DFAD TEST-DOUBLE FLOATING POINT ADD AND ROUND SEQ 0091
3711
3712 SDFA 172,200200,400,0,0,200200,400,0,0,200400,1000,0,0^
3713 S17200: DMOVE AC,[200200,,400
3714 033214 120 04 0 00 041105 0,,0]
3715 DFAD AC,[200200,,400
3716 033215 110 04 0 00 041105 0,,0]
3717 033216 312 04 0 00 040144 CAME AC,[200400,,1000]
3718 033217 003 04 0 00 017201 ER3 AC,17201
3719 033220 312 05 0 00 040060 CAME AC+1,[0,,0]
3720 033221 004 05 0 00 017201 ER4 AC+1,17201
3721 033222 321 10 0 00 033214 JUMPL AC+4,S17200 ;LOOP ON ERROR SWITCH^
3722
3723 SDFA 173,200200,1000,0,0,200200,1000,0,0,200400,2000,0,0^
3724 S17300: DMOVE AC,[200200,,1000
3725 033223 120 04 0 00 041107 0,,0]
3726 DFAD AC,[200200,,1000
3727 033224 110 04 0 00 041107 0,,0]
3728 033225 312 04 0 00 040141 CAME AC,[200400,,2000]
3729 033226 003 04 0 00 017301 ER3 AC,17301
3730 033227 312 05 0 00 040060 CAME AC+1,[0,,0]
3731 033230 004 05 0 00 017301 ER4 AC+1,17301
3732 033231 321 10 0 00 033223 JUMPL AC+4,S17300 ;LOOP ON ERROR SWITCH^
3733
3734 SDFA 174,172400,0,0,0,201400,0,0,0,201402,0,0,0^
3735 S17400: DMOVE AC,[172400,,0
3736 033232 120 04 0 00 041111 0,,0]
3737 DFAD AC,[201400,,0
3738 033233 110 04 0 00 040057 0,,0]
3739 033234 312 04 0 00 041113 CAME AC,[201402,,0]
3740 033235 003 04 0 00 017401 ER3 AC,17401
3741 033236 312 05 0 00 040060 CAME AC+1,[0,,0]
3742 033237 004 05 0 00 017401 ER4 AC+1,17401
3743 033240 321 10 0 00 033232 JUMPL AC+4,S17400 ;LOOP ON ERROR SWITCH^
3744
3745 SDFA 175,173400,0,0,0,201400,0,0,0,201404,0,0,0^
3746 S17500: DMOVE AC,[173400,,0
3747 033241 120 04 0 00 041114 0,,0]
3748 DFAD AC,[201400,,0
3749 033242 110 04 0 00 040057 0,,0]
3750 033243 312 04 0 00 041116 CAME AC,[201404,,0]
3751 033244 003 04 0 00 017501 ER3 AC,17501
3752 033245 312 05 0 00 040060 CAME AC+1,[0,,0]
3753 033246 004 05 0 00 017501 ER4 AC+1,17501
3754 033247 321 10 0 00 033241 JUMPL AC+4,S17500 ;LOOP ON ERROR SWITCH^
3755
3756 SDFA 176,174400,0,0,0,201400,0,0,0,201410,0,0,0^
3757 S17600: DMOVE AC,[174400,,0
3758 033250 120 04 0 00 041117 0,,0]
3759 DFAD AC,[201400,,0
3760 033251 110 04 0 00 040057 0,,0]
3761 033252 312 04 0 00 041121 CAME AC,[201410,,0]
3762 033253 003 04 0 00 017601 ER3 AC,17601
3763 033254 312 05 0 00 040060 CAME AC+1,[0,,0]
3764 033255 004 05 0 00 017601 ER4 AC+1,17601
3765 033256 321 10 0 00 033250 JUMPL AC+4,S17600 ;LOOP ON ERROR SWITCH^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 7-3
DSKCE1 MAC 21-Jun-78 10:46 DFAD TEST-DOUBLE FLOATING POINT ADD AND ROUND SEQ 0092
3766
3767 SDFA 177,175400,0,0,0,201400,0,0,0,201420,0,0,0^
3768 S17700: DMOVE AC,[175400,,0
3769 033257 120 04 0 00 041122 0,,0]
3770 DFAD AC,[201400,,0
3771 033260 110 04 0 00 040057 0,,0]
3772 033261 312 04 0 00 041040 CAME AC,[201420,,0]
3773 033262 003 04 0 00 017701 ER3 AC,17701
3774 033263 312 05 0 00 040060 CAME AC+1,[0,,0]
3775 033264 004 05 0 00 017701 ER4 AC+1,17701
3776 033265 321 10 0 00 033257 JUMPL AC+4,S17700 ;LOOP ON ERROR SWITCH^
3777
3778 SDFA 200,176400,0,0,0,201400,0,0,0,201440,0,0,0^
3779 S20000: DMOVE AC,[176400,,0
3780 033266 120 04 0 00 041124 0,,0]
3781 DFAD AC,[201400,,0
3782 033267 110 04 0 00 040057 0,,0]
3783 033270 312 04 0 00 041126 CAME AC,[201440,,0]
3784 033271 003 04 0 00 020001 ER3 AC,20001
3785 033272 312 05 0 00 040060 CAME AC+1,[0,,0]
3786 033273 004 05 0 00 020001 ER4 AC+1,20001
3787 033274 321 10 0 00 033266 JUMPL AC+4,S20000 ;LOOP ON ERROR SWITCH^
3788
3789 SDFA 201,177400,0,0,0,201400,0,0,0,201500,0,0,0^
3790 S20100: DMOVE AC,[177400,,0
3791 033275 120 04 0 00 040727 0,,0]
3792 DFAD AC,[201400,,0
3793 033276 110 04 0 00 040057 0,,0]
3794 033277 312 04 0 00 041127 CAME AC,[201500,,0]
3795 033300 003 04 0 00 020101 ER3 AC,20101
3796 033301 312 05 0 00 040060 CAME AC+1,[0,,0]
3797 033302 004 05 0 00 020101 ER4 AC+1,20101
3798 033303 321 10 0 00 033275 JUMPL AC+4,S20100 ;LOOP ON ERROR SWITCH^
3799
3800 SDFA 202,202600,0,0,0,200400,0,0,0,202700,0,0,0^
3801 S20200: DMOVE AC,[202600,,0
3802 033304 120 04 0 00 041130 0,,0]
3803 DFAD AC,[200400,,0
3804 033305 110 04 0 00 040731 0,,0]
3805 033306 312 04 0 00 041132 CAME AC,[202700,,0]
3806 033307 003 04 0 00 020201 ER3 AC,20201
3807 033310 312 05 0 00 040060 CAME AC+1,[0,,0]
3808 033311 004 05 0 00 020201 ER4 AC+1,20201
3809 033312 321 10 0 00 033304 JUMPL AC+4,S20200 ;LOOP ON ERROR SWITCH^
3810
3811 SDFA 203,400,0,0,0,200400,0,0,0,200400,0,0,0^
3812 S20300: DMOVE AC,[400,,0
3813 033313 120 04 0 00 040716 0,,0]
3814 DFAD AC,[200400,,0
3815 033314 110 04 0 00 040731 0,,0]
3816 033315 312 04 0 00 040063 CAME AC,[200400,,0]
3817 033316 003 04 0 00 020301 ER3 AC,20301
3818 033317 312 05 0 00 040060 CAME AC+1,[0,,0]
3819 033320 004 05 0 00 020301 ER4 AC+1,20301
3820 033321 321 10 0 00 033313 JUMPL AC+4,S20300 ;LOOP ON ERROR SWITCH^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 7-4
DSKCE1 MAC 21-Jun-78 10:46 DFAD TEST-DOUBLE FLOATING POINT ADD AND ROUND SEQ 0093
3821
3822 SDFA 204,400,0,0,0,201400,0,0,0,201400,0,0,0^
3823 S20400: DMOVE AC,[400,,0
3824 033322 120 04 0 00 040716 0,,0]
3825 DFAD AC,[201400,,0
3826 033323 110 04 0 00 040057 0,,0]
3827 033324 312 04 0 00 040057 CAME AC,[201400,,0]
3828 033325 003 04 0 00 020401 ER3 AC,20401
3829 033326 312 05 0 00 040060 CAME AC+1,[0,,0]
3830 033327 004 05 0 00 020401 ER4 AC+1,20401
3831 033330 321 10 0 00 033322 JUMPL AC+4,S20400 ;LOOP ON ERROR SWITCH^
3832
3833 SDFA 205,400,0,0,0,202400,0,0,0,202400,0,0,0^
3834 S20500: DMOVE AC,[400,,0
3835 033331 120 04 0 00 040716 0,,0]
3836 DFAD AC,[202400,,0
3837 033332 110 04 0 00 040744 0,,0]
3838 033333 312 04 0 00 040744 CAME AC,[202400,,0]
3839 033334 003 04 0 00 020501 ER3 AC,20501
3840 033335 312 05 0 00 040060 CAME AC+1,[0,,0]
3841 033336 004 05 0 00 020501 ER4 AC+1,20501
3842 033337 321 10 0 00 033331 JUMPL AC+4,S20500 ;LOOP ON ERROR SWITCH^
3843
3844 SDFA 206,200000,0,0,0,201000,0,0,0,0,0,0,0^
3845 S20600: DMOVE AC,[200000,,0
3846 033340 120 04 0 00 041016 0,,0]
3847 DFAD AC,[201000,,0
3848 033341 110 04 0 00 040766 0,,0]
3849 033342 312 04 0 00 040060 CAME AC,[0,,0]
3850 033343 003 04 0 00 020601 ER3 AC,20601
3851 033344 312 05 0 00 040060 CAME AC+1,[0,,0]
3852 033345 004 05 0 00 020601 ER4 AC+1,20601
3853 033346 321 10 0 00 033340 JUMPL AC+4,S20600 ;LOOP ON ERROR SWITCH^
3854
3855 SDFA 207,200000,0,0,0,202000,0,0,0,0,0,0,0^
3856 S20700: DMOVE AC,[200000,,0
3857 033347 120 04 0 00 041016 0,,0]
3858 DFAD AC,[202000,,0
3859 033350 110 04 0 00 040770 0,,0]
3860 033351 312 04 0 00 040060 CAME AC,[0,,0]
3861 033352 003 04 0 00 020701 ER3 AC,20701
3862 033353 312 05 0 00 040060 CAME AC+1,[0,,0]
3863 033354 004 05 0 00 020701 ER4 AC+1,20701
3864 033355 321 10 0 00 033347 JUMPL AC+4,S20700 ;LOOP ON ERROR SWITCH^
3865
3866 SDFA 210,200000,0,0,0,203000,0,0,0,0,0,0,0^
3867 S21000: DMOVE AC,[200000,,0
3868 033356 120 04 0 00 041016 0,,0]
3869 DFAD AC,[203000,,0
3870 033357 110 04 0 00 041020 0,,0]
3871 033360 312 04 0 00 040060 CAME AC,[0,,0]
3872 033361 003 04 0 00 021001 ER3 AC,21001
3873 033362 312 05 0 00 040060 CAME AC+1,[0,,0]
3874 033363 004 05 0 00 021001 ER4 AC+1,21001
3875 033364 321 10 0 00 033356 JUMPL AC+4,S21000 ;LOOP ON ERROR SWITCH^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 7-5
DSKCE1 MAC 21-Jun-78 10:46 DFAD TEST-DOUBLE FLOATING POINT ADD AND ROUND SEQ 0094
3876
3877 SDFA 211,200400,0,0,0,200400,0,0,0,201400,0,0,0^
3878 S21100: DMOVE AC,[200400,,0
3879 033365 120 04 0 00 040731 0,,0]
3880 DFAD AC,[200400,,0
3881 033366 110 04 0 00 040731 0,,0]
3882 033367 312 04 0 00 040057 CAME AC,[201400,,0]
3883 033370 003 04 0 00 021101 ER3 AC,21101
3884 033371 312 05 0 00 040060 CAME AC+1,[0,,0]
3885 033372 004 05 0 00 021101 ER4 AC+1,21101
3886 033373 321 10 0 00 033365 JUMPL AC+4,S21100 ;LOOP ON ERROR SWITCH^
3887
3888 SDFA 212,201400,0,0,0,201400,0,0,0,202400,0,0,0^
3889 S21200: DMOVE AC,[201400,,0
3890 033374 120 04 0 00 040057 0,,0]
3891 DFAD AC,[201400,,0
3892 033375 110 04 0 00 040057 0,,0]
3893 033376 312 04 0 00 040744 CAME AC,[202400,,0]
3894 033377 003 04 0 00 021201 ER3 AC,21201
3895 033400 312 05 0 00 040060 CAME AC+1,[0,,0]
3896 033401 004 05 0 00 021201 ER4 AC+1,21201
3897 033402 321 10 0 00 033374 JUMPL AC+4,S21200 ;LOOP ON ERROR SWITCH^
3898
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 8
DSKCE1 MAC 21-Jun-78 10:46 DFAD TEST-DOUBLE FLOATING POINT ADD AND ROUND SEQ 0095
3899
3900 SDFA 213,202400,0,0,0,202400,0,0,0,203400,0,0,0^
3901 S21300: DMOVE AC,[202400,,0
3902 033403 120 04 0 00 040744 0,,0]
3903 DFAD AC,[202400,,0
3904 033404 110 04 0 00 040744 0,,0]
3905 033405 312 04 0 00 041133 CAME AC,[203400,,0]
3906 033406 003 04 0 00 021301 ER3 AC,21301
3907 033407 312 05 0 00 040060 CAME AC+1,[0,,0]
3908 033410 004 05 0 00 021301 ER4 AC+1,21301
3909 033411 321 10 0 00 033403 JUMPL AC+4,S21300 ;LOOP ON ERROR SWITCH^
3910
3911 SDFA 214,200100,0,0,0,200100,0,0,0,177400,0,0,0^
3912 S21400: DMOVE AC,[200100,,0
3913 033412 120 04 0 00 041134 0,,0]
3914 DFAD AC,[200100,,0
3915 033413 110 04 0 00 041134 0,,0]
3916 033414 312 04 0 00 040066 CAME AC,[177400,,0]
3917 033415 003 04 0 00 021401 ER3 AC,21401
3918 033416 312 05 0 00 040060 CAME AC+1,[0,,0]
3919 033417 004 05 0 00 021401 ER4 AC+1,21401
3920 033420 321 10 0 00 033412 JUMPL AC+4,S21400 ;LOOP ON ERROR SWITCH^
3921
3922 SDFA 215,200040,0,0,0,200040,0,0,0,176400,0,0,0^
3923 S21500: DMOVE AC,[200040,,0
3924 033421 120 04 0 00 041136 0,,0]
3925 DFAD AC,[200040,,0
3926 033422 110 04 0 00 041136 0,,0]
3927 033423 312 04 0 00 040071 CAME AC,[176400,,0]
3928 033424 003 04 0 00 021501 ER3 AC,21501
3929 033425 312 05 0 00 040060 CAME AC+1,[0,,0]
3930 033426 004 05 0 00 021501 ER4 AC+1,21501
3931 033427 321 10 0 00 033421 JUMPL AC+4,S21500 ;LOOP ON ERROR SWITCH^
3932
3933 SDFA 216,200020,0,0,0,200020,0,0,0,175400,0,0,0^
3934 S21600: DMOVE AC,[200020,,0
3935 033430 120 04 0 00 041140 0,,0]
3936 DFAD AC,[200020,,0
3937 033431 110 04 0 00 041140 0,,0]
3938 033432 312 04 0 00 040074 CAME AC,[175400,,0]
3939 033433 003 04 0 00 021601 ER3 AC,21601
3940 033434 312 05 0 00 040060 CAME AC+1,[0,,0]
3941 033435 004 05 0 00 021601 ER4 AC+1,21601
3942 033436 321 10 0 00 033430 JUMPL AC+4,S21600 ;LOOP ON ERROR SWITCH^
3943
3944 SDFA 217,577400,0,0,0,576400,0,0,0,576200,0,0,0^
3945 S21700: DMOVE AC,[577400,,0
3946 033437 120 04 0 00 040061 0,,0]
3947 DFAD AC,[576400,,0
3948 033440 110 04 0 00 041036 0,,0]
3949 033441 312 04 0 00 041142 CAME AC,[576200,,0]
3950 033442 003 04 0 00 021701 ER3 AC,21701
3951 033443 312 05 0 00 040060 CAME AC+1,[0,,0]
3952 033444 004 05 0 00 021701 ER4 AC+1,21701
3953 033445 321 10 0 00 033437 JUMPL AC+4,S21700 ;LOOP ON ERROR SWITCH^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 8-1
DSKCE1 MAC 21-Jun-78 10:46 DFAD TEST-DOUBLE FLOATING POINT ADD AND ROUND SEQ 0096
3954
3955 SDFA 220,600400,0,0,0,576400,0,0,0,576300,0,0,0^
3956 S22000: DMOVE AC,[600400,,0
3957 033446 120 04 0 00 040725 0,,0]
3958 DFAD AC,[576400,,0
3959 033447 110 04 0 00 041036 0,,0]
3960 033450 312 04 0 00 041143 CAME AC,[576300,,0]
3961 033451 003 04 0 00 022001 ER3 AC,22001
3962 033452 312 05 0 00 040060 CAME AC+1,[0,,0]
3963 033453 004 05 0 00 022001 ER4 AC+1,22001
3964 033454 321 10 0 00 033446 JUMPL AC+4,S22000 ;LOOP ON ERROR SWITCH^
3965
3966 SDFA 221,601400,0,0,0,576400,0,0,0,576340,0,0,0^
3967 S22100: DMOVE AC,[601400,,0
3968 033455 120 04 0 00 041144 0,,0]
3969 DFAD AC,[576400,,0
3970 033456 110 04 0 00 041036 0,,0]
3971 033457 312 04 0 00 041146 CAME AC,[576340,,0]
3972 033460 003 04 0 00 022101 ER3 AC,22101
3973 033461 312 05 0 00 040060 CAME AC+1,[0,,0]
3974 033462 004 05 0 00 022101 ER4 AC+1,22101
3975 033463 321 10 0 00 033455 JUMPL AC+4,S22100 ;LOOP ON ERROR SWITCH^
3976
3977 SDFA 222,576400,0,0,0,577400,0,0,0,576200,0,0,0^
3978 S22200: DMOVE AC,[576400,,0
3979 033464 120 04 0 00 041036 0,,0]
3980 DFAD AC,[577400,,0
3981 033465 110 04 0 00 040061 0,,0]
3982 033466 312 04 0 00 041142 CAME AC,[576200,,0]
3983 033467 003 04 0 00 022201 ER3 AC,22201
3984 033470 312 05 0 00 040060 CAME AC+1,[0,,0]
3985 033471 004 05 0 00 022201 ER4 AC+1,22201
3986 033472 321 10 0 00 033464 JUMPL AC+4,S22200 ;LOOP ON ERROR SWITCH^
3987
3988 SDFA 223,576400,0,0,0,600400,0,0,0,576300,0,0,0^
3989 S22300: DMOVE AC,[576400,,0
3990 033473 120 04 0 00 041036 0,,0]
3991 DFAD AC,[600400,,0
3992 033474 110 04 0 00 040725 0,,0]
3993 033475 312 04 0 00 041143 CAME AC,[576300,,0]
3994 033476 003 04 0 00 022301 ER3 AC,22301
3995 033477 312 05 0 00 040060 CAME AC+1,[0,,0]
3996 033500 004 05 0 00 022301 ER4 AC+1,22301
3997 033501 321 10 0 00 033473 JUMPL AC+4,S22300 ;LOOP ON ERROR SWITCH^
3998
3999 SDFA 224,576400,0,0,0,601400,0,0,0,576340,0,0,0^
4000 S22400: DMOVE AC,[576400,,0
4001 033502 120 04 0 00 041036 0,,0]
4002 DFAD AC,[601400,,0
4003 033503 110 04 0 00 041144 0,,0]
4004 033504 312 04 0 00 041146 CAME AC,[576340,,0]
4005 033505 003 04 0 00 022401 ER3 AC,22401
4006 033506 312 05 0 00 040060 CAME AC+1,[0,,0]
4007 033507 004 05 0 00 022401 ER4 AC+1,22401
4008 033510 321 10 0 00 033502 JUMPL AC+4,S22400 ;LOOP ON ERROR SWITCH^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 8-2
DSKCE1 MAC 21-Jun-78 10:46 DFAD TEST-DOUBLE FLOATING POINT ADD AND ROUND SEQ 0097
4009
4010 SDFA 225,577400,0,0,0,577400,0,0,0,576400,0,0,0^
4011 S22500: DMOVE AC,[577400,,0
4012 033511 120 04 0 00 040061 0,,0]
4013 DFAD AC,[577400,,0
4014 033512 110 04 0 00 040061 0,,0]
4015 033513 312 04 0 00 040764 CAME AC,[576400,,0]
4016 033514 003 04 0 00 022501 ER3 AC,22501
4017 033515 312 05 0 00 040060 CAME AC+1,[0,,0]
4018 033516 004 05 0 00 022501 ER4 AC+1,22501
4019 033517 321 10 0 00 033511 JUMPL AC+4,S22500 ;LOOP ON ERROR SWITCH^
4020
4021 SDFA 226,601400,0,0,0,601400,0,0,0,600400,0,0,0^
4022 S22600: DMOVE AC,[601400,,0
4023 033520 120 04 0 00 041144 0,,0]
4024 DFAD AC,[601400,,0
4025 033521 110 04 0 00 041144 0,,0]
4026 033522 312 04 0 00 040725 CAME AC,[600400,,0]
4027 033523 003 04 0 00 022601 ER3 AC,22601
4028 033524 312 05 0 00 040060 CAME AC+1,[0,,0]
4029 033525 004 05 0 00 022601 ER4 AC+1,22601
4030 033526 321 10 0 00 033520 JUMPL AC+4,S22600 ;LOOP ON ERROR SWITCH^
4031
4032 SDFA 227,201400,0,0,0,577400,0,0,0,200400,0,0,0^
4033 S22700: DMOVE AC,[201400,,0
4034 033527 120 04 0 00 040057 0,,0]
4035 DFAD AC,[577400,,0
4036 033530 110 04 0 00 040061 0,,0]
4037 033531 312 04 0 00 040063 CAME AC,[200400,,0]
4038 033532 003 04 0 00 022701 ER3 AC,22701
4039 033533 312 05 0 00 040060 CAME AC+1,[0,,0]
4040 033534 004 05 0 00 022701 ER4 AC+1,22701
4041 033535 321 10 0 00 033527 JUMPL AC+4,S22700 ;LOOP ON ERROR SWITCH^
4042
4043 SDFA 230,201400,0,0,0,600400,0,0,0,200600,0,0,0^
4044 S23000: DMOVE AC,[201400,,0
4045 033536 120 04 0 00 040057 0,,0]
4046 DFAD AC,[600400,,0
4047 033537 110 04 0 00 040725 0,,0]
4048 033540 312 04 0 00 040064 CAME AC,[200600,,0]
4049 033541 003 04 0 00 023001 ER3 AC,23001
4050 033542 312 05 0 00 040060 CAME AC+1,[0,,0]
4051 033543 004 05 0 00 023001 ER4 AC+1,23001
4052 033544 321 10 0 00 033536 JUMPL AC+4,S23000 ;LOOP ON ERROR SWITCH^
4053
4054 SDFA 231,201400,0,0,0,601400,0,0,0,200700,0,0,0^
4055 S23100: DMOVE AC,[201400,,0
4056 033545 120 04 0 00 040057 0,,0]
4057 DFAD AC,[601400,,0
4058 033546 110 04 0 00 041144 0,,0]
4059 033547 312 04 0 00 040741 CAME AC,[200700,,0]
4060 033550 003 04 0 00 023101 ER3 AC,23101
4061 033551 312 05 0 00 040060 CAME AC+1,[0,,0]
4062 033552 004 05 0 00 023101 ER4 AC+1,23101
4063 033553 321 10 0 00 033545 JUMPL AC+4,S23100 ;LOOP ON ERROR SWITCH^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 8-3
DSKCE1 MAC 21-Jun-78 10:46 DFAD TEST-DOUBLE FLOATING POINT ADD AND ROUND SEQ 0098
4064
4065 SDFA 232,200000,0,0,0,200000,1,0,0,146400,0,0,0^
4066 S23200: DMOVE AC,[200000,,0
4067 033554 120 04 0 00 041016 0,,0]
4068 DFAD AC,[200000,,1
4069 033555 110 04 0 00 041147 0,,0]
4070 033556 312 04 0 00 040201 CAME AC,[146400,,0]
4071 033557 003 04 0 00 023201 ER3 AC,23201
4072 033560 312 05 0 00 040060 CAME AC+1,[0,,0]
4073 033561 004 05 0 00 023201 ER4 AC+1,23201
4074 033562 321 10 0 00 033554 JUMPL AC+4,S23200 ;LOOP ON ERROR SWITCH^
4075
4076 SDFA 233,200000,0,0,0,200000,2,0,0,147400,0,0,0^
4077 S23300: DMOVE AC,[200000,,0
4078 033563 120 04 0 00 041016 0,,0]
4079 DFAD AC,[200000,,2
4080 033564 110 04 0 00 041151 0,,0]
4081 033565 312 04 0 00 040176 CAME AC,[147400,,0]
4082 033566 003 04 0 00 023301 ER3 AC,23301
4083 033567 312 05 0 00 040060 CAME AC+1,[0,,0]
4084 033570 004 05 0 00 023301 ER4 AC+1,23301
4085 033571 321 10 0 00 033563 JUMPL AC+4,S23300 ;LOOP ON ERROR SWITCH^
4086
4087 SDFA 234,200000,0,0,0,200000,4,0,0,150400,0,0,0^
4088 S23400: DMOVE AC,[200000,,0
4089 033572 120 04 0 00 041016 0,,0]
4090 DFAD AC,[200000,,4
4091 033573 110 04 0 00 041153 0,,0]
4092 033574 312 04 0 00 040173 CAME AC,[150400,,0]
4093 033575 003 04 0 00 023401 ER3 AC,23401
4094 033576 312 05 0 00 040060 CAME AC+1,[0,,0]
4095 033577 004 05 0 00 023401 ER4 AC+1,23401
4096 033600 321 10 0 00 033572 JUMPL AC+4,S23400 ;LOOP ON ERROR SWITCH^
4097
4098 SDFA 235,200000,0,0,0,200000,10,0,0,151400,0,0,0^
4099 S23500: DMOVE AC,[200000,,0
4100 033601 120 04 0 00 041016 0,,0]
4101 DFAD AC,[200000,,10
4102 033602 110 04 0 00 041155 0,,0]
4103 033603 312 04 0 00 040170 CAME AC,[151400,,0]
4104 033604 003 04 0 00 023501 ER3 AC,23501
4105 033605 312 05 0 00 040060 CAME AC+1,[0,,0]
4106 033606 004 05 0 00 023501 ER4 AC+1,23501
4107 033607 321 10 0 00 033601 JUMPL AC+4,S23500 ;LOOP ON ERROR SWITCH^
4108
4109 SDFA 236,200000,0,0,0,200000,20,0,0,152400,0,0,0^
4110 S23600: DMOVE AC,[200000,,0
4111 033610 120 04 0 00 041016 0,,0]
4112 DFAD AC,[200000,,20
4113 033611 110 04 0 00 041157 0,,0]
4114 033612 312 04 0 00 040165 CAME AC,[152400,,0]
4115 033613 003 04 0 00 023601 ER3 AC,23601
4116 033614 312 05 0 00 040060 CAME AC+1,[0,,0]
4117 033615 004 05 0 00 023601 ER4 AC+1,23601
4118 033616 321 10 0 00 033610 JUMPL AC+4,S23600 ;LOOP ON ERROR SWITCH^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 8-4
DSKCE1 MAC 21-Jun-78 10:46 DFAD TEST-DOUBLE FLOATING POINT ADD AND ROUND SEQ 0099
4119
4120 SDFA 237,200000,0,0,0,200000,40,0,0,153400,0,0,0^
4121 S23700: DMOVE AC,[200000,,0
4122 033617 120 04 0 00 041016 0,,0]
4123 DFAD AC,[200000,,40
4124 033620 110 04 0 00 041161 0,,0]
4125 033621 312 04 0 00 040162 CAME AC,[153400,,0]
4126 033622 003 04 0 00 023701 ER3 AC,23701
4127 033623 312 05 0 00 040060 CAME AC+1,[0,,0]
4128 033624 004 05 0 00 023701 ER4 AC+1,23701
4129 033625 321 10 0 00 033617 JUMPL AC+4,S23700 ;LOOP ON ERROR SWITCH^
4130
4131 SDFA 240,200000,0,0,0,200000,100,0,0,154400,0,0,0^
4132 S24000: DMOVE AC,[200000,,0
4133 033626 120 04 0 00 041016 0,,0]
4134 DFAD AC,[200000,,100
4135 033627 110 04 0 00 041163 0,,0]
4136 033630 312 04 0 00 040157 CAME AC,[154400,,0]
4137 033631 003 04 0 00 024001 ER3 AC,24001
4138 033632 312 05 0 00 040060 CAME AC+1,[0,,0]
4139 033633 004 05 0 00 024001 ER4 AC+1,24001
4140 033634 321 10 0 00 033626 JUMPL AC+4,S24000 ;LOOP ON ERROR SWITCH^
4141
4142 SDFA 241,200000,0,0,0,200000,200,0,0,155400,0,0,0^
4143 S24100: DMOVE AC,[200000,,0
4144 033635 120 04 0 00 041016 0,,0]
4145 DFAD AC,[200000,,200
4146 033636 110 04 0 00 041165 0,,0]
4147 033637 312 04 0 00 040154 CAME AC,[155400,,0]
4148 033640 003 04 0 00 024101 ER3 AC,24101
4149 033641 312 05 0 00 040060 CAME AC+1,[0,,0]
4150 033642 004 05 0 00 024101 ER4 AC+1,24101
4151 033643 321 10 0 00 033635 JUMPL AC+4,S24100 ;LOOP ON ERROR SWITCH^
4152
4153 SDFA 242,200000,0,0,0,200000,400,0,0,156400,0,0,0^
4154 S24200: DMOVE AC,[200000,,0
4155 033644 120 04 0 00 041016 0,,0]
4156 DFAD AC,[200000,,400
4157 033645 110 04 0 00 041167 0,,0]
4158 033646 312 04 0 00 040151 CAME AC,[156400,,0]
4159 033647 003 04 0 00 024201 ER3 AC,24201
4160 033650 312 05 0 00 040060 CAME AC+1,[0,,0]
4161 033651 004 05 0 00 024201 ER4 AC+1,24201
4162 033652 321 10 0 00 033644 JUMPL AC+4,S24200 ;LOOP ON ERROR SWITCH^
4163
4164 SDFA 243,200000,0,0,0,200000,1000,0,0,157400,0,0,0^
4165 S24300: DMOVE AC,[200000,,0
4166 033653 120 04 0 00 041016 0,,0]
4167 DFAD AC,[200000,,1000
4168 033654 110 04 0 00 041171 0,,0]
4169 033655 312 04 0 00 040146 CAME AC,[157400,,0]
4170 033656 003 04 0 00 024301 ER3 AC,24301
4171 033657 312 05 0 00 040060 CAME AC+1,[0,,0]
4172 033660 004 05 0 00 024301 ER4 AC+1,24301
4173 033661 321 10 0 00 033653 JUMPL AC+4,S24300 ;LOOP ON ERROR SWITCH^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 8-5
DSKCE1 MAC 21-Jun-78 10:46 DFAD TEST-DOUBLE FLOATING POINT ADD AND ROUND SEQ 0100
4174
4175 SDFA 244,200000,0,0,0,200000,2000,0,0,160400,0,0,0^
4176 S24400: DMOVE AC,[200000,,0
4177 033662 120 04 0 00 041016 0,,0]
4178 DFAD AC,[200000,,2000
4179 033663 110 04 0 00 041173 0,,0]
4180 033664 312 04 0 00 040143 CAME AC,[160400,,0]
4181 033665 003 04 0 00 024401 ER3 AC,24401
4182 033666 312 05 0 00 040060 CAME AC+1,[0,,0]
4183 033667 004 05 0 00 024401 ER4 AC+1,24401
4184 033670 321 10 0 00 033662 JUMPL AC+4,S24400 ;LOOP ON ERROR SWITCH^
4185
4186 SDFA 245,200000,0,0,0,200000,4000,0,0,161400,0,0,0^
4187 S24500: DMOVE AC,[200000,,0
4188 033671 120 04 0 00 041016 0,,0]
4189 DFAD AC,[200000,,4000
4190 033672 110 04 0 00 041175 0,,0]
4191 033673 312 04 0 00 040140 CAME AC,[161400,,0]
4192 033674 003 04 0 00 024501 ER3 AC,24501
4193 033675 312 05 0 00 040060 CAME AC+1,[0,,0]
4194 033676 004 05 0 00 024501 ER4 AC+1,24501
4195 033677 321 10 0 00 033671 JUMPL AC+4,S24500 ;LOOP ON ERROR SWITCH^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 9
DSKCE1 MAC 21-Jun-78 10:46 DFAD TEST-DOUBLE FLOATING POINT ADD AND ROUND SEQ 0101
4196
4197 SDFA 246,200000,0,0,0,200000,10000,0,0,162400,0,0,0^
4198 S24600: DMOVE AC,[200000,,0
4199 033700 120 04 0 00 041016 0,,0]
4200 DFAD AC,[200000,,10000
4201 033701 110 04 0 00 041177 0,,0]
4202 033702 312 04 0 00 040135 CAME AC,[162400,,0]
4203 033703 003 04 0 00 024601 ER3 AC,24601
4204 033704 312 05 0 00 040060 CAME AC+1,[0,,0]
4205 033705 004 05 0 00 024601 ER4 AC+1,24601
4206 033706 321 10 0 00 033700 JUMPL AC+4,S24600 ;LOOP ON ERROR SWITCH^
4207
4208 SDFA 247,200000,0,0,0,200000,20000,0,0,163400,0,0,0^
4209 S24700: DMOVE AC,[200000,,0
4210 033707 120 04 0 00 041016 0,,0]
4211 DFAD AC,[200000,,20000
4212 033710 110 04 0 00 041201 0,,0]
4213 033711 312 04 0 00 040132 CAME AC,[163400,,0]
4214 033712 003 04 0 00 024701 ER3 AC,24701
4215 033713 312 05 0 00 040060 CAME AC+1,[0,,0]
4216 033714 004 05 0 00 024701 ER4 AC+1,24701
4217 033715 321 10 0 00 033707 JUMPL AC+4,S24700 ;LOOP ON ERROR SWITCH^
4218
4219 SDFA 250,200000,0,0,0,200000,40000,0,0,164400,0,0,0^
4220 S25000: DMOVE AC,[200000,,0
4221 033716 120 04 0 00 041016 0,,0]
4222 DFAD AC,[200000,,40000
4223 033717 110 04 0 00 041203 0,,0]
4224 033720 312 04 0 00 040127 CAME AC,[164400,,0]
4225 033721 003 04 0 00 025001 ER3 AC,25001
4226 033722 312 05 0 00 040060 CAME AC+1,[0,,0]
4227 033723 004 05 0 00 025001 ER4 AC+1,25001
4228 033724 321 10 0 00 033716 JUMPL AC+4,S25000 ;LOOP ON ERROR SWITCH^
4229
4230 SDFA 251,200000,0,0,0,200000,100000,0,0,165400,0,0,0^
4231 S25100: DMOVE AC,[200000,,0
4232 033725 120 04 0 00 041016 0,,0]
4233 DFAD AC,[200000,,100000
4234 033726 110 04 0 00 041205 0,,0]
4235 033727 312 04 0 00 040124 CAME AC,[165400,,0]
4236 033730 003 04 0 00 025101 ER3 AC,25101
4237 033731 312 05 0 00 040060 CAME AC+1,[0,,0]
4238 033732 004 05 0 00 025101 ER4 AC+1,25101
4239 033733 321 10 0 00 033725 JUMPL AC+4,S25100 ;LOOP ON ERROR SWITCH^
4240
4241 SDFA 252,200000,0,0,0,200000,200000,0,0,166400,0,0,0^
4242 S25200: DMOVE AC,[200000,,0
4243 033734 120 04 0 00 041016 0,,0]
4244 DFAD AC,[200000,,200000
4245 033735 110 04 0 00 041207 0,,0]
4246 033736 312 04 0 00 040121 CAME AC,[166400,,0]
4247 033737 003 04 0 00 025201 ER3 AC,25201
4248 033740 312 05 0 00 040060 CAME AC+1,[0,,0]
4249 033741 004 05 0 00 025201 ER4 AC+1,25201
4250 033742 321 10 0 00 033734 JUMPL AC+4,S25200 ;LOOP ON ERROR SWITCH^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 9-1
DSKCE1 MAC 21-Jun-78 10:46 DFAD TEST-DOUBLE FLOATING POINT ADD AND ROUND SEQ 0102
4251
4252 SDFA 253,200000,0,0,0,200000,400000,0,0,167400,0,0,0^
4253 S25300: DMOVE AC,[200000,,0
4254 033743 120 04 0 00 041016 0,,0]
4255 DFAD AC,[200000,,400000
4256 033744 110 04 0 00 041211 0,,0]
4257 033745 312 04 0 00 040116 CAME AC,[167400,,0]
4258 033746 003 04 0 00 025301 ER3 AC,25301
4259 033747 312 05 0 00 040060 CAME AC+1,[0,,0]
4260 033750 004 05 0 00 025301 ER4 AC+1,25301
4261 033751 321 10 0 00 033743 JUMPL AC+4,S25300 ;LOOP ON ERROR SWITCH^
4262
4263 SDFA 254,200000,0,0,0,200001,0,0,0,170400,0,0,0^
4264 S25400: DMOVE AC,[200000,,0
4265 033752 120 04 0 00 041016 0,,0]
4266 DFAD AC,[200001,,0
4267 033753 110 04 0 00 041213 0,,0]
4268 033754 312 04 0 00 040113 CAME AC,[170400,,0]
4269 033755 003 04 0 00 025401 ER3 AC,25401
4270 033756 312 05 0 00 040060 CAME AC+1,[0,,0]
4271 033757 004 05 0 00 025401 ER4 AC+1,25401
4272 033760 321 10 0 00 033752 JUMPL AC+4,S25400 ;LOOP ON ERROR SWITCH^
4273
4274 SDFA 255,200000,0,0,0,200002,0,0,0,171400,0,0,0^
4275 S25500: DMOVE AC,[200000,,0
4276 033761 120 04 0 00 041016 0,,0]
4277 DFAD AC,[200002,,0
4278 033762 110 04 0 00 041215 0,,0]
4279 033763 312 04 0 00 040110 CAME AC,[171400,,0]
4280 033764 003 04 0 00 025501 ER3 AC,25501
4281 033765 312 05 0 00 040060 CAME AC+1,[0,,0]
4282 033766 004 05 0 00 025501 ER4 AC+1,25501
4283 033767 321 10 0 00 033761 JUMPL AC+4,S25500 ;LOOP ON ERROR SWITCH^
4284
4285 SDFA 256,200000,0,0,0,200004,0,0,0,172400,0,0,0^
4286 S25600: DMOVE AC,[200000,,0
4287 033770 120 04 0 00 041016 0,,0]
4288 DFAD AC,[200004,,0
4289 033771 110 04 0 00 041217 0,,0]
4290 033772 312 04 0 00 040105 CAME AC,[172400,,0]
4291 033773 003 04 0 00 025601 ER3 AC,25601
4292 033774 312 05 0 00 040060 CAME AC+1,[0,,0]
4293 033775 004 05 0 00 025601 ER4 AC+1,25601
4294 033776 321 10 0 00 033770 JUMPL AC+4,S25600 ;LOOP ON ERROR SWITCH^
4295
4296 SDFA 257,200000,0,0,0,200010,0,0,0,173400,0,0,0^
4297 S25700: DMOVE AC,[200000,,0
4298 033777 120 04 0 00 041016 0,,0]
4299 DFAD AC,[200010,,0
4300 034000 110 04 0 00 041221 0,,0]
4301 034001 312 04 0 00 040102 CAME AC,[173400,,0]
4302 034002 003 04 0 00 025701 ER3 AC,25701
4303 034003 312 05 0 00 040060 CAME AC+1,[0,,0]
4304 034004 004 05 0 00 025701 ER4 AC+1,25701
4305 034005 321 10 0 00 033777 JUMPL AC+4,S25700 ;LOOP ON ERROR SWITCH^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 9-2
DSKCE1 MAC 21-Jun-78 10:46 DFAD TEST-DOUBLE FLOATING POINT ADD AND ROUND SEQ 0103
4306
4307 SDFA 260,200000,0,0,0,200020,0,0,0,174400,0,0,0^
4308 S26000: DMOVE AC,[200000,,0
4309 034006 120 04 0 00 041016 0,,0]
4310 DFAD AC,[200020,,0
4311 034007 110 04 0 00 041140 0,,0]
4312 034010 312 04 0 00 040077 CAME AC,[174400,,0]
4313 034011 003 04 0 00 026001 ER3 AC,26001
4314 034012 312 05 0 00 040060 CAME AC+1,[0,,0]
4315 034013 004 05 0 00 026001 ER4 AC+1,26001
4316 034014 321 10 0 00 034006 JUMPL AC+4,S26000 ;LOOP ON ERROR SWITCH^
4317
4318 SDFA 261,200000,0,0,0,200040,0,0,0,175400,0,0,0^
4319 S26100: DMOVE AC,[200000,,0
4320 034015 120 04 0 00 041016 0,,0]
4321 DFAD AC,[200040,,0
4322 034016 110 04 0 00 041136 0,,0]
4323 034017 312 04 0 00 040074 CAME AC,[175400,,0]
4324 034020 003 04 0 00 026101 ER3 AC,26101
4325 034021 312 05 0 00 040060 CAME AC+1,[0,,0]
4326 034022 004 05 0 00 026101 ER4 AC+1,26101
4327 034023 321 10 0 00 034015 JUMPL AC+4,S26100 ;LOOP ON ERROR SWITCH^
4328
4329 SDFA 262,200000,0,0,0,200100,0,0,0,176400,0,0,0^
4330 S26200: DMOVE AC,[200000,,0
4331 034024 120 04 0 00 041016 0,,0]
4332 DFAD AC,[200100,,0
4333 034025 110 04 0 00 041134 0,,0]
4334 034026 312 04 0 00 040071 CAME AC,[176400,,0]
4335 034027 003 04 0 00 026201 ER3 AC,26201
4336 034030 312 05 0 00 040060 CAME AC+1,[0,,0]
4337 034031 004 05 0 00 026201 ER4 AC+1,26201
4338 034032 321 10 0 00 034024 JUMPL AC+4,S26200 ;LOOP ON ERROR SWITCH^
4339
4340 SDFA 263,377400,0,0,0,377400,0,0,0,400,0,0,0^
4341 S26300: DMOVE AC,[377400,,0
4342 034033 120 04 0 00 041026 0,,0]
4343 DFAD AC,[377400,,0
4344 034034 110 04 0 00 041026 0,,0]
4345 034035 312 04 0 00 040233 CAME AC,[400,,0]
4346 034036 003 04 0 00 026301 ER3 AC,26301
4347 034037 312 05 0 00 040060 CAME AC+1,[0,,0]
4348 034040 004 05 0 00 026301 ER4 AC+1,26301
4349 034041 321 10 0 00 034033 JUMPL AC+4,S26300 ;LOOP ON ERROR SWITCH^
4350
4351 SDFA 264,777700,0,0,0,777700,0,0,0,400400,0,0,0^
4352 S26400: DMOVE AC,[777700,,0
4353 034042 120 04 0 00 041223 0,,0]
4354 DFAD AC,[777700,,0
4355 034043 110 04 0 00 041223 0,,0]
4356 034044 312 04 0 00 041225 CAME AC,[400400,,0]
4357 034045 003 04 0 00 026401 ER3 AC,26401
4358 034046 312 05 0 00 040060 CAME AC+1,[0,,0]
4359 034047 004 05 0 00 026401 ER4 AC+1,26401
4360 034050 321 10 0 00 034042 JUMPL AC+4,S26400 ;LOOP ON ERROR SWITCH^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 9-3
DSKCE1 MAC 21-Jun-78 10:46 DFAD TEST-DOUBLE FLOATING POINT ADD AND ROUND SEQ 0104
4361
4362 SDFA 265,200000,0,0,0,200777,-1,0,0,200777,-1,0,0^
4363 S26500: DMOVE AC,[200000,,0
4364 034051 120 04 0 00 041016 0,,0]
4365 DFAD AC,[200777,,-1
4366 034052 110 04 0 00 041226 0,,0]
4367 034053 312 04 0 00 040710 CAME AC,[200777,,-1]
4368 034054 003 04 0 00 026501 ER3 AC,26501
4369 034055 312 05 0 00 040060 CAME AC+1,[0,,0]
4370 034056 004 05 0 00 026501 ER4 AC+1,26501
4371 034057 321 10 0 00 034051 JUMPL AC+4,S26500 ;LOOP ON ERROR SWITCH^
4372
4373 SDFA 266,200000,1,0,0,201400,0,0,0,201400,0,200000,0^
4374 S26600: DMOVE AC,[200000,,1
4375 034060 120 04 0 00 041147 0,,0]
4376 DFAD AC,[201400,,0
4377 034061 110 04 0 00 040057 0,,0]
4378 034062 312 04 0 00 040057 CAME AC,[201400,,0]
4379 034063 003 04 0 00 026601 ER3 AC,26601
4380 034064 312 05 0 00 040203 CAME AC+1,[200000,,0]
4381 034065 004 05 0 00 026601 ER4 AC+1,26601
4382 034066 321 10 0 00 034060 JUMPL AC+4,S26600 ;LOOP ON ERROR SWITCH^
4383
4384 SDFA 267,200000,2,0,0,202400,0,0,0,202400,0,200000,0^
4385 S26700: DMOVE AC,[200000,,2
4386 034067 120 04 0 00 041151 0,,0]
4387 DFAD AC,[202400,,0
4388 034070 110 04 0 00 040744 0,,0]
4389 034071 312 04 0 00 040744 CAME AC,[202400,,0]
4390 034072 003 04 0 00 026701 ER3 AC,26701
4391 034073 312 05 0 00 040203 CAME AC+1,[200000,,0]
4392 034074 004 05 0 00 026701 ER4 AC+1,26701
4393 034075 321 10 0 00 034067 JUMPL AC+4,S26700 ;LOOP ON ERROR SWITCH^
4394
4395 SDFA 270,200000,4,0,0,203400,0,0,0,203400,0,200000,0^
4396 S27000: DMOVE AC,[200000,,4
4397 034076 120 04 0 00 041153 0,,0]
4398 DFAD AC,[203400,,0
4399 034077 110 04 0 00 041230 0,,0]
4400 034100 312 04 0 00 041133 CAME AC,[203400,,0]
4401 034101 003 04 0 00 027001 ER3 AC,27001
4402 034102 312 05 0 00 040203 CAME AC+1,[200000,,0]
4403 034103 004 05 0 00 027001 ER4 AC+1,27001
4404 034104 321 10 0 00 034076 JUMPL AC+4,S27000 ;LOOP ON ERROR SWITCH^
4405
4406 SDFA 271,200000,10,0,0,204400,0,0,0,204400,0,200000,0^
4407 S27100: DMOVE AC,[200000,,10
4408 034105 120 04 0 00 041155 0,,0]
4409 DFAD AC,[204400,,0
4410 034106 110 04 0 00 040747 0,,0]
4411 034107 312 04 0 00 040747 CAME AC,[204400,,0]
4412 034110 003 04 0 00 027101 ER3 AC,27101
4413 034111 312 05 0 00 040203 CAME AC+1,[200000,,0]
4414 034112 004 05 0 00 027101 ER4 AC+1,27101
4415 034113 321 10 0 00 034105 JUMPL AC+4,S27100 ;LOOP ON ERROR SWITCH^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 9-4
DSKCE1 MAC 21-Jun-78 10:46 DFAD TEST-DOUBLE FLOATING POINT ADD AND ROUND SEQ 0105
4416
4417 SDFA 272,200000,20,0,0,205400,0,0,0,205400,0,200000,0^
4418 S27200: DMOVE AC,[200000,,20
4419 034114 120 04 0 00 041157 0,,0]
4420 DFAD AC,[205400,,0
4421 034115 110 04 0 00 040733 0,,0]
4422 034116 312 04 0 00 040733 CAME AC,[205400,,0]
4423 034117 003 04 0 00 027201 ER3 AC,27201
4424 034120 312 05 0 00 040203 CAME AC+1,[200000,,0]
4425 034121 004 05 0 00 027201 ER4 AC+1,27201
4426 034122 321 10 0 00 034114 JUMPL AC+4,S27200 ;LOOP ON ERROR SWITCH^
4427
4428 SDFA 273,200000,40,0,0,206400,0,0,0,206400,0,200000,0^
4429 S27300: DMOVE AC,[200000,,40
4430 034123 120 04 0 00 041161 0,,0]
4431 DFAD AC,[206400,,0
4432 034124 110 04 0 00 041043 0,,0]
4433 034125 312 04 0 00 041043 CAME AC,[206400,,0]
4434 034126 003 04 0 00 027301 ER3 AC,27301
4435 034127 312 05 0 00 040203 CAME AC+1,[200000,,0]
4436 034130 004 05 0 00 027301 ER4 AC+1,27301
4437 034131 321 10 0 00 034123 JUMPL AC+4,S27300 ;LOOP ON ERROR SWITCH^
4438
4439 SDFA 274,200000,100,0,0,207400,0,0,0,207400,0,200000,0^
4440 S27400: DMOVE AC,[200000,,100
4441 034132 120 04 0 00 041163 0,,0]
4442 DFAD AC,[207400,,0
4443 034133 110 04 0 00 041232 0,,0]
4444 034134 312 04 0 00 041232 CAME AC,[207400,,0]
4445 034135 003 04 0 00 027401 ER3 AC,27401
4446 034136 312 05 0 00 040203 CAME AC+1,[200000,,0]
4447 034137 004 05 0 00 027401 ER4 AC+1,27401
4448 034140 321 10 0 00 034132 JUMPL AC+4,S27400 ;LOOP ON ERROR SWITCH^
4449
4450 SDFA 275,200000,200,0,0,210400,0,0,0,210400,0,200000,0^
4451 S27500: DMOVE AC,[200000,,200
4452 034141 120 04 0 00 041165 0,,0]
4453 DFAD AC,[210400,,0
4454 034142 110 04 0 00 040752 0,,0]
4455 034143 312 04 0 00 040752 CAME AC,[210400,,0]
4456 034144 003 04 0 00 027501 ER3 AC,27501
4457 034145 312 05 0 00 040203 CAME AC+1,[200000,,0]
4458 034146 004 05 0 00 027501 ER4 AC+1,27501
4459 034147 321 10 0 00 034141 JUMPL AC+4,S27500 ;LOOP ON ERROR SWITCH^
4460
4461 SDFA 276,200000,400,0,0,211400,0,0,0,211400,0,200000,0^
4462 S27600: DMOVE AC,[200000,,400
4463 034150 120 04 0 00 041167 0,,0]
4464 DFAD AC,[211400,,0
4465 034151 110 04 0 00 041234 0,,0]
4466 034152 312 04 0 00 041234 CAME AC,[211400,,0]
4467 034153 003 04 0 00 027601 ER3 AC,27601
4468 034154 312 05 0 00 040203 CAME AC+1,[200000,,0]
4469 034155 004 05 0 00 027601 ER4 AC+1,27601
4470 034156 321 10 0 00 034150 JUMPL AC+4,S27600 ;LOOP ON ERROR SWITCH^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 9-5
DSKCE1 MAC 21-Jun-78 10:46 DFAD TEST-DOUBLE FLOATING POINT ADD AND ROUND SEQ 0106
4471
4472 SDFA 277,200000,1000,0,0,212400,0,0,0,212400,0,200000,0^
4473 S27700: DMOVE AC,[200000,,1000
4474 034157 120 04 0 00 041171 0,,0]
4475 DFAD AC,[212400,,0
4476 034160 110 04 0 00 041236 0,,0]
4477 034161 312 04 0 00 041236 CAME AC,[212400,,0]
4478 034162 003 04 0 00 027701 ER3 AC,27701
4479 034163 312 05 0 00 040203 CAME AC+1,[200000,,0]
4480 034164 004 05 0 00 027701 ER4 AC+1,27701
4481 034165 321 10 0 00 034157 JUMPL AC+4,S27700 ;LOOP ON ERROR SWITCH^
4482
4483 SDFA 300,200000,2000,0,0,213400,0,0,0,213400,0,200000,0^
4484 S30000: DMOVE AC,[200000,,2000
4485 034166 120 04 0 00 041173 0,,0]
4486 DFAD AC,[213400,,0
4487 034167 110 04 0 00 041240 0,,0]
4488 034170 312 04 0 00 041240 CAME AC,[213400,,0]
4489 034171 003 04 0 00 030001 ER3 AC,30001
4490 034172 312 05 0 00 040203 CAME AC+1,[200000,,0]
4491 034173 004 05 0 00 030001 ER4 AC+1,30001
4492 034174 321 10 0 00 034166 JUMPL AC+4,S30000 ;LOOP ON ERROR SWITCH^
4493
4494 SDFA 301,200000,4000,0,0,214400,0,0,0,214400,0,200000,0^
4495 S30100: DMOVE AC,[200000,,4000
4496 034175 120 04 0 00 041175 0,,0]
4497 DFAD AC,[214400,,0
4498 034176 110 04 0 00 041242 0,,0]
4499 034177 312 04 0 00 041242 CAME AC,[214400,,0]
4500 034200 003 04 0 00 030101 ER3 AC,30101
4501 034201 312 05 0 00 040203 CAME AC+1,[200000,,0]
4502 034202 004 05 0 00 030101 ER4 AC+1,30101
4503 034203 321 10 0 00 034175 JUMPL AC+4,S30100 ;LOOP ON ERROR SWITCH^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 10
DSKCE1 MAC 21-Jun-78 10:46 DFAD TEST-DOUBLE FLOATING POINT ADD AND ROUND SEQ 0107
4504
4505 SDFA 302,200000,10000,0,0,215400,0,0,0,215400,0,200000,0^
4506 S30200: DMOVE AC,[200000,,10000
4507 034204 120 04 0 00 041177 0,,0]
4508 DFAD AC,[215400,,0
4509 034205 110 04 0 00 041244 0,,0]
4510 034206 312 04 0 00 041244 CAME AC,[215400,,0]
4511 034207 003 04 0 00 030201 ER3 AC,30201
4512 034210 312 05 0 00 040203 CAME AC+1,[200000,,0]
4513 034211 004 05 0 00 030201 ER4 AC+1,30201
4514 034212 321 10 0 00 034204 JUMPL AC+4,S30200 ;LOOP ON ERROR SWITCH^
4515
4516 SDFA 303,200000,20000,0,0,216400,0,0,0,216400,0,200000,0^
4517 S30300: DMOVE AC,[200000,,20000
4518 034213 120 04 0 00 041201 0,,0]
4519 DFAD AC,[216400,,0
4520 034214 110 04 0 00 041246 0,,0]
4521 034215 312 04 0 00 041246 CAME AC,[216400,,0]
4522 034216 003 04 0 00 030301 ER3 AC,30301
4523 034217 312 05 0 00 040203 CAME AC+1,[200000,,0]
4524 034220 004 05 0 00 030301 ER4 AC+1,30301
4525 034221 321 10 0 00 034213 JUMPL AC+4,S30300 ;LOOP ON ERROR SWITCH^
4526
4527 SDFA 304,200000,40000,0,0,217400,0,0,0,217400,0,200000,0^
4528 S30400: DMOVE AC,[200000,,40000
4529 034222 120 04 0 00 041203 0,,0]
4530 DFAD AC,[217400,,0
4531 034223 110 04 0 00 041250 0,,0]
4532 034224 312 04 0 00 041250 CAME AC,[217400,,0]
4533 034225 003 04 0 00 030401 ER3 AC,30401
4534 034226 312 05 0 00 040203 CAME AC+1,[200000,,0]
4535 034227 004 05 0 00 030401 ER4 AC+1,30401
4536 034230 321 10 0 00 034222 JUMPL AC+4,S30400 ;LOOP ON ERROR SWITCH^
4537
4538 SDFA 305,200000,100000,0,0,220400,0,0,0,220400,0,200000,0^
4539 S30500: DMOVE AC,[200000,,100000
4540 034231 120 04 0 00 041205 0,,0]
4541 DFAD AC,[220400,,0
4542 034232 110 04 0 00 040755 0,,0]
4543 034233 312 04 0 00 040755 CAME AC,[220400,,0]
4544 034234 003 04 0 00 030501 ER3 AC,30501
4545 034235 312 05 0 00 040203 CAME AC+1,[200000,,0]
4546 034236 004 05 0 00 030501 ER4 AC+1,30501
4547 034237 321 10 0 00 034231 JUMPL AC+4,S30500 ;LOOP ON ERROR SWITCH^
4548
4549 SDFA 306,200000,200000,0,0,221400,0,0,0,221400,0,200000,0^
4550 S30600: DMOVE AC,[200000,,200000
4551 034240 120 04 0 00 041207 0,,0]
4552 DFAD AC,[221400,,0
4553 034241 110 04 0 00 041252 0,,0]
4554 034242 312 04 0 00 041252 CAME AC,[221400,,0]
4555 034243 003 04 0 00 030601 ER3 AC,30601
4556 034244 312 05 0 00 040203 CAME AC+1,[200000,,0]
4557 034245 004 05 0 00 030601 ER4 AC+1,30601
4558 034246 321 10 0 00 034240 JUMPL AC+4,S30600 ;LOOP ON ERROR SWITCH^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 10-1
DSKCE1 MAC 21-Jun-78 10:46 DFAD TEST-DOUBLE FLOATING POINT ADD AND ROUND SEQ 0108
4559
4560 SDFA 307,200000,400000,0,0,222400,0,0,0,222400,0,200000,0^
4561 S30700: DMOVE AC,[200000,,400000
4562 034247 120 04 0 00 041211 0,,0]
4563 DFAD AC,[222400,,0
4564 034250 110 04 0 00 041254 0,,0]
4565 034251 312 04 0 00 041254 CAME AC,[222400,,0]
4566 034252 003 04 0 00 030701 ER3 AC,30701
4567 034253 312 05 0 00 040203 CAME AC+1,[200000,,0]
4568 034254 004 05 0 00 030701 ER4 AC+1,30701
4569 034255 321 10 0 00 034247 JUMPL AC+4,S30700 ;LOOP ON ERROR SWITCH^
4570
4571 SDFA 310,200001,0,0,0,223400,0,0,0,223400,0,200000,0^
4572 S31000: DMOVE AC,[200001,,0
4573 034256 120 04 0 00 041213 0,,0]
4574 DFAD AC,[223400,,0
4575 034257 110 04 0 00 041256 0,,0]
4576 034260 312 04 0 00 041256 CAME AC,[223400,,0]
4577 034261 003 04 0 00 031001 ER3 AC,31001
4578 034262 312 05 0 00 040203 CAME AC+1,[200000,,0]
4579 034263 004 05 0 00 031001 ER4 AC+1,31001
4580 034264 321 10 0 00 034256 JUMPL AC+4,S31000 ;LOOP ON ERROR SWITCH^
4581
4582 SDFA 311,200002,0,0,0,224400,0,0,0,224400,0,200000,0^
4583 S31100: DMOVE AC,[200002,,0
4584 034265 120 04 0 00 041215 0,,0]
4585 DFAD AC,[224400,,0
4586 034266 110 04 0 00 041260 0,,0]
4587 034267 312 04 0 00 041260 CAME AC,[224400,,0]
4588 034270 003 04 0 00 031101 ER3 AC,31101
4589 034271 312 05 0 00 040203 CAME AC+1,[200000,,0]
4590 034272 004 05 0 00 031101 ER4 AC+1,31101
4591 034273 321 10 0 00 034265 JUMPL AC+4,S31100 ;LOOP ON ERROR SWITCH^
4592
4593 SDFA 312,200004,0,0,0,225400,0,0,0,225400,0,200000,0^
4594 S31200: DMOVE AC,[200004,,0
4595 034274 120 04 0 00 041217 0,,0]
4596 DFAD AC,[225400,,0
4597 034275 110 04 0 00 041262 0,,0]
4598 034276 312 04 0 00 041262 CAME AC,[225400,,0]
4599 034277 003 04 0 00 031201 ER3 AC,31201
4600 034300 312 05 0 00 040203 CAME AC+1,[200000,,0]
4601 034301 004 05 0 00 031201 ER4 AC+1,31201
4602 034302 321 10 0 00 034274 JUMPL AC+4,S31200 ;LOOP ON ERROR SWITCH^
4603
4604 SDFA 313,200010,0,0,0,226400,0,0,0,226400,0,200000,0^
4605 S31300: DMOVE AC,[200010,,0
4606 034303 120 04 0 00 041221 0,,0]
4607 DFAD AC,[226400,,0
4608 034304 110 04 0 00 041264 0,,0]
4609 034305 312 04 0 00 041264 CAME AC,[226400,,0]
4610 034306 003 04 0 00 031301 ER3 AC,31301
4611 034307 312 05 0 00 040203 CAME AC+1,[200000,,0]
4612 034310 004 05 0 00 031301 ER4 AC+1,31301
4613 034311 321 10 0 00 034303 JUMPL AC+4,S31300 ;LOOP ON ERROR SWITCH^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 10-2
DSKCE1 MAC 21-Jun-78 10:46 DFAD TEST-DOUBLE FLOATING POINT ADD AND ROUND SEQ 0109
4614
4615 SDFA 314,200020,0,0,0,227400,0,0,0,227400,0,200000,0^
4616 S31400: DMOVE AC,[200020,,0
4617 034312 120 04 0 00 041140 0,,0]
4618 DFAD AC,[227400,,0
4619 034313 110 04 0 00 041266 0,,0]
4620 034314 312 04 0 00 041266 CAME AC,[227400,,0]
4621 034315 003 04 0 00 031401 ER3 AC,31401
4622 034316 312 05 0 00 040203 CAME AC+1,[200000,,0]
4623 034317 004 05 0 00 031401 ER4 AC+1,31401
4624 034320 321 10 0 00 034312 JUMPL AC+4,S31400 ;LOOP ON ERROR SWITCH^
4625
4626 SDFA 315,200040,0,0,0,230400,0,0,0,230400,0,200000,0^
4627 S31500: DMOVE AC,[200040,,0
4628 034321 120 04 0 00 041136 0,,0]
4629 DFAD AC,[230400,,0
4630 034322 110 04 0 00 041270 0,,0]
4631 034323 312 04 0 00 041270 CAME AC,[230400,,0]
4632 034324 003 04 0 00 031501 ER3 AC,31501
4633 034325 312 05 0 00 040203 CAME AC+1,[200000,,0]
4634 034326 004 05 0 00 031501 ER4 AC+1,31501
4635 034327 321 10 0 00 034321 JUMPL AC+4,S31500 ;LOOP ON ERROR SWITCH^
4636
4637 SDFA 316,200100,0,0,0,231400,0,0,0,231400,0,200000,0^
4638 S31600: DMOVE AC,[200100,,0
4639 034330 120 04 0 00 041134 0,,0]
4640 DFAD AC,[231400,,0
4641 034331 110 04 0 00 041272 0,,0]
4642 034332 312 04 0 00 041272 CAME AC,[231400,,0]
4643 034333 003 04 0 00 031601 ER3 AC,31601
4644 034334 312 05 0 00 040203 CAME AC+1,[200000,,0]
4645 034335 004 05 0 00 031601 ER4 AC+1,31601
4646 034336 321 10 0 00 034330 JUMPL AC+4,S31600 ;LOOP ON ERROR SWITCH^
4647
4648 SDFA 317,200200,0,0,0,232400,0,0,0,232400,0,200000,0^
4649 S31700: DMOVE AC,[200200,,0
4650 034337 120 04 0 00 041274 0,,0]
4651 DFAD AC,[232400,,0
4652 034340 110 04 0 00 041276 0,,0]
4653 034341 312 04 0 00 041276 CAME AC,[232400,,0]
4654 034342 003 04 0 00 031701 ER3 AC,31701
4655 034343 312 05 0 00 040203 CAME AC+1,[200000,,0]
4656 034344 004 05 0 00 031701 ER4 AC+1,31701
4657 034345 321 10 0 00 034337 JUMPL AC+4,S31700 ;LOOP ON ERROR SWITCH^
4658
4659 SDFA 320,200400,0,0,0,233400,0,0,0,233400,0,200000,0^
4660 S32000: DMOVE AC,[200400,,0
4661 034346 120 04 0 00 040731 0,,0]
4662 DFAD AC,[233400,,0
4663 034347 110 04 0 00 041300 0,,0]
4664 034350 312 04 0 00 041300 CAME AC,[233400,,0]
4665 034351 003 04 0 00 032001 ER3 AC,32001
4666 034352 312 05 0 00 040203 CAME AC+1,[200000,,0]
4667 034353 004 05 0 00 032001 ER4 AC+1,32001
4668 034354 321 10 0 00 034346 JUMPL AC+4,S32000 ;LOOP ON ERROR SWITCH^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 10-3
DSKCE1 MAC 21-Jun-78 10:46 DFAD TEST-DOUBLE FLOATING POINT ADD AND ROUND SEQ 0110
4669
4670 SDFA 321,200400,0,0,0,200400,1,0,0,201400,0,200000,0^
4671 S32100: DMOVE AC,[200400,,0
4672 034355 120 04 0 00 040731 0,,0]
4673 DFAD AC,[200400,,1
4674 034356 110 04 0 00 040177 0,,0]
4675 034357 312 04 0 00 040057 CAME AC,[201400,,0]
4676 034360 003 04 0 00 032101 ER3 AC,32101
4677 034361 312 05 0 00 040203 CAME AC+1,[200000,,0]
4678 034362 004 05 0 00 032101 ER4 AC+1,32101
4679 034363 321 10 0 00 034355 JUMPL AC+4,S32100 ;LOOP ON ERROR SWITCH^
4680
4681 SDFA 322,200400,0,0,0,201400,0,0,0,201600,0,0,0^
4682 S32200: DMOVE AC,[200400,,0
4683 034364 120 04 0 00 040731 0,,0]
4684 DFAD AC,[201400,,0
4685 034365 110 04 0 00 040057 0,,0]
4686 034366 312 04 0 00 040743 CAME AC,[201600,,0]
4687 034367 003 04 0 00 032201 ER3 AC,32201
4688 034370 312 05 0 00 040060 CAME AC+1,[0,,0]
4689 034371 004 05 0 00 032201 ER4 AC+1,32201
4690 034372 321 10 0 00 034364 JUMPL AC+4,S32200 ;LOOP ON ERROR SWITCH^
4691
4692 SDFA 323,200000,3,0,0,202400,0,0,0,202400,0,300000,0^
4693 S32300: DMOVE AC,[200000,,3
4694 034373 120 04 0 00 041302 0,,0]
4695 DFAD AC,[202400,,0
4696 034374 110 04 0 00 040744 0,,0]
4697 034375 312 04 0 00 040744 CAME AC,[202400,,0]
4698 034376 003 04 0 00 032301 ER3 AC,32301
4699 034377 312 05 0 00 040563 CAME AC+1,[300000,,0]
4700 034400 004 05 0 00 032301 ER4 AC+1,32301
4701 034401 321 10 0 00 034373 JUMPL AC+4,S32300 ;LOOP ON ERROR SWITCH^
4702
4703 SDFA 324,200000,5,0,0,203400,0,0,0,203400,0,240000,0^
4704 S32400: DMOVE AC,[200000,,5
4705 034402 120 04 0 00 041304 0,,0]
4706 DFAD AC,[203400,,0
4707 034403 110 04 0 00 041230 0,,0]
4708 034404 312 04 0 00 041133 CAME AC,[203400,,0]
4709 034405 003 04 0 00 032401 ER3 AC,32401
4710 034406 312 05 0 00 041006 CAME AC+1,[240000,,0]
4711 034407 004 05 0 00 032401 ER4 AC+1,32401
4712 034410 321 10 0 00 034402 JUMPL AC+4,S32400 ;LOOP ON ERROR SWITCH^
4713
4714 SDFA 325,200000,11,0,0,204400,0,0,0,204400,0,220000,0^
4715 S32500: DMOVE AC,[200000,,11
4716 034411 120 04 0 00 041306 0,,0]
4717 DFAD AC,[204400,,0
4718 034412 110 04 0 00 040747 0,,0]
4719 034413 312 04 0 00 040747 CAME AC,[204400,,0]
4720 034414 003 04 0 00 032501 ER3 AC,32501
4721 034415 312 05 0 00 041002 CAME AC+1,[220000,,0]
4722 034416 004 05 0 00 032501 ER4 AC+1,32501
4723 034417 321 10 0 00 034411 JUMPL AC+4,S32500 ;LOOP ON ERROR SWITCH^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 10-4
DSKCE1 MAC 21-Jun-78 10:46 DFAD TEST-DOUBLE FLOATING POINT ADD AND ROUND SEQ 0111
4724
4725 SDFA 326,200000,21,0,0,205400,0,0,0,205400,0,210000,0^
4726 S32600: DMOVE AC,[200000,,21
4727 034420 120 04 0 00 041310 0,,0]
4728 DFAD AC,[205400,,0
4729 034421 110 04 0 00 040733 0,,0]
4730 034422 312 04 0 00 040733 CAME AC,[205400,,0]
4731 034423 003 04 0 00 032601 ER3 AC,32601
4732 034424 312 05 0 00 040776 CAME AC+1,[210000,,0]
4733 034425 004 05 0 00 032601 ER4 AC+1,32601
4734 034426 321 10 0 00 034420 JUMPL AC+4,S32600 ;LOOP ON ERROR SWITCH^
4735
4736 SDFA 327,200000,41,0,0,206400,0,0,0,206400,0,204000,0^
4737 S32700: DMOVE AC,[200000,,41
4738 034427 120 04 0 00 041312 0,,0]
4739 DFAD AC,[206400,,0
4740 034430 110 04 0 00 041043 0,,0]
4741 034431 312 04 0 00 041043 CAME AC,[206400,,0]
4742 034432 003 04 0 00 032701 ER3 AC,32701
4743 034433 312 05 0 00 040772 CAME AC+1,[204000,,0]
4744 034434 004 05 0 00 032701 ER4 AC+1,32701
4745 034435 321 10 0 00 034427 JUMPL AC+4,S32700 ;LOOP ON ERROR SWITCH^
4746
4747 SDFA 330,200000,101,0,0,207400,0,0,0,207400,0,202000,0^
4748 S33000: DMOVE AC,[200000,,101
4749 034436 120 04 0 00 041314 0,,0]
4750 DFAD AC,[207400,,0
4751 034437 110 04 0 00 041232 0,,0]
4752 034440 312 04 0 00 041232 CAME AC,[207400,,0]
4753 034441 003 04 0 00 033001 ER3 AC,33001
4754 034442 312 05 0 00 040770 CAME AC+1,[202000,,0]
4755 034443 004 05 0 00 033001 ER4 AC+1,33001
4756 034444 321 10 0 00 034436 JUMPL AC+4,S33000 ;LOOP ON ERROR SWITCH^
4757
4758 SDFA 331,200000,201,0,0,210400,0,0,0,210400,0,201000,0^
4759 S33100: DMOVE AC,[200000,,201
4760 034445 120 04 0 00 041316 0,,0]
4761 DFAD AC,[210400,,0
4762 034446 110 04 0 00 040752 0,,0]
4763 034447 312 04 0 00 040752 CAME AC,[210400,,0]
4764 034450 003 04 0 00 033101 ER3 AC,33101
4765 034451 312 05 0 00 040766 CAME AC+1,[201000,,0]
4766 034452 004 05 0 00 033101 ER4 AC+1,33101
4767 034453 321 10 0 00 034445 JUMPL AC+4,S33100 ;LOOP ON ERROR SWITCH^
4768
4769 SDFA 332,200000,401,0,0,211400,0,0,0,211400,0,200400,0^
4770 S33200: DMOVE AC,[200000,,401
4771 034454 120 04 0 00 041320 0,,0]
4772 DFAD AC,[211400,,0
4773 034455 110 04 0 00 041234 0,,0]
4774 034456 312 04 0 00 041234 CAME AC,[211400,,0]
4775 034457 003 04 0 00 033201 ER3 AC,33201
4776 034460 312 05 0 00 040063 CAME AC+1,[200400,,0]
4777 034461 004 05 0 00 033201 ER4 AC+1,33201
4778 034462 321 10 0 00 034454 JUMPL AC+4,S33200 ;LOOP ON ERROR SWITCH^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 10-5
DSKCE1 MAC 21-Jun-78 10:46 DFAD TEST-DOUBLE FLOATING POINT ADD AND ROUND SEQ 0112
4779
4780 SDFA 333,200000,1001,0,0,212400,0,0,0,212400,0,200200,0^
4781 S33300: DMOVE AC,[200000,,1001
4782 034463 120 04 0 00 041322 0,,0]
4783 DFAD AC,[212400,,0
4784 034464 110 04 0 00 041236 0,,0]
4785 034465 312 04 0 00 041236 CAME AC,[212400,,0]
4786 034466 003 04 0 00 033301 ER3 AC,33301
4787 034467 312 05 0 00 041274 CAME AC+1,[200200,,0]
4788 034470 004 05 0 00 033301 ER4 AC+1,33301
4789 034471 321 10 0 00 034463 JUMPL AC+4,S33300 ;LOOP ON ERROR SWITCH^
4790
4791 SDFA 334,200000,2001,0,0,213400,0,0,0,213400,0,200100,0^
4792 S33400: DMOVE AC,[200000,,2001
4793 034472 120 04 0 00 041324 0,,0]
4794 DFAD AC,[213400,,0
4795 034473 110 04 0 00 041240 0,,0]
4796 034474 312 04 0 00 041240 CAME AC,[213400,,0]
4797 034475 003 04 0 00 033401 ER3 AC,33401
4798 034476 312 05 0 00 041134 CAME AC+1,[200100,,0]
4799 034477 004 05 0 00 033401 ER4 AC+1,33401
4800 034500 321 10 0 00 034472 JUMPL AC+4,S33400 ;LOOP ON ERROR SWITCH^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 11
DSKCE1 MAC 21-Jun-78 10:46 DFAD TEST-DOUBLE FLOATING POINT ADD AND ROUND SEQ 0113
4801
4802 SDFA 335,200000,4001,0,0,214400,0,0,0,214400,0,200040,0^
4803 S33500: DMOVE AC,[200000,,4001
4804 034501 120 04 0 00 041326 0,,0]
4805 DFAD AC,[214400,,0
4806 034502 110 04 0 00 041242 0,,0]
4807 034503 312 04 0 00 041242 CAME AC,[214400,,0]
4808 034504 003 04 0 00 033501 ER3 AC,33501
4809 034505 312 05 0 00 041136 CAME AC+1,[200040,,0]
4810 034506 004 05 0 00 033501 ER4 AC+1,33501
4811 034507 321 10 0 00 034501 JUMPL AC+4,S33500 ;LOOP ON ERROR SWITCH^
4812
4813 SDFA 336,200000,10001,0,0,215400,0,0,0,215400,0,200020,0^
4814 S33600: DMOVE AC,[200000,,10001
4815 034510 120 04 0 00 041330 0,,0]
4816 DFAD AC,[215400,,0
4817 034511 110 04 0 00 041244 0,,0]
4818 034512 312 04 0 00 041244 CAME AC,[215400,,0]
4819 034513 003 04 0 00 033601 ER3 AC,33601
4820 034514 312 05 0 00 041140 CAME AC+1,[200020,,0]
4821 034515 004 05 0 00 033601 ER4 AC+1,33601
4822 034516 321 10 0 00 034510 JUMPL AC+4,S33600 ;LOOP ON ERROR SWITCH^
4823
4824 SDFA 337,200000,20001,0,0,216400,0,0,0,216400,0,200010,0^
4825 S33700: DMOVE AC,[200000,,20001
4826 034517 120 04 0 00 041332 0,,0]
4827 DFAD AC,[216400,,0
4828 034520 110 04 0 00 041246 0,,0]
4829 034521 312 04 0 00 041246 CAME AC,[216400,,0]
4830 034522 003 04 0 00 033701 ER3 AC,33701
4831 034523 312 05 0 00 041221 CAME AC+1,[200010,,0]
4832 034524 004 05 0 00 033701 ER4 AC+1,33701
4833 034525 321 10 0 00 034517 JUMPL AC+4,S33700 ;LOOP ON ERROR SWITCH^
4834
4835 SDFA 340,200000,40001,0,0,217400,0,0,0,217400,0,200004,0^
4836 S34000: DMOVE AC,[200000,,40001
4837 034526 120 04 0 00 041334 0,,0]
4838 DFAD AC,[217400,,0
4839 034527 110 04 0 00 041250 0,,0]
4840 034530 312 04 0 00 041250 CAME AC,[217400,,0]
4841 034531 003 04 0 00 034001 ER3 AC,34001
4842 034532 312 05 0 00 041217 CAME AC+1,[200004,,0]
4843 034533 004 05 0 00 034001 ER4 AC+1,34001
4844 034534 321 10 0 00 034526 JUMPL AC+4,S34000 ;LOOP ON ERROR SWITCH^
4845
4846 SDFA 341,200000,100001,0,0,220400,0,0,0,220400,0,200002,0^
4847 S34100: DMOVE AC,[200000,,100001
4848 034535 120 04 0 00 041336 0,,0]
4849 DFAD AC,[220400,,0
4850 034536 110 04 0 00 040755 0,,0]
4851 034537 312 04 0 00 040755 CAME AC,[220400,,0]
4852 034540 003 04 0 00 034101 ER3 AC,34101
4853 034541 312 05 0 00 041215 CAME AC+1,[200002,,0]
4854 034542 004 05 0 00 034101 ER4 AC+1,34101
4855 034543 321 10 0 00 034535 JUMPL AC+4,S34100 ;LOOP ON ERROR SWITCH^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 11-1
DSKCE1 MAC 21-Jun-78 10:46 DFAD TEST-DOUBLE FLOATING POINT ADD AND ROUND SEQ 0114
4856
4857 SDFA 342,200000,200001,0,0,221400,0,0,0,221400,0,200001,0^
4858 S34200: DMOVE AC,[200000,,200001
4859 034544 120 04 0 00 041340 0,,0]
4860 DFAD AC,[221400,,0
4861 034545 110 04 0 00 041252 0,,0]
4862 034546 312 04 0 00 041252 CAME AC,[221400,,0]
4863 034547 003 04 0 00 034201 ER3 AC,34201
4864 034550 312 05 0 00 041213 CAME AC+1,[200001,,0]
4865 034551 004 05 0 00 034201 ER4 AC+1,34201
4866 034552 321 10 0 00 034544 JUMPL AC+4,S34200 ;LOOP ON ERROR SWITCH^
4867
4868 SDFA 343,200000,400001,0,0,222400,0,0,0,222400,0,200000,400000^
4869 S34300: DMOVE AC,[200000,,400001
4870 034553 120 04 0 00 041342 0,,0]
4871 DFAD AC,[222400,,0
4872 034554 110 04 0 00 041254 0,,0]
4873 034555 312 04 0 00 041254 CAME AC,[222400,,0]
4874 034556 003 04 0 00 034301 ER3 AC,34301
4875 034557 312 05 0 00 041211 CAME AC+1,[200000,,400000]
4876 034560 004 05 0 00 034301 ER4 AC+1,34301
4877 034561 321 10 0 00 034553 JUMPL AC+4,S34300 ;LOOP ON ERROR SWITCH^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 12
DSKCE1 MAC 21-Jun-78 10:46 DFAD TEST-DOUBLE FLOATING POINT ADD AND ROUND SEQ 0115
4878 ;TEST AROV, FOV AND FXU FLAGS - DFAD
4879
4880 000004 AC=4
4881 SAVEAC (1,1)^
4882 034562 201 06 0 00 034562 MOVEI AC+2,.
4883 034563 202 06 0 00 030051 MOVEM AC+2,TESTPC ;SETUP SUBTEST PC
4884 034564 201 06 0 00 000006 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
4885 034565 202 06 0 00 042157 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
4886
4887 034566 254 02 1 00 041344 S34400: JRSTF @[.+1] ;CLEAR ALL FLAGS
4888 DMOVE AC,[377400,,0
4889 034567 120 04 0 00 041026 0,,0]
4890 DFAD AC,[376777,,-1
4891 034570 110 04 0 00 041345 -1,,-2] ;EXPECT AROV, FOV, FXU=0,0,0
4892 034571 265 03 0 00 034572 JSP AC-1,.+1 ;SAVE FLAGS
4893 034572 312 04 0 00 040357 CAME AC,[377777,,-1]
4894 034573 003 04 0 00 034401 ER3 AC,34401 ;C(AC) FAILED
4895 034574 312 05 0 00 040357 CAME AC+1,[377777,,-1]
4896 034575 004 05 0 00 034401 ER4 AC+1,34401 ;C(AC+1) FAILED
4897 034576 255 10 0 00 034600 JOV .+2
4898 034577 254 00 0 00 034601 JRST .+2
4899 034600 013 03 0 00 034401 ER13 AC-1,34401 ;AROV WAS SET
4900 034601 255 01 0 00 034603 JFOV .+2
4901 034602 254 00 0 00 034604 JRST .+2
4902 034603 013 03 0 00 034401 ER13 AC-1,34401 ;FOV WAS SET
4903 034604 603 03 0 00 000100 TLNE AC-1,FXU
4904 034605 013 03 0 00 034401 ER13 AC-1,34401 ;FXU WAS SET
4905 034606 321 10 0 00 034566 JUMPL AC+4,S34400 ;LOOP ON ERROR SWITCH
4906
4907 034607 254 02 1 00 041347 S34500: JRSTF @[.+1] ;CLEAR ALL FLAGS
4908 DMOVE AC,[377400,,0
4909 034610 120 04 0 00 041026 0,,0]
4910 DFAD AC,[377400,,0
4911 034611 110 04 0 00 041026 0,,0] ;EXPECT AROV, FOV, FXU=1,1,0
4912 034612 265 03 0 00 034613 JSP AC-1,.+1 ;SAVE FLAGS
4913 034613 312 04 0 00 040233 CAME AC,[400,,0]
4914 034614 003 04 0 00 034501 ER3 AC,34501 ;C(AC) FAILED
4915 034615 312 05 0 00 040060 CAME AC+1,[0,,0]
4916 034616 004 05 0 00 034501 ER4 AC+1,34501 ;C(AC+1) FAILED
4917 034617 255 10 0 00 034621 JOV .+2
4918 034620 013 03 0 00 034501 ER13 AC-1,34501 ;AROV WAS CLEAR
4919 034621 255 01 0 00 034623 JFOV .+2
4920 034622 013 03 0 00 034501 ER13 AC-1,34501 ;FOV WAS CLEAR
4921 034623 603 03 0 00 000100 TLNE AC-1,FXU
4922 034624 013 03 0 00 034501 ER13 AC-1,34501 ;FXU WAS SET
4923 034625 321 10 0 00 034607 JUMPL AC+4,S34500 ;LOOP ON ERROR SWITCH
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 13
DSKCE1 MAC 21-Jun-78 10:46 DFAD TEST-DOUBLE FLOATING POINT ADD AND ROUND SEQ 0116
4924 034626 254 02 1 00 041350 S34600: JRSTF @[.+1] ;CLEAR ALL FLAGS
4925 DMOVE AC,[200,,0
4926 034627 120 04 0 00 041351 0,,0]
4927 DFAD AC,[200,,0
4928 034630 110 04 0 00 041351 0,,0] ;EXPECT AROV, FOV, FXU=0,0,0
4929 034631 265 03 0 00 034632 JSP AC-1,.+1 ;SAVE FLAGS
4930 034632 312 04 0 00 040233 CAME AC,[400,,0]
4931 034633 003 04 0 00 034601 ER3 AC,34601 ;C(AC) FAILED
4932 034634 312 05 0 00 040060 CAME AC+1,[0,,0]
4933 034635 004 05 0 00 034601 ER4 AC+1,34601 ;C(AC+1) FAILED
4934 034636 255 10 0 00 034640 JOV .+2
4935 034637 254 00 0 00 034641 JRST .+2
4936 034640 013 03 0 00 034601 ER13 AC-1,34601 ;AROV WAS SET
4937 034641 255 01 0 00 034643 JFOV .+2
4938 034642 254 00 0 00 034644 JRST .+2
4939 034643 013 03 0 00 034601 ER13 AC-1,34601 ;FOV WAS SET
4940 034644 603 03 0 00 000100 TLNE AC-1,FXU
4941 034645 013 03 0 00 034601 ER13 AC-1,34601 ;FXU WAS SET
4942 034646 321 10 0 00 034626 JUMPL AC+4,S34600 ;LOOP ON ERROR SWITCH
4943
4944 034647 254 02 1 00 041353 S34700: JRSTF @[.+1] ;CLEAR ALL FLAGS
4945 DMOVE AC,[200,,0
4946 034650 120 04 0 00 041351 0,,0]
4947 DFAD AC,[177,,-1
4948 034651 110 04 0 00 041354 -1,,-1] ;EXPECT AROV,FOV,FXU=1,1,1
4949 034652 265 03 0 00 034653 JSP AC-1,.+1 ;SAVE FLAGS
4950 034653 312 04 0 00 040357 CAME AC,[377777,,-1]
4951 034654 003 04 0 00 034701 ER3 AC,34701 ;C(AC) FAILED
4952 034655 312 05 0 00 040363 CAME AC+1,[377777,,-2]
4953 034656 004 05 0 00 034701 ER4 AC+1,34701 ;C(AC+1) FAILED
4954 034657 255 10 0 00 034661 JOV .+2
4955 034660 013 03 0 00 034701 ER13 AC-1,34701 ;AROV WAS CLEAR
4956 034661 255 01 0 00 034663 JFOV .+2
4957 034662 013 03 0 00 034701 ER13 AC-1,34701 ;FOV WAS CLEAR
4958 034663 607 03 0 00 000100 TLNN AC-1,FXU
4959 034664 013 03 0 00 034701 ER13 AC-1,34701 ;FXU WAS CLEAR
4960 034665 321 10 0 00 034647 JUMPL AC+4,S34700 ;LOOP ON ERROR SWITCH
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 14
DSKCE1 MAC 21-Jun-78 10:46 DFAD TEST-DOUBLE FLOATING POINT ADD AND ROUND SEQ 0117
4961 034666 254 02 1 00 041356 S35000: JRSTF @[.+1] ;CLEAR ALL FLAGS
4962 DMOVE AC,[400400,,0
4963 034667 120 04 0 00 041357 0,,0]
4964 DFAD AC,[401000,,0
4965 034670 110 04 0 00 041361 0,,2] ;EXPECT AROV, FOV, FXU = 0,0,0
4966 034671 265 03 0 00 034672 JSP AC-1,.+1 ;SAVE FLAGS
4967 034672 312 04 0 00 041363 CAME AC,[400000,,0]
4968 034673 003 04 0 00 035001 ER3 AC,35001 ;C(AC) FAILED
4969 034674 312 05 0 00 040351 CAME AC+1,[0,,1]
4970 034675 004 05 0 00 035001 ER4 AC+1,35001 ;C(AC+1) FAILED
4971 034676 255 10 0 00 034700 JOV .+2
4972 034677 254 00 0 00 034701 JRST .+2
4973 034700 013 03 0 00 035001 ER13 AC-1,35001 ;AROV WAS SET
4974 034701 255 01 0 00 034703 JFOV .+2
4975 034702 254 00 0 00 034704 JRST .+2
4976 034703 013 03 0 00 035001 ER13 AC-1,35001 ;FOV WAS SET
4977 034704 603 03 0 00 000100 TLNE AC-1,FXU
4978 034705 013 03 0 00 035001 ER13 AC-1,35001 ;FXU WAS SET
4979 034706 321 10 0 00 034666 JUMPL AC+4,S35000 ;LOOP ON ERROR SWITCH
4980
4981 034707 254 02 1 00 041364 S35100: JRSTF @[.+1] ;CLEAR ALL FLAGS
4982 DMOVE AC,[400400,,0
4983 034710 120 04 0 00 041357 0,,0]
4984 DFAD AC,[400400,,0
4985 034711 110 04 0 00 041357 0,,0] ;EXPECT AROV, FOV, FXU=1,1,0
4986 034712 265 03 0 00 034713 JSP AC-1,.+1 ;SAVE FLAGS
4987 034713 312 04 0 00 041365 CAME AC,[777400,,0]
4988 034714 003 04 0 00 035101 ER3 AC,35101 ;C(AC) FAILED
4989 034715 312 05 0 00 040060 CAME AC+1,[0,,0]
4990 034716 004 05 0 00 035101 ER4 AC+1,35101 ;C(AC+1) FAILED
4991 034717 255 10 0 00 034721 JOV .+2
4992 034720 013 03 0 00 035101 ER13 AC-1,35101 ;AROV WAS CLEAR
4993 034721 255 01 0 00 034723 JFOV .+2
4994 034722 013 03 0 00 035101 ER13 AC-1,35101 ;FOV WAS CLEAR
4995 034723 603 03 0 00 000100 TLNE AC-1,FXU
4996 034724 013 03 0 00 035101 ER13 AC-1,35101 ;FXU WAS SET
4997 034725 321 10 0 00 034707 JUMPL AC+4,S35100 ;LOOP ON ERROR SWITCH
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 15
DSKCE1 MAC 21-Jun-78 10:46 DFAD TEST-DOUBLE FLOATING POINT ADD AND ROUND SEQ 0118
4998 034726 254 02 1 00 041366 S35200: JRSTF @[.+1] ;CLEAR ALL FLAGS
4999 DMOVE AC,[777600,,0
5000 034727 120 04 0 00 041367 0,,0]
5001 DFAD AC,[777600,,0
5002 034730 110 04 0 00 041367 0,,0] ;EXPECT AROV,FOV,FXV=0,0,0
5003 034731 265 03 0 00 034732 JSP AC-1,.+1 ;SAVE FLAGS
5004 034732 312 04 0 00 041365 CAME AC,[777400,,0]
5005 034733 003 04 0 00 035201 ER3 AC,35201 ;C(AC) FAILED
5006 034734 312 05 0 00 040060 CAME AC+1,[0,,0]
5007 034735 004 05 0 00 035201 ER4 AC+1,35201 ;C(AC+1) FAILED
5008 034736 255 10 0 00 034740 JOV .+2
5009 034737 254 00 0 00 034741 JRST .+2
5010 034740 013 03 0 00 035201 ER13 AC-1,35201 ;AROV WAS SET
5011 034741 255 01 0 00 034743 JFOV .+2
5012 034742 254 00 0 00 034744 JRST .+2
5013 034743 013 03 0 00 035201 ER13 AC-1,35201 ;FOV WAS SET
5014 034744 603 03 0 00 000100 TLNE AC-1,FXU
5015 034745 013 03 0 00 035201 ER13 AC-1,35201 ;FXU WAS SET
5016 034746 321 10 0 00 034726 JUMPL AC+4,S35200 ;LOOP ON ERROR SWITCH
5017
5018 034747 254 02 1 00 041371 S35300: JRSTF @[.+1] ;CLEAR ALL FLAGS
5019 DMOVE AC,[777600,,0
5020 034750 120 04 0 00 041367 0,,0]
5021 DFAD AC,[777600,,0
5022 034751 110 04 0 00 041372 0,,1] ;EXPECT AROV,FOV,FXU=1,1,1
5023 034752 265 03 0 00 034753 JSP AC-1,.+1 ;SAVE FLAGS
5024 034753 312 04 0 00 041363 CAME AC,[400000,,0]
5025 034754 003 04 0 00 035301 ER3 AC,35301 ;C(AC) FAILED
5026 034755 312 05 0 00 040346 CAME AC+1,[0,,2]
5027 034756 004 05 0 00 035301 ER4 AC+1,35301 ;C(AC+1) FAILED
5028 034757 255 10 0 00 034761 JOV .+2
5029 034760 013 03 0 00 035301 ER13 AC-1,35301 ;AROV WAS CLEAR
5030 034761 255 01 0 00 034763 JFOV .+2
5031 034762 013 03 0 00 035301 ER13 AC-1,35301 ;FOV WAS CLEAR
5032 034763 607 03 0 00 000100 TLNN AC-1,FXU
5033 034764 013 03 0 00 035301 ER13 AC-1,35301 ;FXU WAS CLEAR
5034 034765 321 10 0 00 034747 JUMPL AC+4,S35300 ;LOOP ON ERROR SWITCH
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 16
DSKCE1 MAC 21-Jun-78 10:46 DFSB TEST-DOUBLE FLOATING POINT SUBTRACT AND ROUND SEQ 0119
5035 SUBTTL DFSB TEST-DOUBLE FLOATING POINT SUBTRACT AND ROUND
5036
5037 000004 AC=4
5038 SAVEAC (1,1)^
5039 034766 201 06 0 00 034766 MOVEI AC+2,.
5040 034767 202 06 0 00 030051 MOVEM AC+2,TESTPC ;SETUP SUBTEST PC
5041 034770 201 06 0 00 000006 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
5042 034771 202 06 0 00 042157 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
5043 034772 254 02 1 00 041374 JRSTF @[.+1] ;CLEAR ALL FLAGS
5044
5045 ;CHECK THAT DFSB AC,E DOES NOT ALTER C(E) OR C(E+1)
5046 S40100: DMOVE AC,[200777,,-1
5047 034773 120 04 0 00 040710 -1,,-1]
5048 DMOVE AC+2,[200000,,0
5049 034774 120 06 0 00 040712 400000,,-1]
5050 034775 111 04 0 00 000006 DFSB AC,AC+2
5051 034776 312 06 0 00 040203 CAME AC+2,[200000,,0]
5052 034777 005 06 0 00 040101 ER5 AC+2,40101 ;C(E) WAS ALTERED
5053 035000 312 07 0 00 040713 CAME AC+3,[400000,,-1]
5054 035001 006 07 0 00 040101 ER6 AC+3,40101 ;C(E+1) WAS ALTERED
5055 035002 321 10 0 00 034773 JUMPL AC+4,S40100 ;LOOP ON ERROR SWITCH
5056
5057 SDFS 402,205400,0,0,0,177400,0,0,0,204770,0,0,0^
5058 S40200: DMOVE AC,[205400,,0
5059 035003 120 04 0 00 040733 0,,0]
5060 DFSB AC,[177400,,0
5061 035004 111 04 0 00 040727 0,,0]
5062 035005 312 04 0 00 041375 CAME AC,[204770,,0]
5063 035006 003 04 0 00 040201 ER3 AC,40201
5064 035007 312 05 0 00 040060 CAME AC+1,[0,,0]
5065 035010 004 05 0 00 040201 ER4 AC+1,40201
5066 035011 321 10 0 00 035003 JUMPL AC+4,S40200 ;LOOP ON ERROR SWITCH^
5067
5068 SDFS 403,200400,0,0,0,177400,0,0,0,177400,0,0,0^
5069 S40300: DMOVE AC,[200400,,0
5070 035012 120 04 0 00 040731 0,,0]
5071 DFSB AC,[177400,,0
5072 035013 111 04 0 00 040727 0,,0]
5073 035014 312 04 0 00 040066 CAME AC,[177400,,0]
5074 035015 003 04 0 00 040301 ER3 AC,40301
5075 035016 312 05 0 00 040060 CAME AC+1,[0,,0]
5076 035017 004 05 0 00 040301 ER4 AC+1,40301
5077 035020 321 10 0 00 035012 JUMPL AC+4,S40300 ;LOOP ON ERROR SWITCH^
5078
5079 SDFS 404,200400,0,0,0,200400,0,0,0,0,0,0,0^
5080 S40400: DMOVE AC,[200400,,0
5081 035021 120 04 0 00 040731 0,,0]
5082 DFSB AC,[200400,,0
5083 035022 111 04 0 00 040731 0,,0]
5084 035023 312 04 0 00 040060 CAME AC,[0,,0]
5085 035024 003 04 0 00 040401 ER3 AC,40401
5086 035025 312 05 0 00 040060 CAME AC+1,[0,,0]
5087 035026 004 05 0 00 040401 ER4 AC+1,40401
5088 035027 321 10 0 00 035021 JUMPL AC+4,S40400 ;LOOP ON ERROR SWITCH^
5089
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 16-1
DSKCE1 MAC 21-Jun-78 10:46 DFSB TEST-DOUBLE FLOATING POINT SUBTRACT AND ROUND SEQ 0120
5090 SDFS 405,201400,0,0,0,177400,0,0,0,200600,0,0,0^
5091 S40500: DMOVE AC,[201400,,0
5092 035030 120 04 0 00 040057 0,,0]
5093 DFSB AC,[177400,,0
5094 035031 111 04 0 00 040727 0,,0]
5095 035032 312 04 0 00 040064 CAME AC,[200600,,0]
5096 035033 003 04 0 00 040501 ER3 AC,40501
5097 035034 312 05 0 00 040060 CAME AC+1,[0,,0]
5098 035035 004 05 0 00 040501 ER4 AC+1,40501
5099 035036 321 10 0 00 035030 JUMPL AC+4,S40500 ;LOOP ON ERROR SWITCH^
5100
5101 SDFS 406,576400,0,0,0,600400,0,0,0,577200,0,0,0^
5102 S40600: DMOVE AC,[576400,,0
5103 035037 120 04 0 00 041036 0,,0]
5104 DFSB AC,[600400,,0
5105 035040 111 04 0 00 040725 0,,0]
5106 035041 312 04 0 00 041034 CAME AC,[577200,,0]
5107 035042 003 04 0 00 040601 ER3 AC,40601
5108 035043 312 05 0 00 040060 CAME AC+1,[0,,0]
5109 035044 004 05 0 00 040601 ER4 AC+1,40601
5110 035045 321 10 0 00 035037 JUMPL AC+4,S40600 ;LOOP ON ERROR SWITCH^
5111
5112 SDFS 407,201400,0,0,0,577400,0,0,0,201600,0,0,0^
5113 S40700: DMOVE AC,[201400,,0
5114 035046 120 04 0 00 040057 0,,0]
5115 DFSB AC,[577400,,0
5116 035047 111 04 0 00 040061 0,,0]
5117 035050 312 04 0 00 040743 CAME AC,[201600,,0]
5118 035051 003 04 0 00 040701 ER3 AC,40701
5119 035052 312 05 0 00 040060 CAME AC+1,[0,,0]
5120 035053 004 05 0 00 040701 ER4 AC+1,40701
5121 035054 321 10 0 00 035046 JUMPL AC+4,S40700 ;LOOP ON ERROR SWITCH^
5122
5123 SDFS 410,203400,0,0,0,200477,777775,0,0,202660,0,300000,0^
5124 S41000: DMOVE AC,[203400,,0
5125 035055 120 04 0 00 041230 0,,0]
5126 DFSB AC,[200477,,777775
5127 035056 111 04 0 00 041376 0,,0]
5128 035057 312 04 0 00 041400 CAME AC,[202660,,0]
5129 035060 003 04 0 00 041001 ER3 AC,41001
5130 035061 312 05 0 00 040563 CAME AC+1,[300000,,0]
5131 035062 004 05 0 00 041001 ER4 AC+1,41001
5132 035063 321 10 0 00 035055 JUMPL AC+4,S41000 ;LOOP ON ERROR SWITCH^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 17
DSKCE1 MAC 21-Jun-78 10:46 DFSB TEST-DOUBLE FLOATING POINT SUBTRACT AND ROUND SEQ 0121
5133 ;TEST AROV, FOV AND FXU FLAGS - DFSB
5134
5135 000004 AC=4
5136 SAVEAC (1,1)^
5137 035064 201 06 0 00 035064 MOVEI AC+2,.
5138 035065 202 06 0 00 030051 MOVEM AC+2,TESTPC ;SETUP SUBTEST PC
5139 035066 201 06 0 00 000006 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
5140 035067 202 06 0 00 042157 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
5141
5142 035070 254 02 1 00 041401 S41100: JRSTF @[.+1] ;CLEAR ALL FLAGS
5143 DMOVE AC,[377400,,0
5144 035071 120 04 0 00 041026 0,,0]
5145 DFSB AC,[400400,,0
5146 035072 111 04 0 00 041402 0,,1] ;EXPECT AROV,FOV,FXU=0,0,0
5147 035073 265 03 0 00 035074 JSP AC-1,.+1 ;SAVE FLAGS
5148 035074 312 04 0 00 040357 CAME AC,[377777,,-1]
5149 035075 003 04 0 00 041101 ER3 AC,41101 ;C(AC) FAILED
5150 035076 312 05 0 00 040357 CAME AC+1,[377777,,-1]
5151 035077 004 05 0 00 041101 ER4 AC+1,41101 ;C(AC+1) FAILED
5152 035100 255 10 0 00 035102 JOV .+2
5153 035101 254 00 0 00 035103 JRST .+2
5154 035102 013 03 0 00 041101 ER13 AC-1,41101 ;AROV WAS SET
5155 035103 255 01 0 00 035105 JFOV .+2
5156 035104 254 00 0 00 035106 JRST .+2
5157 035105 013 03 0 00 041101 ER13 AC-1,41101 ;FOV WAS SET
5158 035106 603 03 0 00 000100 TLNE AC-1,FXU
5159 035107 013 03 0 00 041101 ER13 AC-1,41101 ;FXU WAS SET
5160 035110 321 10 0 00 035070 JUMPL AC+4,S41100 ;LOOP ON ERROR SWITCH
5161
5162 035111 254 02 1 00 041404 S41200: JRSTF @[.+1] ;CLEAR ALL FLAGS
5163 DMOVE AC,[377400,,0
5164 035112 120 04 0 00 041026 0,,0]
5165 DFSB AC,[400400,,0
5166 035113 111 04 0 00 041357 0,,0] ;EXPECT AROV,FOV,FXU=1,1,0
5167 035114 265 03 0 00 035115 JSP AC-1,.+1 ;SAVE FLAGS
5168 035115 312 04 0 00 040233 CAME AC,[400,,0]
5169 035116 003 04 0 00 041201 ER3 AC,41201 ;C(AC) FAILED
5170 035117 312 05 0 00 040060 CAME AC+1,[0,,0]
5171 035120 004 05 0 00 041201 ER4 AC+1,41201 ;C(AC+1)FAILED
5172 035121 255 10 0 00 035123 JOV .+2
5173 035122 013 03 0 00 041201 ER13 AC-1,41201 ;AROV WAS CLEAR
5174 035123 255 01 0 00 035125 JFOV .+2
5175 035124 013 03 0 00 041201 ER13 AC-1,41201 ;FOV WAS CLEAR
5176 035125 603 03 0 00 000100 TLNE AC-1,FXU
5177 035126 013 03 0 00 041201 ER13 AC-1,41201 ;FXU WAS SET
5178 035127 321 10 0 00 035111 JUMPL AC+4,S41200 ;LOOP ON ERROR SWITCH
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 18
DSKCE1 MAC 21-Jun-78 10:46 DFSB TEST-DOUBLE FLOATING POINT SUBTRACT AND ROUND SEQ 0122
5179 035130 254 02 1 00 041405 S41300: JRSTF @[.+1] ;CLEAR ALL FLAGS
5180 DMOVE AC,[777,,-1
5181 035131 120 04 0 00 041406 -1,,-1]
5182 DFSB AC,[377,,-1
5183 035132 111 04 0 00 041410 -1,,-1] ;EXPECT AROV,FOV,FXU=0,0,0
5184 035133 265 03 0 00 035134 JSP AC-1,.+1 ;SAVE FLAGS
5185 035134 312 04 0 00 040233 CAME AC,[400,,0]
5186 035135 003 04 0 00 041301 ER3 AC,41301 ;C(AC) FAILED
5187 035136 312 05 0 00 040060 CAME AC+1,[0,,0]
5188 035137 004 05 0 00 041301 ER4 AC+1,41301 ;C(AC+1) FAILED
5189 035140 255 10 0 00 035142 JOV .+2
5190 035141 254 00 0 00 035143 JRST .+2
5191 035142 013 03 0 00 041301 ER13 AC-1,41301 ;AROV WAS SET
5192 035143 255 01 0 00 035145 JFOV .+2
5193 035144 254 00 0 00 035146 JRST .+2
5194 035145 013 03 0 00 041301 ER13 AC-1,41301 ;FOV WAS SET
5195 035146 603 03 0 00 000100 TLNE AC-1,FXU
5196 035147 013 03 0 00 041301 ER13 AC-1,41301 ;FXU WAS SET
5197 035150 321 10 0 00 035130 JUMPL AC+4,S41300 ;LOOP ON ERROR SWITCH
5198
5199 035151 254 02 1 00 041412 S41400: JRSTF @[.+1] ;CLEAR ALL FLAGS
5200 DMOVE AC,[777,,-1
5201 035152 120 04 0 00 041406 -1,,-1]
5202 DFSB AC,[400,,0
5203 035153 111 04 0 00 040716 0,,0] ;EXPECT AROV,FOV,FXU=1,1,1
5204 035154 265 03 0 00 035155 JSP AC-1,.+1 ;SAVE FLAGS
5205 035155 312 04 0 00 040357 CAME AC,[377777,,-1]
5206 035156 003 04 0 00 041401 ER3 AC,41401 ;C(AC) FAILED
5207 035157 312 05 0 00 040363 CAME AC+1,[377777,,-2]
5208 035160 004 05 0 00 041401 ER4 AC+1,41401 ;C(AC+1) FAILED
5209 035161 255 10 0 00 035163 JOV .+2
5210 035162 013 03 0 00 041401 ER13 AC-1,41401 ;AROV WAS CLEAR
5211 035163 255 01 0 00 035165 JFOV .+2
5212 035164 013 03 0 00 041401 ER13 AC-1,41401 ;FOV WAS CLEAR
5213 035165 607 03 0 00 000100 TLNN AC-1,FXU
5214 035166 013 03 0 00 041401 ER13 AC-1,41401 ;FXU WAS CLEAR
5215 035167 321 10 0 00 035151 JUMPL AC+4,S41400 ;LOOP ON ERROR SWITCH
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 19
DSKCE1 MAC 21-Jun-78 10:46 DFSB TEST-DOUBLE FLOATING POINT SUBTRACT AND ROUND SEQ 0123
5216 035170 254 02 1 00 041413 S41500: JRSTF @[.+1] ;CLEAR ALL FLAGS
5217 DMOVE AC,[400400,,0
5218 035171 120 04 0 00 041357 0,,0]
5219 DFSB AC,[377377,,-1
5220 035172 111 04 0 00 041414 -1,,-1] ;EXPECT AROV,FOV,FXU=0,0,0
5221 035173 265 03 0 00 035174 JSP AC-1,.+1 ;SAVE FLAGS
5222 035174 312 04 0 00 041363 CAME AC,[400000,,0]
5223 035175 003 04 0 00 041501 ER3 AC,41501 ;C(AC) FAILED
5224 035176 312 05 0 00 040351 CAME AC+1,[0,,1]
5225 035177 004 05 0 00 041501 ER4 AC+1,41501 ;C(AC+1) FAILED
5226 035200 255 10 0 00 035202 JOV .+2
5227 035201 254 00 0 00 035203 JRST .+2
5228 035202 013 03 0 00 041501 ER13 AC-1,41501 ;AROV WAS SET
5229 035203 255 01 0 00 035205 JFOV .+2
5230 035204 254 00 0 00 035206 JRST .+2
5231 035205 013 03 0 00 041501 ER13 AC-1,41501 ;FOV WAS SET
5232 035206 603 03 0 00 000100 TLNE AC-1,FXU
5233 035207 013 03 0 00 041501 ER13 AC-1,41501 ;FXU WAS SET
5234 035210 321 10 0 00 035170 JUMPL AC+4,S41500 ;LOOP ON ERROR SWITCH
5235
5236 035211 254 02 1 00 041416 S41600: JRSTF @[.+1] ;CLEAR ALL FLAGS
5237 DMOVE AC,[400400,,0
5238 035212 120 04 0 00 041357 0,,0]
5239 DFSB AC,[377400,,0
5240 035213 111 04 0 00 041026 0,,0] ;EXPECT AROV,FOV,FXU=1,1,0
5241 035214 265 03 0 00 035215 JSP AC-1,.+1 ;SAVE FLAGS
5242 035215 312 04 0 00 041365 CAME AC,[777400,,0]
5243 035216 003 04 0 00 041601 ER3 AC,41601 ;C(AC) FAILED
5244 035217 312 05 0 00 040060 CAME AC+1,[0,,0]
5245 035220 004 05 0 00 041601 ER4 AC+1,41601 ;C(AC+1) FAILED
5246 035221 255 10 0 00 035223 JOV .+2
5247 035222 013 03 0 00 041601 ER13 AC-1,41601 ;AROV WAS CLEAR
5248 035223 255 01 0 00 035225 JFOV .+2
5249 035224 013 03 0 00 041601 ER13 AC-1,41601 ;FOV WAS CLEAR
5250 035225 603 03 0 00 000100 TLNE AC-1,FXU
5251 035226 013 03 0 00 041601 ER13 AC-1,41601 ;FXU WAS SET
5252 035227 321 10 0 00 035211 JUMPL AC+4,S41600 ;LOOP ON ERROR SWITCH
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 20
DSKCE1 MAC 21-Jun-78 10:46 DFSB TEST-DOUBLE FLOATING POINT SUBTRACT AND ROUND SEQ 0124
5253 035230 254 02 1 00 041417 S41700: JRSTF @[.+1] ;CLEAR ALL FLAGS
5254 DMOVE AC,[777000,,0
5255 035231 120 04 0 00 041420 0,,0]
5256 DFSB AC,[777400,,0
5257 035232 111 04 0 00 041422 0,,0] ;EXPECT AROV,FOV,FXU=0,0,0
5258 035233 265 03 0 00 035234 JSP AC-1,.+1 ;SAVE FLAGS
5259 035234 312 04 0 00 041365 CAME AC,[777400,,0]
5260 035235 003 04 0 00 041701 ER3 AC,41701 ;C(AC) FAILED
5261 035236 312 05 0 00 040060 CAME AC+1,[0,,0]
5262 035237 004 05 0 00 041701 ER4 AC+1,41701 ;C(AC+1) FAILED
5263 035240 255 10 0 00 035242 JOV .+2
5264 035241 254 00 0 00 035243 JRST .+2
5265 035242 013 03 0 00 041701 ER13 AC-1,41701 ;AROV WAS SET
5266 035243 255 01 0 00 035245 JFOV .+2
5267 035244 254 00 0 00 035246 JRST .+2
5268 035245 013 03 0 00 041701 ER13 AC-1,41701 ;FOV WAS SET
5269 035246 603 03 0 00 000100 TLNE AC-1,FXU
5270 035247 013 03 0 00 041701 ER13 AC-1,41701 ;FXU WAS SET
5271 035250 321 10 0 00 035230 JUMPL AC+4,S41700 ;LOOP ON ERROR SWITCH
5272
5273 035251 254 02 1 00 041424 S42000: JRSTF @[.+1] ;CLEAR ALL FLAGS
5274 DMOVE AC,[777000,,0
5275 035252 120 04 0 00 041425 0,,1]
5276 DFSB AC,[777400,,0
5277 035253 111 04 0 00 041422 0,,0] ;EXPECT AROV,FOV,FXU=1,1,1
5278 035254 265 03 0 00 035255 JSP AC-1,.+1 ;SAVE FLAGS
5279 035255 312 04 0 00 041363 CAME AC,[400000,,0]
5280 035256 003 04 0 00 042001 ER3 AC,42001 ;C(AC) FAILED
5281 035257 312 05 0 00 040346 CAME AC+1,[0,,2]
5282 035260 004 05 0 00 042001 ER4 AC+1,42001 ;C(AC+1) FAILED
5283 035261 255 10 0 00 035263 JOV .+2
5284 035262 013 03 0 00 042001 ER13 AC-1,42001 ;AROV WAS CLEAR
5285 035263 255 01 0 00 035265 JFOV .+2
5286 035264 013 03 0 00 042001 ER13 AC-1,42001 ;FOV WAS CLEAR
5287 035265 607 03 0 00 000100 TLNN AC-1,FXU
5288 035266 013 03 0 00 042001 ER13 AC-1,42001 ;FXU WAS CLEAR
5289 035267 321 10 0 00 035251 JUMPL AC+4,S42000 ;LOOP ON ERROR SWITCH
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 21
DSKCE1 MAC 21-Jun-78 10:46 DFMP TEST-DOUBLE FLOATING POINT MULTIPLY AND ROUND SEQ 0125
5290 SUBTTL DFMP TEST-DOUBLE FLOATING POINT MULTIPLY AND ROUND
5291
5292 000004 AC=4
5293 SAVEAC (1,1)^
5294 035270 201 06 0 00 035270 MOVEI AC+2,.
5295 035271 202 06 0 00 030051 MOVEM AC+2,TESTPC ;SETUP SUBTEST PC
5296 035272 201 06 0 00 000006 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
5297 035273 202 06 0 00 042157 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
5298 035274 254 02 1 00 041427 JRSTF @[.+1] ;CLEAR ALL FLAGS
5299
5300 ;CHECK THAT DFMP AC,E DOES NOT ALTER C(E) OR C(E+1)
5301 S50100: DMOVE AC,[200777,,-1
5302 035275 120 04 0 00 040710 -1,,-1]
5303 DMOVE AC+2,[201400,,0
5304 035276 120 06 0 00 041430 400000,,-1]
5305 035277 112 04 0 00 000006 DFMP AC,AC+2
5306 035300 312 06 0 00 040057 CAME AC+2,[201400,,0]
5307 035301 005 06 0 00 050101 ER5 AC+2,50101 ;C(E) WAS ALTERED
5308 035302 312 07 0 00 040713 CAME AC+3,[400000,,-1]
5309 035303 006 07 0 00 050101 ER6 AC+3,50101 ;C(E+1) WAS ALTERED
5310 035304 321 10 0 00 035275 JUMPL AC+4,S50100 ;LOOP ON ERROR SWITCH
5311
5312 SDFM 502,200400,0,0,0,0,0,0,0,0,0,0,0^
5313 S50200: DMOVE AC,[200400,,0
5314 035305 120 04 0 00 040731 0,,0]
5315 DFMP AC,[0,,0
5316 035306 112 04 0 00 040355 0,,0]
5317 035307 312 04 0 00 040060 CAME AC,[0,,0]
5318 035310 003 04 0 00 050201 ER3 AC,50201
5319 035311 312 05 0 00 040060 CAME AC+1,[0,,0]
5320 035312 004 05 0 00 050201 ER4 AC+1,50201
5321 035313 321 10 0 00 035305 JUMPL AC+4,S50200 ;LOOP ON ERROR SWITCH^
5322
5323 SDFM 503,200400,0,0,0,200400,0,0,0,177400,0,0,0^
5324 S50300: DMOVE AC,[200400,,0
5325 035314 120 04 0 00 040731 0,,0]
5326 DFMP AC,[200400,,0
5327 035315 112 04 0 00 040731 0,,0]
5328 035316 312 04 0 00 040066 CAME AC,[177400,,0]
5329 035317 003 04 0 00 050301 ER3 AC,50301
5330 035320 312 05 0 00 040060 CAME AC+1,[0,,0]
5331 035321 004 05 0 00 050301 ER4 AC+1,50301
5332 035322 321 10 0 00 035314 JUMPL AC+4,S50300 ;LOOP ON ERROR SWITCH^
5333
5334 SDFM 504,400,0,0,0,400,0,0,0,177400,0,0,0^
5335 S50400: DMOVE AC,[400,,0
5336 035323 120 04 0 00 040716 0,,0]
5337 DFMP AC,[400,,0
5338 035324 112 04 0 00 040716 0,,0]
5339 035325 312 04 0 00 040066 CAME AC,[177400,,0]
5340 035326 003 04 0 00 050401 ER3 AC,50401
5341 035327 312 05 0 00 040060 CAME AC+1,[0,,0]
5342 035330 004 05 0 00 050401 ER4 AC+1,50401
5343 035331 321 10 0 00 035323 JUMPL AC+4,S50400 ;LOOP ON ERROR SWITCH^
5344
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 21-1
DSKCE1 MAC 21-Jun-78 10:46 DFMP TEST-DOUBLE FLOATING POINT MULTIPLY AND ROUND SEQ 0126
5345 SDFM 505,200400,0,0,0,400,0,0,0,377400,0,0,0^
5346 S50500: DMOVE AC,[200400,,0
5347 035332 120 04 0 00 040731 0,,0]
5348 DFMP AC,[400,,0
5349 035333 112 04 0 00 040716 0,,0]
5350 035334 312 04 0 00 040527 CAME AC,[377400,,0]
5351 035335 003 04 0 00 050501 ER3 AC,50501
5352 035336 312 05 0 00 040060 CAME AC+1,[0,,0]
5353 035337 004 05 0 00 050501 ER4 AC+1,50501
5354 035340 321 10 0 00 035332 JUMPL AC+4,S50500 ;LOOP ON ERROR SWITCH^
5355
5356 SDFM 506,177400,0,0,0,400,0,0,0,376400,0,0,0^
5357 S50600: DMOVE AC,[177400,,0
5358 035341 120 04 0 00 040727 0,,0]
5359 DFMP AC,[400,,0
5360 035342 112 04 0 00 040716 0,,0]
5361 035343 312 04 0 00 041432 CAME AC,[376400,,0]
5362 035344 003 04 0 00 050601 ER3 AC,50601
5363 035345 312 05 0 00 040060 CAME AC+1,[0,,0]
5364 035346 004 05 0 00 050601 ER4 AC+1,50601
5365 035347 321 10 0 00 035341 JUMPL AC+4,S50600 ;LOOP ON ERROR SWITCH^
5366
5367 SDFM 507,377400,0,0,0,400,0,0,0,176400,0,0,0^
5368 S50700: DMOVE AC,[377400,,0
5369 035350 120 04 0 00 041026 0,,0]
5370 DFMP AC,[400,,0
5371 035351 112 04 0 00 040716 0,,0]
5372 035352 312 04 0 00 040071 CAME AC,[176400,,0]
5373 035353 003 04 0 00 050701 ER3 AC,50701
5374 035354 312 05 0 00 040060 CAME AC+1,[0,,0]
5375 035355 004 05 0 00 050701 ER4 AC+1,50701
5376 035356 321 10 0 00 035350 JUMPL AC+4,S50700 ;LOOP ON ERROR SWITCH^
5377
5378 SDFM 510,577400,0,0,0,400,0,0,0,400400,0,0,0^
5379 S51000: DMOVE AC,[577400,,0
5380 035357 120 04 0 00 040061 0,,0]
5381 DFMP AC,[400,,0
5382 035360 112 04 0 00 040716 0,,0]
5383 035361 312 04 0 00 041225 CAME AC,[400400,,0]
5384 035362 003 04 0 00 051001 ER3 AC,51001
5385 035363 312 05 0 00 040060 CAME AC+1,[0,,0]
5386 035364 004 05 0 00 051001 ER4 AC+1,51001
5387 035365 321 10 0 00 035357 JUMPL AC+4,S51000 ;LOOP ON ERROR SWITCH^
5388
5389 SDFM 511,400,0,0,0,200400,0,0,0,377400,0,0,0^
5390 S51100: DMOVE AC,[400,,0
5391 035366 120 04 0 00 040716 0,,0]
5392 DFMP AC,[200400,,0
5393 035367 112 04 0 00 040731 0,,0]
5394 035370 312 04 0 00 040527 CAME AC,[377400,,0]
5395 035371 003 04 0 00 051101 ER3 AC,51101
5396 035372 312 05 0 00 040060 CAME AC+1,[0,,0]
5397 035373 004 05 0 00 051101 ER4 AC+1,51101
5398 035374 321 10 0 00 035366 JUMPL AC+4,S51100 ;LOOP ON ERROR SWITCH^
5399
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 21-2
DSKCE1 MAC 21-Jun-78 10:46 DFMP TEST-DOUBLE FLOATING POINT MULTIPLY AND ROUND SEQ 0127
5400 SDFM 512,200400,0,0,0,577400,0,0,0,600400,0,0,0^
5401 S51200: DMOVE AC,[200400,,0
5402 035375 120 04 0 00 040731 0,,0]
5403 DFMP AC,[577400,,0
5404 035376 112 04 0 00 040061 0,,0]
5405 035377 312 04 0 00 040725 CAME AC,[600400,,0]
5406 035400 003 04 0 00 051201 ER3 AC,51201
5407 035401 312 05 0 00 040060 CAME AC+1,[0,,0]
5408 035402 004 05 0 00 051201 ER4 AC+1,51201
5409 035403 321 10 0 00 035375 JUMPL AC+4,S51200 ;LOOP ON ERROR SWITCH^
5410
5411 SDFM 513,200400,0,0,0,205400,0,0,0,204400,0,0,0^
5412 S51300: DMOVE AC,[200400,,0
5413 035404 120 04 0 00 040731 0,,0]
5414 DFMP AC,[205400,,0
5415 035405 112 04 0 00 040733 0,,0]
5416 035406 312 04 0 00 040747 CAME AC,[204400,,0]
5417 035407 003 04 0 00 051301 ER3 AC,51301
5418 035410 312 05 0 00 040060 CAME AC+1,[0,,0]
5419 035411 004 05 0 00 051301 ER4 AC+1,51301
5420 035412 321 10 0 00 035404 JUMPL AC+4,S51300 ;LOOP ON ERROR SWITCH^
5421
5422 SDFM 514,0,0,0,0,577400,0,0,0,0,0,0,0^
5423 S51400: DMOVE AC,[0,,0
5424 035413 120 04 0 00 040355 0,,0]
5425 DFMP AC,[577400,,0
5426 035414 112 04 0 00 040061 0,,0]
5427 035415 312 04 0 00 040060 CAME AC,[0,,0]
5428 035416 003 04 0 00 051401 ER3 AC,51401
5429 035417 312 05 0 00 040060 CAME AC+1,[0,,0]
5430 035420 004 05 0 00 051401 ER4 AC+1,51401
5431 035421 321 10 0 00 035413 JUMPL AC+4,S51400 ;LOOP ON ERROR SWITCH^
5432
5433 SDFM 515,200400,0,0,0,201400,0,0,0,200400,0,0,0^
5434 S51500: DMOVE AC,[200400,,0
5435 035422 120 04 0 00 040731 0,,0]
5436 DFMP AC,[201400,,0
5437 035423 112 04 0 00 040057 0,,0]
5438 035424 312 04 0 00 040063 CAME AC,[200400,,0]
5439 035425 003 04 0 00 051501 ER3 AC,51501
5440 035426 312 05 0 00 040060 CAME AC+1,[0,,0]
5441 035427 004 05 0 00 051501 ER4 AC+1,51501
5442 035430 321 10 0 00 035422 JUMPL AC+4,S51500 ;LOOP ON ERROR SWITCH^
5443
5444 SDFM 516,200400,0,0,0,202400,0,0,0,201400,0,0,0^
5445 S51600: DMOVE AC,[200400,,0
5446 035431 120 04 0 00 040731 0,,0]
5447 DFMP AC,[202400,,0
5448 035432 112 04 0 00 040744 0,,0]
5449 035433 312 04 0 00 040057 CAME AC,[201400,,0]
5450 035434 003 04 0 00 051601 ER3 AC,51601
5451 035435 312 05 0 00 040060 CAME AC+1,[0,,0]
5452 035436 004 05 0 00 051601 ER4 AC+1,51601
5453 035437 321 10 0 00 035431 JUMPL AC+4,S51600 ;LOOP ON ERROR SWITCH^
5454
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 21-3
DSKCE1 MAC 21-Jun-78 10:46 DFMP TEST-DOUBLE FLOATING POINT MULTIPLY AND ROUND SEQ 0128
5455 SDFM 517,200400,0,0,0,204400,0,0,0,203400,0,0,0^
5456 S51700: DMOVE AC,[200400,,0
5457 035440 120 04 0 00 040731 0,,0]
5458 DFMP AC,[204400,,0
5459 035441 112 04 0 00 040747 0,,0]
5460 035442 312 04 0 00 041133 CAME AC,[203400,,0]
5461 035443 003 04 0 00 051701 ER3 AC,51701
5462 035444 312 05 0 00 040060 CAME AC+1,[0,,0]
5463 035445 004 05 0 00 051701 ER4 AC+1,51701
5464 035446 321 10 0 00 035440 JUMPL AC+4,S51700 ;LOOP ON ERROR SWITCH^
5465
5466 SDFM 520,200400,0,0,0,210400,0,0,0,207400,0,0,0^
5467 S52000: DMOVE AC,[200400,,0
5468 035447 120 04 0 00 040731 0,,0]
5469 DFMP AC,[210400,,0
5470 035450 112 04 0 00 040752 0,,0]
5471 035451 312 04 0 00 041232 CAME AC,[207400,,0]
5472 035452 003 04 0 00 052001 ER3 AC,52001
5473 035453 312 05 0 00 040060 CAME AC+1,[0,,0]
5474 035454 004 05 0 00 052001 ER4 AC+1,52001
5475 035455 321 10 0 00 035447 JUMPL AC+4,S52000 ;LOOP ON ERROR SWITCH^
5476
5477 SDFM 521,200400,0,0,0,220400,0,0,0,217400,0,0,0^
5478 S52100: DMOVE AC,[200400,,0
5479 035456 120 04 0 00 040731 0,,0]
5480 DFMP AC,[220400,,0
5481 035457 112 04 0 00 040755 0,,0]
5482 035460 312 04 0 00 041250 CAME AC,[217400,,0]
5483 035461 003 04 0 00 052101 ER3 AC,52101
5484 035462 312 05 0 00 040060 CAME AC+1,[0,,0]
5485 035463 004 05 0 00 052101 ER4 AC+1,52101
5486 035464 321 10 0 00 035456 JUMPL AC+4,S52100 ;LOOP ON ERROR SWITCH^
5487
5488 SDFM 522,200400,0,0,0,240400,0,0,0,237400,0,0,0^
5489 S52200: DMOVE AC,[200400,,0
5490 035465 120 04 0 00 040731 0,,0]
5491 DFMP AC,[240400,,0
5492 035466 112 04 0 00 040760 0,,0]
5493 035467 312 04 0 00 041433 CAME AC,[237400,,0]
5494 035470 003 04 0 00 052201 ER3 AC,52201
5495 035471 312 05 0 00 040060 CAME AC+1,[0,,0]
5496 035472 004 05 0 00 052201 ER4 AC+1,52201
5497 035473 321 10 0 00 035465 JUMPL AC+4,S52200 ;LOOP ON ERROR SWITCH^
5498
5499 SDFM 523,200400,0,0,0,300400,0,0,0,277400,0,0,0^
5500 S52300: DMOVE AC,[200400,,0
5501 035474 120 04 0 00 040731 0,,0]
5502 DFMP AC,[300400,,0
5503 035475 112 04 0 00 040762 0,,0]
5504 035476 312 04 0 00 041434 CAME AC,[277400,,0]
5505 035477 003 04 0 00 052301 ER3 AC,52301
5506 035500 312 05 0 00 040060 CAME AC+1,[0,,0]
5507 035501 004 05 0 00 052301 ER4 AC+1,52301
5508 035502 321 10 0 00 035474 JUMPL AC+4,S52300 ;LOOP ON ERROR SWITCH^
5509
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 21-4
DSKCE1 MAC 21-Jun-78 10:46 DFMP TEST-DOUBLE FLOATING POINT MULTIPLY AND ROUND SEQ 0129
5510 SDFM 524,201400,0,0,0,200400,0,0,0,200400,0,0,0^
5511 S52400: DMOVE AC,[201400,,0
5512 035503 120 04 0 00 040057 0,,0]
5513 DFMP AC,[200400,,0
5514 035504 112 04 0 00 040731 0,,0]
5515 035505 312 04 0 00 040063 CAME AC,[200400,,0]
5516 035506 003 04 0 00 052401 ER3 AC,52401
5517 035507 312 05 0 00 040060 CAME AC+1,[0,,0]
5518 035510 004 05 0 00 052401 ER4 AC+1,52401
5519 035511 321 10 0 00 035503 JUMPL AC+4,S52400 ;LOOP ON ERROR SWITCH^
5520
5521 SDFM 525,202400,0,0,0,200400,0,0,0,201400,0,0,0^
5522 S52500: DMOVE AC,[202400,,0
5523 035512 120 04 0 00 040744 0,,0]
5524 DFMP AC,[200400,,0
5525 035513 112 04 0 00 040731 0,,0]
5526 035514 312 04 0 00 040057 CAME AC,[201400,,0]
5527 035515 003 04 0 00 052501 ER3 AC,52501
5528 035516 312 05 0 00 040060 CAME AC+1,[0,,0]
5529 035517 004 05 0 00 052501 ER4 AC+1,52501
5530 035520 321 10 0 00 035512 JUMPL AC+4,S52500 ;LOOP ON ERROR SWITCH^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 22
DSKCE1 MAC 21-Jun-78 10:46 DFMP TEST-DOUBLE FLOATING POINT MULTIPLY AND ROUND SEQ 0130
5531
5532
5533 SDFM 526,204400,0,0,0,200400,0,0,0,203400,0,0,0^
5534 S52600: DMOVE AC,[204400,,0
5535 035521 120 04 0 00 040747 0,,0]
5536 DFMP AC,[200400,,0
5537 035522 112 04 0 00 040731 0,,0]
5538 035523 312 04 0 00 041133 CAME AC,[203400,,0]
5539 035524 003 04 0 00 052601 ER3 AC,52601
5540 035525 312 05 0 00 040060 CAME AC+1,[0,,0]
5541 035526 004 05 0 00 052601 ER4 AC+1,52601
5542 035527 321 10 0 00 035521 JUMPL AC+4,S52600 ;LOOP ON ERROR SWITCH^
5543
5544 SDFM 527,210400,0,0,0,200400,0,0,0,207400,0,0,0^
5545 S52700: DMOVE AC,[210400,,0
5546 035530 120 04 0 00 040752 0,,0]
5547 DFMP AC,[200400,,0
5548 035531 112 04 0 00 040731 0,,0]
5549 035532 312 04 0 00 041232 CAME AC,[207400,,0]
5550 035533 003 04 0 00 052701 ER3 AC,52701
5551 035534 312 05 0 00 040060 CAME AC+1,[0,,0]
5552 035535 004 05 0 00 052701 ER4 AC+1,52701
5553 035536 321 10 0 00 035530 JUMPL AC+4,S52700 ;LOOP ON ERROR SWITCH^
5554
5555 SDFM 530,220400,0,0,0,200400,0,0,0,217400,0,0,0^
5556 S53000: DMOVE AC,[220400,,0
5557 035537 120 04 0 00 040755 0,,0]
5558 DFMP AC,[200400,,0
5559 035540 112 04 0 00 040731 0,,0]
5560 035541 312 04 0 00 041250 CAME AC,[217400,,0]
5561 035542 003 04 0 00 053001 ER3 AC,53001
5562 035543 312 05 0 00 040060 CAME AC+1,[0,,0]
5563 035544 004 05 0 00 053001 ER4 AC+1,53001
5564 035545 321 10 0 00 035537 JUMPL AC+4,S53000 ;LOOP ON ERROR SWITCH^
5565
5566 SDFM 531,240400,0,0,0,200400,0,0,0,237400,0,0,0^
5567 S53100: DMOVE AC,[240400,,0
5568 035546 120 04 0 00 040760 0,,0]
5569 DFMP AC,[200400,,0
5570 035547 112 04 0 00 040731 0,,0]
5571 035550 312 04 0 00 041433 CAME AC,[237400,,0]
5572 035551 003 04 0 00 053101 ER3 AC,53101
5573 035552 312 05 0 00 040060 CAME AC+1,[0,,0]
5574 035553 004 05 0 00 053101 ER4 AC+1,53101
5575 035554 321 10 0 00 035546 JUMPL AC+4,S53100 ;LOOP ON ERROR SWITCH^
5576
5577 SDFM 532,300400,0,0,0,200400,0,0,0,277400,0,0,0^
5578 S53200: DMOVE AC,[300400,,0
5579 035555 120 04 0 00 040762 0,,0]
5580 DFMP AC,[200400,,0
5581 035556 112 04 0 00 040731 0,,0]
5582 035557 312 04 0 00 041434 CAME AC,[277400,,0]
5583 035560 003 04 0 00 053201 ER3 AC,53201
5584 035561 312 05 0 00 040060 CAME AC+1,[0,,0]
5585 035562 004 05 0 00 053201 ER4 AC+1,53201
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 22-1
DSKCE1 MAC 21-Jun-78 10:46 DFMP TEST-DOUBLE FLOATING POINT MULTIPLY AND ROUND SEQ 0131
5586 035563 321 10 0 00 035555 JUMPL AC+4,S53200 ;LOOP ON ERROR SWITCH^
5587
5588 SDFM 533,200400,0,0,0,576400,0,0,0,577400,0,0,0^
5589 S53300: DMOVE AC,[200400,,0
5590 035564 120 04 0 00 040731 0,,0]
5591 DFMP AC,[576400,,0
5592 035565 112 04 0 00 041036 0,,0]
5593 035566 312 04 0 00 040061 CAME AC,[577400,,0]
5594 035567 003 04 0 00 053301 ER3 AC,53301
5595 035570 312 05 0 00 040060 CAME AC+1,[0,,0]
5596 035571 004 05 0 00 053301 ER4 AC+1,53301
5597 035572 321 10 0 00 035564 JUMPL AC+4,S53300 ;LOOP ON ERROR SWITCH^
5598
5599 SDFM 534,200400,0,0,0,575400,0,0,0,576400,0,0,0^
5600 S53400: DMOVE AC,[200400,,0
5601 035573 120 04 0 00 040731 0,,0]
5602 DFMP AC,[575400,,0
5603 035574 112 04 0 00 041435 0,,0]
5604 035575 312 04 0 00 040764 CAME AC,[576400,,0]
5605 035576 003 04 0 00 053401 ER3 AC,53401
5606 035577 312 05 0 00 040060 CAME AC+1,[0,,0]
5607 035600 004 05 0 00 053401 ER4 AC+1,53401
5608 035601 321 10 0 00 035573 JUMPL AC+4,S53400 ;LOOP ON ERROR SWITCH^
5609
5610 SDFM 535,200777,-1,0,0,200400,0,0,0,177777,-1,0,0^
5611 S53500: DMOVE AC,[200777,,-1
5612 035602 120 04 0 00 041226 0,,0]
5613 DFMP AC,[200400,,0
5614 035603 112 04 0 00 040731 0,,0]
5615 035604 312 04 0 00 041437 CAME AC,[177777,,-1]
5616 035605 003 04 0 00 053501 ER3 AC,53501
5617 035606 312 05 0 00 040060 CAME AC+1,[0,,0]
5618 035607 004 05 0 00 053501 ER4 AC+1,53501
5619 035610 321 10 0 00 035602 JUMPL AC+4,S53500 ;LOOP ON ERROR SWITCH^
5620
5621 SDFM 536,200777,-2,0,0,200400,0,0,0,177777,-2,0,0^
5622 S53600: DMOVE AC,[200777,,-2
5623 035611 120 04 0 00 041440 0,,0]
5624 DFMP AC,[200400,,0
5625 035612 112 04 0 00 040731 0,,0]
5626 035613 312 04 0 00 041442 CAME AC,[177777,,-2]
5627 035614 003 04 0 00 053601 ER3 AC,53601
5628 035615 312 05 0 00 040060 CAME AC+1,[0,,0]
5629 035616 004 05 0 00 053601 ER4 AC+1,53601
5630 035617 321 10 0 00 035611 JUMPL AC+4,S53600 ;LOOP ON ERROR SWITCH^
5631
5632 SDFM 537,200777,-3,0,0,200400,0,0,0,177777,-3,0,0^
5633 S53700: DMOVE AC,[200777,,-3
5634 035620 120 04 0 00 041443 0,,0]
5635 DFMP AC,[200400,,0
5636 035621 112 04 0 00 040731 0,,0]
5637 035622 312 04 0 00 041445 CAME AC,[177777,,-3]
5638 035623 003 04 0 00 053701 ER3 AC,53701
5639 035624 312 05 0 00 040060 CAME AC+1,[0,,0]
5640 035625 004 05 0 00 053701 ER4 AC+1,53701
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 22-2
DSKCE1 MAC 21-Jun-78 10:46 DFMP TEST-DOUBLE FLOATING POINT MULTIPLY AND ROUND SEQ 0132
5641 035626 321 10 0 00 035620 JUMPL AC+4,S53700 ;LOOP ON ERROR SWITCH^
5642
5643 SDFM 540,200777,-4,0,0,200400,0,0,0,177777,-4,0,0^
5644 S54000: DMOVE AC,[200777,,-4
5645 035627 120 04 0 00 041446 0,,0]
5646 DFMP AC,[200400,,0
5647 035630 112 04 0 00 040731 0,,0]
5648 035631 312 04 0 00 041450 CAME AC,[177777,,-4]
5649 035632 003 04 0 00 054001 ER3 AC,54001
5650 035633 312 05 0 00 040060 CAME AC+1,[0,,0]
5651 035634 004 05 0 00 054001 ER4 AC+1,54001
5652 035635 321 10 0 00 035627 JUMPL AC+4,S54000 ;LOOP ON ERROR SWITCH^
5653
5654 SDFM 541,0,0,0,0,200400,0,0,0,0,0,0,0^
5655 S54100: DMOVE AC,[0,,0
5656 035636 120 04 0 00 040355 0,,0]
5657 DFMP AC,[200400,,0
5658 035637 112 04 0 00 040731 0,,0]
5659 035640 312 04 0 00 040060 CAME AC,[0,,0]
5660 035641 003 04 0 00 054101 ER3 AC,54101
5661 035642 312 05 0 00 040060 CAME AC+1,[0,,0]
5662 035643 004 05 0 00 054101 ER4 AC+1,54101
5663 035644 321 10 0 00 035636 JUMPL AC+4,S54100 ;LOOP ON ERROR SWITCH^
5664
5665 SDFM 542,577400,0,0,0,200400,0,0,0,600400,0,0,0^
5666 S54200: DMOVE AC,[577400,,0
5667 035645 120 04 0 00 040061 0,,0]
5668 DFMP AC,[200400,,0
5669 035646 112 04 0 00 040731 0,,0]
5670 035647 312 04 0 00 040725 CAME AC,[600400,,0]
5671 035650 003 04 0 00 054201 ER3 AC,54201
5672 035651 312 05 0 00 040060 CAME AC+1,[0,,0]
5673 035652 004 05 0 00 054201 ER4 AC+1,54201
5674 035653 321 10 0 00 035645 JUMPL AC+4,S54200 ;LOOP ON ERROR SWITCH^
5675
5676 SDFMKL 543,501700,0,0,0,500400,0,0,0,374100,0,0,0,372400,0,0,0^
5677 S54300: DMOVE AC,[501700,,0
5678 035654 120 04 0 00 041451 0,,0]
5679 DFMP AC,[500400,,0
5680 035655 112 04 0 00 041453 0,,0]
5681 035656 332 00 0 00 030041 SKIPE KLFLG
5682 035657 254 00 0 00 035666 JRST S54305
5683 035660 312 04 0 00 041455 CAME AC,[374100,,0]
5684 035661 003 04 0 00 054301 ER3 AC,54301
5685 035662 312 05 0 00 040060 CAME AC+1,[0,,0]
5686 035663 004 05 0 00 054301 ER4 AC+1,54301
5687 035664 321 10 0 00 035654 S54306: JUMPL AC+4,S54300 ;LOOP ON ERROR SWITCH
5688 035665 254 00 0 00 035673 JRST S54307
5689 035666 312 04 0 00 041456 S54305: CAME AC,[372400,,0]
5690 035667 003 04 0 00 054301 ER3 AC,54301
5691 035670 312 05 0 00 040060 CAME AC+1,[0,,0]
5692 035671 004 05 0 00 054301 ER4 AC+1,54301
5693 035672 254 00 0 00 035664 JRST S54306
5694 035673 254 00 0 00 035674 S54307: JRST .+1 ^
5695
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 22-3
DSKCE1 MAC 21-Jun-78 10:46 DFMP TEST-DOUBLE FLOATING POINT MULTIPLY AND ROUND SEQ 0133
5696 SDFMKL 544,502700,0,0,0,500400,0,0,0,373100,0,0,0,371400,0,0,0^
5697 S54400: DMOVE AC,[502700,,0
5698 035674 120 04 0 00 041457 0,,0]
5699 DFMP AC,[500400,,0
5700 035675 112 04 0 00 041453 0,,0]
5701 035676 332 00 0 00 030041 SKIPE KLFLG
5702 035677 254 00 0 00 035706 JRST S54405
5703 035700 312 04 0 00 041461 CAME AC,[373100,,0]
5704 035701 003 04 0 00 054401 ER3 AC,54401
5705 035702 312 05 0 00 040060 CAME AC+1,[0,,0]
5706 035703 004 05 0 00 054401 ER4 AC+1,54401
5707 035704 321 10 0 00 035674 S54406: JUMPL AC+4,S54400 ;LOOP ON ERROR SWITCH
5708 035705 254 00 0 00 035713 JRST S54407
5709 035706 312 04 0 00 041462 S54405: CAME AC,[371400,,0]
5710 035707 003 04 0 00 054401 ER3 AC,54401
5711 035710 312 05 0 00 040060 CAME AC+1,[0,,0]
5712 035711 004 05 0 00 054401 ER4 AC+1,54401
5713 035712 254 00 0 00 035704 JRST S54406
5714 035713 254 00 0 00 035714 S54407: JRST .+1 ^
5715
5716 SDFMKL 545,503700,0,0,0,500400,0,0,0,372100,0,0,0,370400,0,0,0^
5717 S54500: DMOVE AC,[503700,,0
5718 035714 120 04 0 00 041463 0,,0]
5719 DFMP AC,[500400,,0
5720 035715 112 04 0 00 041453 0,,0]
5721 035716 332 00 0 00 030041 SKIPE KLFLG
5722 035717 254 00 0 00 035726 JRST S54505
5723 035720 312 04 0 00 041465 CAME AC,[372100,,0]
5724 035721 003 04 0 00 054501 ER3 AC,54501
5725 035722 312 05 0 00 040060 CAME AC+1,[0,,0]
5726 035723 004 05 0 00 054501 ER4 AC+1,54501
5727 035724 321 10 0 00 035714 S54506: JUMPL AC+4,S54500 ;LOOP ON ERROR SWITCH
5728 035725 254 00 0 00 035733 JRST S54507
5729 035726 312 04 0 00 041466 S54505: CAME AC,[370400,,0]
5730 035727 003 04 0 00 054501 ER3 AC,54501
5731 035730 312 05 0 00 040060 CAME AC+1,[0,,0]
5732 035731 004 05 0 00 054501 ER4 AC+1,54501
5733 035732 254 00 0 00 035724 JRST S54506
5734 035733 254 00 0 00 035734 S54507: JRST .+1 ^
5735
5736 SDFMKL 546,504700,0,0,0,500400,0,0,0,371100,0,0,0,367400,0,0,0^
5737 S54600: DMOVE AC,[504700,,0
5738 035734 120 04 0 00 041467 0,,0]
5739 DFMP AC,[500400,,0
5740 035735 112 04 0 00 041453 0,,0]
5741 035736 332 00 0 00 030041 SKIPE KLFLG
5742 035737 254 00 0 00 035746 JRST S54605
5743 035740 312 04 0 00 041471 CAME AC,[371100,,0]
5744 035741 003 04 0 00 054601 ER3 AC,54601
5745 035742 312 05 0 00 040060 CAME AC+1,[0,,0]
5746 035743 004 05 0 00 054601 ER4 AC+1,54601
5747 035744 321 10 0 00 035734 S54606: JUMPL AC+4,S54600 ;LOOP ON ERROR SWITCH
5748 035745 254 00 0 00 035753 JRST S54607
5749 035746 312 04 0 00 041472 S54605: CAME AC,[367400,,0]
5750 035747 003 04 0 00 054601 ER3 AC,54601
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 22-4
DSKCE1 MAC 21-Jun-78 10:46 DFMP TEST-DOUBLE FLOATING POINT MULTIPLY AND ROUND SEQ 0134
5751 035750 312 05 0 00 040060 CAME AC+1,[0,,0]
5752 035751 004 05 0 00 054601 ER4 AC+1,54601
5753 035752 254 00 0 00 035744 JRST S54606
5754 035753 254 00 0 00 035754 S54607: JRST .+1 ^
5755
5756 SDFMKL 547,505700,0,0,0,500400,0,0,0,370100,0,0,0,366400,0,0,0^
5757 S54700: DMOVE AC,[505700,,0
5758 035754 120 04 0 00 041473 0,,0]
5759 DFMP AC,[500400,,0
5760 035755 112 04 0 00 041453 0,,0]
5761 035756 332 00 0 00 030041 SKIPE KLFLG
5762 035757 254 00 0 00 035766 JRST S54705
5763 035760 312 04 0 00 041475 CAME AC,[370100,,0]
5764 035761 003 04 0 00 054701 ER3 AC,54701
5765 035762 312 05 0 00 040060 CAME AC+1,[0,,0]
5766 035763 004 05 0 00 054701 ER4 AC+1,54701
5767 035764 321 10 0 00 035754 S54706: JUMPL AC+4,S54700 ;LOOP ON ERROR SWITCH
5768 035765 254 00 0 00 035773 JRST S54707
5769 035766 312 04 0 00 041476 S54705: CAME AC,[366400,,0]
5770 035767 003 04 0 00 054701 ER3 AC,54701
5771 035770 312 05 0 00 040060 CAME AC+1,[0,,0]
5772 035771 004 05 0 00 054701 ER4 AC+1,54701
5773 035772 254 00 0 00 035764 JRST S54706
5774 035773 254 00 0 00 035774 S54707: JRST .+1 ^
5775
5776 SDFMKL 550,200200,0,0,0,200400,0,0,0,177200,0,0,0,176400,0,0,0^
5777 S55000: DMOVE AC,[200200,,0
5778 035774 120 04 0 00 041274 0,,0]
5779 DFMP AC,[200400,,0
5780 035775 112 04 0 00 040731 0,,0]
5781 035776 332 00 0 00 030041 SKIPE KLFLG
5782 035777 254 00 0 00 036006 JRST S55005
5783 036000 312 04 0 00 041477 CAME AC,[177200,,0]
5784 036001 003 04 0 00 055001 ER3 AC,55001
5785 036002 312 05 0 00 040060 CAME AC+1,[0,,0]
5786 036003 004 05 0 00 055001 ER4 AC+1,55001
5787 036004 321 10 0 00 035774 S55006: JUMPL AC+4,S55000 ;LOOP ON ERROR SWITCH
5788 036005 254 00 0 00 036013 JRST S55007
5789 036006 312 04 0 00 040071 S55005: CAME AC,[176400,,0]
5790 036007 003 04 0 00 055001 ER3 AC,55001
5791 036010 312 05 0 00 040060 CAME AC+1,[0,,0]
5792 036011 004 05 0 00 055001 ER4 AC+1,55001
5793 036012 254 00 0 00 036004 JRST S55006
5794 036013 254 00 0 00 036014 S55007: JRST .+1 ^
5795
5796 SDFMKL 551,200100,0,0,0,200400,0,0,0,177100,0,0,0,175400,0,0,0^
5797 S55100: DMOVE AC,[200100,,0
5798 036014 120 04 0 00 041134 0,,0]
5799 DFMP AC,[200400,,0
5800 036015 112 04 0 00 040731 0,,0]
5801 036016 332 00 0 00 030041 SKIPE KLFLG
5802 036017 254 00 0 00 036026 JRST S55105
5803 036020 312 04 0 00 041500 CAME AC,[177100,,0]
5804 036021 003 04 0 00 055101 ER3 AC,55101
5805 036022 312 05 0 00 040060 CAME AC+1,[0,,0]
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 22-5
DSKCE1 MAC 21-Jun-78 10:46 DFMP TEST-DOUBLE FLOATING POINT MULTIPLY AND ROUND SEQ 0135
5806 036023 004 05 0 00 055101 ER4 AC+1,55101
5807 036024 321 10 0 00 036014 S55106: JUMPL AC+4,S55100 ;LOOP ON ERROR SWITCH
5808 036025 254 00 0 00 036033 JRST S55107
5809 036026 312 04 0 00 040074 S55105: CAME AC,[175400,,0]
5810 036027 003 04 0 00 055101 ER3 AC,55101
5811 036030 312 05 0 00 040060 CAME AC+1,[0,,0]
5812 036031 004 05 0 00 055101 ER4 AC+1,55101
5813 036032 254 00 0 00 036024 JRST S55106
5814 036033 254 00 0 00 036034 S55107: JRST .+1 ^
5815
5816 SDFMKL 552,200040,0,0,0,200400,0,0,0,177040,0,0,0,174400,0,0,0^
5817 S55200: DMOVE AC,[200040,,0
5818 036034 120 04 0 00 041136 0,,0]
5819 DFMP AC,[200400,,0
5820 036035 112 04 0 00 040731 0,,0]
5821 036036 332 00 0 00 030041 SKIPE KLFLG
5822 036037 254 00 0 00 036046 JRST S55205
5823 036040 312 04 0 00 041501 CAME AC,[177040,,0]
5824 036041 003 04 0 00 055201 ER3 AC,55201
5825 036042 312 05 0 00 040060 CAME AC+1,[0,,0]
5826 036043 004 05 0 00 055201 ER4 AC+1,55201
5827 036044 321 10 0 00 036034 S55206: JUMPL AC+4,S55200 ;LOOP ON ERROR SWITCH
5828 036045 254 00 0 00 036053 JRST S55207
5829 036046 312 04 0 00 040077 S55205: CAME AC,[174400,,0]
5830 036047 003 04 0 00 055201 ER3 AC,55201
5831 036050 312 05 0 00 040060 CAME AC+1,[0,,0]
5832 036051 004 05 0 00 055201 ER4 AC+1,55201
5833 036052 254 00 0 00 036044 JRST S55206
5834 036053 254 00 0 00 036054 S55207: JRST .+1 ^
5835
5836 SDFMKL 553,200020,0,0,0,200400,0,0,0,177020,0,0,0,173400,0,0,0^
5837 S55300: DMOVE AC,[200020,,0
5838 036054 120 04 0 00 041140 0,,0]
5839 DFMP AC,[200400,,0
5840 036055 112 04 0 00 040731 0,,0]
5841 036056 332 00 0 00 030041 SKIPE KLFLG
5842 036057 254 00 0 00 036066 JRST S55305
5843 036060 312 04 0 00 041502 CAME AC,[177020,,0]
5844 036061 003 04 0 00 055301 ER3 AC,55301
5845 036062 312 05 0 00 040060 CAME AC+1,[0,,0]
5846 036063 004 05 0 00 055301 ER4 AC+1,55301
5847 036064 321 10 0 00 036054 S55306: JUMPL AC+4,S55300 ;LOOP ON ERROR SWITCH
5848 036065 254 00 0 00 036073 JRST S55307
5849 036066 312 04 0 00 040102 S55305: CAME AC,[173400,,0]
5850 036067 003 04 0 00 055301 ER3 AC,55301
5851 036070 312 05 0 00 040060 CAME AC+1,[0,,0]
5852 036071 004 05 0 00 055301 ER4 AC+1,55301
5853 036072 254 00 0 00 036064 JRST S55306
5854 036073 254 00 0 00 036074 S55307: JRST .+1 ^
5855
5856 SDFMKL 554,200010,0,0,0,200400,0,0,0,177010,0,0,0,172400,0,0,0^
5857 S55400: DMOVE AC,[200010,,0
5858 036074 120 04 0 00 041221 0,,0]
5859 DFMP AC,[200400,,0
5860 036075 112 04 0 00 040731 0,,0]
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 22-6
DSKCE1 MAC 21-Jun-78 10:46 DFMP TEST-DOUBLE FLOATING POINT MULTIPLY AND ROUND SEQ 0136
5861 036076 332 00 0 00 030041 SKIPE KLFLG
5862 036077 254 00 0 00 036106 JRST S55405
5863 036100 312 04 0 00 041503 CAME AC,[177010,,0]
5864 036101 003 04 0 00 055401 ER3 AC,55401
5865 036102 312 05 0 00 040060 CAME AC+1,[0,,0]
5866 036103 004 05 0 00 055401 ER4 AC+1,55401
5867 036104 321 10 0 00 036074 S55406: JUMPL AC+4,S55400 ;LOOP ON ERROR SWITCH
5868 036105 254 00 0 00 036113 JRST S55407
5869 036106 312 04 0 00 040105 S55405: CAME AC,[172400,,0]
5870 036107 003 04 0 00 055401 ER3 AC,55401
5871 036110 312 05 0 00 040060 CAME AC+1,[0,,0]
5872 036111 004 05 0 00 055401 ER4 AC+1,55401
5873 036112 254 00 0 00 036104 JRST S55406
5874 036113 254 00 0 00 036114 S55407: JRST .+1 ^
5875
5876 SDFMKL 555,200004,0,0,0,200400,0,0,0,177004,0,0,0,171400,0,0,0^
5877 S55500: DMOVE AC,[200004,,0
5878 036114 120 04 0 00 041217 0,,0]
5879 DFMP AC,[200400,,0
5880 036115 112 04 0 00 040731 0,,0]
5881 036116 332 00 0 00 030041 SKIPE KLFLG
5882 036117 254 00 0 00 036126 JRST S55505
5883 036120 312 04 0 00 041504 CAME AC,[177004,,0]
5884 036121 003 04 0 00 055501 ER3 AC,55501
5885 036122 312 05 0 00 040060 CAME AC+1,[0,,0]
5886 036123 004 05 0 00 055501 ER4 AC+1,55501
5887 036124 321 10 0 00 036114 S55506: JUMPL AC+4,S55500 ;LOOP ON ERROR SWITCH
5888 036125 254 00 0 00 036133 JRST S55507
5889 036126 312 04 0 00 040110 S55505: CAME AC,[171400,,0]
5890 036127 003 04 0 00 055501 ER3 AC,55501
5891 036130 312 05 0 00 040060 CAME AC+1,[0,,0]
5892 036131 004 05 0 00 055501 ER4 AC+1,55501
5893 036132 254 00 0 00 036124 JRST S55506
5894 036133 254 00 0 00 036134 S55507: JRST .+1 ^
5895
5896 SDFMKL 556,200002,0,0,0,200400,0,0,0,177002,0,0,0,170400,0,0,0^
5897 S55600: DMOVE AC,[200002,,0
5898 036134 120 04 0 00 041215 0,,0]
5899 DFMP AC,[200400,,0
5900 036135 112 04 0 00 040731 0,,0]
5901 036136 332 00 0 00 030041 SKIPE KLFLG
5902 036137 254 00 0 00 036146 JRST S55605
5903 036140 312 04 0 00 041505 CAME AC,[177002,,0]
5904 036141 003 04 0 00 055601 ER3 AC,55601
5905 036142 312 05 0 00 040060 CAME AC+1,[0,,0]
5906 036143 004 05 0 00 055601 ER4 AC+1,55601
5907 036144 321 10 0 00 036134 S55606: JUMPL AC+4,S55600 ;LOOP ON ERROR SWITCH
5908 036145 254 00 0 00 036153 JRST S55607
5909 036146 312 04 0 00 040113 S55605: CAME AC,[170400,,0]
5910 036147 003 04 0 00 055601 ER3 AC,55601
5911 036150 312 05 0 00 040060 CAME AC+1,[0,,0]
5912 036151 004 05 0 00 055601 ER4 AC+1,55601
5913 036152 254 00 0 00 036144 JRST S55606
5914 036153 254 00 0 00 036154 S55607: JRST .+1 ^
5915
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 22-7
DSKCE1 MAC 21-Jun-78 10:46 DFMP TEST-DOUBLE FLOATING POINT MULTIPLY AND ROUND SEQ 0137
5916 SDFMKL 557,500700,0,0,0,200400,0,0,0,501700,0,0,0,503400,0,0,0^
5917 S55700: DMOVE AC,[500700,,0
5918 036154 120 04 0 00 041506 0,,0]
5919 DFMP AC,[200400,,0
5920 036155 112 04 0 00 040731 0,,0]
5921 036156 332 00 0 00 030041 SKIPE KLFLG
5922 036157 254 00 0 00 036166 JRST S55705
5923 036160 312 04 0 00 041451 CAME AC,[501700,,0]
5924 036161 003 04 0 00 055701 ER3 AC,55701
5925 036162 312 05 0 00 040060 CAME AC+1,[0,,0]
5926 036163 004 05 0 00 055701 ER4 AC+1,55701
5927 036164 321 10 0 00 036154 S55706: JUMPL AC+4,S55700 ;LOOP ON ERROR SWITCH
5928 036165 254 00 0 00 036173 JRST S55707
5929 036166 312 04 0 00 041510 S55705: CAME AC,[503400,,0]
5930 036167 003 04 0 00 055701 ER3 AC,55701
5931 036170 312 05 0 00 040060 CAME AC+1,[0,,0]
5932 036171 004 05 0 00 055701 ER4 AC+1,55701
5933 036172 254 00 0 00 036164 JRST S55706
5934 036173 254 00 0 00 036174 S55707: JRST .+1 ^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 23
DSKCE1 MAC 21-Jun-78 10:46 DFMP TEST-DOUBLE FLOATING POINT MULTIPLY AND ROUND SEQ 0138
5935
5936 SDFMKL 560,500770,0,0,0,200400,0,0,0,501770,0,0,0,506400,0,0,0^
5937 S56000: DMOVE AC,[500770,,0
5938 036174 120 04 0 00 041511 0,,0]
5939 DFMP AC,[200400,,0
5940 036175 112 04 0 00 040731 0,,0]
5941 036176 332 00 0 00 030041 SKIPE KLFLG
5942 036177 254 00 0 00 036206 JRST S56005
5943 036200 312 04 0 00 041513 CAME AC,[501770,,0]
5944 036201 003 04 0 00 056001 ER3 AC,56001
5945 036202 312 05 0 00 040060 CAME AC+1,[0,,0]
5946 036203 004 05 0 00 056001 ER4 AC+1,56001
5947 036204 321 10 0 00 036174 S56006: JUMPL AC+4,S56000 ;LOOP ON ERROR SWITCH
5948 036205 254 00 0 00 036213 JRST S56007
5949 036206 312 04 0 00 041514 S56005: CAME AC,[506400,,0]
5950 036207 003 04 0 00 056001 ER3 AC,56001
5951 036210 312 05 0 00 040060 CAME AC+1,[0,,0]
5952 036211 004 05 0 00 056001 ER4 AC+1,56001
5953 036212 254 00 0 00 036204 JRST S56006
5954 036213 254 00 0 00 036214 S56007: JRST .+1 ^
5955
5956 SDFM 561,200775,0,0,0,200775,0,0,0,200772,11000,0,0^
5957 S56100: DMOVE AC,[200775,,0
5958 036214 120 04 0 00 041515 0,,0]
5959 DFMP AC,[200775,,0
5960 036215 112 04 0 00 041515 0,,0]
5961 036216 312 04 0 00 041517 CAME AC,[200772,,11000]
5962 036217 003 04 0 00 056101 ER3 AC,56101
5963 036220 312 05 0 00 040060 CAME AC+1,[0,,0]
5964 036221 004 05 0 00 056101 ER4 AC+1,56101
5965 036222 321 10 0 00 036214 JUMPL AC+4,S56100 ;LOOP ON ERROR SWITCH^
5966
5967 SDFM 562,200774,0,0,0,200774,0,0,0,200770,20000,0,0^
5968 S56200: DMOVE AC,[200774,,0
5969 036223 120 04 0 00 041520 0,,0]
5970 DFMP AC,[200774,,0
5971 036224 112 04 0 00 041520 0,,0]
5972 036225 312 04 0 00 041522 CAME AC,[200770,,20000]
5973 036226 003 04 0 00 056201 ER3 AC,56201
5974 036227 312 05 0 00 040060 CAME AC+1,[0,,0]
5975 036230 004 05 0 00 056201 ER4 AC+1,56201
5976 036231 321 10 0 00 036223 JUMPL AC+4,S56200 ;LOOP ON ERROR SWITCH^
5977
5978 SDFM 563,200773,0,0,0,200773,0,0,0,200766,31000,0,0^
5979 S56300: DMOVE AC,[200773,,0
5980 036232 120 04 0 00 041523 0,,0]
5981 DFMP AC,[200773,,0
5982 036233 112 04 0 00 041523 0,,0]
5983 036234 312 04 0 00 041525 CAME AC,[200766,,31000]
5984 036235 003 04 0 00 056301 ER3 AC,56301
5985 036236 312 05 0 00 040060 CAME AC+1,[0,,0]
5986 036237 004 05 0 00 056301 ER4 AC+1,56301
5987 036240 321 10 0 00 036232 JUMPL AC+4,S56300 ;LOOP ON ERROR SWITCH^
5988
5989 SDFM 564,177477,0,0,0,200700,0,0,0,177427,100000,0,0^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 23-1
DSKCE1 MAC 21-Jun-78 10:46 DFMP TEST-DOUBLE FLOATING POINT MULTIPLY AND ROUND SEQ 0139
5990 S56400: DMOVE AC,[177477,,0
5991 036241 120 04 0 00 041526 0,,0]
5992 DFMP AC,[200700,,0
5993 036242 112 04 0 00 040741 0,,0]
5994 036243 312 04 0 00 041530 CAME AC,[177427,,100000]
5995 036244 003 04 0 00 056401 ER3 AC,56401
5996 036245 312 05 0 00 040060 CAME AC+1,[0,,0]
5997 036246 004 05 0 00 056401 ER4 AC+1,56401
5998 036247 321 10 0 00 036241 JUMPL AC+4,S56400 ;LOOP ON ERROR SWITCH^
5999
6000 SDFM 565,200777,-1,0,0,200777,-1,0,0,200777,-2,0,400^
6001 S56500: DMOVE AC,[200777,,-1
6002 036250 120 04 0 00 041226 0,,0]
6003 DFMP AC,[200777,,-1
6004 036251 112 04 0 00 041226 0,,0]
6005 036252 312 04 0 00 041440 CAME AC,[200777,,-2]
6006 036253 003 04 0 00 056501 ER3 AC,56501
6007 036254 312 05 0 00 040321 CAME AC+1,[0,,400]
6008 036255 004 05 0 00 056501 ER4 AC+1,56501
6009 036256 321 10 0 00 036250 JUMPL AC+4,S56500 ;LOOP ON ERROR SWITCH^
6010
6011 SDFM 566,200777,-2,0,0,200777,-1,0,0,200777,-3,0,1000^
6012 S56600: DMOVE AC,[200777,,-2
6013 036257 120 04 0 00 041440 0,,0]
6014 DFMP AC,[200777,,-1
6015 036260 112 04 0 00 041226 0,,0]
6016 036261 312 04 0 00 041443 CAME AC,[200777,,-3]
6017 036262 003 04 0 00 056601 ER3 AC,56601
6018 036263 312 05 0 00 040316 CAME AC+1,[0,,1000]
6019 036264 004 05 0 00 056601 ER4 AC+1,56601
6020 036265 321 10 0 00 036257 JUMPL AC+4,S56600 ;LOOP ON ERROR SWITCH^
6021
6022 SDFM 567,200777,-3,0,0,200777,-1,0,0,200777,-4,0,1400^
6023 S56700: DMOVE AC,[200777,,-3
6024 036266 120 04 0 00 041443 0,,0]
6025 DFMP AC,[200777,,-1
6026 036267 112 04 0 00 041226 0,,0]
6027 036270 312 04 0 00 041446 CAME AC,[200777,,-4]
6028 036271 003 04 0 00 056701 ER3 AC,56701
6029 036272 312 05 0 00 041531 CAME AC+1,[0,,1400]
6030 036273 004 05 0 00 056701 ER4 AC+1,56701
6031 036274 321 10 0 00 036266 JUMPL AC+4,S56700 ;LOOP ON ERROR SWITCH^
6032
6033 SDFM 570,200777,-4,0,0,200777,-1,0,0,200777,-5,0,2000^
6034 S57000: DMOVE AC,[200777,,-4
6035 036275 120 04 0 00 041446 0,,0]
6036 DFMP AC,[200777,,-1
6037 036276 112 04 0 00 041226 0,,0]
6038 036277 312 04 0 00 041532 CAME AC,[200777,,-5]
6039 036300 003 04 0 00 057001 ER3 AC,57001
6040 036301 312 05 0 00 040313 CAME AC+1,[0,,2000]
6041 036302 004 05 0 00 057001 ER4 AC+1,57001
6042 036303 321 10 0 00 036275 JUMPL AC+4,S57000 ;LOOP ON ERROR SWITCH^
6043
6044 SDFM 571,200777,-5,0,0,200777,-1,0,0,200777,-6,0,2400^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 23-2
DSKCE1 MAC 21-Jun-78 10:46 DFMP TEST-DOUBLE FLOATING POINT MULTIPLY AND ROUND SEQ 0140
6045 S57100: DMOVE AC,[200777,,-5
6046 036304 120 04 0 00 041532 0,,0]
6047 DFMP AC,[200777,,-1
6048 036305 112 04 0 00 041226 0,,0]
6049 036306 312 04 0 00 041534 CAME AC,[200777,,-6]
6050 036307 003 04 0 00 057101 ER3 AC,57101
6051 036310 312 05 0 00 041535 CAME AC+1,[0,,2400]
6052 036311 004 05 0 00 057101 ER4 AC+1,57101
6053 036312 321 10 0 00 036304 JUMPL AC+4,S57100 ;LOOP ON ERROR SWITCH^
6054
6055 SDFM 572,500000,-1,0,0,200777,0,0,0,500001,776777,400,0^
6056 S57200: DMOVE AC,[500000,,-1
6057 036313 120 04 0 00 041536 0,,0]
6058 DFMP AC,[200777,,0
6059 036314 112 04 0 00 041540 0,,0]
6060 036315 312 04 0 00 041542 CAME AC,[500001,,776777]
6061 036316 003 04 0 00 057201 ER3 AC,57201
6062 036317 312 05 0 00 040233 CAME AC+1,[400,,0]
6063 036320 004 05 0 00 057201 ER4 AC+1,57201
6064 036321 321 10 0 00 036313 JUMPL AC+4,S57200 ;LOOP ON ERROR SWITCH^
6065
6066 SDFM 573,500000,777770,0,0,200777,0,0,0,500001,776770,4000,0^
6067 S57300: DMOVE AC,[500000,,777770
6068 036322 120 04 0 00 041543 0,,0]
6069 DFMP AC,[200777,,0
6070 036323 112 04 0 00 041540 0,,0]
6071 036324 312 04 0 00 041545 CAME AC,[500001,,776770]
6072 036325 003 04 0 00 057301 ER3 AC,57301
6073 036326 312 05 0 00 040222 CAME AC+1,[4000,,0]
6074 036327 004 05 0 00 057301 ER4 AC+1,57301
6075 036330 321 10 0 00 036322 JUMPL AC+4,S57300 ;LOOP ON ERROR SWITCH^
6076
6077 SDFM 574,500000,-1,0,0,500000,-1,0,0,376776,1001,377000,400^
6078 S57400: DMOVE AC,[500000,,-1
6079 036331 120 04 0 00 041536 0,,0]
6080 DFMP AC,[500000,,-1
6081 036332 112 04 0 00 041536 0,,0]
6082 036333 312 04 0 00 041546 CAME AC,[376776,,1001]
6083 036334 003 04 0 00 057401 ER3 AC,57401
6084 036335 312 05 0 00 041547 CAME AC+1,[377000,,400]
6085 036336 004 05 0 00 057401 ER4 AC+1,57401
6086 036337 321 10 0 00 036331 JUMPL AC+4,S57400 ;LOOP ON ERROR SWITCH^
6087
6088 SDFM 575,500000,-2,0,0,500000,-2,0,0,376776,1003,376000,2000^
6089 S57500: DMOVE AC,[500000,,-2
6090 036340 120 04 0 00 041550 0,,0]
6091 DFMP AC,[500000,,-2
6092 036341 112 04 0 00 041550 0,,0]
6093 036342 312 04 0 00 041552 CAME AC,[376776,,1003]
6094 036343 003 04 0 00 057501 ER3 AC,57501
6095 036344 312 05 0 00 041553 CAME AC+1,[376000,,2000]
6096 036345 004 05 0 00 057501 ER4 AC+1,57501
6097 036346 321 10 0 00 036340 JUMPL AC+4,S57500 ;LOOP ON ERROR SWITCH^
6098
6099 SDFMKL 576,200777,-1,0,0,200000,2,0,0,177000,3,377777,776000,146777,-1,0,0^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 23-3
DSKCE1 MAC 21-Jun-78 10:46 DFMP TEST-DOUBLE FLOATING POINT MULTIPLY AND ROUND SEQ 0141
6100 S57600: DMOVE AC,[200777,,-1
6101 036347 120 04 0 00 041226 0,,0]
6102 DFMP AC,[200000,,2
6103 036350 112 04 0 00 041151 0,,0]
6104 036351 332 00 0 00 030041 SKIPE KLFLG
6105 036352 254 00 0 00 036361 JRST S57605
6106 036353 312 04 0 00 041554 CAME AC,[177000,,3]
6107 036354 003 04 0 00 057601 ER3 AC,57601
6108 036355 312 05 0 00 040427 CAME AC+1,[377777,,776000]
6109 036356 004 05 0 00 057601 ER4 AC+1,57601
6110 036357 321 10 0 00 036347 S57606: JUMPL AC+4,S57600 ;LOOP ON ERROR SWITCH
6111 036360 254 00 0 00 036366 JRST S57607
6112 036361 312 04 0 00 041555 S57605: CAME AC,[146777,,-1]
6113 036362 003 04 0 00 057601 ER3 AC,57601
6114 036363 312 05 0 00 040060 CAME AC+1,[0,,0]
6115 036364 004 05 0 00 057601 ER4 AC+1,57601
6116 036365 254 00 0 00 036357 JRST S57606
6117 036366 254 00 0 00 036367 S57607: JRST .+1 ^
6118
6119 SDFM 577,200700,0,0,0,200400,77,0,0,177700,156,100000,0^
6120 S57700: DMOVE AC,[200700,,0
6121 036367 120 04 0 00 040741 0,,0]
6122 DFMP AC,[200400,,77
6123 036370 112 04 0 00 041041 0,,0]
6124 036371 312 04 0 00 041556 CAME AC,[177700,,156]
6125 036372 003 04 0 00 057701 ER3 AC,57701
6126 036373 312 05 0 00 040206 CAME AC+1,[100000,,0]
6127 036374 004 05 0 00 057701 ER4 AC+1,57701
6128 036375 321 10 0 00 036367 JUMPL AC+4,S57700 ;LOOP ON ERROR SWITCH^
6129
6130 SDFM 600,200700,0,0,0,200400,76,0,0,177700,154,200000,0^
6131 S60000: DMOVE AC,[200700,,0
6132 036376 120 04 0 00 040741 0,,0]
6133 DFMP AC,[200400,,76
6134 036377 112 04 0 00 041557 0,,0]
6135 036400 312 04 0 00 041561 CAME AC,[177700,,154]
6136 036401 003 04 0 00 060001 ER3 AC,60001
6137 036402 312 05 0 00 040203 CAME AC+1,[200000,,0]
6138 036403 004 05 0 00 060001 ER4 AC+1,60001
6139 036404 321 10 0 00 036376 JUMPL AC+4,S60000 ;LOOP ON ERROR SWITCH^
6140
6141 SDFM 601,200700,0,0,0,200400,75,0,0,177700,152,300000,0^
6142 S60100: DMOVE AC,[200700,,0
6143 036405 120 04 0 00 040741 0,,0]
6144 DFMP AC,[200400,,75
6145 036406 112 04 0 00 041562 0,,0]
6146 036407 312 04 0 00 041564 CAME AC,[177700,,152]
6147 036410 003 04 0 00 060101 ER3 AC,60101
6148 036411 312 05 0 00 040563 CAME AC+1,[300000,,0]
6149 036412 004 05 0 00 060101 ER4 AC+1,60101
6150 036413 321 10 0 00 036405 JUMPL AC+4,S60100 ;LOOP ON ERROR SWITCH^
6151
6152 SDFM 602,577400,0,0,0,600400,0,0,0,176400,0,0,0^
6153 S60200: DMOVE AC,[577400,,0
6154 036414 120 04 0 00 040061 0,,0]
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 23-4
DSKCE1 MAC 21-Jun-78 10:46 DFMP TEST-DOUBLE FLOATING POINT MULTIPLY AND ROUND SEQ 0142
6155 DFMP AC,[600400,,0
6156 036415 112 04 0 00 040725 0,,0]
6157 036416 312 04 0 00 040071 CAME AC,[176400,,0]
6158 036417 003 04 0 00 060201 ER3 AC,60201
6159 036420 312 05 0 00 040060 CAME AC+1,[0,,0]
6160 036421 004 05 0 00 060201 ER4 AC+1,60201
6161 036422 321 10 0 00 036414 JUMPL AC+4,S60200 ;LOOP ON ERROR SWITCH^
6162
6163 SDFM 603,600400,77,0,0,177660,0,0,0,602120,152,120000,0^
6164 S60300: DMOVE AC,[600400,,77
6165 036423 120 04 0 00 041565 0,,0]
6166 DFMP AC,[177660,,0
6167 036424 112 04 0 00 041567 0,,0]
6168 036425 312 04 0 00 041571 CAME AC,[602120,,152]
6169 036426 003 04 0 00 060301 ER3 AC,60301
6170 036427 312 05 0 00 041572 CAME AC+1,[120000,,0]
6171 036430 004 05 0 00 060301 ER4 AC+1,60301
6172 036431 321 10 0 00 036423 JUMPL AC+4,S60300 ;LOOP ON ERROR SWITCH^
6173
6174 SDFM 604,600400,76,0,0,177600,0,0,0,602200,135,0,0^
6175 S60400: DMOVE AC,[600400,,76
6176 036432 120 04 0 00 041573 0,,0]
6177 DFMP AC,[177600,,0
6178 036433 112 04 0 00 041575 0,,0]
6179 036434 312 04 0 00 041577 CAME AC,[602200,,135]
6180 036435 003 04 0 00 060401 ER3 AC,60401
6181 036436 312 05 0 00 040060 CAME AC+1,[0,,0]
6182 036437 004 05 0 00 060401 ER4 AC+1,60401
6183 036440 321 10 0 00 036432 JUMPL AC+4,S60400 ;LOOP ON ERROR SWITCH^
6184
6185 SDFM 605,600400,0,0,0,576400,0,0,0,177400,0,0,0^
6186 S60500: DMOVE AC,[600400,,0
6187 036441 120 04 0 00 040725 0,,0]
6188 DFMP AC,[576400,,0
6189 036442 112 04 0 00 041036 0,,0]
6190 036443 312 04 0 00 040066 CAME AC,[177400,,0]
6191 036444 003 04 0 00 060501 ER3 AC,60501
6192 036445 312 05 0 00 040060 CAME AC+1,[0,,0]
6193 036446 004 05 0 00 060501 ER4 AC+1,60501
6194 036447 321 10 0 00 036441 JUMPL AC+4,S60500 ;LOOP ON ERROR SWITCH^
6195
6196 SDFM 606,600400,0,0,0,575400,0,0,0,200400,0,0,0^
6197 S60600: DMOVE AC,[600400,,0
6198 036450 120 04 0 00 040725 0,,0]
6199 DFMP AC,[575400,,0
6200 036451 112 04 0 00 041435 0,,0]
6201 036452 312 04 0 00 040063 CAME AC,[200400,,0]
6202 036453 003 04 0 00 060601 ER3 AC,60601
6203 036454 312 05 0 00 040060 CAME AC+1,[0,,0]
6204 036455 004 05 0 00 060601 ER4 AC+1,60601
6205 036456 321 10 0 00 036450 JUMPL AC+4,S60600 ;LOOP ON ERROR SWITCH^
6206
6207 SDFM 607,400000,1,0,0,201400,0,0,0,400000,1,0,0^
6208 S60700: DMOVE AC,[400000,,1
6209 036457 120 04 0 00 041600 0,,0]
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 23-5
DSKCE1 MAC 21-Jun-78 10:46 DFMP TEST-DOUBLE FLOATING POINT MULTIPLY AND ROUND SEQ 0143
6210 DFMP AC,[201400,,0
6211 036460 112 04 0 00 040057 0,,0]
6212 036461 312 04 0 00 041600 CAME AC,[400000,,1]
6213 036462 003 04 0 00 060701 ER3 AC,60701
6214 036463 312 05 0 00 040060 CAME AC+1,[0,,0]
6215 036464 004 05 0 00 060701 ER4 AC+1,60701
6216 036465 321 10 0 00 036457 JUMPL AC+4,S60700 ;LOOP ON ERROR SWITCH^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 24
DSKCE1 MAC 21-Jun-78 10:46 DFMP TEST-DOUBLE FLOATING POINT MULTIPLY AND ROUND SEQ 0144
6217 ;TEST AROV, FOV AND FXU FLAGS - DFMP
6218
6219 000004 AC=4
6220 SAVEAC (1,1)^
6221 036466 201 06 0 00 036466 MOVEI AC+2,.
6222 036467 202 06 0 00 030051 MOVEM AC+2,TESTPC ;SETUP SUBTEST PC
6223 036470 201 06 0 00 000006 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
6224 036471 202 06 0 00 042157 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
6225
6226 036472 254 02 1 00 041602 S61000: JRSTF @[.+1] ;CLEAR ALL FLAGS
6227 DMOVE AC,[377400,,0
6228 036473 120 04 0 00 041026 0,,0]
6229 DFMP AC,[201777,,-1
6230 036474 112 04 0 00 041603 -1,,-1] ;EXPECT AROV,FOV,FXU=0,0,0
6231 036475 265 03 0 00 036476 JSP AC-1,.+1 ;SAVE FLAGS
6232 036476 312 04 0 00 040357 CAME AC,[377777,,-1]
6233 036477 003 04 0 00 061001 ER3 AC,61001 ;C(AC) FAILED
6234 036500 312 05 0 00 040357 CAME AC+1,[377777,,-1]
6235 036501 004 05 0 00 061001 ER4 AC+1,61001 ;C(AC+1) FAILED
6236 036502 255 10 0 00 036504 JOV .+2
6237 036503 254 00 0 00 036505 JRST .+2
6238 036504 013 03 0 00 061001 ER13 AC-1,61001 ;AROV WAS SET
6239 036505 255 01 0 00 036507 JFOV .+2
6240 036506 254 00 0 00 036510 JRST .+2
6241 036507 013 03 0 00 061001 ER13 AC-1,61001 ;FOV WAS SET
6242 036510 603 03 0 00 000100 TLNE AC-1,FXU
6243 036511 013 03 0 00 061001 ER13 AC-1,61001 ;FXU WAS SET
6244 036512 321 10 0 00 036472 JUMPL AC+4,S61000 ;LOOP ON ERROR SWITCH
6245
6246 036513 254 02 1 00 041605 S61100: JRSTF @[.+1] ;CLEAR ALL FLAGS
6247 DMOVE AC,[377400,,0
6248 036514 120 04 0 00 041026 0,,0]
6249 DFMP AC,[202400,,0
6250 036515 112 04 0 00 040744 0,,0] ;EXPECT AROV,FOV,FXU=1,1,0
6251 036516 265 03 0 00 036517 JSP AC-1,.+1 ;SAVE FLAGS
6252 036517 312 04 0 00 040233 CAME AC,[400,,0]
6253 036520 003 04 0 00 061101 ER3 AC,61101 ;C(AC) FAILED
6254 036521 312 05 0 00 040060 CAME AC+1,[0,,0]
6255 036522 004 05 0 00 061101 ER4 AC+1,61101 ;C(AC+1) FAILED
6256 036523 255 10 0 00 036525 JOV .+2
6257 036524 013 03 0 00 061101 ER13 AC-1,61101 ;AROV WAS CLEAR
6258 036525 255 01 0 00 036527 JFOV .+2
6259 036526 013 03 0 00 061101 ER13 AC-1,61101 ;FOV WAS CLEAR
6260 036527 603 03 0 00 000100 TLNE AC-1,FXU
6261 036530 013 03 0 00 061101 ER13 AC-1,61101 ;FXU WAS SET
6262 036531 321 10 0 00 036513 JUMPL AC+4,S61100 ;LOOP ON ERROR SWITCH
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 25
DSKCE1 MAC 21-Jun-78 10:46 DFMP TEST-DOUBLE FLOATING POINT MULTIPLY AND ROUND SEQ 0145
6263 036532 254 02 1 00 041606 S61200: JRSTF @[.+1] ;CLEAR ALL FLAGS
6264 DMOVE AC,[1400,,0
6265 036533 120 04 0 00 041607 0,,0]
6266 DFMP AC,[200400,,0
6267 036534 112 04 0 00 040731 0,,0] ;EXPECT AROV,FOV,FXU=0,0,0
6268 036535 265 03 0 00 036536 JSP AC-1,.+1 ;SAVE FLAGS
6269 036536 312 04 0 00 040233 CAME AC,[400,,0]
6270 036537 003 04 0 00 061201 ER3 AC,61201 ;C(AC) FAILED
6271 036540 312 05 0 00 040060 CAME AC+1,[0,,0]
6272 036541 004 05 0 00 061201 ER4 AC+1,61201 ;C(AC+1) FAILED
6273 036542 255 10 0 00 036544 JOV .+2
6274 036543 254 00 0 00 036545 JRST .+2
6275 036544 013 03 0 00 061201 ER13 AC-1,61201 ;AROV WAS SET
6276 036545 255 01 0 00 036547 JFOV .+2
6277 036546 254 00 0 00 036550 JRST .+2
6278 036547 013 03 0 00 061201 ER13 AC-1,61201 ;FOV WAS SET
6279 036550 603 03 0 00 000100 TLNE AC-1,FXU
6280 036551 013 03 0 00 061201 ER13 AC-1,61201 ;FXU WAS SET
6281 036552 321 10 0 00 036532 JUMPL AC+4,S61200 ;LOOP ON ERROR SWITCH
6282
6283 036553 254 02 1 00 041611 S61300: JRSTF @[.+1] ;CLEAR ALL FLAGS
6284 DMOVE AC,[777,,-1
6285 036554 120 04 0 00 041406 -1,,-1]
6286 DFMP AC,[200400,,0
6287 036555 112 04 0 00 040731 0,,0] ;EXPECT AROV,FOV,FXU=1,1,1
6288 036556 265 03 0 00 036557 JSP AC-1,.+1 ;SAVE FLAGS
6289 036557 312 04 0 00 040357 CAME AC,[377777,,-1]
6290 036560 003 04 0 00 061301 ER3 AC,61301 ;C(AC) FAILED
6291 036561 312 05 0 00 040357 CAME AC+1,[377777,,-1]
6292 036562 004 05 0 00 061301 ER4 AC+1,61301 ;C(AC+1) FAILED
6293 036563 255 10 0 00 036565 JOV .+2
6294 036564 013 03 0 00 061301 ER13 AC-1,61301 ;AROV WAS CLEAR
6295 036565 255 01 0 00 036567 JFOV .+2
6296 036566 013 03 0 00 061301 ER13 AC-1,61301 ;FOV WAS CLEAR
6297 036567 607 03 0 00 000100 TLNN AC-1,FXU
6298 036570 013 03 0 00 061301 ER13 AC-1,61301 ;FXU WAS CLEAR
6299 036571 321 10 0 00 036553 JUMPL AC+4,S61300 ;LOOP ON ERROR SWITCH
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 26
DSKCE1 MAC 21-Jun-78 10:46 DFMP TEST-DOUBLE FLOATING POINT MULTIPLY AND ROUND SEQ 0146
6300 036572 254 02 1 00 041612 S61400: JRSTF @[.+1] ;CLEAR ALL FLAGS
6301 DMOVE AC,[400400,,0
6302 036573 120 04 0 00 041357 0,,0]
6303 DFMP AC,[576000,,00
6304 036574 112 04 0 00 041613 0,,1] ;EXPECT AROV,FOV,FXU=0,0,0
6305 036575 265 03 0 00 036576 JSP AC-1,.+1 ;SAVE FLAGS
6306 036576 312 04 0 00 040357 CAME AC,[377777,,-1]
6307 036577 003 04 0 00 061401 ER3 AC,61401 ;C(AC) FAILED
6308 036600 312 05 0 00 040357 CAME AC+1,[377777,,-1]
6309 036601 004 05 0 00 061401 ER4 AC+1,61401 ;C(AC+1) FAILED
6310 036602 255 10 0 00 036604 JOV .+2
6311 036603 254 00 0 00 036605 JRST .+2
6312 036604 013 03 0 00 061401 ER13 AC-1,61401 ;AROV WAS SET
6313 036605 255 01 0 00 036607 JFOV .+2
6314 036606 254 00 0 00 036610 JRST .+2
6315 036607 013 03 0 00 061401 ER13 AC-1,61401 ;FOV WAS SET
6316 036610 603 03 0 00 000100 TLNE AC-1,FXU
6317 036611 013 03 0 00 061401 ER13 AC-1,61401 ;FXU WAS SET
6318 036612 321 10 0 00 036572 JUMPL AC+4,S61400 ;LOOP ON ERROR SWITCH
6319
6320 036613 254 02 1 00 041615 S61500: JRSTF @[.+1] ;CLEAR ALL FLAGS
6321 DMOVE AC,[400400,,0
6322 036614 120 04 0 00 041357 0,,0]
6323 DFMP AC,[575400,,0
6324 036615 112 04 0 00 041435 0,,0] ;EXPECT AROV,FOV,FXU=1,1,0
6325 036616 265 03 0 00 036617 JSP AC-1,.+1 ;SAVE FLAGS
6326 036617 312 04 0 00 040233 CAME AC,[400,,0]
6327 036620 003 04 0 00 061501 ER3 AC,61501 ;C(AC) FAILED
6328 036621 312 05 0 00 040060 CAME AC+1,[0,,0]
6329 036622 004 05 0 00 061501 ER4 AC+1,61501 ;C(AC+1) FAILED
6330 036623 255 10 0 00 036625 JOV .+2
6331 036624 013 03 0 00 061501 ER13 AC-1,61501 ;AROV WAS CLEAR
6332 036625 255 01 0 00 036627 JFOV .+2
6333 036626 013 03 0 00 061501 ER13 AC-1,61501 ;FOV WAS CLEAR
6334 036627 603 03 0 00 000100 TLNE AC-1,FXU
6335 036630 013 03 0 00 061501 ER13 AC-1,61501 ;FXU WAS SET
6336 036631 321 10 0 00 036613 JUMPL AC+4,S61500 ;LOOP ON ERROR SWITCH
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 27
DSKCE1 MAC 21-Jun-78 10:46 DFMP TEST-DOUBLE FLOATING POINT MULTIPLY AND ROUND SEQ 0147
6337 036632 254 02 1 00 041616 S61600: JRSTF @[.+1] ;CLEAR ALL FLAGS
6338 DMOVE AC,[776400,,0
6339 036633 120 04 0 00 041617 0,,0]
6340 DFMP AC,[577400,,0
6341 036634 112 04 0 00 040061 0,,0] ;EXPECT AROV,FOV,FXU=0,0,0
6342 036635 265 03 0 00 036636 JSP AC-1,.+1 ;SAVE FLAGS
6343 036636 312 04 0 00 040233 CAME AC,[400,,0]
6344 036637 003 04 0 00 061601 ER3 AC,61601 ;C(AC) FAILED
6345 036640 312 05 0 00 040060 CAME AC+1,[0,,0]
6346 036641 004 05 0 00 061601 ER4 AC+1,61601 ;C(AC+1) FAILED
6347 036642 255 10 0 00 036644 JOV .+2
6348 036643 254 00 0 00 036645 JRST .+2
6349 036644 013 03 0 00 061601 ER13 AC-1,61601 ;AROV WAS SET
6350 036645 255 01 0 00 036647 JFOV .+2
6351 036646 254 00 0 00 036650 JRST .+2
6352 036647 013 03 0 00 061601 ER13 AC-1,61601 ;FOV WAS SET
6353 036650 603 03 0 00 000100 TLNE AC-1,FXU
6354 036651 013 03 0 00 061601 ER13 AC-1,61601 ;FXU WAS SET
6355 036652 321 10 0 00 036632 JUMPL AC+4,S61600 ;LOOP ON ERROR SWITCH
6356
6357 036653 254 02 1 00 041621 S61700: JRSTF @[.+1] ;CLEAR ALL FLAGS
6358 DMOVE AC,[777000,,0
6359 036654 120 04 0 00 041425 0,,1]
6360 DFMP AC,[577400,,0
6361 036655 112 04 0 00 040061 0,,0] ;EXPECT AROV,FOV,FXU=1,1,1
6362 036656 265 03 0 00 036657 JSP AC-1,.+1 ;SAVE FLAGS
6363 036657 312 04 0 00 040357 CAME AC,[377777,,-1]
6364 036660 003 04 0 00 061701 ER3 AC,61701 ;C(AC) FAILED
6365 036661 312 05 0 00 040357 CAME AC+1,[377777,,-1]
6366 036662 004 05 0 00 061701 ER4 AC+1,61701 ;C(AC+1) FAILED
6367 036663 255 10 0 00 036665 JOV .+2
6368 036664 013 03 0 00 061701 ER13 AC-1,61701 ;AROV WAS CLEAR
6369 036665 255 01 0 00 036667 JFOV .+2
6370 036666 013 03 0 00 061701 ER13 AC-1,61701 ;FOV WAS CLEAR
6371 036667 607 03 0 00 000100 TLNN AC-1,FXU
6372 036670 013 03 0 00 061701 ER13 AC-1,61701 ;FXU WAS CLEAR
6373 036671 321 10 0 00 036653 JUMPL AC+4,S61700 ;LOOP ON ERROR SWITCH
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 28
DSKCE1 MAC 21-Jun-78 10:46 DFDV TEST-DOUBLE FLOATING POINT DIVIDE SEQ 0148
6374 SUBTTL DFDV TEST-DOUBLE FLOATING POINT DIVIDE
6375
6376 000004 AC=4
6377 SAVEAC (1,1)^
6378 036672 201 06 0 00 036672 MOVEI AC+2,.
6379 036673 202 06 0 00 030051 MOVEM AC+2,TESTPC ;SETUP SUBTEST PC
6380 036674 201 06 0 00 000006 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
6381 036675 202 06 0 00 042157 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
6382 036676 254 02 1 00 041622 JRSTF @[.+1] ;CLEAR ALL FLAGS
6383
6384 ;CHECK THAT DFDV AC,E DOES NOT ALTER C(E) OR C(E+1)
6385 S70100: DMOVE AC,[200777,,-1
6386 036677 120 04 0 00 040710 -1,,-1]
6387 DMOVE AC+2,[200400,,0
6388 036700 120 06 0 00 041623 400000,,-1]
6389 036701 113 04 0 00 000006 DFDV AC,AC+2
6390 036702 312 06 0 00 040063 CAME AC+2,[200400,,0]
6391 036703 005 06 0 00 070101 ER5 AC+2,70101 ;C(E) WAS ALTERED
6392 036704 312 07 0 00 040713 CAME AC+3,[400000,,-1]
6393 036705 006 07 0 00 070101 ER6 AC+3,70101 ;C(E+1) WAS ALTERED
6394 036706 321 10 0 00 036677 JUMPL AC+4,S70100 ;LOOP ON ERROR SWITCH
6395
6396 SDFD 702,200400,0,0,0,200400,0,0,0,201400,0,0,0^
6397 S70200: DMOVE AC,[200400,,0
6398 036707 120 04 0 00 040731 0,,0]
6399 DFDV AC,[200400,,0
6400 036710 113 04 0 00 040731 0,,0]
6401 036711 312 04 0 00 040057 CAME AC,[201400,,0]
6402 036712 003 04 0 00 070201 ER3 AC,70201
6403 036713 312 05 0 00 040060 CAME AC+1,[0,,0]
6404 036714 004 05 0 00 070201 ER4 AC+1,70201
6405 036715 321 10 0 00 036707 JUMPL AC+4,S70200 ;LOOP ON ERROR SWITCH^
6406
6407 SDFD 703,201400,0,0,0,201400,0,0,0,201400,0,0,0^
6408 S70300: DMOVE AC,[201400,,0
6409 036716 120 04 0 00 040057 0,,0]
6410 DFDV AC,[201400,,0
6411 036717 113 04 0 00 040057 0,,0]
6412 036720 312 04 0 00 040057 CAME AC,[201400,,0]
6413 036721 003 04 0 00 070301 ER3 AC,70301
6414 036722 312 05 0 00 040060 CAME AC+1,[0,,0]
6415 036723 004 05 0 00 070301 ER4 AC+1,70301
6416 036724 321 10 0 00 036716 JUMPL AC+4,S70300 ;LOOP ON ERROR SWITCH^
6417
6418 SDFD 704,202400,0,0,0,202400,0,0,0,201400,0,0,0^
6419 S70400: DMOVE AC,[202400,,0
6420 036725 120 04 0 00 040744 0,,0]
6421 DFDV AC,[202400,,0
6422 036726 113 04 0 00 040744 0,,0]
6423 036727 312 04 0 00 040057 CAME AC,[201400,,0]
6424 036730 003 04 0 00 070401 ER3 AC,70401
6425 036731 312 05 0 00 040060 CAME AC+1,[0,,0]
6426 036732 004 05 0 00 070401 ER4 AC+1,70401
6427 036733 321 10 0 00 036725 JUMPL AC+4,S70400 ;LOOP ON ERROR SWITCH^
6428
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 28-1
DSKCE1 MAC 21-Jun-78 10:46 DFDV TEST-DOUBLE FLOATING POINT DIVIDE SEQ 0149
6429 SDFD 705,201400,0,0,0,200400,0,0,0,202400,0,0,0^
6430 S70500: DMOVE AC,[201400,,0
6431 036734 120 04 0 00 040057 0,,0]
6432 DFDV AC,[200400,,0
6433 036735 113 04 0 00 040731 0,,0]
6434 036736 312 04 0 00 040744 CAME AC,[202400,,0]
6435 036737 003 04 0 00 070501 ER3 AC,70501
6436 036740 312 05 0 00 040060 CAME AC+1,[0,,0]
6437 036741 004 05 0 00 070501 ER4 AC+1,70501
6438 036742 321 10 0 00 036734 JUMPL AC+4,S70500 ;LOOP ON ERROR SWITCH^
6439
6440 SDFD 706,202400,0,0,0,202400,0,0,0,201400,0,0,0^
6441 S70600: DMOVE AC,[202400,,0
6442 036743 120 04 0 00 040744 0,,0]
6443 DFDV AC,[202400,,0
6444 036744 113 04 0 00 040744 0,,0]
6445 036745 312 04 0 00 040057 CAME AC,[201400,,0]
6446 036746 003 04 0 00 070601 ER3 AC,70601
6447 036747 312 05 0 00 040060 CAME AC+1,[0,,0]
6448 036750 004 05 0 00 070601 ER4 AC+1,70601
6449 036751 321 10 0 00 036743 JUMPL AC+4,S70600 ;LOOP ON ERROR SWITCH^
6450
6451 SDFD 707,203400,0,0,0,200400,0,0,0,204400,0,0,0^
6452 S70700: DMOVE AC,[203400,,0
6453 036752 120 04 0 00 041230 0,,0]
6454 DFDV AC,[200400,,0
6455 036753 113 04 0 00 040731 0,,0]
6456 036754 312 04 0 00 040747 CAME AC,[204400,,0]
6457 036755 003 04 0 00 070701 ER3 AC,70701
6458 036756 312 05 0 00 040060 CAME AC+1,[0,,0]
6459 036757 004 05 0 00 070701 ER4 AC+1,70701
6460 036760 321 10 0 00 036752 JUMPL AC+4,S70700 ;LOOP ON ERROR SWITCH^
6461
6462 SDFD 710,200600,0,0,0,200400,0,0,0,201600,0,0,0^
6463 S71000: DMOVE AC,[200600,,0
6464 036761 120 04 0 00 040064 0,,0]
6465 DFDV AC,[200400,,0
6466 036762 113 04 0 00 040731 0,,0]
6467 036763 312 04 0 00 040743 CAME AC,[201600,,0]
6468 036764 003 04 0 00 071001 ER3 AC,71001
6469 036765 312 05 0 00 040060 CAME AC+1,[0,,0]
6470 036766 004 05 0 00 071001 ER4 AC+1,71001
6471 036767 321 10 0 00 036761 JUMPL AC+4,S71000 ;LOOP ON ERROR SWITCH^
6472
6473 SDFD 711,200700,0,0,0,200400,0,0,0,201700,0,0,0^
6474 S71100: DMOVE AC,[200700,,0
6475 036770 120 04 0 00 040741 0,,0]
6476 DFDV AC,[200400,,0
6477 036771 113 04 0 00 040731 0,,0]
6478 036772 312 04 0 00 041031 CAME AC,[201700,,0]
6479 036773 003 04 0 00 071101 ER3 AC,71101
6480 036774 312 05 0 00 040060 CAME AC+1,[0,,0]
6481 036775 004 05 0 00 071101 ER4 AC+1,71101
6482 036776 321 10 0 00 036770 JUMPL AC+4,S71100 ;LOOP ON ERROR SWITCH^
6483
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 28-2
DSKCE1 MAC 21-Jun-78 10:46 DFDV TEST-DOUBLE FLOATING POINT DIVIDE SEQ 0150
6484 SDFD 712,200740,0,0,0,200400,0,0,0,201740,0,0,0^
6485 S71200: DMOVE AC,[200740,,0
6486 036777 120 04 0 00 041625 0,,0]
6487 DFDV AC,[200400,,0
6488 037000 113 04 0 00 040731 0,,0]
6489 037001 312 04 0 00 041627 CAME AC,[201740,,0]
6490 037002 003 04 0 00 071201 ER3 AC,71201
6491 037003 312 05 0 00 040060 CAME AC+1,[0,,0]
6492 037004 004 05 0 00 071201 ER4 AC+1,71201
6493 037005 321 10 0 00 036777 JUMPL AC+4,S71200 ;LOOP ON ERROR SWITCH^
6494
6495 SDFD 713,200400,0,0,0,577400,0,0,0,576400,0,0,0^
6496 S71300: DMOVE AC,[200400,,0
6497 037006 120 04 0 00 040731 0,,0]
6498 DFDV AC,[577400,,0
6499 037007 113 04 0 00 040061 0,,0]
6500 037010 312 04 0 00 040764 CAME AC,[576400,,0]
6501 037011 003 04 0 00 071301 ER3 AC,71301
6502 037012 312 05 0 00 040060 CAME AC+1,[0,,0]
6503 037013 004 05 0 00 071301 ER4 AC+1,71301
6504 037014 321 10 0 00 037006 JUMPL AC+4,S71300 ;LOOP ON ERROR SWITCH^
6505
6506 SDFD 714,200600,0,0,0,577400,0,0,0,576200,0,0,0^
6507 S71400: DMOVE AC,[200600,,0
6508 037015 120 04 0 00 040064 0,,0]
6509 DFDV AC,[577400,,0
6510 037016 113 04 0 00 040061 0,,0]
6511 037017 312 04 0 00 041142 CAME AC,[576200,,0]
6512 037020 003 04 0 00 071401 ER3 AC,71401
6513 037021 312 05 0 00 040060 CAME AC+1,[0,,0]
6514 037022 004 05 0 00 071401 ER4 AC+1,71401
6515 037023 321 10 0 00 037015 JUMPL AC+4,S71400 ;LOOP ON ERROR SWITCH^
6516
6517 SDFD 715,177400,0,0,0,204400,0,0,0,174400,0,0,0^
6518 S71500: DMOVE AC,[177400,,0
6519 037024 120 04 0 00 040727 0,,0]
6520 DFDV AC,[204400,,0
6521 037025 113 04 0 00 040747 0,,0]
6522 037026 312 04 0 00 040077 CAME AC,[174400,,0]
6523 037027 003 04 0 00 071501 ER3 AC,71501
6524 037030 312 05 0 00 040060 CAME AC+1,[0,,0]
6525 037031 004 05 0 00 071501 ER4 AC+1,71501
6526 037032 321 10 0 00 037024 JUMPL AC+4,S71500 ;LOOP ON ERROR SWITCH^
6527
6528 SDFD 716,576400,0,0,0,200600,0,0,0,576252,525252,252525,252525^
6529 S71600: DMOVE AC,[576400,,0
6530 037033 120 04 0 00 041036 0,,0]
6531 DFDV AC,[200600,,0
6532 037034 113 04 0 00 040064 0,,0]
6533 037035 312 04 0 00 041630 CAME AC,[576252,,525252]
6534 037036 003 04 0 00 071601 ER3 AC,71601
6535 037037 312 05 0 00 041631 CAME AC+1,[252525,,252525]
6536 037040 004 05 0 00 071601 ER4 AC+1,71601
6537 037041 321 10 0 00 037033 JUMPL AC+4,S71600 ;LOOP ON ERROR SWITCH^
6538
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 28-3
DSKCE1 MAC 21-Jun-78 10:46 DFDV TEST-DOUBLE FLOATING POINT DIVIDE SEQ 0151
6539 SDFD 717,600600,0,0,0,577400,0,0,0,177400,0,0,0^
6540 S71700: DMOVE AC,[600600,,0
6541 037042 120 04 0 00 041632 0,,0]
6542 DFDV AC,[577400,,0
6543 037043 113 04 0 00 040061 0,,0]
6544 037044 312 04 0 00 040066 CAME AC,[177400,,0]
6545 037045 003 04 0 00 071701 ER3 AC,71701
6546 037046 312 05 0 00 040060 CAME AC+1,[0,,0]
6547 037047 004 05 0 00 071701 ER4 AC+1,71701
6548 037050 321 10 0 00 037042 JUMPL AC+4,S71700 ;LOOP ON ERROR SWITCH^
6549
6550 SDFD 720,600400,0,0,0,577400,0,0,0,200400,0,0,0^
6551 S72000: DMOVE AC,[600400,,0
6552 037051 120 04 0 00 040725 0,,0]
6553 DFDV AC,[577400,,0
6554 037052 113 04 0 00 040061 0,,0]
6555 037053 312 04 0 00 040063 CAME AC,[200400,,0]
6556 037054 003 04 0 00 072001 ER3 AC,72001
6557 037055 312 05 0 00 040060 CAME AC+1,[0,,0]
6558 037056 004 05 0 00 072001 ER4 AC+1,72001
6559 037057 321 10 0 00 037051 JUMPL AC+4,S72000 ;LOOP ON ERROR SWITCH^
6560
6561 SDFD 721,377400,-1,0,0,577400,-1,0,0,777375,773771,373773,776004^
6562 S72100: DMOVE AC,[377400,,-1
6563 037060 120 04 0 00 041634 0,,0]
6564 DFDV AC,[577400,,-1
6565 037061 113 04 0 00 041636 0,,0]
6566 037062 312 04 0 00 041640 CAME AC,[777375,,773771]
6567 037063 003 04 0 00 072101 ER3 AC,72101
6568 037064 312 05 0 00 041641 CAME AC+1,[373773,,776004]
6569 037065 004 05 0 00 072101 ER4 AC+1,72101
6570 037066 321 10 0 00 037060 JUMPL AC+4,S72100 ;LOOP ON ERROR SWITCH^
6571
6572 SDFD 722,201400,0,0,0,0,0,0,0,201400,0,0,0^
6573 S72200: DMOVE AC,[201400,,0
6574 037067 120 04 0 00 040057 0,,0]
6575 DFDV AC,[0,,0
6576 037070 113 04 0 00 040355 0,,0]
6577 037071 312 04 0 00 040057 CAME AC,[201400,,0]
6578 037072 003 04 0 00 072201 ER3 AC,72201
6579 037073 312 05 0 00 040060 CAME AC+1,[0,,0]
6580 037074 004 05 0 00 072201 ER4 AC+1,72201
6581 037075 321 10 0 00 037067 JUMPL AC+4,S72200 ;LOOP ON ERROR SWITCH^
6582
6583 SDFD 723,377400,0,0,0,400,0,0,0,200400,0,0,0^
6584 S72300: DMOVE AC,[377400,,0
6585 037076 120 04 0 00 041026 0,,0]
6586 DFDV AC,[400,,0
6587 037077 113 04 0 00 040716 0,,0]
6588 037100 312 04 0 00 040063 CAME AC,[200400,,0]
6589 037101 003 04 0 00 072301 ER3 AC,72301
6590 037102 312 05 0 00 040060 CAME AC+1,[0,,0]
6591 037103 004 05 0 00 072301 ER4 AC+1,72301
6592 037104 321 10 0 00 037076 JUMPL AC+4,S72300 ;LOOP ON ERROR SWITCH^
6593
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 28-4
DSKCE1 MAC 21-Jun-78 10:46 DFDV TEST-DOUBLE FLOATING POINT DIVIDE SEQ 0152
6594 SDFD 724,577775,0,0,0,577777,0,0,0,577775,0,0,0^
6595 S72400: DMOVE AC,[577775,,0
6596 037105 120 04 0 00 041642 0,,0]
6597 DFDV AC,[577777,,0
6598 037106 113 04 0 00 041644 0,,0]
6599 037107 312 04 0 00 041642 CAME AC,[577775,,0]
6600 037110 003 04 0 00 072401 ER3 AC,72401
6601 037111 312 05 0 00 040060 CAME AC+1,[0,,0]
6602 037112 004 05 0 00 072401 ER4 AC+1,72401
6603 037113 321 10 0 00 037105 JUMPL AC+4,S72400 ;LOOP ON ERROR SWITCH^
6604
6605 SDFD 725,577774,0,0,0,577777,0,0,0,577774,0,0,0^
6606 S72500: DMOVE AC,[577774,,0
6607 037114 120 04 0 00 041646 0,,0]
6608 DFDV AC,[577777,,0
6609 037115 113 04 0 00 041644 0,,0]
6610 037116 312 04 0 00 041646 CAME AC,[577774,,0]
6611 037117 003 04 0 00 072501 ER3 AC,72501
6612 037120 312 05 0 00 040060 CAME AC+1,[0,,0]
6613 037121 004 05 0 00 072501 ER4 AC+1,72501
6614 037122 321 10 0 00 037114 JUMPL AC+4,S72500 ;LOOP ON ERROR SWITCH^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 29
DSKCE1 MAC 21-Jun-78 10:46 DFDV TEST-DOUBLE FLOATING POINT DIVIDE SEQ 0153
6615
6616 SDFD 726,210777,-1,0,0,170750,0,0,0,221414,456123,150726,20623^
6617 S72600: DMOVE AC,[210777,,-1
6618 037123 120 04 0 00 041650 0,,0]
6619 DFDV AC,[170750,,0
6620 037124 113 04 0 00 041652 0,,0]
6621 037125 312 04 0 00 041654 CAME AC,[221414,,456123]
6622 037126 003 04 0 00 072601 ER3 AC,72601
6623 037127 312 05 0 00 041655 CAME AC+1,[150726,,20623]
6624 037130 004 05 0 00 072601 ER4 AC+1,72601
6625 037131 321 10 0 00 037123 JUMPL AC+4,S72600 ;LOOP ON ERROR SWITCH^
6626
6627 SDFD 727,210777,-1,0,0,170555,0,0,0,221547,63714,314631,463146^
6628 S72700: DMOVE AC,[210777,,-1
6629 037132 120 04 0 00 041650 0,,0]
6630 DFDV AC,[170555,,0
6631 037133 113 04 0 00 041656 0,,0]
6632 037134 312 04 0 00 041660 CAME AC,[221547,,63714]
6633 037135 003 04 0 00 072701 ER3 AC,72701
6634 037136 312 05 0 00 041661 CAME AC+1,[314631,,463146]
6635 037137 004 05 0 00 072701 ER4 AC+1,72701
6636 037140 321 10 0 00 037132 JUMPL AC+4,S72700 ;LOOP ON ERROR SWITCH^
6637
6638 SDFD 730,577000,555555,0,0,200400,0,0,0,576000,555555,0,0^
6639 S73000: DMOVE AC,[577000,,555555
6640 037141 120 04 0 00 041662 0,,0]
6641 DFDV AC,[200400,,0
6642 037142 113 04 0 00 040731 0,,0]
6643 037143 312 04 0 00 041664 CAME AC,[576000,,555555]
6644 037144 003 04 0 00 073001 ER3 AC,73001
6645 037145 312 05 0 00 040060 CAME AC+1,[0,,0]
6646 037146 004 05 0 00 073001 ER4 AC+1,73001
6647 037147 321 10 0 00 037141 JUMPL AC+4,S73000 ;LOOP ON ERROR SWITCH^
6648
6649 SDFD 731,210777,-1,-1,-1,170555,0,0,0,221547,63715,200263,431746^
6650 S73100: DMOVE AC,[210777,,-1
6651 037150 120 04 0 00 041665 -1,,-1]
6652 DFDV AC,[170555,,0
6653 037151 113 04 0 00 041656 0,,0]
6654 037152 312 04 0 00 041667 CAME AC,[221547,,63715]
6655 037153 003 04 0 00 073101 ER3 AC,73101
6656 037154 312 05 0 00 041670 CAME AC+1,[200263,,431746]
6657 037155 004 05 0 00 073101 ER4 AC+1,73101
6658 037156 321 10 0 00 037150 JUMPL AC+4,S73100 ;LOOP ON ERROR SWITCH^
6659
6660 SDFD 732,210777,-3,0,0,170555,0,0,0,221547,63713,145545,545546^
6661 S73200: DMOVE AC,[210777,,-3
6662 037157 120 04 0 00 041671 0,,0]
6663 DFDV AC,[170555,,0
6664 037160 113 04 0 00 041656 0,,0]
6665 037161 312 04 0 00 041673 CAME AC,[221547,,63713]
6666 037162 003 04 0 00 073201 ER3 AC,73201
6667 037163 312 05 0 00 041674 CAME AC+1,[145545,,545546]
6668 037164 004 05 0 00 073201 ER4 AC+1,73201
6669 037165 321 10 0 00 037157 JUMPL AC+4,S73200 ;LOOP ON ERROR SWITCH^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 29-1
DSKCE1 MAC 21-Jun-78 10:46 DFDV TEST-DOUBLE FLOATING POINT DIVIDE SEQ 0154
6670
6671 SDFD 733,377400,0,555000,0,100777,0,0,0,77400,400400,355355,355355^
6672 S73300: DMOVE AC,[377400,,0
6673 037166 120 04 0 00 041675 555000,,0]
6674 DFDV AC,[100777,,0
6675 037167 113 04 0 00 041677 0,,0]
6676 037170 312 04 0 00 041701 CAME AC,[77400,,400400]
6677 037171 003 04 0 00 073301 ER3 AC,73301
6678 037172 312 05 0 00 041702 CAME AC+1,[355355,,355355]
6679 037173 004 05 0 00 073301 ER4 AC+1,73301
6680 037174 321 10 0 00 037166 JUMPL AC+4,S73300 ;LOOP ON ERROR SWITCH^
6681
6682 SDFD 735,200777,-1,0,0,200777,-2,0,0,201400,0,200000,400^
6683 S73500: DMOVE AC,[200777,,-1
6684 037175 120 04 0 00 041226 0,,0]
6685 DFDV AC,[200777,,-2
6686 037176 113 04 0 00 041440 0,,0]
6687 037177 312 04 0 00 040057 CAME AC,[201400,,0]
6688 037200 003 04 0 00 073501 ER3 AC,73501
6689 037201 312 05 0 00 041167 CAME AC+1,[200000,,400]
6690 037202 004 05 0 00 073501 ER4 AC+1,73501
6691 037203 321 10 0 00 037175 JUMPL AC+4,S73500 ;LOOP ON ERROR SWITCH^
6692
6693 SDFD 736,200777,-1,0,0,200777,-4,0,0,201400,1,200000,3000^
6694 S73600: DMOVE AC,[200777,,-1
6695 037204 120 04 0 00 041226 0,,0]
6696 DFDV AC,[200777,,-4
6697 037205 113 04 0 00 041446 0,,0]
6698 037206 312 04 0 00 041703 CAME AC,[201400,,1]
6699 037207 003 04 0 00 073601 ER3 AC,73601
6700 037210 312 05 0 00 041704 CAME AC+1,[200000,,3000]
6701 037211 004 05 0 00 073601 ER4 AC+1,73601
6702 037212 321 10 0 00 037204 JUMPL AC+4,S73600 ;LOOP ON ERROR SWITCH^
6703
6704 SDFD 737,210777,-1,0,0,170555,0,0,0,221547,63714,314631,463146^
6705 S73700: DMOVE AC,[210777,,-1
6706 037213 120 04 0 00 041650 0,,0]
6707 DFDV AC,[170555,,0
6708 037214 113 04 0 00 041656 0,,0]
6709 037215 312 04 0 00 041660 CAME AC,[221547,,63714]
6710 037216 003 04 0 00 073701 ER3 AC,73701
6711 037217 312 05 0 00 041661 CAME AC+1,[314631,,463146]
6712 037220 004 05 0 00 073701 ER4 AC+1,73701
6713 037221 321 10 0 00 037213 JUMPL AC+4,S73700 ;LOOP ON ERROR SWITCH^
6714
6715 SDFD 741,210777,-1,0,0,170555,600000,0,0,221546,272702,301417,730634^
6716 S74100: DMOVE AC,[210777,,-1
6717 037222 120 04 0 00 041650 0,,0]
6718 DFDV AC,[170555,,600000
6719 037223 113 04 0 00 041705 0,,0]
6720 037224 312 04 0 00 041707 CAME AC,[221546,,272702]
6721 037225 003 04 0 00 074101 ER3 AC,74101
6722 037226 312 05 0 00 041710 CAME AC+1,[301417,,730634]
6723 037227 004 05 0 00 074101 ER4 AC+1,74101
6724 037230 321 10 0 00 037222 JUMPL AC+4,S74100 ;LOOP ON ERROR SWITCH^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 29-2
DSKCE1 MAC 21-Jun-78 10:46 DFDV TEST-DOUBLE FLOATING POINT DIVIDE SEQ 0155
6725
6726 SDFD 742,210777,-1,0,0,170557,0,0,0,221545,111740,234200,262445^
6727 S74200: DMOVE AC,[210777,,-1
6728 037231 120 04 0 00 041650 0,,0]
6729 DFDV AC,[170557,,0
6730 037232 113 04 0 00 041711 0,,0]
6731 037233 312 04 0 00 041713 CAME AC,[221545,,111740]
6732 037234 003 04 0 00 074201 ER3 AC,74201
6733 037235 312 05 0 00 041714 CAME AC+1,[234200,,262445]
6734 037236 004 05 0 00 074201 ER4 AC+1,74201
6735 037237 321 10 0 00 037231 JUMPL AC+4,S74200 ;LOOP ON ERROR SWITCH^
6736
6737 SDFD 743,210777,-1,0,0,170560,0,0,0,221544,131025,220544,131026^
6738 S74300: DMOVE AC,[210777,,-1
6739 037240 120 04 0 00 041650 0,,0]
6740 DFDV AC,[170560,,0
6741 037241 113 04 0 00 041715 0,,0]
6742 037242 312 04 0 00 041717 CAME AC,[221544,,131025]
6743 037243 003 04 0 00 074301 ER3 AC,74301
6744 037244 312 05 0 00 041720 CAME AC+1,[220544,,131026]
6745 037245 004 05 0 00 074301 ER4 AC+1,74301
6746 037246 321 10 0 00 037240 JUMPL AC+4,S74300 ;LOOP ON ERROR SWITCH^
6747
6748 SDFD 744,377400,0,0,0,100777,0,0,0,77400,400400,200200,200200^
6749 S74400: DMOVE AC,[377400,,0
6750 037247 120 04 0 00 041026 0,,0]
6751 DFDV AC,[100777,,0
6752 037250 113 04 0 00 041677 0,,0]
6753 037251 312 04 0 00 041701 CAME AC,[77400,,400400]
6754 037252 003 04 0 00 074401 ER3 AC,74401
6755 037253 312 05 0 00 041721 CAME AC+1,[200200,,200200]
6756 037254 004 05 0 00 074401 ER4 AC+1,74401
6757 037255 321 10 0 00 037247 JUMPL AC+4,S74400 ;LOOP ON ERROR SWITCH^
6758
6759 SDFD 745,376400,0,0,0,100777,0,0,0,76400,400400,200200,200200^
6760 S74500: DMOVE AC,[376400,,0
6761 037256 120 04 0 00 041722 0,,0]
6762 DFDV AC,[100777,,0
6763 037257 113 04 0 00 041677 0,,0]
6764 037260 312 04 0 00 041724 CAME AC,[76400,,400400]
6765 037261 003 04 0 00 074501 ER3 AC,74501
6766 037262 312 05 0 00 041721 CAME AC+1,[200200,,200200]
6767 037263 004 05 0 00 074501 ER4 AC+1,74501
6768 037264 321 10 0 00 037256 JUMPL AC+4,S74500 ;LOOP ON ERROR SWITCH^
6769
6770 SDFD 746,375400,0,0,0,100777,0,0,0,75400,400400,200200,200200^
6771 S74600: DMOVE AC,[375400,,0
6772 037265 120 04 0 00 041725 0,,0]
6773 DFDV AC,[100777,,0
6774 037266 113 04 0 00 041677 0,,0]
6775 037267 312 04 0 00 041727 CAME AC,[75400,,400400]
6776 037270 003 04 0 00 074601 ER3 AC,74601
6777 037271 312 05 0 00 041721 CAME AC+1,[200200,,200200]
6778 037272 004 05 0 00 074601 ER4 AC+1,74601
6779 037273 321 10 0 00 037265 JUMPL AC+4,S74600 ;LOOP ON ERROR SWITCH^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 29-3
DSKCE1 MAC 21-Jun-78 10:46 DFDV TEST-DOUBLE FLOATING POINT DIVIDE SEQ 0156
6780
6781 SDFD 747,374400,0,0,0,100777,0,0,0,74400,400400,200200,200200^
6782 S74700: DMOVE AC,[374400,,0
6783 037274 120 04 0 00 041730 0,,0]
6784 DFDV AC,[100777,,0
6785 037275 113 04 0 00 041677 0,,0]
6786 037276 312 04 0 00 041732 CAME AC,[74400,,400400]
6787 037277 003 04 0 00 074701 ER3 AC,74701
6788 037300 312 05 0 00 041721 CAME AC+1,[200200,,200200]
6789 037301 004 05 0 00 074701 ER4 AC+1,74701
6790 037302 321 10 0 00 037274 JUMPL AC+4,S74700 ;LOOP ON ERROR SWITCH^
6791
6792 SDFD 750,373400,0,0,0,100777,0,0,0,73400,400400,200200,200200^
6793 S75000: DMOVE AC,[373400,,0
6794 037303 120 04 0 00 041733 0,,0]
6795 DFDV AC,[100777,,0
6796 037304 113 04 0 00 041677 0,,0]
6797 037305 312 04 0 00 041735 CAME AC,[73400,,400400]
6798 037306 003 04 0 00 075001 ER3 AC,75001
6799 037307 312 05 0 00 041721 CAME AC+1,[200200,,200200]
6800 037310 004 05 0 00 075001 ER4 AC+1,75001
6801 037311 321 10 0 00 037303 JUMPL AC+4,S75000 ;LOOP ON ERROR SWITCH^
6802
6803 SDFD 751,372400,0,0,0,100777,0,0,0,72400,400400,200200,200200^
6804 S75100: DMOVE AC,[372400,,0
6805 037312 120 04 0 00 041736 0,,0]
6806 DFDV AC,[100777,,0
6807 037313 113 04 0 00 041677 0,,0]
6808 037314 312 04 0 00 041740 CAME AC,[72400,,400400]
6809 037315 003 04 0 00 075101 ER3 AC,75101
6810 037316 312 05 0 00 041721 CAME AC+1,[200200,,200200]
6811 037317 004 05 0 00 075101 ER4 AC+1,75101
6812 037320 321 10 0 00 037312 JUMPL AC+4,S75100 ;LOOP ON ERROR SWITCH^
6813
6814 SDFD 752,210777,0,0,0,210777,0,0,0,201400,0,0,0^
6815 S75200: DMOVE AC,[210777,,0
6816 037321 120 04 0 00 041741 0,,0]
6817 DFDV AC,[210777,,0
6818 037322 113 04 0 00 041741 0,,0]
6819 037323 312 04 0 00 040057 CAME AC,[201400,,0]
6820 037324 003 04 0 00 075201 ER3 AC,75201
6821 037325 312 05 0 00 040060 CAME AC+1,[0,,0]
6822 037326 004 05 0 00 075201 ER4 AC+1,75201
6823 037327 321 10 0 00 037321 JUMPL AC+4,S75200 ;LOOP ON ERROR SWITCH^
6824
6825 SDFD 753,200400,0,0,0,210777,0,0,0,170400,400400,200200,200200^
6826 S75300: DMOVE AC,[200400,,0
6827 037330 120 04 0 00 040731 0,,0]
6828 DFDV AC,[210777,,0
6829 037331 113 04 0 00 041741 0,,0]
6830 037332 312 04 0 00 041743 CAME AC,[170400,,400400]
6831 037333 003 04 0 00 075301 ER3 AC,75301
6832 037334 312 05 0 00 041721 CAME AC+1,[200200,,200200]
6833 037335 004 05 0 00 075301 ER4 AC+1,75301
6834 037336 321 10 0 00 037330 JUMPL AC+4,S75300 ;LOOP ON ERROR SWITCH^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 29-4
DSKCE1 MAC 21-Jun-78 10:46 DFDV TEST-DOUBLE FLOATING POINT DIVIDE SEQ 0157
6835
6836 SDFD 754,371400,0,0,0,100777,0,0,0,71400,400400,200200,200200^
6837 S75400: DMOVE AC,[371400,,0
6838 037337 120 04 0 00 041744 0,,0]
6839 DFDV AC,[100777,,0
6840 037340 113 04 0 00 041677 0,,0]
6841 037341 312 04 0 00 041746 CAME AC,[71400,,400400]
6842 037342 003 04 0 00 075401 ER3 AC,75401
6843 037343 312 05 0 00 041721 CAME AC+1,[200200,,200200]
6844 037344 004 05 0 00 075401 ER4 AC+1,75401
6845 037345 321 10 0 00 037337 JUMPL AC+4,S75400 ;LOOP ON ERROR SWITCH^
6846
6847 SDFD 755,370400,0,0,0,100777,0,0,0,070400,400400,200200,200200^
6848 S75500: DMOVE AC,[370400,,0
6849 037346 120 04 0 00 041747 0,,0]
6850 DFDV AC,[100777,,0
6851 037347 113 04 0 00 041677 0,,0]
6852 037350 312 04 0 00 041751 CAME AC,[070400,,400400]
6853 037351 003 04 0 00 075501 ER3 AC,75501
6854 037352 312 05 0 00 041721 CAME AC+1,[200200,,200200]
6855 037353 004 05 0 00 075501 ER4 AC+1,75501
6856 037354 321 10 0 00 037346 JUMPL AC+4,S75500 ;LOOP ON ERROR SWITCH^
6857
6858 SDFD 756,367400,0,0,0,100777,0,0,0,67400,400400,200200,200200^
6859 S75600: DMOVE AC,[367400,,0
6860 037355 120 04 0 00 041752 0,,0]
6861 DFDV AC,[100777,,0
6862 037356 113 04 0 00 041677 0,,0]
6863 037357 312 04 0 00 041754 CAME AC,[67400,,400400]
6864 037360 003 04 0 00 075601 ER3 AC,75601
6865 037361 312 05 0 00 041721 CAME AC+1,[200200,,200200]
6866 037362 004 05 0 00 075601 ER4 AC+1,75601
6867 037363 321 10 0 00 037355 JUMPL AC+4,S75600 ;LOOP ON ERROR SWITCH^
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 30
DSKCE1 MAC 21-Jun-78 10:46 DFDV TEST-DOUBLE FLOATING POINT DIVIDE SEQ 0158
6868 ;TEST LEAST SIGNIFICANT BIT DIFFERENCE, GET A DIFFERENT ANSWER
6869 ;ON THE KS-10 WITH MICROCODE 104 AND GREATER.
6870
6871 S73400: DMOVE AC,[373400,,0
6872 037364 120 04 0 00 041755 200777,,0]
6873 DFDV AC,[100777,,0
6874 037365 113 04 0 00 041677 0,,0]
6875 037366 336 00 0 00 030524 SKIPN SM10
6876 037367 254 00 0 00 037405 JRST S73405 ;KL10
6877
6878 037370 312 04 0 00 041757 CAME AC,[73400,,400401]
6879 037371 003 04 0 00 073401 ER3 AC,73401
6880
6881 037372 332 00 0 00 030037 SKIPE USER ;USER MODE ?
6882 037373 254 00 0 00 037412 JRST S73408 ;YES, ALLOW EITHER ANSWER
6883 037374 7 000 00 0 00 000000 BLKI APR,0 ;NO, GET KS10 CPU ID INFO
6884 037375 207 00 0 00 000000 MOVSS ;ISOLATE MICROCODE VERSION
6885 037376 405 00 0 00 000777 ANDI 0,777
6886 037377 305 00 0 00 000104 CAIGE 0,104 ;104 OR GREATER ?
6887 037400 254 00 0 00 037417 JRST S73409 ;NO
6888
6889 037401 312 05 0 00 041760 CAME AC+1,[1400,,400401]
6890 037402 004 05 0 00 073401 ER4 AC+1,73401
6891
6892 037403 321 10 0 00 037364 S73406: JUMPL AC+4,S73400 ;LOOP ON ERROR SWITCH
6893 037404 254 00 0 00 037422 JRST S73407
6894
6895 037405 312 04 0 00 041757 S73405: CAME AC,[73400,,400401] ;CHECK KL10 ANSWER IF RUNNING ON KL10
6896 037406 003 04 0 00 073401 ER3 AC,73401
6897 037407 312 05 0 00 041760 CAME AC+1,[1400,,400401]
6898 037410 004 05 0 00 073401 ER4 AC+1,73401
6899 037411 254 00 0 00 037403 JRST S73406
6900
6901 037412 316 05 0 00 041761 S73408: CAMN AC+1,[1400,,400400] ;ALLOW EITHER ANSWER ON KS10 IN USER MODE
6902 037413 254 00 0 00 037403 JRST S73406
6903 037414 312 05 0 00 041760 CAME AC+1,[1400,,400401]
6904 037415 004 05 0 00 073401 ER4 AC+1,73401
6905 037416 254 00 0 00 037403 JRST S73406
6906
6907 037417 312 05 0 00 041761 S73409: CAME AC+1,[1400,,400400] ;KS10, EXEC, MICROCODE LESS THAN 104
6908 037420 004 05 0 00 073401 ER4 AC+1,73401
6909 037421 254 00 0 00 037403 JRST S73406
6910
6911 037422 254 00 0 00 037423 S73407: JRST .+1
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 31
DSKCE1 MAC 21-Jun-78 10:46 DFDV TEST-DOUBLE FLOATING POINT DIVIDE SEQ 0159
6912 ;TEST AROV, FOV AND FXU FLAGS-DFDV
6913
6914 000004 AC=4
6915 SAVEAC (1,1)^
6916 037423 201 06 0 00 037423 MOVEI AC+2,.
6917 037424 202 06 0 00 030051 MOVEM AC+2,TESTPC ;SETUP SUBTEST PC
6918 037425 201 06 0 00 000006 MOVEI AC+2,<AC+2>&17 ;INFORM ERROR ROUTINE WHICH
6919 037426 202 06 0 00 042157 MOVEM AC+2,ERRLOP# ;AC IS USED FOR ITERATION^
6920
6921 037427 254 02 1 00 041762 S75700: JRSTF @[.+1] ;CLEAR ALL FLAGS
6922 DMOVE AC,[376777,,-1
6923 037430 120 04 0 00 041763 -1,,-1]
6924 DFDV AC,[200400,,0
6925 037431 113 04 0 00 040731 0,,0] ;EXPECT AROV,FOV,FXU=0,0,0
6926 037432 265 03 0 00 037433 JSP AC-1,.+1 ;SAVE FLAGS
6927 037433 312 04 0 00 040357 CAME AC,[377777,,-1]
6928 037434 003 04 0 00 075701 ER3 AC,75701 ;C(AC) FAILED
6929 037435 312 05 0 00 040357 CAME AC+1,[377777,,-1]
6930 037436 004 05 0 00 075701 ER4 AC+1,75701 ;C(AC+1)FAILED
6931 037437 255 10 0 00 037441 JOV .+2
6932 037440 254 00 0 00 037442 JRST .+2
6933 037441 013 03 0 00 075701 ER13 AC-1,75701 ;AROV WAS SET
6934 037442 255 01 0 00 037444 JFOV .+2
6935 037443 254 00 0 00 037445 JRST .+2
6936 037444 013 03 0 00 075701 ER13 AC-1,75701 ;FOV WAS SET
6937 037445 603 03 0 00 000100 TLNE AC-1,FXU
6938 037446 013 03 0 00 075701 ER13 AC-1,75701 ;FXU WAS SET
6939 037447 321 10 0 00 037427 JUMPL AC+4,S75700 ;LOOP ON ERROR SWITCH
6940
6941 037450 254 02 1 00 041765 S76000: JRSTF @[.+1] ;CLEAR ALL FLAGS
6942 DMOVE AC,[377400,,0
6943 037451 120 04 0 00 041026 0,,0]
6944 DFDV AC,[200400,,0
6945 037452 113 04 0 00 040731 0,,0] ;EXPECT AROV,FOV,FXU=1,1,0
6946 037453 265 03 0 00 037454 JSP AC-1,.+1 ;SAVE FLAGS
6947 037454 312 04 0 00 040233 CAME AC,[400,,0]
6948 037455 003 04 0 00 076001 ER3 AC,76001 ;C(AC) FAILED
6949 037456 312 05 0 00 040060 CAME AC+1,[0,,0]
6950 037457 004 05 0 00 076001 ER4 AC+1,76001 ;C(AC+1) FAILED
6951 037460 255 10 0 00 037462 JOV .+2
6952 037461 013 03 0 00 076001 ER13 AC-1,76001 ;AROV WAS CLEAR
6953 037462 255 01 0 00 037464 JFOV .+2
6954 037463 013 03 0 00 076001 ER13 AC-1,76001 ;FOV WAS CLEAR
6955 037464 603 03 0 00 000100 TLNE AC-1,FXU
6956 037465 013 03 0 00 076001 ER13 AC-1,76001 ;FXU WAS SET
6957 037466 321 10 0 00 037450 JUMPL AC+4,S76000 ;LOOP ON ERROR SWITCH
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 32
DSKCE1 MAC 21-Jun-78 10:46 DFDV TEST-DOUBLE FLOATING POINT DIVIDE SEQ 0160
6958 037467 254 02 1 00 041766 S76100: JRSTF @[.+1] ;CLEAR ALL FLAGS
6959 DMOVE AC,[1400,,0
6960 037470 120 04 0 00 041607 0,,0]
6961 DFDV AC,[202400,,0
6962 037471 113 04 0 00 040744 0,,0] ;EXPECT AROV,FOV,FXU=0,0,0
6963 037472 265 03 0 00 037473 JSP AC-1,.+1 ;SAVE FLAGS
6964 037473 312 04 0 00 040233 CAME AC,[400,,0]
6965 037474 003 04 0 00 076101 ER3 AC,76101 ;C(AC) FAILED
6966 037475 312 05 0 00 040060 CAME AC+1,[0,,0]
6967 037476 004 05 0 00 076101 ER4 AC+1,76101 ;C(AC+1) FAILED
6968 037477 255 10 0 00 037501 JOV .+2
6969 037500 254 00 0 00 037502 JRST .+2
6970 037501 013 03 0 00 076101 ER13 AC-1,76101 ;AROV WAS SET
6971 037502 255 01 0 00 037504 JFOV .+2
6972 037503 254 00 0 00 037505 JRST .+2
6973 037504 013 03 0 00 076101 ER13 AC-1,76101 ;FOV WAS SET
6974 037505 603 03 0 00 000100 TLNE AC-1,FXU
6975 037506 013 03 0 00 076101 ER13 AC-1,76101 ;FXU WAS SET
6976 037507 321 10 0 00 037467 JUMPL AC+4,S76100 ;LOOP ON ERROR SWITCH
6977
6978 037510 254 02 1 00 041767 S76200:JRSTF @[.+1] ;CLEAR ALL FLAGS
6979 DMOVE AC,[777,,-1
6980 037511 120 04 0 00 041406 -1,,-1]
6981 DFDV AC,[202400,,0
6982 037512 113 04 0 00 040744 0,,0] ;EXPECT AROV,FOV,FXU=1,1,1
6983 037513 265 03 0 00 037514 JSP AC-1,.+1 ;SAVE FLAGS
6984 037514 312 04 0 00 040357 CAME AC,[377777,,-1]
6985 037515 003 04 0 00 076201 ER3 AC,76201 ;C(AC) FAILED
6986 037516 312 05 0 00 040357 CAME AC+1,[377777,,-1]
6987 037517 004 05 0 00 076201 ER4 AC+1,76201 ;C(AC+1) FAILED
6988 037520 255 10 0 00 037522 JOV .+2
6989 037521 013 03 0 00 076201 ER13 AC-1,76201 ;AROV WAS CLEAR
6990 037522 255 01 0 00 037524 JFOV .+2
6991 037523 013 03 0 00 076201 ER13 AC-1,76201 ;FOV WAS CLEAR
6992 037524 607 03 0 00 000100 TLNN AC-1,FXU
6993 037525 013 03 0 00 076201 ER13 AC-1,76201 ;FXU WAS CLEAR
6994 037526 321 10 0 00 037510 JUMPL AC+4,S76200 ;LOOP ON ERROR SWITCH
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 33
DSKCE1 MAC 21-Jun-78 10:46 DFDV TEST-DOUBLE FLOATING POINT DIVIDE SEQ 0161
6995 037527 254 02 1 00 041770 S76300: JRSTF @[.+1] ;CLEAR ALL FLAGS
6996 DMOVE AC,[376777,,-1
6997 037530 120 04 0 00 041763 -1,,-1]
6998 DFDV AC,[577400,,0
6999 037531 113 04 0 00 040061 0,,0] ;EXPECT AROV,FOV,FXU=0,0,0
7000 037532 265 03 0 00 037533 JSP AC-1,.+1 ;SAVE FLAGS
7001 037533 312 04 0 00 041363 CAME AC,[400000,,0]
7002 037534 003 04 0 00 076301 ER3 AC,76301 ;C(AC) FAILED
7003 037535 312 05 0 00 040351 CAME AC+1,[0,,1]
7004 037536 004 05 0 00 076301 ER4 AC+1,76301 ;C(AC+1) FAILED
7005 037537 255 10 0 00 037541 JOV .+2
7006 037540 254 00 0 00 037542 JRST .+2
7007 037541 013 03 0 00 076301 ER13 AC-1,76301 ;AROV WAS SET
7008 037542 255 01 0 00 037544 JFOV .+2
7009 037543 254 00 0 00 037545 JRST .+2
7010 037544 013 03 0 00 076301 ER13 AC-1,76301 ;FOV WAS SET
7011 037545 603 03 0 00 000100 TLNE AC-1,FXU
7012 037546 013 03 0 00 076301 ER13 AC-1,76301 ;FXU WAS SET
7013 037547 321 10 0 00 037527 JUMPL AC+4,S76300 ;LOOP ON ERROR SWITCH
7014
7015 037550 254 02 1 00 041771 S76400: JRSTF @[.+1] ;CLEAR ALL FLAGS
7016 DMOVE AC,[377400,,0
7017 037551 120 04 0 00 041026 0,,0]
7018 DFDV AC,[777400,,0
7019 037552 113 04 0 00 041422 0,,0] ;EXPECT AROV,FOV,FXU=1,1,0
7020 037553 265 03 0 00 037554 JSP AC-1,.+1 ;SAVE FLAGS
7021 037554 312 04 0 00 040061 CAME AC,[577400,,0]
7022 037555 003 04 0 00 076401 ER3 AC,76401 ;C(AC) FAILED
7023 037556 312 05 0 00 040060 CAME AC+1,[0,,0]
7024 037557 004 05 0 00 076401 ER4 AC+1,76401 ;C(AC+1) FAILED
7025 037560 255 10 0 00 037562 JOV .+2
7026 037561 013 03 0 00 076401 ER13 AC-1,76401 ;AROV WAS CLEAR
7027 037562 255 01 0 00 037564 JFOV .+2
7028 037563 013 03 0 00 076401 ER13 AC-1,76401 ;FOV WAS CLEAR
7029 037564 603 03 0 00 000100 TLNE AC-1,FXU
7030 037565 013 03 0 00 076401 ER13 AC-1,76401 ;FXU WAS SET
7031 037566 321 10 0 00 037550 JUMPL AC+4,S76400 ;LOOP ON ERROR SWITCH
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 34
DSKCE1 MAC 21-Jun-78 10:46 DFDV TEST-DOUBLE FLOATING POINT DIVIDE SEQ 0162
7032 037567 254 02 1 00 041772 S76500: JRSTF @[.+1] ;CLEAR ALL FLAGS
7033 DMOVE AC,[1400,,0
7034 037570 120 04 0 00 041607 0,,0]
7035 DFDV AC,[575400,,0
7036 037571 113 04 0 00 041435 0,,0] ;EXPECT AROV,FOV,FXU=0,0,0
7037 037572 265 03 0 00 037573 JSP AC-1,.+1 ;SAVE FLAGS
7038 037573 312 04 0 00 041365 CAME AC,[777400,,0]
7039 037574 003 04 0 00 076501 ER3 AC,76501 ;C(AC) FAILED
7040 037575 312 05 0 00 040060 CAME AC+1,[0,,0]
7041 037576 004 05 0 00 076501 ER4 AC+1,76501 ;C(AC+1) FAILED
7042 037577 255 10 0 00 037601 JOV .+2
7043 037600 254 00 0 00 037602 JRST .+2
7044 037601 013 03 0 00 076501 ER13 AC-1,76501 ;AROV WAS SET
7045 037602 255 01 0 00 037604 JFOV .+2
7046 037603 254 00 0 00 037605 JRST .+2
7047 037604 013 03 0 00 076501 ER13 AC-1,76501 ;FOV WAS SET
7048 037605 603 03 0 00 000100 TLNE AC-1,FXU
7049 037606 013 03 0 00 076501 ER13 AC-1,76501 ;FXU WAS SET
7050 037607 321 10 0 00 037567 JUMPL AC+4,S76500 ;LOOP ON ERROR SWITCH
7051
7052 037610 254 02 1 00 041773 S76600: JRSTF @[.+1] ;CLEAR ALL FLAGS
7053 DMOVE AC,[777,,-1
7054 037611 120 04 0 00 041406 -1,,-1]
7055 DFDV AC,[575400,,0
7056 037612 113 04 0 00 041435 0,,0] ;EXPECT AROV,FOV,FXU=1,1,1
7057 037613 265 03 0 00 037614 JSP AC-1,.+1 ;SAVE FLAGS
7058 037614 312 04 0 00 041363 CAME AC,[400000,,0]
7059 037615 003 04 0 00 076601 ER3 AC,76601 ;C(AC) FAILED
7060 037616 312 05 0 00 040351 CAME AC+1,[0,,1]
7061 037617 004 05 0 00 076601 ER4 AC+1,76601 ;C(AC+1) FAILED
7062 037620 255 10 0 00 037622 JOV .+2
7063 037621 013 03 0 00 076601 ER13 AC-1,76601 ;AROV WAS CLEAR
7064 037622 255 01 0 00 037624 JFOV .+2
7065 037623 013 03 0 00 076601 ER13 AC-1,76601 ;FOV WAS CLEAR
7066 037624 607 03 0 00 000100 TLNN AC-1,FXU
7067 037625 013 03 0 00 076601 ER13 AC-1,76601 ;FXU WAS CLEAR
7068 037626 321 10 0 00 037610 JUMPL AC+4,S76600 ;LOOP ON ERROR SWITCH
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 35
DSKCE1 MAC 21-Jun-78 10:46 DFDV TEST-DOUBLE FLOATING POINT DIVIDE SEQ 0163
7069 ;TEST AROV,FOV AND DCK FLAGS-DFDV
7070
7071 037627 254 02 1 00 041774 S76700: JRSTF @[.+1] ;CLEAR ALL FLAGS
7072 DMOVE AC,[201400,,0
7073 037630 120 04 0 00 040057 0,,0]
7074 DFDV AC,[0,,0
7075 037631 113 04 0 00 040355 0,,0] ;EXPECT AROV,FOV,DCK=1,1,1
7076 037632 265 03 0 00 037633 JSP AC-1,.+1 ;SAVE FLAGS
7077 037633 312 04 0 00 040057 CAME AC,[201400,,0]
7078 037634 003 04 0 00 076701 ER3 AC,76701 ;C(AC) FAILED
7079 037635 312 05 0 00 040060 CAME AC+1,[0,,0]
7080 037636 004 05 0 00 076701 ER4 AC+1,76701 ;C(AC+1) FAILED
7081 037637 255 10 0 00 037641 JOV .+2
7082 037640 013 03 0 00 076701 ER13 AC-1,76701 ;AROV WAS CLEAR
7083 037641 255 01 0 00 037643 JFOV .+2
7084 037642 013 03 0 00 076701 ER13 AC-1,76701 ;FOV WAS CLEAR
7085 037643 607 03 0 00 000040 TLNN AC-1,DCK
7086 037644 013 03 0 00 076701 ER13 AC-1,76701 ;DCK WAS CLEAR
7087 037645 321 10 0 00 037627 JUMPL AC+4,S76700 ;LOOP ON ERROR SWITCH
7088
7089 ;TEST AROV,FOV AND DCK FLAGS-DFDV
7090
7091 037646 254 02 1 00 041775 S77000: JRSTF @[.+1] ;CLEAR ALL FLAGS
7092 DMOVE AC,[201400,,0
7093 037647 120 04 0 00 040057 0,,0]
7094 DFDV AC,[201200,,0
7095 037650 113 04 0 00 041776 0,,0] ;EXPECT AROV,FOV,DCK=1,1,1
7096 037651 265 03 0 00 037652 JSP AC-1,.+1 ;SAVE FLAGS
7097 037652 312 04 0 00 040057 CAME AC,[201400,,0]
7098 037653 003 04 0 00 077001 ER3 AC,77001 ;C(AC) FAILED
7099 037654 312 05 0 00 040060 CAME AC+1,[0,,0]
7100 037655 004 05 0 00 077001 ER4 AC+1,77001 ;C(AC+1) FAILED
7101 037656 255 10 0 00 037660 JOV .+2
7102 037657 013 03 0 00 077001 ER13 AC-1,77001 ;AROV WAS CLEAR
7103 037660 255 01 0 00 037662 JFOV .+2
7104 037661 013 03 0 00 077001 ER13 AC-1,77001 ;FOV WAS CLEAR
7105 037662 607 03 0 00 000040 TLNN AC-1,DCK
7106 037663 013 03 0 00 077001 ER13 AC-1,77001 ;DCK WAS CLEAR
7107 037664 321 10 0 00 037646 JUMPL AC+4,S77000 ;LOOP ON ERROR SWITCH
7108
7109 037665 254 00 0 00 030057 JRST BEGEND
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 1
UUOERR KSM 28-Mar-78 16:17 *UUOERR* OLD-UUO ERROR HANDLER SUBROUTINE, MARCH 1978 SEQ 0164
7110 SUBTTL *UUOERR* OLD-UUO ERROR HANDLER SUBROUTINE, MARCH 1978
7111
7112 ;THIS SUBROUTINE PROVIDES ERROR REPORTING THRU THE USE OF UUO'S.
7113
7114 037666 202 00 0 00 042163 ERRMES: MOVEM 0,%ERAC0# ;SAVE AC0
7115 037667 202 01 0 00 042164 MOVEM 1,%ERAC1# ;SAVE AC1
7116 037670 202 02 0 00 042165 MOVEM 2,%ERAC2# ;SAVE AC2
7117 037671 350 00 0 00 030053 AOS ERRTLS ;INCREMENT ERROR TOTALS
7118 037672 550 00 0 00 030114 HRRZ 0,$SVUPC ;GET PC OF UUO
7119 037673 316 00 0 00 030052 CAMN 0,ERRPC ;PC = PC OF LAST ERROR ?
7120 037674 350 00 0 00 042160 AOS MICNT# ;YES, ADD 1 TO ERROR COUNT
7121 037675 200 00 0 00 042160 MOVE 0,MICNT
7122 037676 504 00 0 00 030114 HRL 0,$SVUPC
7123 037677 402 00 0 00 042161 SETZM PROCED# ;CLEAR PROCEED FLAG
7124 037700 037 10 0 00 000002 SWITCH
7125 037701 603 00 0 00 040000 TLNE NOPNT ;PRINTOUT ?
7126 037702 254 00 0 00 040014 JRST %ERRS1 ;NO, RESTORE AC'S AND RETURN
7127 037703 200 01 0 00 030113 MOVE 1,$SVUUO
7128 037704 242 01 0 00 777745 LSH 1,-^D27
7129 037705 202 01 0 00 042162 MOVEM 1,%ACS1A# ;SAVE UUO NUMBER
7130 037706 200 00 0 00 042163 MOVE 0,%ERAC0
7131 037707 200 01 0 00 042164 MOVE 1,%ERAC1
7132 037710 335 00 1 00 042157 SKIPGE @ERRLOP ;ERR LOOP AC > OR = 0 ?
7133 037711 254 00 0 00 040046 JRST %ERRS4 ;NO, SEE IF PRINT ALL
7134 037712 402 00 0 00 042160 %ERMS1: SETZM MICNT ;CLEAR ERROR COUNT
7135 037713 331 00 0 00 030043 SKIPL MONCTL ;DIAG MON OR SYS EXER ?
7136 037714 254 00 0 00 037720 JRST .+4 ;NO, DON'T NEED TITLE
7137 037715 336 00 0 00 042166 SKIPN %ERFST# ;FIRST ERROR ?
7138 037716 037 04 0 00 000002 PNTNM ;YES, PRINT PROGRAM TITLE
7139 037717 476 00 0 00 042166 SETOM %ERFST
7140 037720 336 00 0 00 030047 SKIPN PASCNT ;FIRST PASS ?
7141 037721 254 00 0 00 037725 JRST .+4 ;YES
7142 PMSG <^TEST PASS COUNT = >^
7143 037722 037 02 0 00 042000 PSIXM [SIXBIT\^TEST PASS COUNT = _\]^
7144 037723 200 00 0 00 030047 MOVE PASCNT
7145 037724 037 15 0 00 000000 PNTDEC
7146 PMSG <^PC = >^
7147 037725 037 02 0 00 042004 PSIXM [SIXBIT\^PC = _\]^
7148 037726 550 00 0 00 030114 HRRZ 0,$SVUPC ;GET PC OF UUO
7149 037727 202 00 0 00 030052 MOVEM 0,ERRPC ;SAVE FOR COMPARE
7150 037730 037 06 0 00 000000 PNT6 ;PRINT UUO ADDRESS
7151 XLIST
7152 IFDEF ERDIAG,<LIST
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 2
UUOERR KSM 28-Mar-78 16:17 *UUOERR* OLD-UUO ERROR HANDLER SUBROUTINE, MARCH 1978 SEQ 0165
7153 ;DIAGNOSTIC FORMAT ERROR PRINTER
7154
7155 ;PRINT RESULT
7156
7157 037731 %ERMS2: PMSG <^RESULT = >^
7158 037731 037 02 0 00 042006 PSIXM [SIXBIT\^RESULT = _\]^
7159 037732 200 01 0 00 030113 MOVE 1,$SVUUO ;GET AC # OF UUO
7160 037733 242 01 0 00 777751 LSH 1,-27
7161 037734 405 01 0 00 000017 ANDI 1,17
7162 037735 200 00 0 01 000000 MOVE 0,(1) ;GET C(AC)
7163 037736 307 01 0 00 000001 CAIG 1,1 ;IS AC # = TO SAVE AC ?
7164 037737 200 00 0 01 042163 MOVE 0,%ERAC0(1) ;YES, GET SAVED AC
7165 037740 037 13 0 00 000000 PNTHW ;PRINT C(AC)
7166
7167 037741 200 00 0 00 030046 MOVE CONSW
7168 037742 603 00 0 00 000200 TLNE TXTINH ;PRINT FAILURE DES AND FLT NBR ?
7169 037743 254 00 0 00 040012 JRST %ERMORE ;NO, RESTORE AC'S ETC.
7170
7171 ;PRINT FAILURE DESCRIPTOR
7172
7173 037744 200 01 0 00 042162 MOVE 1,%ACS1A ;GET UUO NUMBER
7174 037745 307 01 0 00 000001 CAIG 1,1 ;PRINT DESCRIPTOR ?
7175 037746 254 00 0 00 037752 JRST %ERMS3 ;NO, JUST PRINT FAULT NUMBER
7176 037747 037 00 0 00 030242 PCRL
7177 037750 200 00 0 01 037776 MOVE %FLTTB(1)
7178 037751 037 17 0 00 000000 PNTAL ;PRINT FAULT DESCRIPTOR
7179
7180 ;PRINT FAULT NUMBER
7181
7182 037752 %ERMS3: PMSG <^FAULT NUMBER = >^
7183 037752 037 02 0 00 042010 PSIXM [SIXBIT\^FAULT NUMBER = _\]^
7184 037753 201 00 0 00 037775 MOVEI TLET
7185 037754 037 00 0 00 000000 PNTA ;PRINT TEST LETTER
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 3
UUOERR KSM 28-Mar-78 16:17 *UUOERR* OLD-UUO ERROR HANDLER SUBROUTINE, MARCH 1978 SEQ 0166
7186
7187 037755 550 00 0 00 030113 HRRZ $SVUUO
7188 037756 602 00 0 00 700000 TRNE 700000
7189 037757 254 00 0 00 037773 JRST %ER6X
7190 037760 602 00 0 00 070000 TRNE 070000
7191 037761 254 00 0 00 037771 JRST %ER5X
7192 037762 602 00 0 00 007000 TRNE 007000
7193 037763 254 00 0 00 037767 JRST %ER4X
7194 037764 037 03 0 00 000000 PNT3 ;PRINT FAULT NUMBER
7195 037765 037 00 0 00 030242 %ER7X: PCRL
7196 037766 254 00 0 00 040012 JRST %ERMORE
7197
7198 037767 037 04 0 00 000000 %ER4X: PNT4
7199 037770 254 00 0 00 037765 JRST %ER7X
7200 037771 037 05 0 00 000000 %ER5X: PNT5
7201 037772 254 00 0 00 037765 JRST %ER7X
7202 037773 037 06 0 00 000000 %ER6X: PNT6
7203 037774 254 00 0 00 037765 JRST %ER7X
7204
7205 ;FAILURE DESCRIPTORS
7206
7207 037775 000000 000000 TLET: 0 ;TEST LETTER
7208 037776 000000 000000 %FLTTB: 0 ;DESCRIPTOR TABLE
7209 037777 000000 040060 %NODES: [0] ;NO DESCRIPTOR
7210 040000 000000 040060 SPDES: [0] ;SPECIAL USER FAILURE DESCRIPTOR
7211 040001 000000 042013 $ACF: [ASCIZ/C(AC) FAILED/]
7212 040002 000000 042016 %AC1F: [ASCIZ/C(AC+1) FAILED/]
7213 040003 000000 042021 %EF: [ASCIZ/C(E) FAILED/]
7214 040004 000000 042024 %E1F: [ASCIZ/C(E+1) FAILED/]
7215 040005 000000 042027 %ARF: [ASCIZ/C(C(ACR)) FAILED/]
7216 040006 000000 042033 %AR1F: [ASCIZ/C(C(ACR+1)) FAILED/]
7217 040007 000000 042037 %ALF: [ASCIZ/C(C(ACL)) FAILED/]
7218 040010 000000 042043 %EEF: [ASCIZ/C(C(E)) FAILED/]
7219 040011 000000 042046 %FF: [ASCIZ/FLAG FAILED/]
7220 >
7221 XLIST
7222 LIST
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 8
UUOERR KSM 28-Mar-78 16:17 *UUOERR* OLD-UUO ERROR HANDLER SUBROUTINE, MARCH 1978 SEQ 0167
7223 ;RESTORE AC'S AND RETURN OR HALT
7224
7225 040012 256 00 0 00 030101 %ERMORE:XCT ERMORE
7226 040013 037 10 0 00 000002 SWITCH
7227
7228 040014 037 07 0 00 000003 %ERRS1: TTALTM ;ALTMODE CHECK
7229 040015 254 00 0 00 040021 JRST .+4 ;NONE
7230 040016 201 00 0 00 040021 MOVEI .+3 ;SAVE CONT ADDRESS
7231 040017 202 00 0 00 000130 MOVEM JOBOPC
7232 040020 254 00 1 00 030063 JRST @ALTMGO ;PERFORM TRANSFER
7233 040021 200 00 0 00 030046 MOVE CONSW
7234 040022 603 00 0 00 002000 TLNE 0,ERSTOP ;HALT ON ERROR SWITCH SET ?
7235 040023 037 14 0 00 000004 ERRHLT ;YES
7236 040024 607 00 0 00 004000 TLNN 0,LOOPER ;LOOP ON ERROR SWITCH SET ?
7237 040025 476 00 0 00 042161 SETOM PROCED ;NO, SET THE PROCEED FLAG
7238 040026 603 00 0 00 010000 TLNE 0,DING ;RING BELL SWITCH SET ?
7239 040027 037 01 0 00 000007 PBELL ;YES, GO RING BELL
7240
7241 040030 200 02 0 00 042165 %ERRS2: MOVE 2,%ERAC2 ;RESTORE AC'S
7242 040031 200 01 0 00 042164 MOVE 1,%ERAC1
7243 040032 476 00 1 00 042157 SETOM @ERRLOP ;SET C(ERR LOOP AC) TO -1
7244 040033 336 00 0 00 042161 SKIPN PROCED ;LOOP ON ERROR ?
7245 040034 254 00 0 00 040044 JRST %ERRS5 ;YES
7246 040035 350 00 1 00 042157 AOS @ERRLOP ;NO, INC C(ERR LOOP AC)
7247 040036 350 00 1 00 042157 AOS @ERRLOP ;SO IT ='S 1
7248 040037 331 00 0 00 030043 SKIPL MONCTL ;UNDER DIAGNOSTIC MONITOR ?
7249 040040 254 00 0 00 040044 JRST %ERRS5 ;NO, CONTINUE PROGRAM
7250 040041 200 00 0 00 030053 MOVE 0,ERRTLS ;YES
7251 040042 301 00 0 00 000024 CAIL 0,^D20 ;PRINTED ALLOWED ERRORS ?
7252 040043 254 00 0 00 040052 JRST %ERRS6
7253
7254 040044 200 00 0 00 042163 %ERRS5: MOVE 0,%ERAC0 ;NO, CONTINUE PROGRAM
7255 040045 254 00 0 00 030065 JRST UUOEXT
7256
7257 040046 200 00 0 00 030046 %ERRS4: MOVE 0,CONSW
7258 040047 607 00 0 00 001000 TLNN PALERS ;PRINT ALL ERRORS ?
7259 040050 254 00 0 00 040014 JRST %ERRS1 ;NO
7260 040051 254 00 0 00 037712 JRST %ERMS1 ;YES
7261
7262 040052 %ERRS6: PMSGF <^EXCEEDED ALLOWED ERRORS^>^
7263 040052 037 04 0 00 042051 PSIXMF [SIXBIT\^EXCEEDED ALLOWED ERRORS^_\]^
7264 040053 254 00 0 00 030061 JRST $BEND2
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 1
STOR KSM 28-Mar-78 16:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0168
7265 SUBTTL *STOR* RESERVED STORAGE, MARCH 1978
7266
7267 ;PROGRAM LITERALS
7268
7269 XLIST
7270 IFNDEF $LPAPER,<LIST>
7271 040054 LIT
7272 040054 45 70 51 64 00 00
7273 040055 103 105 000 000 000
7274 040056 000000 030630
7275 040057 201400 000000
7276 040060 000000 000000
7277 040061 577400 000000
7278 040062 000000 000000
7279 040063 200400 000000
7280 040064 200600 000000
7281 040065 000000 000000
7282 040066 177400 000000
7283 040067 200500 000000
7284 040070 000000 000000
7285 040071 176400 000000
7286 040072 200440 000000
7287 040073 000000 000000
7288 040074 175400 000000
7289 040075 200420 000000
7290 040076 000000 000000
7291 040077 174400 000000
7292 040100 200410 000000
7293 040101 000000 000000
7294 040102 173400 000000
7295 040103 200404 000000
7296 040104 000000 000000
7297 040105 172400 000000
7298 040106 200402 000000
7299 040107 000000 000000
7300 040110 171400 000000
7301 040111 200401 000000
7302 040112 000000 000000
7303 040113 170400 000000
7304 040114 200400 400000
7305 040115 000000 000000
7306 040116 167400 000000
7307 040117 200400 200000
7308 040120 000000 000000
7309 040121 166400 000000
7310 040122 200400 100000
7311 040123 000000 000000
7312 040124 165400 000000
7313 040125 200400 040000
7314 040126 000000 000000
7315 040127 164400 000000
7316 040130 200400 020000
7317 040131 000000 000000
7318 040132 163400 000000
7319 040133 200400 010000
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 1-1
STOR KSM 28-Mar-78 16:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0169
7320 040134 000000 000000
7321 040135 162400 000000
7322 040136 200400 004000
7323 040137 000000 000000
7324 040140 161400 000000
7325 040141 200400 002000
7326 040142 000000 000000
7327 040143 160400 000000
7328 040144 200400 001000
7329 040145 000000 000000
7330 040146 157400 000000
7331 040147 200400 000400
7332 040150 000000 000000
7333 040151 156400 000000
7334 040152 200400 000200
7335 040153 000000 000000
7336 040154 155400 000000
7337 040155 200400 000100
7338 040156 000000 000000
7339 040157 154400 000000
7340 040160 200400 000040
7341 040161 000000 000000
7342 040162 153400 000000
7343 040163 200400 000020
7344 040164 000000 000000
7345 040165 152400 000000
7346 040166 200400 000010
7347 040167 000000 000000
7348 040170 151400 000000
7349 040171 200400 000004
7350 040172 000000 000000
7351 040173 150400 000000
7352 040174 200400 000002
7353 040175 000000 000000
7354 040176 147400 000000
7355 040177 200400 000001
7356 040200 000000 000000
7357 040201 146400 000000
7358 040202 200400 000000
7359 040203 200000 000000
7360 040204 145400 000000
7361 040205 200400 000000
7362 040206 100000 000000
7363 040207 144400 000000
7364 040210 200400 000000
7365 040211 040000 000000
7366 040212 143400 000000
7367 040213 200400 000000
7368 040214 020000 000000
7369 040215 142400 000000
7370 040216 200400 000000
7371 040217 010000 000000
7372 040220 141400 000000
7373 040221 200400 000000
7374 040222 004000 000000
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 1-2
STOR KSM 28-Mar-78 16:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0170
7375 040223 140400 000000
7376 040224 200400 000000
7377 040225 002000 000000
7378 040226 137400 000000
7379 040227 200400 000000
7380 040230 001000 000000
7381 040231 136400 000000
7382 040232 200400 000000
7383 040233 000400 000000
7384 040234 135400 000000
7385 040235 200400 000000
7386 040236 000200 000000
7387 040237 134400 000000
7388 040240 200400 000000
7389 040241 000100 000000
7390 040242 133400 000000
7391 040243 200400 000000
7392 040244 000040 000000
7393 040245 132400 000000
7394 040246 200400 000000
7395 040247 000020 000000
7396 040250 131400 000000
7397 040251 200400 000000
7398 040252 000010 000000
7399 040253 130400 000000
7400 040254 200400 000000
7401 040255 000004 000000
7402 040256 127400 000000
7403 040257 200400 000000
7404 040260 000002 000000
7405 040261 126400 000000
7406 040262 200400 000000
7407 040263 000001 000000
7408 040264 125400 000000
7409 040265 200400 000000
7410 040266 000000 400000
7411 040267 124400 000000
7412 040270 200400 000000
7413 040271 000000 200000
7414 040272 123400 000000
7415 040273 200400 000000
7416 040274 000000 100000
7417 040275 122400 000000
7418 040276 200400 000000
7419 040277 000000 040000
7420 040300 121400 000000
7421 040301 200400 000000
7422 040302 000000 020000
7423 040303 120400 000000
7424 040304 200400 000000
7425 040305 000000 010000
7426 040306 117400 000000
7427 040307 200400 000000
7428 040310 000000 004000
7429 040311 116400 000000
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 1-3
STOR KSM 28-Mar-78 16:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0171
7430 040312 200400 000000
7431 040313 000000 002000
7432 040314 115400 000000
7433 040315 200400 000000
7434 040316 000000 001000
7435 040317 114400 000000
7436 040320 200400 000000
7437 040321 000000 000400
7438 040322 113400 000000
7439 040323 200400 000000
7440 040324 000000 000200
7441 040325 112400 000000
7442 040326 200400 000000
7443 040327 000000 000100
7444 040330 111400 000000
7445 040331 200400 000000
7446 040332 000000 000040
7447 040333 110400 000000
7448 040334 200400 000000
7449 040335 000000 000020
7450 040336 107400 000000
7451 040337 200400 000000
7452 040340 000000 000010
7453 040341 106400 000000
7454 040342 200400 000000
7455 040343 000000 000004
7456 040344 105400 000000
7457 040345 200400 000000
7458 040346 000000 000002
7459 040347 104400 000000
7460 040350 200400 000000
7461 040351 000000 000001
7462 040352 103400 000000
7463 040353 600377 777777
7464 040354 777777 777777
7465 040355 000000 000000
7466 040356 000000 000000
7467 040357 377777 777777
7468 040360 600577 777777
7469 040361 777777 777777
7470 040362 601377 777777
7471 040363 377777 777776
7472 040364 600677 777777
7473 040365 777777 777777
7474 040366 602377 777777
7475 040367 377777 777774
7476 040370 600737 777777
7477 040371 777777 777777
7478 040372 603377 777777
7479 040373 377777 777770
7480 040374 600757 777777
7481 040375 777777 777777
7482 040376 604377 777777
7483 040377 377777 777760
7484 040400 600767 777777
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 1-4
STOR KSM 28-Mar-78 16:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0172
7485 040401 777777 777777
7486 040402 605377 777777
7487 040403 377777 777740
7488 040404 600773 777777
7489 040405 777777 777777
7490 040406 606377 777777
7491 040407 377777 777700
7492 040410 600775 777777
7493 040411 777777 777777
7494 040412 607377 777777
7495 040413 377777 777600
7496 040414 600776 777777
7497 040415 777777 777777
7498 040416 610377 777777
7499 040417 377777 777400
7500 040420 600777 377777
7501 040421 777777 777777
7502 040422 611377 777777
7503 040423 377777 777000
7504 040424 600777 577777
7505 040425 777777 777777
7506 040426 612377 777777
7507 040427 377777 776000
7508 040430 600777 677777
7509 040431 777777 777777
7510 040432 613377 777777
7511 040433 377777 774000
7512 040434 600777 737777
7513 040435 777777 777777
7514 040436 614377 777777
7515 040437 377777 770000
7516 040440 600777 757777
7517 040441 777777 777777
7518 040442 615377 777777
7519 040443 377777 760000
7520 040444 600777 767777
7521 040445 777777 777777
7522 040446 616377 777777
7523 040447 377777 740000
7524 040450 600777 773777
7525 040451 777777 777777
7526 040452 617377 777777
7527 040453 377777 700000
7528 040454 600777 775777
7529 040455 777777 777777
7530 040456 620377 777777
7531 040457 377777 600000
7532 040460 600777 776777
7533 040461 777777 777777
7534 040462 621377 777777
7535 040463 377777 400000
7536 040464 600777 777377
7537 040465 777777 777777
7538 040466 622377 777777
7539 040467 377777 000000
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 1-5
STOR KSM 28-Mar-78 16:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0173
7540 040470 600777 777577
7541 040471 777777 777777
7542 040472 623377 777777
7543 040473 377776 000000
7544 040474 600777 777677
7545 040475 777777 777777
7546 040476 624377 777777
7547 040477 377774 000000
7548 040500 600777 777737
7549 040501 777777 777777
7550 040502 625377 777777
7551 040503 377770 000000
7552 040504 600777 777757
7553 040505 777777 777777
7554 040506 626377 777777
7555 040507 377760 000000
7556 040510 600777 777767
7557 040511 777777 777777
7558 040512 627377 777777
7559 040513 377740 000000
7560 040514 600777 777773
7561 040515 777777 777777
7562 040516 630377 777777
7563 040517 377700 000000
7564 040520 600777 777775
7565 040521 777777 777777
7566 040522 631377 777777
7567 040523 377600 000000
7568 040524 600777 777776
7569 040525 777777 777777
7570 040526 632377 777777
7571 040527 377400 000000
7572 040530 600777 777777
7573 040531 577777 777777
7574 040532 633377 777777
7575 040533 377000 000000
7576 040534 600777 777777
7577 040535 677777 777777
7578 040536 634377 777777
7579 040537 376000 000000
7580 040540 600777 777777
7581 040541 737777 777777
7582 040542 635377 777777
7583 040543 374000 000000
7584 040544 600777 777777
7585 040545 757777 777777
7586 040546 636377 777777
7587 040547 370000 000000
7588 040550 600777 777777
7589 040551 767777 777777
7590 040552 637377 777777
7591 040553 360000 000000
7592 040554 600777 777777
7593 040555 773777 777777
7594 040556 640377 777777
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 1-6
STOR KSM 28-Mar-78 16:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0174
7595 040557 340000 000000
7596 040560 600777 777777
7597 040561 775777 777777
7598 040562 641377 777777
7599 040563 300000 000000
7600 040564 600777 777777
7601 040565 776777 777777
7602 040566 642377 777777
7603 040567 600777 777777
7604 040570 777377 777777
7605 040571 643377 777777
7606 040572 600777 777777
7607 040573 777577 777777
7608 040574 644377 777776
7609 040575 600777 777777
7610 040576 777677 777777
7611 040577 645377 777774
7612 040600 600777 777777
7613 040601 777737 777777
7614 040602 646377 777770
7615 040603 600777 777777
7616 040604 777757 777777
7617 040605 647377 777760
7618 040606 600777 777777
7619 040607 777767 777777
7620 040610 650377 777740
7621 040611 600777 777777
7622 040612 777773 777777
7623 040613 651377 777700
7624 040614 600777 777777
7625 040615 777775 777777
7626 040616 652377 777600
7627 040617 600777 777777
7628 040620 777776 777777
7629 040621 653377 777400
7630 040622 600777 777777
7631 040623 777777 377777
7632 040624 654377 777000
7633 040625 600777 777777
7634 040626 777777 577777
7635 040627 655377 776000
7636 040630 600777 777777
7637 040631 777777 677777
7638 040632 656377 774000
7639 040633 600777 777777
7640 040634 777777 737777
7641 040635 657377 770000
7642 040636 600777 777777
7643 040637 777777 757777
7644 040640 660377 760000
7645 040641 600777 777777
7646 040642 777777 767777
7647 040643 661377 740000
7648 040644 600777 777777
7649 040645 777777 773777
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 1-7
STOR KSM 28-Mar-78 16:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0175
7650 040646 662377 700000
7651 040647 600777 777777
7652 040650 777777 775777
7653 040651 663377 600000
7654 040652 600777 777777
7655 040653 777777 776777
7656 040654 664377 400000
7657 040655 600777 777777
7658 040656 777777 777377
7659 040657 665377 000000
7660 040660 600777 777777
7661 040661 777777 777577
7662 040662 666376 000000
7663 040663 600777 777777
7664 040664 777777 777677
7665 040665 667374 000000
7666 040666 600777 777777
7667 040667 777777 777737
7668 040670 670370 000000
7669 040671 600777 777777
7670 040672 777777 777757
7671 040673 671360 000000
7672 040674 600777 777777
7673 040675 777777 777767
7674 040676 672340 000000
7675 040677 600777 777777
7676 040700 777777 777773
7677 040701 673300 000000
7678 040702 600777 777777
7679 040703 777777 777775
7680 040704 674200 000000
7681 040705 600777 777777
7682 040706 777777 777776
7683 040707 674400 000000
7684 040710 200777 777777
7685 040711 777777 777777
7686 040712 200000 000000
7687 040713 400000 777777
7688 040714 000600 000000
7689 040715 000000 000000
7690 040716 000400 000000
7691 040717 000000 000000
7692 040720 001500 000000
7693 040721 377000 000000
7694 040722 000000 000000
7695 040723 377600 000000
7696 040724 000000 000000
7697 040725 600400 000000
7698 040726 000000 000000
7699 040727 177400 000000
7700 040730 000000 000000
7701 040731 200400 000000
7702 040732 000000 000000
7703 040733 205400 000000
7704 040734 000000 000000
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 1-8
STOR KSM 28-Mar-78 16:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0176
7705 040735 205410 000000
7706 040736 205600 000000
7707 040737 000000 000000
7708 040740 205610 000000
7709 040741 200700 000000
7710 040742 000000 000000
7711 040743 201600 000000
7712 040744 202400 000000
7713 040745 000000 000000
7714 040746 202500 000000
7715 040747 204400 000000
7716 040750 000000 000000
7717 040751 204420 000000
7718 040752 210400 000000
7719 040753 000000 000000
7720 040754 210401 000000
7721 040755 220400 000000
7722 040756 000000 000000
7723 040757 220400 002000
7724 040760 240400 000000
7725 040761 000000 000000
7726 040762 300400 000000
7727 040763 000000 000000
7728 040764 576400 000000
7729 040765 205604 000000
7730 040766 201000 000000
7731 040767 000000 000000
7732 040770 202000 000000
7733 040771 000000 000000
7734 040772 204000 000000
7735 040773 000000 000000
7736 040774 207000 000000
7737 040775 000000 000000
7738 040776 210000 000000
7739 040777 000000 000000
7740 041000 214000 000000
7741 041001 000000 000000
7742 041002 220000 000000
7743 041003 000000 000000
7744 041004 225000 000000
7745 041005 000000 000000
7746 041006 240000 000000
7747 041007 000000 000000
7748 041010 246000 000000
7749 041011 000000 000000
7750 041012 300000 000000
7751 041013 000000 000000
7752 041014 307000 000000
7753 041015 000000 000000
7754 041016 200000 000000
7755 041017 000000 000000
7756 041020 203000 000000
7757 041021 000000 000000
7758 041022 206000 000000
7759 041023 000000 000000
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 1-9
STOR KSM 28-Mar-78 16:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0177
7760 041024 400200 000000
7761 041025 000000 000000
7762 041026 377400 000000
7763 041027 000000 000000
7764 041030 401400 000000
7765 041031 201700 000000
7766 041032 577600 000000
7767 041033 000000 000000
7768 041034 577200 000000
7769 041035 000000 000000
7770 041036 576400 000000
7771 041037 000000 000000
7772 041040 201420 000000
7773 041041 200400 000077
7774 041042 000000 000000
7775 041043 206400 000000
7776 041044 000000 000000
7777 041045 206404 000000
7778 041046 030400 000003
7779 041047 000000 000000
7780 041050 032400 000000
7781 041051 000000 000000
7782 041052 032500 000000
7783 041053 201600 000000
7784 041054 000000 000000
7785 041055 577400 000003
7786 041056 000000 000000
7787 041057 201600 000001
7788 041060 200400 000003
7789 041061 000000 000000
7790 041062 200400 777777
7791 041063 000000 000000
7792 041064 202500 177777
7793 041065 200200 000001
7794 041066 000000 000000
7795 041067 200200 000002
7796 041070 000000 000000
7797 041071 200200 000004
7798 041072 000000 000000
7799 041073 200200 000010
7800 041074 000000 000000
7801 041075 200200 000020
7802 041076 000000 000000
7803 041077 200200 000040
7804 041100 000000 000000
7805 041101 200200 000100
7806 041102 000000 000000
7807 041103 200200 000200
7808 041104 000000 000000
7809 041105 200200 000400
7810 041106 000000 000000
7811 041107 200200 001000
7812 041110 000000 000000
7813 041111 172400 000000
7814 041112 000000 000000
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 1-10
STOR KSM 28-Mar-78 16:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0178
7815 041113 201402 000000
7816 041114 173400 000000
7817 041115 000000 000000
7818 041116 201404 000000
7819 041117 174400 000000
7820 041120 000000 000000
7821 041121 201410 000000
7822 041122 175400 000000
7823 041123 000000 000000
7824 041124 176400 000000
7825 041125 000000 000000
7826 041126 201440 000000
7827 041127 201500 000000
7828 041130 202600 000000
7829 041131 000000 000000
7830 041132 202700 000000
7831 041133 203400 000000
7832 041134 200100 000000
7833 041135 000000 000000
7834 041136 200040 000000
7835 041137 000000 000000
7836 041140 200020 000000
7837 041141 000000 000000
7838 041142 576200 000000
7839 041143 576300 000000
7840 041144 601400 000000
7841 041145 000000 000000
7842 041146 576340 000000
7843 041147 200000 000001
7844 041150 000000 000000
7845 041151 200000 000002
7846 041152 000000 000000
7847 041153 200000 000004
7848 041154 000000 000000
7849 041155 200000 000010
7850 041156 000000 000000
7851 041157 200000 000020
7852 041160 000000 000000
7853 041161 200000 000040
7854 041162 000000 000000
7855 041163 200000 000100
7856 041164 000000 000000
7857 041165 200000 000200
7858 041166 000000 000000
7859 041167 200000 000400
7860 041170 000000 000000
7861 041171 200000 001000
7862 041172 000000 000000
7863 041173 200000 002000
7864 041174 000000 000000
7865 041175 200000 004000
7866 041176 000000 000000
7867 041177 200000 010000
7868 041200 000000 000000
7869 041201 200000 020000
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 1-11
STOR KSM 28-Mar-78 16:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0179
7870 041202 000000 000000
7871 041203 200000 040000
7872 041204 000000 000000
7873 041205 200000 100000
7874 041206 000000 000000
7875 041207 200000 200000
7876 041210 000000 000000
7877 041211 200000 400000
7878 041212 000000 000000
7879 041213 200001 000000
7880 041214 000000 000000
7881 041215 200002 000000
7882 041216 000000 000000
7883 041217 200004 000000
7884 041220 000000 000000
7885 041221 200010 000000
7886 041222 000000 000000
7887 041223 777700 000000
7888 041224 000000 000000
7889 041225 400400 000000
7890 041226 200777 777777
7891 041227 000000 000000
7892 041230 203400 000000
7893 041231 000000 000000
7894 041232 207400 000000
7895 041233 000000 000000
7896 041234 211400 000000
7897 041235 000000 000000
7898 041236 212400 000000
7899 041237 000000 000000
7900 041240 213400 000000
7901 041241 000000 000000
7902 041242 214400 000000
7903 041243 000000 000000
7904 041244 215400 000000
7905 041245 000000 000000
7906 041246 216400 000000
7907 041247 000000 000000
7908 041250 217400 000000
7909 041251 000000 000000
7910 041252 221400 000000
7911 041253 000000 000000
7912 041254 222400 000000
7913 041255 000000 000000
7914 041256 223400 000000
7915 041257 000000 000000
7916 041260 224400 000000
7917 041261 000000 000000
7918 041262 225400 000000
7919 041263 000000 000000
7920 041264 226400 000000
7921 041265 000000 000000
7922 041266 227400 000000
7923 041267 000000 000000
7924 041270 230400 000000
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 1-12
STOR KSM 28-Mar-78 16:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0180
7925 041271 000000 000000
7926 041272 231400 000000
7927 041273 000000 000000
7928 041274 200200 000000
7929 041275 000000 000000
7930 041276 232400 000000
7931 041277 000000 000000
7932 041300 233400 000000
7933 041301 000000 000000
7934 041302 200000 000003
7935 041303 000000 000000
7936 041304 200000 000005
7937 041305 000000 000000
7938 041306 200000 000011
7939 041307 000000 000000
7940 041310 200000 000021
7941 041311 000000 000000
7942 041312 200000 000041
7943 041313 000000 000000
7944 041314 200000 000101
7945 041315 000000 000000
7946 041316 200000 000201
7947 041317 000000 000000
7948 041320 200000 000401
7949 041321 000000 000000
7950 041322 200000 001001
7951 041323 000000 000000
7952 041324 200000 002001
7953 041325 000000 000000
7954 041326 200000 004001
7955 041327 000000 000000
7956 041330 200000 010001
7957 041331 000000 000000
7958 041332 200000 020001
7959 041333 000000 000000
7960 041334 200000 040001
7961 041335 000000 000000
7962 041336 200000 100001
7963 041337 000000 000000
7964 041340 200000 200001
7965 041341 000000 000000
7966 041342 200000 400001
7967 041343 000000 000000
7968 041344 000000 034567
7969 041345 376777 777777
7970 041346 777777 777776
7971 041347 000000 034610
7972 041350 000000 034627
7973 041351 000200 000000
7974 041352 000000 000000
7975 041353 000000 034650
7976 041354 000177 777777
7977 041355 777777 777777
7978 041356 000000 034667
7979 041357 400400 000000
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 1-13
STOR KSM 28-Mar-78 16:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0181
7980 041360 000000 000000
7981 041361 401000 000000
7982 041362 000000 000002
7983 041363 400000 000000
7984 041364 000000 034710
7985 041365 777400 000000
7986 041366 000000 034727
7987 041367 777600 000000
7988 041370 000000 000000
7989 041371 000000 034750
7990 041372 777600 000000
7991 041373 000000 000001
7992 041374 000000 034773
7993 041375 204770 000000
7994 041376 200477 777775
7995 041377 000000 000000
7996 041400 202660 000000
7997 041401 000000 035071
7998 041402 400400 000000
7999 041403 000000 000001
8000 041404 000000 035112
8001 041405 000000 035131
8002 041406 000777 777777
8003 041407 777777 777777
8004 041410 000377 777777
8005 041411 777777 777777
8006 041412 000000 035152
8007 041413 000000 035171
8008 041414 377377 777777
8009 041415 777777 777777
8010 041416 000000 035212
8011 041417 000000 035231
8012 041420 777000 000000
8013 041421 000000 000000
8014 041422 777400 000000
8015 041423 000000 000000
8016 041424 000000 035252
8017 041425 777000 000000
8018 041426 000000 000001
8019 041427 000000 035275
8020 041430 201400 000000
8021 041431 400000 777777
8022 041432 376400 000000
8023 041433 237400 000000
8024 041434 277400 000000
8025 041435 575400 000000
8026 041436 000000 000000
8027 041437 177777 777777
8028 041440 200777 777776
8029 041441 000000 000000
8030 041442 177777 777776
8031 041443 200777 777775
8032 041444 000000 000000
8033 041445 177777 777775
8034 041446 200777 777774
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 1-14
STOR KSM 28-Mar-78 16:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0182
8035 041447 000000 000000
8036 041450 177777 777774
8037 041451 501700 000000
8038 041452 000000 000000
8039 041453 500400 000000
8040 041454 000000 000000
8041 041455 374100 000000
8042 041456 372400 000000
8043 041457 502700 000000
8044 041460 000000 000000
8045 041461 373100 000000
8046 041462 371400 000000
8047 041463 503700 000000
8048 041464 000000 000000
8049 041465 372100 000000
8050 041466 370400 000000
8051 041467 504700 000000
8052 041470 000000 000000
8053 041471 371100 000000
8054 041472 367400 000000
8055 041473 505700 000000
8056 041474 000000 000000
8057 041475 370100 000000
8058 041476 366400 000000
8059 041477 177200 000000
8060 041500 177100 000000
8061 041501 177040 000000
8062 041502 177020 000000
8063 041503 177010 000000
8064 041504 177004 000000
8065 041505 177002 000000
8066 041506 500700 000000
8067 041507 000000 000000
8068 041510 503400 000000
8069 041511 500770 000000
8070 041512 000000 000000
8071 041513 501770 000000
8072 041514 506400 000000
8073 041515 200775 000000
8074 041516 000000 000000
8075 041517 200772 011000
8076 041520 200774 000000
8077 041521 000000 000000
8078 041522 200770 020000
8079 041523 200773 000000
8080 041524 000000 000000
8081 041525 200766 031000
8082 041526 177477 000000
8083 041527 000000 000000
8084 041530 177427 100000
8085 041531 000000 001400
8086 041532 200777 777773
8087 041533 000000 000000
8088 041534 200777 777772
8089 041535 000000 002400
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 1-15
STOR KSM 28-Mar-78 16:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0183
8090 041536 500000 777777
8091 041537 000000 000000
8092 041540 200777 000000
8093 041541 000000 000000
8094 041542 500001 776777
8095 041543 500000 777770
8096 041544 000000 000000
8097 041545 500001 776770
8098 041546 376776 001001
8099 041547 377000 000400
8100 041550 500000 777776
8101 041551 000000 000000
8102 041552 376776 001003
8103 041553 376000 002000
8104 041554 177000 000003
8105 041555 146777 777777
8106 041556 177700 000156
8107 041557 200400 000076
8108 041560 000000 000000
8109 041561 177700 000154
8110 041562 200400 000075
8111 041563 000000 000000
8112 041564 177700 000152
8113 041565 600400 000077
8114 041566 000000 000000
8115 041567 177660 000000
8116 041570 000000 000000
8117 041571 602120 000152
8118 041572 120000 000000
8119 041573 600400 000076
8120 041574 000000 000000
8121 041575 177600 000000
8122 041576 000000 000000
8123 041577 602200 000135
8124 041600 400000 000001
8125 041601 000000 000000
8126 041602 000000 036473
8127 041603 201777 777777
8128 041604 777777 777777
8129 041605 000000 036514
8130 041606 000000 036533
8131 041607 001400 000000
8132 041610 000000 000000
8133 041611 000000 036554
8134 041612 000000 036573
8135 041613 576000 000000
8136 041614 000000 000001
8137 041615 000000 036614
8138 041616 000000 036633
8139 041617 776400 000000
8140 041620 000000 000000
8141 041621 000000 036654
8142 041622 000000 036677
8143 041623 200400 000000
8144 041624 400000 777777
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 1-16
STOR KSM 28-Mar-78 16:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0184
8145 041625 200740 000000
8146 041626 000000 000000
8147 041627 201740 000000
8148 041630 576252 525252
8149 041631 252525 252525
8150 041632 600600 000000
8151 041633 000000 000000
8152 041634 377400 777777
8153 041635 000000 000000
8154 041636 577400 777777
8155 041637 000000 000000
8156 041640 777375 773771
8157 041641 373773 776004
8158 041642 577775 000000
8159 041643 000000 000000
8160 041644 577777 000000
8161 041645 000000 000000
8162 041646 577774 000000
8163 041647 000000 000000
8164 041650 210777 777777
8165 041651 000000 000000
8166 041652 170750 000000
8167 041653 000000 000000
8168 041654 221414 456123
8169 041655 150726 020623
8170 041656 170555 000000
8171 041657 000000 000000
8172 041660 221547 063714
8173 041661 314631 463146
8174 041662 577000 555555
8175 041663 000000 000000
8176 041664 576000 555555
8177 041665 210777 777777
8178 041666 777777 777777
8179 041667 221547 063715
8180 041670 200263 431746
8181 041671 210777 777775
8182 041672 000000 000000
8183 041673 221547 063713
8184 041674 145545 545546
8185 041675 377400 000000
8186 041676 555000 000000
8187 041677 100777 000000
8188 041700 000000 000000
8189 041701 077400 400400
8190 041702 355355 355355
8191 041703 201400 000001
8192 041704 200000 003000
8193 041705 170555 600000
8194 041706 000000 000000
8195 041707 221546 272702
8196 041710 301417 730634
8197 041711 170557 000000
8198 041712 000000 000000
8199 041713 221545 111740
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 1-17
STOR KSM 28-Mar-78 16:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0185
8200 041714 234200 262445
8201 041715 170560 000000
8202 041716 000000 000000
8203 041717 221544 131025
8204 041720 220544 131026
8205 041721 200200 200200
8206 041722 376400 000000
8207 041723 000000 000000
8208 041724 076400 400400
8209 041725 375400 000000
8210 041726 000000 000000
8211 041727 075400 400400
8212 041730 374400 000000
8213 041731 000000 000000
8214 041732 074400 400400
8215 041733 373400 000000
8216 041734 000000 000000
8217 041735 073400 400400
8218 041736 372400 000000
8219 041737 000000 000000
8220 041740 072400 400400
8221 041741 210777 000000
8222 041742 000000 000000
8223 041743 170400 400400
8224 041744 371400 000000
8225 041745 000000 000000
8226 041746 071400 400400
8227 041747 370400 000000
8228 041750 000000 000000
8229 041751 070400 400400
8230 041752 367400 000000
8231 041753 000000 000000
8232 041754 067400 400400
8233 041755 373400 000000
8234 041756 200777 000000
8235 041757 073400 400401
8236 041760 001400 400401
8237 041761 001400 400400
8238 041762 000000 037430
8239 041763 376777 777777
8240 041764 777777 777777
8241 041765 000000 037451
8242 041766 000000 037470
8243 041767 000000 037511
8244 041770 000000 037530
8245 041771 000000 037551
8246 041772 000000 037570
8247 041773 000000 037611
8248 041774 000000 037630
8249 041775 000000 037647
8250 041776 201200 000000
8251 041777 000000 000000
8252 042000 76 64 45 63 64 00
8253 042001 60 41 63 63 00 43
8254 042002 57 65 56 64 00 35
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 1-18
STOR KSM 28-Mar-78 16:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0186
8255 042003 00 77 00 00 00 00
8256 042004 76 60 43 00 35 00
8257 042005 00 00 77 00 00 00
8258 042006 76 62 45 63 65 54
8259 042007 64 00 00 35 00 77
8260 042010 76 46 41 65 54 64
8261 042011 00 56 65 55 42 45
8262 042012 62 00 35 00 77 00
8263 042013 103 050 101 103 051
8264 042014 040 106 101 111 114
8265 042015 105 104 000 000 000
8266 042016 103 050 101 103 053
8267 042017 061 051 040 106 101
8268 042020 111 114 105 104 000
8269 042021 103 050 105 051 040
8270 042022 106 101 111 114 105
8271 042023 104 000 000 000 000
8272 042024 103 050 105 053 061
8273 042025 051 040 106 101 111
8274 042026 114 105 104 000 000
8275 042027 103 050 103 050 101
8276 042030 103 122 051 051 040
8277 042031 106 101 111 114 105
8278 042032 104 000 000 000 000
8279 042033 103 050 103 050 101
8280 042034 103 122 053 061 051
8281 042035 051 040 106 101 111
8282 042036 114 105 104 000 000
8283 042037 103 050 103 050 101
8284 042040 103 114 051 051 040
8285 042041 106 101 111 114 105
8286 042042 104 000 000 000 000
8287 042043 103 050 103 050 105
8288 042044 051 051 040 106 101
8289 042045 111 114 105 104 000
8290 042046 106 114 101 107 040
8291 042047 106 101 111 114 105
8292 042050 104 000 000 000 000
8293 042051 76 45 70 43 45 45
8294 042052 44 45 44 00 41 54
8295 042053 54 57 67 45 44 00
8296 042054 45 62 62 57 62 63
8297 042055 76 77 00 00 00 00
8298 LIST
8299 042056 000000 000000 ENDSLD: 0
8300
8301 IFDEF DEBUG,<
8302 042057 PATCH: BLOCK DEBUG ;PATCHING AREA
8303 >
8304
8305 ;PROGRAM VARIABLES
8306 042157 VAR
8307
8308 IFDEF PGMEND,<
8309 042167 000000 000000 END: 0
DSKCE DECSYSTEM 2020 ADVANCED INSTRUCTION DIAGNOSTIC #5, VER 0,1 MACRO %53(1020) 10:47 21-Jun-78 Page 1-19
STOR KSM 28-Mar-78 16:25 *STOR* RESERVED STORAGE, MARCH 1978 SEQ 0187
8310 030000 END BEGIN >
NO ERRORS DETECTED
PROGRAM BREAK IS 000000
ABSOLUTE BREAK IS 042170
CPU TIME USED 00:38.443
38P CORE USED
ABORT 577#
AC 1158# 1160 1161 1162 1163 1168 1170 1172 1173 1174 1175 1176 1191 1193 SEQ 0188
1195 1196 1197 1198 1199 1205 1207 1209 1210 1211 1212 1213 1219 1221
1223 1224 1225 1226 1227 1233 1235 1237 1238 1239 1240 1241 1247 1249
1251 1252 1253 1254 1255 1261 1263 1265 1266 1267 1268 1269 1275 1277
1279 1280 1281 1282 1283 1289 1291 1293 1294 1295 1296 1297 1312 1314
1316 1317 1318 1319 1320 1326 1328 1330 1331 1332 1333 1334 1340 1342
1344 1345 1346 1347 1348 1354 1356 1358 1359 1360 1361 1362 1368 1370
1372 1373 1374 1375 1376 1382 1384 1386 1387 1388 1389 1390 1396 1398
1400 1401 1402 1403 1404 1410 1412 1414 1415 1416 1417 1418 1424 1426
1428 1429 1430 1431 1432 1438 1440 1442 1443 1444 1445 1446 1452 1454
1456 1457 1458 1459 1460 1466 1468 1470 1471 1472 1473 1474 1480 1482
1484 1485 1486 1487 1488 1494 1496 1498 1499 1500 1501 1502 1508 1510
1512 1513 1514 1515 1516 1522 1524 1526 1527 1528 1529 1530 1536 1538
1540 1541 1542 1543 1544 1550 1552 1554 1555 1556 1557 1558 1573 1575
1577 1578 1579 1580 1581 1587 1589 1591 1592 1593 1594 1595 1601 1603
1605 1606 1607 1608 1609 1615 1617 1619 1620 1621 1622 1623 1629 1631
1633 1634 1635 1636 1637 1643 1645 1647 1648 1649 1650 1651 1657 1659
1661 1662 1663 1664 1665 1671 1673 1675 1676 1677 1678 1679 1685 1687
1689 1690 1691 1692 1693 1699 1701 1703 1704 1705 1706 1707 1713 1715
1717 1718 1719 1720 1721 1727 1729 1731 1732 1733 1734 1735 1741 1743
1745 1746 1747 1748 1749 1755 1757 1759 1760 1761 1762 1763 1769 1771
1773 1774 1775 1776 1777 1783 1785 1787 1788 1789 1790 1791 1797 1799
1801 1802 1803 1804 1805 1820 1822 1824 1825 1826 1827 1828 1834 1836
1838 1839 1840 1841 1842 1848 1850 1852 1853 1854 1855 1856 1862 1864
1866 1867 1868 1869 1870 1876 1878 1880 1881 1882 1883 1884 1890 1892
1894 1895 1896 1897 1898 1904 1906 1908 1909 1910 1911 1912 1918 1920
1922 1923 1924 1925 1926 1932 1934 1936 1937 1938 1939 1940 1946 1948
1950 1951 1952 1953 1954 1960 1962 1964 1965 1966 1967 1968 1974 1976
1978 1979 1980 1981 1982 1988 1990 1992 1993 1994 1995 1996 2002 2004
2006 2007 2008 2009 2010 2016 2018 2020 2021 2022 2023 2024 2030 2032
2034 2035 2036 2037 2038 2044 2046 2048 2049 2050 2051 2052 2058 2060
2062 2063 2064 2065 2066 2087 2089 2091 2092 2093 2094 2095 2103 2105
2107 2108 2109 2110 2111 2119 2121 2123 2124 2125 2126 2127 2135 2137
2139 2140 2141 2142 2143 2151 2153 2155 2156 2157 2158 2159 2167 2169
2171 2172 2173 2174 2175 2183 2185 2187 2188 2189 2190 2191 2199 2201
2203 2204 2205 2206 2207 2215 2217 2219 2220 2221 2222 2223 2240 2242
2244 2245 2246 2247 2248 2255 2257 2259 2260 2261 2262 2263 2270 2272
2274 2275 2276 2277 2278 2285 2287 2289 2290 2291 2292 2293 2300 2302
2304 2305 2306 2307 2308 2315 2317 2319 2320 2321 2322 2323 2330 2332
2334 2335 2336 2337 2338 2345 2347 2349 2350 2351 2352 2353 2360 2362
2364 2365 2366 2367 2368 2375 2377 2379 2380 2381 2382 2383 2400 2402
2404 2405 2406 2407 2408 2415 2417 2419 2420 2421 2422 2423 2430 2432
2434 2435 2436 2437 2438 2445 2447 2449 2450 2451 2452 2453 2460 2462
2464 2465 2466 2467 2468 2475 2477 2479 2480 2481 2482 2483 2490 2492
2494 2495 2496 2497 2498 2505 2507 2509 2510 2511 2512 2513 2529 2531
2533 2534 2535 2536 2537 2544 2546 2548 2549 2550 2551 2552 2559 2561
2563 2564 2565 2566 2567 2574 2576 2578 2579 2580 2581 2582 2589 2591
2593 2594 2595 2596 2597 2604 2606 2608 2609 2610 2611 2612 2619 2621
2623 2624 2625 2626 2627 2634 2636 2638 2639 2640 2641 2642 2649 2651
2653 2654 2655 2656 2657 2674 2676 2678 2679 2680 2681 2682 2689 2691
2693 2694 2695 2696 2697 2704 2706 2708 2709 2710 2711 2712 2719 2721
2723 2724 2725 2726 2727 2734 2736 2738 2739 2740 2741 2742 2749 2751
2753 2754 2755 2756 2757 2764 2766 2768 2769 2770 2771 2772 2779 2781
2783 2784 2785 2786 2787 2804 2806 2808 2809 2810 2811 2812 2819 2821 SEQ 0189
2823 2824 2825 2826 2827 2834 2836 2838 2839 2840 2841 2842 2849 2851
2853 2854 2855 2856 2857 2864 2866 2868 2869 2870 2871 2872 2879 2881
2883 2884 2885 2886 2887 2894 2896 2898 2899 2900 2901 2902 2909 2911
2913 2914 2915 2916 2917 2924 2926 2928 2929 2930 2931 2932 2939 2941
2943 2944 2945 2946 2947 2965 2967 2969 2970 2971 2972 2973 2980 2982
2984 2985 2986 2987 2988 2995 2997 2999 3000 3001 3002 3003 3010 3012
3014 3015 3016 3017 3018 3025 3027 3029 3030 3031 3032 3033 3040 3042
3044 3045 3046 3047 3048 3055 3057 3059 3060 3061 3062 3063 3070 3072
3074 3075 3076 3077 3078 3084 3086 3088 3089 3090 3091 3092 3093 3096
3098 3100 3101 3102 3103 3104 3107 3109 3111 3112 3113 3114 3115 3118
3120 3122 3123 3124 3125 3126 3129 3131 3133 3134 3135 3136 3137 3140
3142 3144 3145 3146 3147 3148 3151 3153 3155 3156 3157 3158 3159 3162
3164 3166 3167 3168 3169 3170 3173 3175 3177 3178 3179 3180 3181 3184
3186 3188 3189 3190 3191 3192 3195 3197 3199 3200 3201 3202 3203 3206
3208 3210 3211 3212 3213 3214 3217 3219 3221 3222 3223 3224 3225 3228
3230 3232 3233 3234 3235 3236 3239 3241 3243 3244 3245 3246 3247 3250
3252 3254 3255 3256 3257 3258 3261 3263 3265 3266 3267 3268 3269 3272
3274 3276 3277 3278 3279 3280 3283 3285 3287 3288 3289 3290 3291 3294
3296 3298 3299 3300 3301 3302 3305 3307 3309 3310 3311 3312 3313 3316
3318 3320 3321 3322 3323 3324 3327 3329 3331 3332 3333 3334 3335 3338
3340 3342 3343 3344 3345 3346 3349 3351 3353 3354 3355 3356 3357 3360
3362 3364 3365 3366 3367 3368 3371 3373 3375 3376 3377 3378 3379 3382
3384 3386 3387 3388 3389 3390 3393 3395 3397 3398 3399 3400 3401 3404
3406 3408 3409 3410 3411 3412 3415 3417 3419 3420 3421 3422 3423 3426
3428 3430 3431 3432 3433 3434 3437 3439 3441 3442 3443 3444 3445 3448
3450 3452 3453 3454 3455 3456 3459 3461 3463 3464 3465 3466 3467 3470
3472 3474 3475 3476 3477 3478 3481 3483 3485 3486 3487 3488 3489 3492
3494 3496 3497 3498 3499 3500 3503 3505 3507 3508 3509 3510 3511 3514
3516 3518 3519 3520 3521 3522 3525 3527 3529 3530 3531 3532 3533 3536
3538 3540 3541 3542 3543 3544 3547 3549 3551 3552 3553 3554 3555 3558
3560 3562 3563 3564 3565 3566 3569 3571 3573 3574 3575 3576 3577 3580
3582 3584 3585 3586 3587 3588 3591 3593 3595 3596 3597 3598 3599 3603
3605 3607 3608 3609 3610 3611 3614 3616 3618 3619 3620 3621 3622 3625
3627 3629 3630 3631 3632 3633 3636 3638 3640 3641 3642 3643 3644 3647
3649 3651 3652 3653 3654 3655 3658 3660 3662 3663 3664 3665 3666 3669
3671 3673 3674 3675 3676 3677 3680 3682 3684 3685 3686 3687 3688 3691
3693 3695 3696 3697 3698 3699 3702 3704 3706 3707 3708 3709 3710 3713
3715 3717 3718 3719 3720 3721 3724 3726 3728 3729 3730 3731 3732 3735
3737 3739 3740 3741 3742 3743 3746 3748 3750 3751 3752 3753 3754 3757
3759 3761 3762 3763 3764 3765 3768 3770 3772 3773 3774 3775 3776 3779
3781 3783 3784 3785 3786 3787 3790 3792 3794 3795 3796 3797 3798 3801
3803 3805 3806 3807 3808 3809 3812 3814 3816 3817 3818 3819 3820 3823
3825 3827 3828 3829 3830 3831 3834 3836 3838 3839 3840 3841 3842 3845
3847 3849 3850 3851 3852 3853 3856 3858 3860 3861 3862 3863 3864 3867
3869 3871 3872 3873 3874 3875 3878 3880 3882 3883 3884 3885 3886 3889
3891 3893 3894 3895 3896 3897 3901 3903 3905 3906 3907 3908 3909 3912
3914 3916 3917 3918 3919 3920 3923 3925 3927 3928 3929 3930 3931 3934
3936 3938 3939 3940 3941 3942 3945 3947 3949 3950 3951 3952 3953 3956
3958 3960 3961 3962 3963 3964 3967 3969 3971 3972 3973 3974 3975 3978
3980 3982 3983 3984 3985 3986 3989 3991 3993 3994 3995 3996 3997 4000
4002 4004 4005 4006 4007 4008 4011 4013 4015 4016 4017 4018 4019 4022
4024 4026 4027 4028 4029 4030 4033 4035 4037 4038 4039 4040 4041 4044
4046 4048 4049 4050 4051 4052 4055 4057 4059 4060 4061 4062 4063 4066 SEQ 0190
4068 4070 4071 4072 4073 4074 4077 4079 4081 4082 4083 4084 4085 4088
4090 4092 4093 4094 4095 4096 4099 4101 4103 4104 4105 4106 4107 4110
4112 4114 4115 4116 4117 4118 4121 4123 4125 4126 4127 4128 4129 4132
4134 4136 4137 4138 4139 4140 4143 4145 4147 4148 4149 4150 4151 4154
4156 4158 4159 4160 4161 4162 4165 4167 4169 4170 4171 4172 4173 4176
4178 4180 4181 4182 4183 4184 4187 4189 4191 4192 4193 4194 4195 4198
4200 4202 4203 4204 4205 4206 4209 4211 4213 4214 4215 4216 4217 4220
4222 4224 4225 4226 4227 4228 4231 4233 4235 4236 4237 4238 4239 4242
4244 4246 4247 4248 4249 4250 4253 4255 4257 4258 4259 4260 4261 4264
4266 4268 4269 4270 4271 4272 4275 4277 4279 4280 4281 4282 4283 4286
4288 4290 4291 4292 4293 4294 4297 4299 4301 4302 4303 4304 4305 4308
4310 4312 4313 4314 4315 4316 4319 4321 4323 4324 4325 4326 4327 4330
4332 4334 4335 4336 4337 4338 4341 4343 4345 4346 4347 4348 4349 4352
4354 4356 4357 4358 4359 4360 4363 4365 4367 4368 4369 4370 4371 4374
4376 4378 4379 4380 4381 4382 4385 4387 4389 4390 4391 4392 4393 4396
4398 4400 4401 4402 4403 4404 4407 4409 4411 4412 4413 4414 4415 4418
4420 4422 4423 4424 4425 4426 4429 4431 4433 4434 4435 4436 4437 4440
4442 4444 4445 4446 4447 4448 4451 4453 4455 4456 4457 4458 4459 4462
4464 4466 4467 4468 4469 4470 4473 4475 4477 4478 4479 4480 4481 4484
4486 4488 4489 4490 4491 4492 4495 4497 4499 4500 4501 4502 4503 4506
4508 4510 4511 4512 4513 4514 4517 4519 4521 4522 4523 4524 4525 4528
4530 4532 4533 4534 4535 4536 4539 4541 4543 4544 4545 4546 4547 4550
4552 4554 4555 4556 4557 4558 4561 4563 4565 4566 4567 4568 4569 4572
4574 4576 4577 4578 4579 4580 4583 4585 4587 4588 4589 4590 4591 4594
4596 4598 4599 4600 4601 4602 4605 4607 4609 4610 4611 4612 4613 4616
4618 4620 4621 4622 4623 4624 4627 4629 4631 4632 4633 4634 4635 4638
4640 4642 4643 4644 4645 4646 4649 4651 4653 4654 4655 4656 4657 4660
4662 4664 4665 4666 4667 4668 4671 4673 4675 4676 4677 4678 4679 4682
4684 4686 4687 4688 4689 4690 4693 4695 4697 4698 4699 4700 4701 4704
4706 4708 4709 4710 4711 4712 4715 4717 4719 4720 4721 4722 4723 4726
4728 4730 4731 4732 4733 4734 4737 4739 4741 4742 4743 4744 4745 4748
4750 4752 4753 4754 4755 4756 4759 4761 4763 4764 4765 4766 4767 4770
4772 4774 4775 4776 4777 4778 4781 4783 4785 4786 4787 4788 4789 4792
4794 4796 4797 4798 4799 4800 4803 4805 4807 4808 4809 4810 4811 4814
4816 4818 4819 4820 4821 4822 4825 4827 4829 4830 4831 4832 4833 4836
4838 4840 4841 4842 4843 4844 4847 4849 4851 4852 4853 4854 4855 4858
4860 4862 4863 4864 4865 4866 4869 4871 4873 4874 4875 4876 4877 4880#
4882 4883 4884 4885 4888 4890 4892 4893 4894 4895 4896 4899 4902 4903
4904 4905 4908 4910 4912 4913 4914 4915 4916 4918 4920 4921 4922 4923
4925 4927 4929 4930 4931 4932 4933 4936 4939 4940 4941 4942 4945 4947
4949 4950 4951 4952 4953 4955 4957 4958 4959 4960 4962 4964 4966 4967
4968 4969 4970 4973 4976 4977 4978 4979 4982 4984 4986 4987 4988 4989
4990 4992 4994 4995 4996 4997 4999 5001 5003 5004 5005 5006 5007 5010
5013 5014 5015 5016 5019 5021 5023 5024 5025 5026 5027 5029 5031 5032
5033 5034 5037# 5039 5040 5041 5042 5046 5048 5050 5051 5052 5053 5054
5055 5058 5060 5062 5063 5064 5065 5066 5069 5071 5073 5074 5075 5076
5077 5080 5082 5084 5085 5086 5087 5088 5091 5093 5095 5096 5097 5098
5099 5102 5104 5106 5107 5108 5109 5110 5113 5115 5117 5118 5119 5120
5121 5124 5126 5128 5129 5130 5131 5132 5135# 5137 5138 5139 5140 5143
5145 5147 5148 5149 5150 5151 5154 5157 5158 5159 5160 5163 5165 5167
5168 5169 5170 5171 5173 5175 5176 5177 5178 5180 5182 5184 5185 5186
5187 5188 5191 5194 5195 5196 5197 5200 5202 5204 5205 5206 5207 5208
5210 5212 5213 5214 5215 5217 5219 5221 5222 5223 5224 5225 5228 5231 SEQ 0191
5232 5233 5234 5237 5239 5241 5242 5243 5244 5245 5247 5249 5250 5251
5252 5254 5256 5258 5259 5260 5261 5262 5265 5268 5269 5270 5271 5274
5276 5278 5279 5280 5281 5282 5284 5286 5287 5288 5289 5292# 5294 5295
5296 5297 5301 5303 5305 5306 5307 5308 5309 5310 5313 5315 5317 5318
5319 5320 5321 5324 5326 5328 5329 5330 5331 5332 5335 5337 5339 5340
5341 5342 5343 5346 5348 5350 5351 5352 5353 5354 5357 5359 5361 5362
5363 5364 5365 5368 5370 5372 5373 5374 5375 5376 5379 5381 5383 5384
5385 5386 5387 5390 5392 5394 5395 5396 5397 5398 5401 5403 5405 5406
5407 5408 5409 5412 5414 5416 5417 5418 5419 5420 5423 5425 5427 5428
5429 5430 5431 5434 5436 5438 5439 5440 5441 5442 5445 5447 5449 5450
5451 5452 5453 5456 5458 5460 5461 5462 5463 5464 5467 5469 5471 5472
5473 5474 5475 5478 5480 5482 5483 5484 5485 5486 5489 5491 5493 5494
5495 5496 5497 5500 5502 5504 5505 5506 5507 5508 5511 5513 5515 5516
5517 5518 5519 5522 5524 5526 5527 5528 5529 5530 5534 5536 5538 5539
5540 5541 5542 5545 5547 5549 5550 5551 5552 5553 5556 5558 5560 5561
5562 5563 5564 5567 5569 5571 5572 5573 5574 5575 5578 5580 5582 5583
5584 5585 5586 5589 5591 5593 5594 5595 5596 5597 5600 5602 5604 5605
5606 5607 5608 5611 5613 5615 5616 5617 5618 5619 5622 5624 5626 5627
5628 5629 5630 5633 5635 5637 5638 5639 5640 5641 5644 5646 5648 5649
5650 5651 5652 5655 5657 5659 5660 5661 5662 5663 5666 5668 5670 5671
5672 5673 5674 5677 5679 5683 5684 5685 5686 5687 5689 5690 5691 5692
5697 5699 5703 5704 5705 5706 5707 5709 5710 5711 5712 5717 5719 5723
5724 5725 5726 5727 5729 5730 5731 5732 5737 5739 5743 5744 5745 5746
5747 5749 5750 5751 5752 5757 5759 5763 5764 5765 5766 5767 5769 5770
5771 5772 5777 5779 5783 5784 5785 5786 5787 5789 5790 5791 5792 5797
5799 5803 5804 5805 5806 5807 5809 5810 5811 5812 5817 5819 5823 5824
5825 5826 5827 5829 5830 5831 5832 5837 5839 5843 5844 5845 5846 5847
5849 5850 5851 5852 5857 5859 5863 5864 5865 5866 5867 5869 5870 5871
5872 5877 5879 5883 5884 5885 5886 5887 5889 5890 5891 5892 5897 5899
5903 5904 5905 5906 5907 5909 5910 5911 5912 5917 5919 5923 5924 5925
5926 5927 5929 5930 5931 5932 5937 5939 5943 5944 5945 5946 5947 5949
5950 5951 5952 5957 5959 5961 5962 5963 5964 5965 5968 5970 5972 5973
5974 5975 5976 5979 5981 5983 5984 5985 5986 5987 5990 5992 5994 5995
5996 5997 5998 6001 6003 6005 6006 6007 6008 6009 6012 6014 6016 6017
6018 6019 6020 6023 6025 6027 6028 6029 6030 6031 6034 6036 6038 6039
6040 6041 6042 6045 6047 6049 6050 6051 6052 6053 6056 6058 6060 6061
6062 6063 6064 6067 6069 6071 6072 6073 6074 6075 6078 6080 6082 6083
6084 6085 6086 6089 6091 6093 6094 6095 6096 6097 6100 6102 6106 6107
6108 6109 6110 6112 6113 6114 6115 6120 6122 6124 6125 6126 6127 6128
6131 6133 6135 6136 6137 6138 6139 6142 6144 6146 6147 6148 6149 6150
6153 6155 6157 6158 6159 6160 6161 6164 6166 6168 6169 6170 6171 6172
6175 6177 6179 6180 6181 6182 6183 6186 6188 6190 6191 6192 6193 6194
6197 6199 6201 6202 6203 6204 6205 6208 6210 6212 6213 6214 6215 6216
6219# 6221 6222 6223 6224 6227 6229 6231 6232 6233 6234 6235 6238 6241
6242 6243 6244 6247 6249 6251 6252 6253 6254 6255 6257 6259 6260 6261
6262 6264 6266 6268 6269 6270 6271 6272 6275 6278 6279 6280 6281 6284
6286 6288 6289 6290 6291 6292 6294 6296 6297 6298 6299 6301 6303 6305
6306 6307 6308 6309 6312 6315 6316 6317 6318 6321 6323 6325 6326 6327
6328 6329 6331 6333 6334 6335 6336 6338 6340 6342 6343 6344 6345 6346
6349 6352 6353 6354 6355 6358 6360 6362 6363 6364 6365 6366 6368 6370
6371 6372 6373 6376# 6378 6379 6380 6381 6385 6387 6389 6390 6391 6392
6393 6394 6397 6399 6401 6402 6403 6404 6405 6408 6410 6412 6413 6414
6415 6416 6419 6421 6423 6424 6425 6426 6427 6430 6432 6434 6435 6436 SEQ 0192
6437 6438 6441 6443 6445 6446 6447 6448 6449 6452 6454 6456 6457 6458
6459 6460 6463 6465 6467 6468 6469 6470 6471 6474 6476 6478 6479 6480
6481 6482 6485 6487 6489 6490 6491 6492 6493 6496 6498 6500 6501 6502
6503 6504 6507 6509 6511 6512 6513 6514 6515 6518 6520 6522 6523 6524
6525 6526 6529 6531 6533 6534 6535 6536 6537 6540 6542 6544 6545 6546
6547 6548 6551 6553 6555 6556 6557 6558 6559 6562 6564 6566 6567 6568
6569 6570 6573 6575 6577 6578 6579 6580 6581 6584 6586 6588 6589 6590
6591 6592 6595 6597 6599 6600 6601 6602 6603 6606 6608 6610 6611 6612
6613 6614 6617 6619 6621 6622 6623 6624 6625 6628 6630 6632 6633 6634
6635 6636 6639 6641 6643 6644 6645 6646 6647 6650 6652 6654 6655 6656
6657 6658 6661 6663 6665 6666 6667 6668 6669 6672 6674 6676 6677 6678
6679 6680 6683 6685 6687 6688 6689 6690 6691 6694 6696 6698 6699 6700
6701 6702 6705 6707 6709 6710 6711 6712 6713 6716 6718 6720 6721 6722
6723 6724 6727 6729 6731 6732 6733 6734 6735 6738 6740 6742 6743 6744
6745 6746 6749 6751 6753 6754 6755 6756 6757 6760 6762 6764 6765 6766
6767 6768 6771 6773 6775 6776 6777 6778 6779 6782 6784 6786 6787 6788
6789 6790 6793 6795 6797 6798 6799 6800 6801 6804 6806 6808 6809 6810
6811 6812 6815 6817 6819 6820 6821 6822 6823 6826 6828 6830 6831 6832
6833 6834 6837 6839 6841 6842 6843 6844 6845 6848 6850 6852 6853 6854
6855 6856 6859 6861 6863 6864 6865 6866 6867 6871 6873 6878 6879 6889
6890 6892 6895 6896 6897 6898 6901 6903 6904 6907 6908 6914# 6916 6917
6918 6919 6922 6924 6926 6927 6928 6929 6930 6933 6936 6937 6938 6939
6942 6944 6946 6947 6948 6949 6950 6952 6954 6955 6956 6957 6959 6961
6963 6964 6965 6966 6967 6970 6973 6974 6975 6976 6979 6981 6983 6984
6985 6986 6987 6989 6991 6992 6993 6994 6996 6998 7000 7001 7002 7003
7004 7007 7010 7011 7012 7013 7016 7018 7020 7021 7022 7023 7024 7026
7028 7029 7030 7031 7033 7035 7037 7038 7039 7040 7041 7044 7047 7048
7049 7050 7053 7055 7057 7058 7059 7060 7061 7063 7065 7066 7067 7068
7072 7074 7076 7077 7078 7079 7080 7082 7084 7085 7086 7087 7092 7094
7096 7097 7098 7099 7100 7102 7104 7105 7106 7107
ALTMGO 889# 7232
APR 6883
AROV 803#
AROVTP 803#
AROVU 803#
AST 1004#
ATSIN 1005#
BEGEND 885# 7109
BEGIN 71 76 77 78 79 80 81 792 793 816# 8310
BEGIN1 832# 886
BELL 1008#
BIS 803#
CCA 803#
CE00 1159#
CHAIN 597#
CHNOFF 803#
CHNON 803#
CLKU 803#
CLOCKF 871#
CNTLC 888#
CNTRP 803#
COMMA 997#
CONSW 872# 7167 7233 7257 SEQ 0193
CPOPJ 892#
CPOPJ1 890#
CRLF 727 728 992#
CRLF2 731 732 994#
CRY0 803#
CRY1 803#
CSHFLG 1051#
CSHMEM 1052#
CTRP 803#
CYCL60 1045#
DCK 803# 7085 7105
DDTLNK 611# 830
DDTSRT 830#
DEBUG 55# 8301 8302
DECVER 4# 10 23 851
DF22F 956#
DIAGMN 819#
DING 583# 7238
DOLLAR 1011#
DSKUPD 856
EBIT0 803#
EBIT1 803#
EBIT10 803#
EBIT11 803#
EBIT12 803#
EBIT13 803#
EBIT14 803#
EBIT15 803#
EBIT2 803#
EBIT3 803#
EBIT4 803#
EBIT5 803#
EBIT6 803#
EBIT7 803#
EBIT8 803#
EBIT9 803#
END 8309#
ENDFIX 1131#
ENDSLD 8299#
ERDIAG 59# 7152
ERMORE 905# 7225
EROLD 60# 803
ERRELB 7222
ERRLOP 1163# 1163 4885# 4885 5042# 5042 5140# 5140 5297# 5297 6224# 6224 6381# 6381
6919# 6919 7132 7243 7246 7247
ERRMES 41 42 43 44 45 46 47 48 49 50 51 7114#
ERRPC 876# 7119 7149
ERRTLS 877# 7117 7250
ERSTOP 586# 7234
EXCASB 56# 854
EXIOT 803#
FOV 803#
FOVU 803# SEQ 0194
FRDLNK 609#
FSELNK 608#
FXU 803# 4903 4921 4940 4958 4977 4995 5014 5032 5158 5176 5195 5213 5232
5250 5269 5287 6242 6260 6279 6297 6316 6334 6353 6371 6937 6955 6974
6992 7011 7029 7048 7066
HYPEN 1002#
INHCSH 594#
INHPAG 591#
IOCLR 803#
ITERAT 90# 849
ITRCH1 909#
ITRCNT 849#
JOB41 803#
JOBAPR 803#
JOBCNI 803#
JOBDDT 803#
JOBFF 803#
JOBOPC 803# 7231
JOBREL 803#
JOBREN 803#
JOBSA 803#
JOBSYM 803#
JOBTPC 803#
JOBUSY 803#
JOBUUO 803#
JOBVER 803#
KAIFLG 866#
KLFLG 867# 5681 5701 5721 5741 5761 5781 5801 5821 5841 5861 5881 5901 5921
5941 6104
KNTRP 803#
KTRP 803#
LACLK 803#
LACLKE 803#
LAPRAL 803#
LAPRP1 803#
LAPRP2 803#
LAPRP3 803#
LAPRP4 803#
LAPRP5 803#
LAPRP6 803#
LAPRP7 803#
LCHNOF 803#
LCHNON 803#
LCNTXT 803#
LCNXER 803#
LCPAER 803#
LCPSFT 803#
LCPWRF 803#
LDATAF 803#
LDLNK 610# 819 821
LDNXER 803#
LDPAER 803#
LDPSFT 803# SEQ 0195
LDPWRF 803#
LEBXMH 803#
LEBXML 803#
LENXER 803#
LEPAER 803#
LEPSFT 803#
LEPWRF 803#
LEUPFW 803#
LEXCMP 803#
LFLGCL 803#
LFLGDS 803#
LFLGEN 803#
LFLGST 803#
LFP 1006#
LINSTF 803#
LINT 803#
LIOCLR 803#
LLACBL 803#
LLDUSB 803#
LMBXMH 803#
LMBXML 803#
LNXMEN 803#
LNXMER 803#
LOOPER 585# 7236
LPAREN 803#
LPARER 803#
LPFWPC 803#
LPGFTR 803#
LPICH1 803#
LPICH2 803#
LPICH3 803#
LPICH4 803#
LPICH5 803#
LPICH6 803#
LPICH7 803#
LPICHA 803#
LPICLR 803#
LPIIP1 803#
LPIIP2 803#
LPIIP3 803#
LPIIP4 803#
LPIIP5 803#
LPIIP6 803#
LPIIP7 803#
LPIOFF 803#
LPION 803#
LPRCH1 803#
LPRCH2 803#
LPRCH3 803#
LPRCH4 803#
LPRCH5 803#
LPRCH6 803#
LPRCH7 803# SEQ 0196
LPRFMH 803#
LPRFML 803#
LPSFT 803#
LPSFTE 803#
LPWRFE 803#
LPWRFL 803#
LREQSE 803#
LRQCLR 803#
LSECMO 803#
LSMODE 803#
LSNXER 803#
LSPAER 803#
LSPSFT 803#
LSPWRF 803#
LTBASH 803#
LTBASL 803#
LTRPAE 803#
LTRPEN 803#
LUSCMP 803#
LUUO 803#
LUUO1 41# 936 937
LUUO10 48# 936 941
LUUO11 49# 936 941
LUUO12 50# 936 942
LUUO13 51# 936 942
LUUO14 936 943
LUUO15 936 943
LUUO16 936 944
LUUO17 936 944
LUUO2 42# 936 938
LUUO20 936 945
LUUO21 936 945
LUUO22 936 946
LUUO23 936 946
LUUO24 936 947
LUUO25 936 947
LUUO26 936 948
LUUO27 936 948
LUUO3 43# 936 938
LUUO30 936 949
LUUO31 936 949
LUUO32 936 950
LUUO33 936 950
LUUO4 44# 936 939
LUUO5 45# 936 939
LUUO6 46# 936 940
LUUO7 47# 936 940
LUUOI 803#
LWRITE 803#
MAPNEW 957#
MARGIN 879#
MCNVER 3# 10 23 851
MEMLOW 959# SEQ 0197
MEMMAP 857
MEMSIZ 960#
MEMTOT 958#
MICNT 7120# 7120 7121 7134
MINUS 1001#
MODDVC 593#
MODDVL 792 792# 852
MODDVU 793 793# 853
MODLNK 612# 816
MONCTL 869# 7135 7248
MONFLG 868#
MONTEN 870#
MONTYP 1083#
MPVU 803#
MUUO 803#
MUUOPC 803#
NOPNT 581# 7125
NXMU 803#
OPRSEL 595#
OPTIME 971#
P 638 639 640 641 803# 891
PAG 803#
PALERS 587# 7258
PAREA1 83# 847
PAREA2 84# 848
PAREA3 85# 845
PAREA4 86# 846
PAREA5 87# 858
PAREA6 88# 859
PAREA7 858#
PAREA8 859#
PARU 803#
PASCNT 873# 7140 7144
PATCH 8302#
PDISF 968#
PDLOVU 803#
PDOVTP 803#
PERIOD 998#
PFSTRT 825#
PGMEND 58# 8308
PGMNAM 850 1135#
PICHN1 803#
PICHN2 803#
PICHN3 803#
PICHN4 803#
PICHN5 803#
PICHN6 803#
PICHN7 803#
PICHNA 803#
PICLR 803#
PIOFF 803#
PION 803#
PLIST 1037# 1037 SEQ 0198
PLISTE 1037 1039#
PLISTS 1038#
PLUS 1003#
PNTENB 967#
PNTEXT 846#
PNTFLG 966#
PNTINH 969#
PNTLPT 582#
PNTNAM 845#
PNTRP 803#
PNTSPC 970#
PROCED 7123# 7123 7237 7244
PTRP 803#
PVPAGI 1064#
QUEST 1009#
RADIX 1012#
RADLSC 1014#
RADLSP 1013#
RANDBS 847#
REENTR 827#
RELIAB 589#
RENTR1 73 1132#
REPT 803#
REPT1 803#
REPTU 925#
REQSET 803#
RESRT1 72 902#
RESRT2 903#
RETURN 834#
RSTART 578#
RTP 1007#
RUNFLG 874#
S100 1167#
S10100 3084# 3093
S10200 3096# 3104
S10300 3107# 3115
S10400 3118# 3126
S10500 3129# 3137
S10600 3140# 3148
S10700 3151# 3159
S11000 3162# 3170
S11100 3173# 3181
S11200 3184# 3192
S11300 3195# 3203
S11400 3206# 3214
S11500 3217# 3225
S11600 3228# 3236
S11700 3239# 3247
S12000 3250# 3258
S12100 3261# 3269
S12200 3272# 3280
S12300 3283# 3291
S12400 3294# 3302 SEQ 0199
S12500 3305# 3313
S12600 3316# 3324
S12700 3327# 3335
S13000 3338# 3346
S13100 3349# 3357
S13200 3360# 3368
S13300 3371# 3379
S13400 3382# 3390
S13500 3393# 3401
S13600 3404# 3412
S13700 3415# 3423
S14000 3426# 3434
S14100 3437# 3445
S14200 3448# 3456
S14300 3459# 3467
S14400 3470# 3478
S14500 3481# 3489
S14600 3492# 3500
S14700 3503# 3511
S15000 3514# 3522
S15100 3525# 3533
S15200 3536# 3544
S15300 3547# 3555
S15400 3558# 3566
S15500 3569# 3577
S15600 3580# 3588
S15700 3591# 3599
S16000 3603# 3611
S16100 3614# 3622
S16200 3625# 3633
S16300 3636# 3644
S16400 3647# 3655
S16500 3658# 3666
S16600 3669# 3677
S16700 3680# 3688
S17000 3691# 3699
S17100 3702# 3710
S17200 3713# 3721
S17300 3724# 3732
S17400 3735# 3743
S17500 3746# 3754
S17600 3757# 3765
S17700 3768# 3776
S200 2073#
S20000 3779# 3787
S20100 3790# 3798
S20200 3801# 3809
S20300 3812# 3820
S20400 3823# 3831
S20500 3834# 3842
S20600 3845# 3853
S20700 3856# 3864
S21000 3867# 3875 SEQ 0200
S21100 3878# 3886
S21200 3889# 3897
S21300 3901# 3909
S21400 3912# 3920
S21500 3923# 3931
S21600 3934# 3942
S21700 3945# 3953
S22000 3956# 3964
S22100 3967# 3975
S22200 3978# 3986
S22300 3989# 3997
S22400 4000# 4008
S22500 4011# 4019
S22600 4022# 4030
S22700 4033# 4041
S23000 4044# 4052
S23100 4055# 4063
S23200 4066# 4074
S23300 4077# 4085
S23400 4088# 4096
S23500 4099# 4107
S23600 4110# 4118
S23700 4121# 4129
S24000 4132# 4140
S24100 4143# 4151
S24200 4154# 4162
S24300 4165# 4173
S24400 4176# 4184
S24500 4187# 4195
S24600 4198# 4206
S24700 4209# 4217
S25000 4220# 4228
S25100 4231# 4239
S25200 4242# 4250
S25300 4253# 4261
S25400 4264# 4272
S25500 4275# 4283
S25600 4286# 4294
S25700 4297# 4305
S26000 4308# 4316
S26100 4319# 4327
S26200 4330# 4338
S26300 4341# 4349
S26400 4352# 4360
S26500 4363# 4371
S26600 4374# 4382
S26700 4385# 4393
S27000 4396# 4404
S27100 4407# 4415
S27200 4418# 4426
S27300 4429# 4437
S27400 4440# 4448
S27500 4451# 4459 SEQ 0201
S27600 4462# 4470
S27700 4473# 4481
S30000 4484# 4492
S30100 4495# 4503
S30200 4506# 4514
S30300 4517# 4525
S30400 4528# 4536
S30500 4539# 4547
S30600 4550# 4558
S30700 4561# 4569
S31000 4572# 4580
S31100 4583# 4591
S31200 4594# 4602
S31300 4605# 4613
S31400 4616# 4624
S31500 4627# 4635
S31600 4638# 4646
S31700 4649# 4657
S32000 4660# 4668
S32100 4671# 4679
S32200 4682# 4690
S32300 4693# 4701
S32400 4704# 4712
S32500 4715# 4723
S32600 4726# 4734
S32700 4737# 4745
S33000 4748# 4756
S33100 4759# 4767
S33200 4770# 4778
S33300 4781# 4789
S33400 4792# 4800
S33500 4803# 4811
S33600 4814# 4822
S33700 4825# 4833
S34000 4836# 4844
S34100 4847# 4855
S34200 4858# 4866
S34300 4869# 4877
S34400 4887# 4905
S34500 4907# 4923
S34600 4924# 4942
S34700 4944# 4960
S35000 4961# 4979
S35100 4981# 4997
S35200 4998# 5016
S35300 5018# 5034
S40100 5046# 5055
S40200 5058# 5066
S40300 5069# 5077
S40400 5080# 5088
S40500 5091# 5099
S40600 5102# 5110
S40700 5113# 5121 SEQ 0202
S41000 5124# 5132
S41100 5142# 5160
S41200 5162# 5178
S41300 5179# 5197
S41400 5199# 5215
S41500 5216# 5234
S41600 5236# 5252
S41700 5253# 5271
S42000 5273# 5289
S50100 5301# 5310
S50200 5313# 5321
S50300 5324# 5332
S50400 5335# 5343
S50500 5346# 5354
S50600 5357# 5365
S50700 5368# 5376
S51000 5379# 5387
S51100 5390# 5398
S51200 5401# 5409
S51300 5412# 5420
S51400 5423# 5431
S51500 5434# 5442
S51600 5445# 5453
S51700 5456# 5464
S52000 5467# 5475
S52100 5478# 5486
S52200 5489# 5497
S52300 5500# 5508
S52400 5511# 5519
S52500 5522# 5530
S52600 5534# 5542
S52700 5545# 5553
S53000 5556# 5564
S53100 5567# 5575
S53200 5578# 5586
S53300 5589# 5597
S53400 5600# 5608
S53500 5611# 5619
S53600 5622# 5630
S53700 5633# 5641
S54000 5644# 5652
S54100 5655# 5663
S54200 5666# 5674
S54300 5677# 5687
S54305 5682 5689#
S54306 5687# 5693
S54307 5688 5694#
S54400 5697# 5707
S54405 5702 5709#
S54406 5707# 5713
S54407 5708 5714#
S54500 5717# 5727
S54505 5722 5729# SEQ 0203
S54506 5727# 5733
S54507 5728 5734#
S54600 5737# 5747
S54605 5742 5749#
S54606 5747# 5753
S54607 5748 5754#
S54700 5757# 5767
S54705 5762 5769#
S54706 5767# 5773
S54707 5768 5774#
S55000 5777# 5787
S55005 5782 5789#
S55006 5787# 5793
S55007 5788 5794#
S55100 5797# 5807
S55105 5802 5809#
S55106 5807# 5813
S55107 5808 5814#
S55200 5817# 5827
S55205 5822 5829#
S55206 5827# 5833
S55207 5828 5834#
S55300 5837# 5847
S55305 5842 5849#
S55306 5847# 5853
S55307 5848 5854#
S55400 5857# 5867
S55405 5862 5869#
S55406 5867# 5873
S55407 5868 5874#
S55500 5877# 5887
S55505 5882 5889#
S55506 5887# 5893
S55507 5888 5894#
S55600 5897# 5907
S55605 5902 5909#
S55606 5907# 5913
S55607 5908 5914#
S55700 5917# 5927
S55705 5922 5929#
S55706 5927# 5933
S55707 5928 5934#
S56000 5937# 5947
S56005 5942 5949#
S56006 5947# 5953
S56007 5948 5954#
S56100 5957# 5965
S56200 5968# 5976
S56300 5979# 5987
S56400 5990# 5998
S56500 6001# 6009
S56600 6012# 6020
S56700 6023# 6031 SEQ 0204
S57000 6034# 6042
S57100 6045# 6053
S57200 6056# 6064
S57300 6067# 6075
S57400 6078# 6086
S57500 6089# 6097
S57600 6100# 6110
S57605 6105 6112#
S57606 6110# 6116
S57607 6111 6117#
S57700 6120# 6128
S60000 6131# 6139
S60100 6142# 6150
S60200 6153# 6161
S60300 6164# 6172
S60400 6175# 6183
S60500 6186# 6194
S60600 6197# 6205
S60700 6208# 6216
S61000 6226# 6244
S61100 6246# 6262
S61200 6263# 6281
S61300 6283# 6299
S61400 6300# 6318
S61500 6320# 6336
S61600 6337# 6355
S61700 6357# 6373
S70100 6385# 6394
S70200 6397# 6405
S70300 6408# 6416
S70400 6419# 6427
S70500 6430# 6438
S70600 6441# 6449
S70700 6452# 6460
S71000 6463# 6471
S71100 6474# 6482
S71200 6485# 6493
S71300 6496# 6504
S71400 6507# 6515
S71500 6518# 6526
S71600 6529# 6537
S71700 6540# 6548
S72000 6551# 6559
S72100 6562# 6570
S72200 6573# 6581
S72300 6584# 6592
S72400 6595# 6603
S72500 6606# 6614
S72600 6617# 6625
S72700 6628# 6636
S73000 6639# 6647
S73100 6650# 6658
S73200 6661# 6669 SEQ 0205
S73300 6672# 6680
S73400 6871# 6892
S73405 6876 6895#
S73406 6892# 6899 6902 6905 6909
S73407 6893 6911#
S73408 6882 6901#
S73409 6887 6907#
S73500 6683# 6691
S73600 6694# 6702
S73700 6705# 6713
S74100 6716# 6724
S74200 6727# 6735
S74300 6738# 6746
S74400 6749# 6757
S74500 6760# 6768
S74600 6771# 6779
S74700 6782# 6790
S75000 6793# 6801
S75100 6804# 6812
S75200 6815# 6823
S75300 6826# 6834
S75400 6837# 6845
S75500 6848# 6856
S75600 6859# 6867
S75700 6921# 6939
S76000 6941# 6957
S76100 6958# 6976
S76200 6978# 6994
S76300 6995# 7013
S76400 7015# 7031
S76500 7032# 7050
S76600 7052# 7068
S76700 7071# 7087
S77000 7091# 7107
SADR1 71# 823
SADR10 80# 839
SADR11 81# 840
SADR2 72# 825
SADR3 73# 827
SADR4 74#
SADR5 75# 888
SADR6 76# 889
SADR7 77# 836
SADR8 78# 837
SADR9 79# 838
SBINIT 651 833#
SCOPE 926#
SFSTRT 823#
SLASH 1010#
SM10 1114# 6875
SNTRP 803#
SPACE 999#
SPDES 7210# SEQ 0206
SRTDDT 74 829#
START 817 1151#
START1 836#
START2 837#
START3 838#
START4 839#
START5 840#
STARTA 832 1155#
STRP 803#
SUBLNK 613# 833
SWPTAB 1120#
SWTEXR 848#
SYSEXR 821#
T 1166# 1173 1175 1187 1187# 1196 1198 1201 1201# 1210 1212 1215 1215# 1224
1226 1229 1229# 1238 1240 1243 1243# 1252 1254 1257 1257# 1266 1268 1271
1271# 1280 1282 1285 1285# 1294 1296 1308 1308# 1317 1319 1322 1322# 1331
1333 1336 1336# 1345 1347 1350 1350# 1359 1361 1364 1364# 1373 1375 1378
1378# 1387 1389 1392 1392# 1401 1403 1406 1406# 1415 1417 1420 1420# 1429
1431 1434 1434# 1443 1445 1448 1448# 1457 1459 1462 1462# 1471 1473 1476
1476# 1485 1487 1490 1490# 1499 1501 1504 1504# 1513 1515 1518 1518# 1527
1529 1532 1532# 1541 1543 1546 1546# 1555 1557 1569 1569# 1578 1580 1583
1583# 1592 1594 1597 1597# 1606 1608 1611 1611# 1620 1622 1625 1625# 1634
1636 1639 1639# 1648 1650 1653 1653# 1662 1664 1667 1667# 1676 1678 1681
1681# 1690 1692 1695 1695# 1704 1706 1709 1709# 1718 1720 1723 1723# 1732
1734 1737 1737# 1746 1748 1751 1751# 1760 1762 1765 1765# 1774 1776 1779
1779# 1788 1790 1793 1793# 1802 1804 1816 1816# 1825 1827 1830 1830# 1839
1841 1844 1844# 1853 1855 1858 1858# 1867 1869 1872 1872# 1881 1883 1886
1886# 1895 1897 1900 1900# 1909 1911 1914 1914# 1923 1925 1928 1928# 1937
1939 1942 1942# 1951 1953 1956 1956# 1965 1967 1970 1970# 1979 1981 1984
1984# 1993 1995 1998 1998# 2007 2009 2012 2012# 2021 2023 2026 2026# 2035
2037 2040 2040# 2049 2051 2054 2054# 2063 2065 2068# 2081 2081# 2092 2094
2097 2097# 2108 2110 2113 2113# 2124 2126 2129 2129# 2140 2142 2145 2145#
2156 2158 2161 2161# 2172 2174 2177 2177# 2188 2190 2193 2193# 2204 2206
2209 2209# 2220 2222 2235 2235# 2245 2247 2250 2250# 2260 2262 2265 2265#
2275 2277 2280 2280# 2290 2292 2295 2295# 2305 2307 2310 2310# 2320 2322
2325 2325# 2335 2337 2340 2340# 2350 2352 2355 2355# 2365 2367 2370 2370#
2380 2382 2395 2395# 2405 2407 2410 2410# 2420 2422 2425 2425# 2435 2437
2440 2440# 2450 2452 2455 2455# 2465 2467 2470 2470# 2480 2482 2485 2485#
2495 2497 2500 2500# 2510 2512 2524 2524# 2534 2536 2539 2539# 2549 2551
2554 2554# 2564 2566 2569 2569# 2579 2581 2584 2584# 2594 2596 2599 2599#
2609 2611 2614 2614# 2624 2626 2629 2629# 2639 2641 2644 2644# 2654 2656
2669 2669# 2679 2681 2684 2684# 2694 2696 2699 2699# 2709 2711 2714 2714#
2724 2726 2729 2729# 2739 2741 2744 2744# 2754 2756 2759 2759# 2769 2771
2774 2774# 2784 2786 2799 2799# 2809 2811 2814 2814# 2824 2826 2829 2829#
2839 2841 2844 2844# 2854 2856 2859 2859# 2869 2871 2874 2874# 2884 2886
2889 2889# 2899 2901 2904 2904# 2914 2916 2919 2919# 2929 2931 2934 2934#
2944 2946 2960 2960# 2970 2972 2975 2975# 2985 2987 2990 2990# 3000 3002
3005 3005# 3015 3017 3020 3020# 3030 3032 3035 3035# 3045 3047 3050 3050#
3060 3062 3066 3066# 3075 3077
TAB 1000#
TESTPC 875# 1161 4883 5040 5138 5295 6222 6379 6917
TICKS 878#
TLET 1153 7184 7207# SEQ 0207
TN0 803#
TN1 803#
TOTALS 579#
TRP3TP 803#
TTNBRF 1058#
TTYFIL 974#
TTYSPD 975#
TXTINH 590# 7168
UBAVEC 803#
USER 865# 6881
USERF 803#
USRASB 57# 855
USRCRF 984#
USRLFF 983#
UUODIS 937#
UUOEXT 893# 7255
UUORTN 894#
UUOSKP 891#
XX 1178# 1188 1188# 1191 1202 1202# 1205 1216 1216# 1219 1230 1230# 1233 1244
1244# 1247 1258 1258# 1261 1272 1272# 1275 1286 1286# 1289 1300# 1309 1309#
1312 1323 1323# 1326 1337 1337# 1340 1351 1351# 1354 1365 1365# 1368 1379
1379# 1382 1393 1393# 1396 1407 1407# 1410 1421 1421# 1424 1435 1435# 1438
1449 1449# 1452 1463 1463# 1466 1477 1477# 1480 1491 1491# 1494 1505 1505#
1508 1519 1519# 1522 1533 1533# 1536 1547 1547# 1550 1561# 1570 1570# 1574
1584 1584# 1588 1598 1598# 1602 1612 1612# 1616 1626 1626# 1630 1640 1640#
1644 1654 1654# 1658 1668 1668# 1672 1682 1682# 1686 1696 1696# 1700 1710
1710# 1714 1724 1724# 1728 1738 1738# 1742 1752 1752# 1756 1766 1766# 1770
1780 1780# 1784 1794 1794# 1798 1808# 1817 1817# 1821 1831 1831# 1835 1845
1845# 1849 1859 1859# 1863 1873 1873# 1877 1887 1887# 1891 1901 1901# 1905
1915 1915# 1919 1929 1929# 1933 1943 1943# 1947 1957 1957# 1961 1971 1971#
1975 1985 1985# 1989 1999 1999# 2003 2013 2013# 2017 2027 2027# 2031 2041
2041# 2045 2055 2055# 2059 2069# 2082 2082# 2087 2098 2098# 2103 2114 2114#
2119 2130 2130# 2135 2146 2146# 2151 2162 2162# 2167 2178 2178# 2183 2194
2194# 2199 2210 2210# 2215 2226# 2236 2236# 2240 2251 2251# 2255 2266 2266#
2270 2281 2281# 2285 2296 2296# 2300 2311 2311# 2315 2326 2326# 2330 2341
2341# 2345 2356 2356# 2360 2371 2371# 2375 2396 2396# 2400 2411 2411# 2415
2426 2426# 2430 2441 2441# 2445 2456 2456# 2460 2471 2471# 2475 2486 2486#
2490 2501 2501# 2505 2515# 2525 2525# 2530 2540 2540# 2545 2555 2555# 2560
2570 2570# 2575 2585 2585# 2590 2600 2600# 2605 2615 2615# 2620 2630 2630#
2635 2645 2645# 2650 2670 2670# 2675 2685 2685# 2690 2700 2700# 2705 2715
2715# 2720 2730 2730# 2735 2745 2745# 2750 2760 2760# 2765 2775 2775# 2780
2790# 2800 2800# 2805 2815 2815# 2820 2830 2830# 2835 2845 2845# 2850 2860
2860# 2865 2875 2875# 2880 2890 2890# 2895 2905 2905# 2910 2920 2920# 2925
2935 2935# 2940 2961 2961# 2966 2976 2976# 2981 2991 2991# 2996 3006 3006#
3011 3021 3021# 3026 3036 3036# 3041 3051 3051# 3056 3067 3067# 3071
YY 2070# 2083 2083# 2091 2099 2099# 2107 2115 2115# 2123 2131 2131# 2139 2147
2147# 2155 2163 2163# 2171 2179 2179# 2187 2195 2195# 2203 2211 2211# 2219
2237 2237# 2244 2252 2252# 2259 2267 2267# 2274 2282 2282# 2289 2297 2297#
2304 2312 2312# 2319 2327 2327# 2334 2342 2342# 2349 2357 2357# 2364 2372
2372# 2379 2397 2397# 2404 2412 2412# 2419 2427 2427# 2434 2442 2442# 2449
2457 2457# 2464 2472 2472# 2479 2487 2487# 2494 2502 2502# 2509 2526 2526#
2533 2541 2541# 2548 2556 2556# 2563 2571 2571# 2578 2586 2586# 2593 2601
2601# 2608 2616 2616# 2623 2631 2631# 2638 2646 2646# 2653 2671 2671# 2678 SEQ 0208
2686 2686# 2693 2701 2701# 2708 2716 2716# 2723 2731 2731# 2738 2746 2746#
2753 2761 2761# 2768 2776 2776# 2783 2801 2801# 2808 2816 2816# 2823 2831
2831# 2838 2846 2846# 2853 2861 2861# 2868 2876 2876# 2883 2891 2891# 2898
2906 2906# 2913 2921 2921# 2928 2936 2936# 2943 2950 2950# 2962 2962# 2969
2977 2977# 2984 2992 2992# 2999 3007 3007# 3014 3022 3022# 3029 3037 3037#
3044 3052 3052# 3059 3074
ZZ 1179# 1189 1189# 1195 1203 1203# 1209 1217 1217# 1223 1231 1231# 1237 1245
1245# 1251 1259 1259# 1265 1273 1273# 1279 1287 1287# 1293 1310 1310# 1316
1324 1324# 1330 1338 1338# 1344 1352 1352# 1358 1366 1366# 1372 1380 1380#
1386 1394 1394# 1400 1408 1408# 1414 1422 1422# 1428 1436 1436# 1442 1450
1450# 1456 1464 1464# 1470 1478 1478# 1484 1492 1492# 1498 1506 1506# 1512
1520 1520# 1526 1534 1534# 1540 1548 1548# 1554 1571 1571# 1577 1585 1585#
1591 1599 1599# 1605 1613 1613# 1619 1627 1627# 1633 1641 1641# 1647 1655
1655# 1661 1669 1669# 1675 1683 1683# 1689 1697 1697# 1703 1711 1711# 1717
1725 1725# 1731 1739 1739# 1745 1753 1753# 1759 1767 1767# 1773 1781 1781#
1787 1795 1795# 1801 1818 1818# 1824 1832 1832# 1838 1846 1846# 1852 1860
1860# 1866 1874 1874# 1880 1888 1888# 1894 1902 1902# 1908 1916 1916# 1922
1930 1930# 1936 1944 1944# 1950 1958 1958# 1964 1972 1972# 1978 1986 1986#
1992 2000 2000# 2006 2014 2014# 2020 2028 2028# 2034 2042 2042# 2048 2056
2056# 2062 2071# 2084 2084# 2085 2085# 2093 2100 2100# 2101 2109 2116 2116#
2117 2125 2132 2132# 2133 2141 2148 2148# 2149 2157 2164 2164# 2165 2173
2180 2180# 2181 2189 2196 2196# 2197 2205 2212 2212# 2213 2221 2238 2238#
2246 2253 2253# 2261 2268 2268# 2276 2283 2283# 2291 2298 2298# 2306 2313
2313# 2321 2328 2328# 2336 2343 2343# 2351 2358 2358# 2366 2373 2373# 2381
2386# 2398 2398# 2406 2413 2413# 2421 2428 2428# 2436 2443 2443# 2451 2458
2458# 2466 2473 2473# 2481 2488 2488# 2496 2503 2503# 2511 2527 2527# 2535
2542 2542# 2550 2557 2557# 2565 2572 2572# 2580 2587 2587# 2595 2602 2602#
2610 2617 2617# 2625 2632 2632# 2640 2647 2647# 2655 2660# 2672 2672# 2678
2687 2687# 2693 2702 2702# 2708 2717 2717# 2723 2732 2732# 2738 2747 2747#
2753 2762 2762# 2768 2777 2777# 2783 2802 2802# 2808 2817 2817# 2823 2832
2832# 2838 2847 2847# 2853 2862 2862# 2868 2877 2877# 2883 2892 2892# 2898
2907 2907# 2913 2922 2922# 2928 2937 2937# 2943 2951# 2963 2963# 2969 2978
2978# 2984 2993 2993# 2999 3008 3008# 3014 3023 3023# 3029 3038 3038# 3044
3053 3053# 3059 3068 3068# 3074
$$MUUO 1089#
$$OUTE 1095#
$$TAX1 1107#
$$TAX2 1108#
$$TOGG 1101#
$$UUO 1078#
$ACC0 916#
$ACF 7211#
$BEND1 886#
$BEND2 75 887# 7264
$CHRIN 977#
$CRLF 979#
$DEVCH 803#
$DSKUP 856#
$DVOFF 973#
$EMODE 854#
$FFF 981#
$IBUF 1029#
$INEXT 1031# SEQ 0209
$INNM 1030#
$ITRHL 897#
$ITRX1 898#
$LPAPE 7270
$MMAP 857#
$MODVL 852#
$MODVU 853#
$OBUF 1020#
$ONETM 880#
$OUTEX 1022#
$OUTNM 1021#
$PAPER 803
$PARER 904#
$PNAME 850#
$PSHER 908#
$PVER 851#
$RSRTX 900#
$RSRTY 901#
$SPAG1 920#
$START 817#
$SVAPR 918#
$SVPAG 919#
$SVPI 917#
$SVUPC 923# 7118 7122 7148
$SVUUO 922# 7127 7159 7187
$TABF 980#
$TTCHR 976#
$TWCNT 972#
$TYPNB 978#
$UMODE 855#
$UORTX 895#
$USRHL 899#
$UUOER 896# 937
$VTF 982#
%AC1F 7212#
%ACS1A 7129# 7129 7173
%ACTFL 929#
%ACTUL 930#
%ALF 7217#
%AR1F 7216#
%ARF 7215#
%COREC 928#
%CORFL 927#
%DISCR 931#
%E1F 7214#
%EEF 7218#
%EF 7213#
%ER4X 7193 7198#
%ER5X 7191 7200#
%ER6X 7189 7202#
%ER7X 7195# 7199 7201 7203
%ERAC0 7114# 7114 7130 7164 7254
%ERAC1 7115# 7115 7131 7242 SEQ 0210
%ERAC2 7116# 7116 7241
%ERFST 7137# 7137 7139
%ERHI1 1070#
%ERHI2 1071#
%ERHI3 1072#
%ERMOR 7169 7196 7225#
%ERMS1 7134# 7260
%ERMS2 7157#
%ERMS3 7175 7182#
%ERRS1 7126 7228# 7259
%ERRS2 7241#
%ERRS4 7133 7257#
%ERRS5 7245 7249 7254#
%ERRS6 7252 7262#
%FF 7219#
%FLTTB 7177 7208#
%NODES 7209#
.JB41 803#
.JBAPR 803#
.JBCNI 803#
.JBDDT 803#
.JBFF 803#
.JBOPC 803#
.JBREL 803#
.JBREN 803#
.JBSA 803#
.JBSYM 803#
.JBTPC 803#
.JBUSY 803#
.JBUUO 803#
.JBVER 803#
APRID 803#
BCIO 803# SEQ 0211
BCIOB 803#
BSIO 803#
BSIOB 803#
CFLUSH 763#
CINVAL 762#
CLOKOP 757#
CLRPT 803#
CWRTBI 764#
DFA 417#
DFARP 460#
DFD 450#
DFM 439#
DFS 428#
DMVE 91#
DMVE17 113#
DMVM 253#
DMVM17 305#
DMVN 141#
DMVN17 171#
DMVNF 209#
DMVNM 278#
DMVNM1 337#
DMVNMF 372#
DROPDV 724# 1132
ENDUUO 770# 885
EOPUUO 771# 887
ER1 29#
ER10 36#
ER11 37#
ER12 38#
ER13 39# 4899 4902 4904 4918 4920 4922 4936 4939 4941 4955 4957 4959 4973
4976 4978 4992 4994 4996 5010 5013 5015 5029 5031 5033 5154 5157 5159
5173 5175 5177 5191 5194 5196 5210 5212 5214 5228 5231 5233 5247 5249
5251 5265 5268 5270 5284 5286 5288 6238 6241 6243 6257 6259 6261 6275
6278 6280 6294 6296 6298 6312 6315 6317 6331 6333 6335 6349 6352 6354
6368 6370 6372 6933 6936 6938 6952 6954 6956 6970 6973 6975 6989 6991
6993 7007 7010 7012 7026 7028 7030 7044 7047 7049 7063 7065 7067 7082
7084 7086 7102 7104 7106
ER2 30#
ER3 31# 1173 1196 1210 1224 1238 1252 1266 1280 1294 1317 1331 1345 1359
1373 1387 1401 1415 1429 1443 1457 1471 1485 1499 1513 1527 1541 1555
1578 1592 1606 1620 1634 1648 1662 1676 1690 1704 1718 1732 1746 1760
1774 1788 1802 1825 1839 1853 1867 1881 1895 1909 1923 1937 1951 1965
1979 1993 2007 2021 2035 2049 2063 2092 2108 2124 2140 2156 2172 2188
2204 2220 2245 2260 2275 2290 2305 2320 2335 2350 2365 2380 2405 2420
2435 2450 2465 2480 2495 2510 2534 2549 2564 2579 2594 2609 2624 2639
2654 2679 2694 2709 2724 2739 2754 2769 2784 2809 2824 2839 2854 2869
2884 2899 2914 2929 2944 2970 2985 3000 3015 3030 3045 3060 3075 3101
3112 3123 3134 3145 3156 3167 3178 3189 3200 3211 3222 3233 3244 3255
3266 3277 3288 3299 3310 3321 3332 3343 3354 3365 3376 3387 3398 3409
3420 3431 3442 3453 3464 3475 3486 3497 3508 3519 3530 3541 3552 3563
3574 3585 3596 3608 3619 3630 3641 3652 3663 3674 3685 3696 3707 3718
3729 3740 3751 3762 3773 3784 3795 3806 3817 3828 3839 3850 3861 3872 SEQ 0212
3883 3894 3906 3917 3928 3939 3950 3961 3972 3983 3994 4005 4016 4027
4038 4049 4060 4071 4082 4093 4104 4115 4126 4137 4148 4159 4170 4181
4192 4203 4214 4225 4236 4247 4258 4269 4280 4291 4302 4313 4324 4335
4346 4357 4368 4379 4390 4401 4412 4423 4434 4445 4456 4467 4478 4489
4500 4511 4522 4533 4544 4555 4566 4577 4588 4599 4610 4621 4632 4643
4654 4665 4676 4687 4698 4709 4720 4731 4742 4753 4764 4775 4786 4797
4808 4819 4830 4841 4852 4863 4874 4894 4914 4931 4951 4968 4988 5005
5025 5063 5074 5085 5096 5107 5118 5129 5149 5169 5186 5206 5223 5243
5260 5280 5318 5329 5340 5351 5362 5373 5384 5395 5406 5417 5428 5439
5450 5461 5472 5483 5494 5505 5516 5527 5539 5550 5561 5572 5583 5594
5605 5616 5627 5638 5649 5660 5671 5684 5690 5704 5710 5724 5730 5744
5750 5764 5770 5784 5790 5804 5810 5824 5830 5844 5850 5864 5870 5884
5890 5904 5910 5924 5930 5944 5950 5962 5973 5984 5995 6006 6017 6028
6039 6050 6061 6072 6083 6094 6107 6113 6125 6136 6147 6158 6169 6180
6191 6202 6213 6233 6253 6270 6290 6307 6327 6344 6364 6402 6413 6424
6435 6446 6457 6468 6479 6490 6501 6512 6523 6534 6545 6556 6567 6578
6589 6600 6611 6622 6633 6644 6655 6666 6677 6688 6699 6710 6721 6732
6743 6754 6765 6776 6787 6798 6809 6820 6831 6842 6853 6864 6879 6896
6928 6948 6965 6985 7002 7022 7039 7059 7078 7098
ER4 32# 1175 1198 1212 1226 1240 1254 1268 1282 1296 1319 1333 1347 1361
1375 1389 1403 1417 1431 1445 1459 1473 1487 1501 1515 1529 1543 1557
1580 1594 1608 1622 1636 1650 1664 1678 1692 1706 1720 1734 1748 1762
1776 1790 1804 1827 1841 1855 1869 1883 1897 1911 1925 1939 1953 1967
1981 1995 2009 2023 2037 2051 2065 2094 2110 2126 2142 2158 2174 2190
2206 2222 2247 2262 2277 2292 2307 2322 2337 2352 2367 2382 2407 2422
2437 2452 2467 2482 2497 2512 2536 2551 2566 2581 2596 2611 2626 2641
2656 2681 2696 2711 2726 2741 2756 2771 2786 2811 2826 2841 2856 2871
2886 2901 2916 2931 2946 2972 2987 3002 3017 3032 3047 3062 3077 3103
3114 3125 3136 3147 3158 3169 3180 3191 3202 3213 3224 3235 3246 3257
3268 3279 3290 3301 3312 3323 3334 3345 3356 3367 3378 3389 3400 3411
3422 3433 3444 3455 3466 3477 3488 3499 3510 3521 3532 3543 3554 3565
3576 3587 3598 3610 3621 3632 3643 3654 3665 3676 3687 3698 3709 3720
3731 3742 3753 3764 3775 3786 3797 3808 3819 3830 3841 3852 3863 3874
3885 3896 3908 3919 3930 3941 3952 3963 3974 3985 3996 4007 4018 4029
4040 4051 4062 4073 4084 4095 4106 4117 4128 4139 4150 4161 4172 4183
4194 4205 4216 4227 4238 4249 4260 4271 4282 4293 4304 4315 4326 4337
4348 4359 4370 4381 4392 4403 4414 4425 4436 4447 4458 4469 4480 4491
4502 4513 4524 4535 4546 4557 4568 4579 4590 4601 4612 4623 4634 4645
4656 4667 4678 4689 4700 4711 4722 4733 4744 4755 4766 4777 4788 4799
4810 4821 4832 4843 4854 4865 4876 4896 4916 4933 4953 4970 4990 5007
5027 5065 5076 5087 5098 5109 5120 5131 5151 5171 5188 5208 5225 5245
5262 5282 5320 5331 5342 5353 5364 5375 5386 5397 5408 5419 5430 5441
5452 5463 5474 5485 5496 5507 5518 5529 5541 5552 5563 5574 5585 5596
5607 5618 5629 5640 5651 5662 5673 5686 5692 5706 5712 5726 5732 5746
5752 5766 5772 5786 5792 5806 5812 5826 5832 5846 5852 5866 5872 5886
5892 5906 5912 5926 5932 5946 5952 5964 5975 5986 5997 6008 6019 6030
6041 6052 6063 6074 6085 6096 6109 6115 6127 6138 6149 6160 6171 6182
6193 6204 6215 6235 6255 6272 6292 6309 6329 6346 6366 6404 6415 6426
6437 6448 6459 6470 6481 6492 6503 6514 6525 6536 6547 6558 6569 6580
6591 6602 6613 6624 6635 6646 6657 6668 6679 6690 6701 6712 6723 6734
6745 6756 6767 6778 6789 6800 6811 6822 6833 6844 6855 6866 6890 6898
6904 6908 6930 6950 6967 6987 7004 7024 7041 7061 7080 7100
ER5 33# 3090 5052 5307 6391 SEQ 0213
ER6 34# 3092 5054 5309 6393
ER7 35#
ERRHLT 658# 7235
FATAL 657#
FRD36 799#
FRD8 800#
FREAD 798#
FSELEC 797#
GET 641#
GO 638#
HALT 77 78 79 80 81 643# 906
JEN 645#
JRSTF 644# 1164 4887 4907 4924 4944 4961 4981 4998 5018 5043 5142 5162 5179
5199 5216 5236 5253 5273 5298 6226 6246 6263 6283 6300 6320 6337 6357
6382 6921 6941 6958 6978 6995 7015 7032 7052 7071 7091
MAPADR 780#
MAPCNK 781#
MAPMEM 777#
MAPPNT 783#
MAPSET 782#
MEMSEG 779#
MEMZRO 778#
MODPCP 790#
MODPCU 789#
MTROP 758#
NAME 7# 10
PBELL 733# 7239
PCRL 727# 7176 7195
PCRL2 731#
PCRL2F 732#
PCRLF 728#
PFORCE 735#
PGMINT 651# 1151
PJRST 642#
PMSG 737# 7142 7146 7157 7182
PMSGF 740# 7262
PNT1 693#
PNT11 707#
PNT11F 708#
PNT1F 694#
PNT2 695#
PNT2F 696#
PNT3 697# 7194
PNT3F 698#
PNT4 699# 7198
PNT4F 700#
PNT5 701# 7200
PNT5F 702#
PNT6 703# 7150 7202
PNT6F 704#
PNT7 705#
PNT7F 706#
PNTA 679# 7185 SEQ 0214
PNTADF 710#
PNTADR 709#
PNTAF 680#
PNTAL 681# 7178
PNTALF 682#
PNTCHF 692#
PNTCHR 691#
PNTCI 689#
PNTCIF 690#
PNTCW 725#
PNTCWF 726#
PNTDCF 718#
PNTDEC 717# 7145
PNTDS 719#
PNTDSF 720#
PNTHW 713# 7165
PNTHWF 714#
PNTMSF 686#
PNTMSG 685#
PNTNM 721# 7138
PNTOCF 716#
PNTOCS 715#
PNTOCT 711#
PNTOTF 712#
PNTSIX 722#
PNTSXF 723#
PSIXL 683#
PSIXLF 684#
PSIXM 687# 7143 7147 7158 7183
PSIXMF 688# 7263
PSP 729#
PSPF 730#
PUT 640#
RDAPR 803#
RDCSB 803#
RDCSTM 803#
RDEBR 803#
RDHSB 803#
RDINT 803#
RDIO 803#
RDIOB 803#
RDPI 803#
RDPUR 803#
RDSPB 803#
RDTIM 803#
RDUBR 803#
RTN 639# 893
S 569# 571 575 604 606 615 618 633 634 636 647 649 653 655
660 664 803 808 814 841 843 861 863 881 883 912 914 932
934 952 954 962 964 985 990 1016 1018 1025 1027 1033 1035 1041
1043 1047 1049 1054 1056 1060 1062 1066 1068 1074 1076 1079 1081 1085
1087 1091 1093 1097 1099 1103 1105 1110 1112 1116 1118 1122 1124 1126
1128 SEQ 0215
SAVEAC 63# 1159 4881 5038 5136 5293 6220 6377 6915
SDFA 471# 3095 3106 3117 3128 3139 3150 3161 3172 3183 3194 3205 3216 3227
3238 3249 3260 3271 3282 3293 3304 3315 3326 3337 3348 3359 3370 3381
3392 3403 3414 3425 3436 3447 3458 3469 3480 3491 3502 3513 3524 3535
3546 3557 3568 3579 3590 3602 3613 3624 3635 3646 3657 3668 3679 3690
3701 3712 3723 3734 3745 3756 3767 3778 3789 3800 3811 3822 3833 3844
3855 3866 3877 3888 3900 3911 3922 3933 3944 3955 3966 3977 3988 3999
4010 4021 4032 4043 4054 4065 4076 4087 4098 4109 4120 4131 4142 4153
4164 4175 4186 4197 4208 4219 4230 4241 4252 4263 4274 4285 4296 4307
4318 4329 4340 4351 4362 4373 4384 4395 4406 4417 4428 4439 4450 4461
4472 4483 4494 4505 4516 4527 4538 4549 4560 4571 4582 4593 4604 4615
4626 4637 4648 4659 4670 4681 4692 4703 4714 4725 4736 4747 4758 4769
4780 4791 4802 4813 4824 4835 4846 4857 4868
SDFARP 557# 1167 1190 1204 1218 1232 1246 1260 1274 1288 1311 1325 1339 1353
1367 1381 1395 1409 1423 1437 1451 1465 1479 1493 1507 1521 1535 1549
1572 1586 1600 1614 1628 1642 1656 1670 1684 1698 1712 1726 1740 1754
1768 1782 1796 1819 1833 1847 1861 1875 1889 1903 1917 1931 1945 1959
1973 1987 2001 2015 2029 2043 2057 2086 2102 2118 2134 2150 2166 2182
2198 2214 2239 2254 2269 2284 2299 2314 2329 2344 2359 2374 2399 2414
2429 2444 2459 2474 2489 2504 2528 2543 2558 2573 2588 2603 2618 2633
2648 2673 2688 2703 2718 2733 2748 2763 2778 2803 2818 2833 2848 2863
2878 2893 2908 2923 2938 2964 2979 2994 3009 3024 3039 3054 3069
SDFD 525# 6396 6407 6418 6429 6440 6451 6462 6473 6484 6495 6506 6517 6528
6539 6550 6561 6572 6583 6594 6605 6616 6627 6638 6649 6660 6671 6682
6693 6704 6715 6726 6737 6748 6759 6770 6781 6792 6803 6814 6825 6836
6847 6858
SDFDKL 535#
SDFM 493# 5312 5323 5334 5345 5356 5367 5378 5389 5400 5411 5422 5433 5444
5455 5466 5477 5488 5499 5510 5521 5533 5544 5555 5566 5577 5588 5599
5610 5621 5632 5643 5654 5665 5956 5967 5978 5989 6000 6011 6022 6033
6044 6055 6066 6077 6088 6119 6130 6141 6152 6163 6174 6185 6196 6207
SDFMKL 503# 5676 5696 5716 5736 5756 5776 5796 5816 5836 5856 5876 5896 5916
5936 6099
SDFS 482# 5057 5068 5079 5090 5101 5112 5123
SIXBTZ 746#
SWITCH 752# 7124 7226
TIOE 803#
TIOEB 803#
TION 803#
TIONB 803#
TTALTM 673# 7228
TTICHR 666#
TTICLR 676#
TTICNV 671#
TTIDEC 670#
TTINO 668#
TTIOCT 669#
TTIYES 667#
TTLOOK 672#
TTSIXB 674#
TTYINP 675#
WRAPR 803#
WRCSB 803# SEQ 0216
WRCSTM 803#
WREBR 803#
WRHSB 803#
WRINT 803#
WRIO 803#
WRIOB 803#
WRPI 803#
WRPUR 803#
WRSPB 803#
WRTIM 803#
WRUBR 803#
ANDI 6885 7161
AOS 891 7117 7120 7246 7247 SEQ 0217
ASCII 992 994 997 998 999 1000 1002 1003 1004 1005 1006 1007 1009 1010
1011
ASCIZ 1135 1152 7211 7212 7213 7214 7215 7216 7217 7218 7219
BLKI 6883
BLOCK 960 1020 1023 1029 1032 1038 8302
BYTE 1008
CAIG 7163 7174
CAIGE 6886
CAIL 7251
CALL 1133
CAME 1172 1174 1195 1197 1209 1211 1223 1225 1237 1239 1251 1253 1265 1267
1279 1281 1293 1295 1316 1318 1330 1332 1344 1346 1358 1360 1372 1374
1386 1388 1400 1402 1414 1416 1428 1430 1442 1444 1456 1458 1470 1472
1484 1486 1498 1500 1512 1514 1526 1528 1540 1542 1554 1556 1577 1579
1591 1593 1605 1607 1619 1621 1633 1635 1647 1649 1661 1663 1675 1677
1689 1691 1703 1705 1717 1719 1731 1733 1745 1747 1759 1761 1773 1775
1787 1789 1801 1803 1824 1826 1838 1840 1852 1854 1866 1868 1880 1882
1894 1896 1908 1910 1922 1924 1936 1938 1950 1952 1964 1966 1978 1980
1992 1994 2006 2008 2020 2022 2034 2036 2048 2050 2062 2064 2091 2093
2107 2109 2123 2125 2139 2141 2155 2157 2171 2173 2187 2189 2203 2205
2219 2221 2244 2246 2259 2261 2274 2276 2289 2291 2304 2306 2319 2321
2334 2336 2349 2351 2364 2366 2379 2381 2404 2406 2419 2421 2434 2436
2449 2451 2464 2466 2479 2481 2494 2496 2509 2511 2533 2535 2548 2550
2563 2565 2578 2580 2593 2595 2608 2610 2623 2625 2638 2640 2653 2655
2678 2680 2693 2695 2708 2710 2723 2725 2738 2740 2753 2755 2768 2770
2783 2785 2808 2810 2823 2825 2838 2840 2853 2855 2868 2870 2883 2885
2898 2900 2913 2915 2928 2930 2943 2945 2969 2971 2984 2986 2999 3001
3014 3016 3029 3031 3044 3046 3059 3061 3074 3076 3089 3091 3100 3102
3111 3113 3122 3124 3133 3135 3144 3146 3155 3157 3166 3168 3177 3179
3188 3190 3199 3201 3210 3212 3221 3223 3232 3234 3243 3245 3254 3256
3265 3267 3276 3278 3287 3289 3298 3300 3309 3311 3320 3322 3331 3333
3342 3344 3353 3355 3364 3366 3375 3377 3386 3388 3397 3399 3408 3410
3419 3421 3430 3432 3441 3443 3452 3454 3463 3465 3474 3476 3485 3487
3496 3498 3507 3509 3518 3520 3529 3531 3540 3542 3551 3553 3562 3564
3573 3575 3584 3586 3595 3597 3607 3609 3618 3620 3629 3631 3640 3642
3651 3653 3662 3664 3673 3675 3684 3686 3695 3697 3706 3708 3717 3719
3728 3730 3739 3741 3750 3752 3761 3763 3772 3774 3783 3785 3794 3796
3805 3807 3816 3818 3827 3829 3838 3840 3849 3851 3860 3862 3871 3873
3882 3884 3893 3895 3905 3907 3916 3918 3927 3929 3938 3940 3949 3951
3960 3962 3971 3973 3982 3984 3993 3995 4004 4006 4015 4017 4026 4028
4037 4039 4048 4050 4059 4061 4070 4072 4081 4083 4092 4094 4103 4105
4114 4116 4125 4127 4136 4138 4147 4149 4158 4160 4169 4171 4180 4182
4191 4193 4202 4204 4213 4215 4224 4226 4235 4237 4246 4248 4257 4259
4268 4270 4279 4281 4290 4292 4301 4303 4312 4314 4323 4325 4334 4336
4345 4347 4356 4358 4367 4369 4378 4380 4389 4391 4400 4402 4411 4413
4422 4424 4433 4435 4444 4446 4455 4457 4466 4468 4477 4479 4488 4490
4499 4501 4510 4512 4521 4523 4532 4534 4543 4545 4554 4556 4565 4567
4576 4578 4587 4589 4598 4600 4609 4611 4620 4622 4631 4633 4642 4644
4653 4655 4664 4666 4675 4677 4686 4688 4697 4699 4708 4710 4719 4721
4730 4732 4741 4743 4752 4754 4763 4765 4774 4776 4785 4787 4796 4798
4807 4809 4818 4820 4829 4831 4840 4842 4851 4853 4862 4864 4873 4875
4893 4895 4913 4915 4930 4932 4950 4952 4967 4969 4987 4989 5004 5006
5024 5026 5051 5053 5062 5064 5073 5075 5084 5086 5095 5097 5106 5108 SEQ 0218
5117 5119 5128 5130 5148 5150 5168 5170 5185 5187 5205 5207 5222 5224
5242 5244 5259 5261 5279 5281 5306 5308 5317 5319 5328 5330 5339 5341
5350 5352 5361 5363 5372 5374 5383 5385 5394 5396 5405 5407 5416 5418
5427 5429 5438 5440 5449 5451 5460 5462 5471 5473 5482 5484 5493 5495
5504 5506 5515 5517 5526 5528 5538 5540 5549 5551 5560 5562 5571 5573
5582 5584 5593 5595 5604 5606 5615 5617 5626 5628 5637 5639 5648 5650
5659 5661 5670 5672 5683 5685 5689 5691 5703 5705 5709 5711 5723 5725
5729 5731 5743 5745 5749 5751 5763 5765 5769 5771 5783 5785 5789 5791
5803 5805 5809 5811 5823 5825 5829 5831 5843 5845 5849 5851 5863 5865
5869 5871 5883 5885 5889 5891 5903 5905 5909 5911 5923 5925 5929 5931
5943 5945 5949 5951 5961 5963 5972 5974 5983 5985 5994 5996 6005 6007
6016 6018 6027 6029 6038 6040 6049 6051 6060 6062 6071 6073 6082 6084
6093 6095 6106 6108 6112 6114 6124 6126 6135 6137 6146 6148 6157 6159
6168 6170 6179 6181 6190 6192 6201 6203 6212 6214 6232 6234 6252 6254
6269 6271 6289 6291 6306 6308 6326 6328 6343 6345 6363 6365 6390 6392
6401 6403 6412 6414 6423 6425 6434 6436 6445 6447 6456 6458 6467 6469
6478 6480 6489 6491 6500 6502 6511 6513 6522 6524 6533 6535 6544 6546
6555 6557 6566 6568 6577 6579 6588 6590 6599 6601 6610 6612 6621 6623
6632 6634 6643 6645 6654 6656 6665 6667 6676 6678 6687 6689 6698 6700
6709 6711 6720 6722 6731 6733 6742 6744 6753 6755 6764 6766 6775 6777
6786 6788 6797 6799 6808 6810 6819 6821 6830 6832 6841 6843 6852 6854
6863 6865 6878 6889 6895 6897 6903 6907 6927 6929 6947 6949 6964 6966
6984 6986 7001 7003 7021 7023 7038 7040 7058 7060 7077 7079 7097 7099
CAMN 6901 7119
DEFINE 7 63 91 113 141 171 209 253 278 305 337 372 417 428
439 450 460 471 482 493 503 525 535 557 569 737 740 746
DFAD 1170 1193 1207 1221 1235 1249 1263 1277 1291 1314 1328 1342 1356 1370
1384 1398 1412 1426 1440 1454 1468 1482 1496 1510 1524 1538 1552 1575
1589 1603 1617 1631 1645 1659 1673 1687 1701 1715 1729 1743 1757 1771
1785 1799 1822 1836 1850 1864 1878 1892 1906 1920 1934 1948 1962 1976
1990 2004 2018 2032 2046 2060 2089 2105 2121 2137 2153 2169 2185 2201
2217 2242 2257 2272 2287 2302 2317 2332 2347 2362 2377 2402 2417 2432
2447 2462 2477 2492 2507 2531 2546 2561 2576 2591 2606 2621 2636 2651
2676 2691 2706 2721 2736 2751 2766 2781 2806 2821 2836 2851 2866 2881
2896 2911 2926 2941 2967 2982 2997 3012 3027 3042 3057 3072 3088 3098
3109 3120 3131 3142 3153 3164 3175 3186 3197 3208 3219 3230 3241 3252
3263 3274 3285 3296 3307 3318 3329 3340 3351 3362 3373 3384 3395 3406
3417 3428 3439 3450 3461 3472 3483 3494 3505 3516 3527 3538 3549 3560
3571 3582 3593 3605 3616 3627 3638 3649 3660 3671 3682 3693 3704 3715
3726 3737 3748 3759 3770 3781 3792 3803 3814 3825 3836 3847 3858 3869
3880 3891 3903 3914 3925 3936 3947 3958 3969 3980 3991 4002 4013 4024
4035 4046 4057 4068 4079 4090 4101 4112 4123 4134 4145 4156 4167 4178
4189 4200 4211 4222 4233 4244 4255 4266 4277 4288 4299 4310 4321 4332
4343 4354 4365 4376 4387 4398 4409 4420 4431 4442 4453 4464 4475 4486
4497 4508 4519 4530 4541 4552 4563 4574 4585 4596 4607 4618 4629 4640
4651 4662 4673 4684 4695 4706 4717 4728 4739 4750 4761 4772 4783 4794
4805 4816 4827 4838 4849 4860 4871 4890 4910 4927 4947 4964 4984 5001
5021
DFDV 6389 6399 6410 6421 6432 6443 6454 6465 6476 6487 6498 6509 6520 6531
6542 6553 6564 6575 6586 6597 6608 6619 6630 6641 6652 6663 6674 6685
6696 6707 6718 6729 6740 6751 6762 6773 6784 6795 6806 6817 6828 6839
6850 6861 6873 6924 6944 6961 6981 6998 7018 7035 7055 7074 7094
DFMP 5305 5315 5326 5337 5348 5359 5370 5381 5392 5403 5414 5425 5436 5447 SEQ 0219
5458 5469 5480 5491 5502 5513 5524 5536 5547 5558 5569 5580 5591 5602
5613 5624 5635 5646 5657 5668 5679 5699 5719 5739 5759 5779 5799 5819
5839 5859 5879 5899 5919 5939 5959 5970 5981 5992 6003 6014 6025 6036
6047 6058 6069 6080 6091 6102 6122 6133 6144 6155 6166 6177 6188 6199
6210 6229 6249 6266 6286 6303 6323 6340 6360
DFSB 5050 5060 5071 5082 5093 5104 5115 5126 5145 5165 5182 5202 5219 5239
5256 5276
DMOVE 1168 1191 1205 1219 1233 1247 1261 1275 1289 1312 1326 1340 1354 1368
1382 1396 1410 1424 1438 1452 1466 1480 1494 1508 1522 1536 1550 1573
1587 1601 1615 1629 1643 1657 1671 1685 1699 1713 1727 1741 1755 1769
1783 1797 1820 1834 1848 1862 1876 1890 1904 1918 1932 1946 1960 1974
1988 2002 2016 2030 2044 2058 2087 2103 2119 2135 2151 2167 2183 2199
2215 2240 2255 2270 2285 2300 2315 2330 2345 2360 2375 2400 2415 2430
2445 2460 2475 2490 2505 2529 2544 2559 2574 2589 2604 2619 2634 2649
2674 2689 2704 2719 2734 2749 2764 2779 2804 2819 2834 2849 2864 2879
2894 2909 2924 2939 2965 2980 2995 3010 3025 3040 3055 3070 3084 3086
3096 3107 3118 3129 3140 3151 3162 3173 3184 3195 3206 3217 3228 3239
3250 3261 3272 3283 3294 3305 3316 3327 3338 3349 3360 3371 3382 3393
3404 3415 3426 3437 3448 3459 3470 3481 3492 3503 3514 3525 3536 3547
3558 3569 3580 3591 3603 3614 3625 3636 3647 3658 3669 3680 3691 3702
3713 3724 3735 3746 3757 3768 3779 3790 3801 3812 3823 3834 3845 3856
3867 3878 3889 3901 3912 3923 3934 3945 3956 3967 3978 3989 4000 4011
4022 4033 4044 4055 4066 4077 4088 4099 4110 4121 4132 4143 4154 4165
4176 4187 4198 4209 4220 4231 4242 4253 4264 4275 4286 4297 4308 4319
4330 4341 4352 4363 4374 4385 4396 4407 4418 4429 4440 4451 4462 4473
4484 4495 4506 4517 4528 4539 4550 4561 4572 4583 4594 4605 4616 4627
4638 4649 4660 4671 4682 4693 4704 4715 4726 4737 4748 4759 4770 4781
4792 4803 4814 4825 4836 4847 4858 4869 4888 4908 4925 4945 4962 4982
4999 5019 5046 5048 5058 5069 5080 5091 5102 5113 5124 5143 5163 5180
5200 5217 5237 5254 5274 5301 5303 5313 5324 5335 5346 5357 5368 5379
5390 5401 5412 5423 5434 5445 5456 5467 5478 5489 5500 5511 5522 5534
5545 5556 5567 5578 5589 5600 5611 5622 5633 5644 5655 5666 5677 5697
5717 5737 5757 5777 5797 5817 5837 5857 5877 5897 5917 5937 5957 5968
5979 5990 6001 6012 6023 6034 6045 6056 6067 6078 6089 6100 6120 6131
6142 6153 6164 6175 6186 6197 6208 6227 6247 6264 6284 6301 6321 6338
6358 6385 6387 6397 6408 6419 6430 6441 6452 6463 6474 6485 6496 6507
6518 6529 6540 6551 6562 6573 6584 6595 6606 6617 6628 6639 6650 6661
6672 6683 6694 6705 6716 6727 6738 6749 6760 6771 6782 6793 6804 6815
6826 6837 6848 6859 6871 6922 6942 6959 6979 6996 7016 7033 7053 7072
7092
END 8310
HRL 7122
HRRZ 7118 7148 7187
IFDEF 803 854 855 856 857 7152 7222 8301 8308
IFE 2085 2101 2117 2133 2149 2165 2181 2197 2213
IFNDEF 792 793 803 854 855 856 857 936 7270
JFCL 894 895 896 897 898 899 900 901 902 903 904 905
JFOV 4900 4919 4937 4956 4974 4993 5011 5030 5155 5174 5192 5211 5229 5248
5266 5285 6239 6258 6276 6295 6313 6332 6350 6369 6934 6953 6971 6990
7008 7027 7045 7064 7083 7103
JOV 4897 4917 4934 4954 4971 4991 5008 5028 5152 5172 5189 5209 5226 5246
5263 5283 6236 6256 6273 6293 6310 6330 6347 6367 6931 6951 6968 6988
7005 7025 7042 7062 7081 7101 SEQ 0220
JRST 642 643 644 645 816 817 819 821 823 825 827 830 832 833
886 1155 4898 4901 4935 4938 4972 4975 5009 5012 5153 5156 5190 5193
5227 5230 5264 5267 5682 5688 5693 5694 5702 5708 5713 5714 5722 5728
5733 5734 5742 5748 5753 5754 5762 5768 5773 5774 5782 5788 5793 5794
5802 5808 5813 5814 5822 5828 5833 5834 5842 5848 5853 5854 5862 5868
5873 5874 5882 5888 5893 5894 5902 5908 5913 5914 5922 5928 5933 5934
5942 5948 5953 5954 6105 6111 6116 6117 6237 6240 6274 6277 6311 6314
6348 6351 6876 6882 6887 6893 6899 6902 6905 6909 6911 6932 6935 6969
6972 7006 7009 7043 7046 7109 7126 7133 7136 7141 7169 7175 7189 7191
7193 7196 7199 7201 7203 7229 7232 7245 7249 7252 7255 7259 7260 7264
JSP 651 4892 4912 4929 4949 4966 4986 5003 5023 5147 5167 5184 5204 5221
5241 5258 5278 6231 6251 6268 6288 6305 6325 6342 6362 6926 6946 6963
6983 7000 7020 7037 7057 7076 7096
JUMPL 1176 1199 1213 1227 1241 1255 1269 1283 1297 1320 1334 1348 1362 1376
1390 1404 1418 1432 1446 1460 1474 1488 1502 1516 1530 1544 1558 1581
1595 1609 1623 1637 1651 1665 1679 1693 1707 1721 1735 1749 1763 1777
1791 1805 1828 1842 1856 1870 1884 1898 1912 1926 1940 1954 1968 1982
1996 2010 2024 2038 2052 2066 2095 2111 2127 2143 2159 2175 2191 2207
2223 2248 2263 2278 2293 2308 2323 2338 2353 2368 2383 2408 2423 2438
2453 2468 2483 2498 2513 2537 2552 2567 2582 2597 2612 2627 2642 2657
2682 2697 2712 2727 2742 2757 2772 2787 2812 2827 2842 2857 2872 2887
2902 2917 2932 2947 2973 2988 3003 3018 3033 3048 3063 3078 3093 3104
3115 3126 3137 3148 3159 3170 3181 3192 3203 3214 3225 3236 3247 3258
3269 3280 3291 3302 3313 3324 3335 3346 3357 3368 3379 3390 3401 3412
3423 3434 3445 3456 3467 3478 3489 3500 3511 3522 3533 3544 3555 3566
3577 3588 3599 3611 3622 3633 3644 3655 3666 3677 3688 3699 3710 3721
3732 3743 3754 3765 3776 3787 3798 3809 3820 3831 3842 3853 3864 3875
3886 3897 3909 3920 3931 3942 3953 3964 3975 3986 3997 4008 4019 4030
4041 4052 4063 4074 4085 4096 4107 4118 4129 4140 4151 4162 4173 4184
4195 4206 4217 4228 4239 4250 4261 4272 4283 4294 4305 4316 4327 4338
4349 4360 4371 4382 4393 4404 4415 4426 4437 4448 4459 4470 4481 4492
4503 4514 4525 4536 4547 4558 4569 4580 4591 4602 4613 4624 4635 4646
4657 4668 4679 4690 4701 4712 4723 4734 4745 4756 4767 4778 4789 4800
4811 4822 4833 4844 4855 4866 4877 4905 4923 4942 4960 4979 4997 5016
5034 5055 5066 5077 5088 5099 5110 5121 5132 5160 5178 5197 5215 5234
5252 5271 5289 5310 5321 5332 5343 5354 5365 5376 5387 5398 5409 5420
5431 5442 5453 5464 5475 5486 5497 5508 5519 5530 5542 5553 5564 5575
5586 5597 5608 5619 5630 5641 5652 5663 5674 5687 5707 5727 5747 5767
5787 5807 5827 5847 5867 5887 5907 5927 5947 5965 5976 5987 5998 6009
6020 6031 6042 6053 6064 6075 6086 6097 6110 6128 6139 6150 6161 6172
6183 6194 6205 6216 6244 6262 6281 6299 6318 6336 6355 6373 6394 6405
6416 6427 6438 6449 6460 6471 6482 6493 6504 6515 6526 6537 6548 6559
6570 6581 6592 6603 6614 6625 6636 6647 6658 6669 6680 6691 6702 6713
6724 6735 6746 6757 6768 6779 6790 6801 6812 6823 6834 6845 6856 6867
6892 6939 6957 6976 6994 7013 7031 7050 7068 7087 7107
LALL 8
LIST 7 803 936 7152 7222 7270 8298
LIT 7271
LOC 22 806 1130
LSH 7128 7160
MOVE 1152 7121 7127 7130 7131 7144 7159 7162 7164 7167 7173 7177 7233 7241
7242 7250 7254 7257
MOVEI 1160 1162 4882 4884 5039 5041 5137 5139 5294 5296 6221 6223 6378 6380 SEQ 0221
6916 6918 7184 7230
MOVEM 1153 1161 1163 4883 4885 5040 5042 5138 5140 5295 5297 6222 6224 6379
6381 6917 6919 7114 7115 7116 7129 7149 7231
MOVSS 6884
NOSYM 24
OPDEF 29 30 31 32 33 34 35 36 37 38 39 638 639 640
641 642 643 644 645 651 657 658 666 667 668 669 670 671
672 673 674 675 676 679 680 681 682 683 684 685 686 687
688 689 690 691 692 693 694 695 696 697 698 699 700 701
702 703 704 705 706 707 708 709 710 711 712 713 714 715
716 717 718 719 720 721 722 723 724 725 726 727 728 729
730 731 732 733 735 752 757 758 762 763 764 770 771 777
778 779 780 781 782 783 789 790 797 798 799 800 803
POP 641
POPJ 639
PUSH 640
PUSHJ 638
REPEAT 1181 1302 1563 1810 2073 2228 2388 2517 2662 2792 2953
SETOM 7139 7237 7243
SETZM 7123 7134
SIXBIT 85 86 1021 1022 1030 1031 1133 7143 7147 7158 7183 7263
SKIPE 5681 5701 5721 5741 5761 5781 5801 5821 5841 5861 5881 5901 5921 5941
6104 6881
SKIPGE 7132
SKIPL 7135 7248
SKIPN 6875 7137 7140 7244
SUBTTL 25 567 602 803 804 1156 3080 5035 5290 6374 7110 7265
TITLE 12
TLNE 4903 4921 4940 4977 4995 5014 5158 5176 5195 5232 5250 5269 6242 6260
6279 6316 6334 6353 6937 6955 6974 7011 7029 7048 7125 7168 7234 7238
TLNN 4958 5032 5213 5287 6297 6371 6992 7066 7085 7105 7236 7258
TRNE 7188 7190 7192
VAR 8306
XALL 14
XCT 7225
XLIST 6 802 803 935 7151 7221 7269
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 1 SEQ 0222
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777
*030631 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 201400 000000 C(AC+1)= 000000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 200400 000000 C(AC+1)= 000000 000000
----------
*030640 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200600 000000 C(AC+1)= 000000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 177400 000000 C(AC+1)= 000000 000000
----------
*030647 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200500 000000 C(AC+1)= 000000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 176400 000000 C(AC+1)= 000000 000000
----------
*030656 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200440 000000 C(AC+1)= 000000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 175400 000000 C(AC+1)= 000000 000000
----------
*030665 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200420 000000 C(AC+1)= 000000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 174400 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 2
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0223
*030674 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200410 000000 C(AC+1)= 000000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 173400 000000 C(AC+1)= 000000 000000
----------
*030703 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200404 000000 C(AC+1)= 000000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 172400 000000 C(AC+1)= 000000 000000
----------
*030712 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200402 000000 C(AC+1)= 000000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 171400 000000 C(AC+1)= 000000 000000
----------
*030721 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200401 000000 C(AC+1)= 000000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 170400 000000 C(AC+1)= 000000 000000
----------
*030730 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 400000 C(AC+1)= 000000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 167400 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 3
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0224
*030737 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 200000 C(AC+1)= 000000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 166400 000000 C(AC+1)= 000000 000000
----------
*030746 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 100000 C(AC+1)= 000000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 165400 000000 C(AC+1)= 000000 000000
----------
*030755 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 040000 C(AC+1)= 000000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 164400 000000 C(AC+1)= 000000 000000
----------
*030764 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 020000 C(AC+1)= 000000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 163400 000000 C(AC+1)= 000000 000000
----------
*030773 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 010000 C(AC+1)= 000000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 162400 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 4
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0225
*031002 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 004000 C(AC+1)= 000000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 161400 000000 C(AC+1)= 000000 000000
----------
*031011 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 002000 C(AC+1)= 000000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 160400 000000 C(AC+1)= 000000 000000
----------
*031020 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 001000 C(AC+1)= 000000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 157400 000000 C(AC+1)= 000000 000000
----------
*031027 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000400 C(AC+1)= 000000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 156400 000000 C(AC+1)= 000000 000000
----------
*031036 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000200 C(AC+1)= 000000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 155400 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 5
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0226
*031045 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000100 C(AC+1)= 000000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 154400 000000 C(AC+1)= 000000 000000
----------
*031054 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000040 C(AC+1)= 000000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 153400 000000 C(AC+1)= 000000 000000
----------
*031063 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000020 C(AC+1)= 000000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 152400 000000 C(AC+1)= 000000 000000
----------
*031072 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000010 C(AC+1)= 000000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 151400 000000 C(AC+1)= 000000 000000
----------
*031101 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000004 C(AC+1)= 000000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 150400 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 6
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0227
*031110 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000002 C(AC+1)= 000000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 147400 000000 C(AC+1)= 000000 000000
----------
*031117 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000001 C(AC+1)= 000000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 146400 000000 C(AC+1)= 000000 000000
----------
*031126 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000000 C(AC+1)= 200000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 145400 000000 C(AC+1)= 000000 000000
----------
*031135 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000000 C(AC+1)= 100000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 144400 000000 C(AC+1)= 000000 000000
----------
*031144 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000000 C(AC+1)= 040000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 143400 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 7
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0228
*031153 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000000 C(AC+1)= 020000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 142400 000000 C(AC+1)= 000000 000000
----------
*031162 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000000 C(AC+1)= 010000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 141400 000000 C(AC+1)= 000000 000000
----------
*031171 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000000 C(AC+1)= 004000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 140400 000000 C(AC+1)= 000000 000000
----------
*031200 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000000 C(AC+1)= 002000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 137400 000000 C(AC+1)= 000000 000000
----------
*031207 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000000 C(AC+1)= 001000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 136400 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 8
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0229
*031216 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000400 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 135400 000000 C(AC+1)= 000000 000000
----------
*031225 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000200 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 134400 000000 C(AC+1)= 000000 000000
----------
*031234 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000100 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 133400 000000 C(AC+1)= 000000 000000
----------
*031243 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000040 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 132400 000000 C(AC+1)= 000000 000000
----------
*031252 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000020 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 131400 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 9
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0230
*031261 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000010 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 130400 000000 C(AC+1)= 000000 000000
----------
*031270 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000004 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 127400 000000 C(AC+1)= 000000 000000
----------
*031277 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000002 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 126400 000000 C(AC+1)= 000000 000000
----------
*031306 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000001 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 125400 000000 C(AC+1)= 000000 000000
----------
*031315 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000000 400000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 124400 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 10
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0231
*031324 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000000 200000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 123400 000000 C(AC+1)= 000000 000000
----------
*031333 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000000 100000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 122400 000000 C(AC+1)= 000000 000000
----------
*031342 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000000 040000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 121400 000000 C(AC+1)= 000000 000000
----------
*031351 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000000 020000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 120400 000000 C(AC+1)= 000000 000000
----------
*031360 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000000 010000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 117400 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 11
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0232
*031367 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000000 004000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 116400 000000 C(AC+1)= 000000 000000
----------
*031376 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000000 002000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 115400 000000 C(AC+1)= 000000 000000
----------
*031405 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000000 001000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 114400 000000 C(AC+1)= 000000 000000
----------
*031414 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000000 000400 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 113400 000000 C(AC+1)= 000000 000000
----------
*031423 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000000 000200 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 112400 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 12
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0233
*031432 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000000 000100 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 111400 000000 C(AC+1)= 000000 000000
----------
*031441 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000000 000040 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 110400 000000 C(AC+1)= 000000 000000
----------
*031450 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000000 000020 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 107400 000000 C(AC+1)= 000000 000000
----------
*031457 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000000 000010 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 106400 000000 C(AC+1)= 000000 000000
----------
*031466 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000000 000004 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 105400 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 13
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0234
*031475 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000000 000002 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 104400 000000 C(AC+1)= 000000 000000
----------
*031504 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000000 000001 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 103400 000000 C(AC+1)= 000000 000000
----------
*031513 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600377 777777 C(AC+1)= 777777 777777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 600377 777777 C(AC+1)= 377777 777777
----------
*031522 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600577 777777 C(AC+1)= 777777 777777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 601377 777777 C(AC+1)= 377777 777776
----------
*031531 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600677 777777 C(AC+1)= 777777 777777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 602377 777777 C(AC+1)= 377777 777774
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 14
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0235
*031540 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600737 777777 C(AC+1)= 777777 777777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 603377 777777 C(AC+1)= 377777 777770
----------
*031547 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600757 777777 C(AC+1)= 777777 777777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 604377 777777 C(AC+1)= 377777 777760
----------
*031556 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600767 777777 C(AC+1)= 777777 777777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 605377 777777 C(AC+1)= 377777 777740
----------
*031565 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600773 777777 C(AC+1)= 777777 777777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 606377 777777 C(AC+1)= 377777 777700
----------
*031574 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600775 777777 C(AC+1)= 777777 777777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 607377 777777 C(AC+1)= 377777 777600
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 15
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0236
*031603 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600776 777777 C(AC+1)= 777777 777777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 610377 777777 C(AC+1)= 377777 777400
----------
*031612 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 377777 C(AC+1)= 777777 777777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 611377 777777 C(AC+1)= 377777 777000
----------
*031621 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 577777 C(AC+1)= 777777 777777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 612377 777777 C(AC+1)= 377777 776000
----------
*031630 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 677777 C(AC+1)= 777777 777777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 613377 777777 C(AC+1)= 377777 774000
----------
*031637 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 737777 C(AC+1)= 777777 777777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 614377 777777 C(AC+1)= 377777 770000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 16
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0237
*031646 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 757777 C(AC+1)= 777777 777777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 615377 777777 C(AC+1)= 377777 760000
----------
*031655 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 767777 C(AC+1)= 777777 777777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 616377 777777 C(AC+1)= 377777 740000
----------
*031664 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 773777 C(AC+1)= 777777 777777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 617377 777777 C(AC+1)= 377777 700000
----------
*031673 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 775777 C(AC+1)= 777777 777777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 620377 777777 C(AC+1)= 377777 600000
----------
*031702 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 776777 C(AC+1)= 777777 777777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 621377 777777 C(AC+1)= 377777 400000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 17
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0238
*031711 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 777377 C(AC+1)= 777777 777777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 622377 777777 C(AC+1)= 377777 000000
----------
*031720 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 777577 C(AC+1)= 777777 777777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 623377 777777 C(AC+1)= 377776 000000
----------
*031727 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 777677 C(AC+1)= 777777 777777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 624377 777777 C(AC+1)= 377774 000000
----------
*031736 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 777737 C(AC+1)= 777777 777777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 625377 777777 C(AC+1)= 377770 000000
----------
*031745 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 777757 C(AC+1)= 777777 777777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 626377 777777 C(AC+1)= 377760 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 18
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0239
*031754 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 777767 C(AC+1)= 777777 777777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 627377 777777 C(AC+1)= 377740 000000
----------
*031763 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 777773 C(AC+1)= 777777 777777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 630377 777777 C(AC+1)= 377700 000000
----------
*031772 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 777775 C(AC+1)= 777777 777777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 631377 777777 C(AC+1)= 377600 000000
----------
*032001 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 777776 C(AC+1)= 777777 777777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 632377 777777 C(AC+1)= 377400 000000
----------
*032010 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 777777 C(AC+1)= 577777 777777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 633377 777777 C(AC+1)= 377000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 19
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0240
*032017 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 777777 C(AC+1)= 677777 777777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 634377 777777 C(AC+1)= 376000 000000
----------
*032026 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 777777 C(AC+1)= 737777 777777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 635377 777777 C(AC+1)= 374000 000000
----------
*032035 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 777777 C(AC+1)= 757777 777777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 636377 777777 C(AC+1)= 370000 000000
----------
*032044 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 777777 C(AC+1)= 767777 777777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 637377 777777 C(AC+1)= 360000 000000
----------
*032053 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 777777 C(AC+1)= 773777 777777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 640377 777777 C(AC+1)= 340000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 20
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0241
*032062 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 777777 C(AC+1)= 775777 777777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 641377 777777 C(AC+1)= 300000 000000
----------
*032071 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 777777 C(AC+1)= 776777 777777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 642377 777777 C(AC+1)= 200000 000000
----------
*032100 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 777777 C(AC+1)= 777377 777777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 643377 777777 C(AC+1)= 000000 000000
----------
*032107 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 777777 C(AC+1)= 777577 777777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 644377 777776 C(AC+1)= 000000 000000
----------
*032116 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 777777 C(AC+1)= 777677 777777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 645377 777774 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 21
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0242
*032125 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 777777 C(AC+1)= 777737 777777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 646377 777770 C(AC+1)= 000000 000000
----------
*032134 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 777777 C(AC+1)= 777757 777777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 647377 777760 C(AC+1)= 000000 000000
----------
*032143 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 777777 C(AC+1)= 777767 777777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 650377 777740 C(AC+1)= 000000 000000
----------
*032152 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 777777 C(AC+1)= 777773 777777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 651377 777700 C(AC+1)= 000000 000000
----------
*032161 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 777777 C(AC+1)= 777775 777777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 652377 777600 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 22
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0243
*032170 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 777777 C(AC+1)= 777776 777777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 653377 777400 C(AC+1)= 000000 000000
----------
*032177 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 777777 C(AC+1)= 777777 377777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 654377 777000 C(AC+1)= 000000 000000
----------
*032206 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 777777 C(AC+1)= 777777 577777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 655377 776000 C(AC+1)= 000000 000000
----------
*032215 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 777777 C(AC+1)= 777777 677777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 656377 774000 C(AC+1)= 000000 000000
----------
*032224 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 777777 C(AC+1)= 777777 737777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 657377 770000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 23
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0244
*032233 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 777777 C(AC+1)= 777777 757777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 660377 760000 C(AC+1)= 000000 000000
----------
*032242 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 777777 C(AC+1)= 777777 767777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 661377 740000 C(AC+1)= 000000 000000
----------
*032251 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 777777 C(AC+1)= 777777 773777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 662377 700000 C(AC+1)= 000000 000000
----------
*032260 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 777777 C(AC+1)= 777777 775777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 663377 600000 C(AC+1)= 000000 000000
----------
*032267 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 777777 C(AC+1)= 777777 776777 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 664377 400000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 24
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0245
*032276 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 777777 C(AC+1)= 777777 777377 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 665377 000000 C(AC+1)= 000000 000000
----------
*032305 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 777777 C(AC+1)= 777777 777577 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 666376 000000 C(AC+1)= 000000 000000
----------
*032314 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 777777 C(AC+1)= 777777 777677 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 667374 000000 C(AC+1)= 000000 000000
----------
*032323 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 777777 C(AC+1)= 777777 777737 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 670370 000000 C(AC+1)= 000000 000000
----------
*032332 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 777777 C(AC+1)= 777777 777757 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 671360 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 25
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0246
*032341 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 777777 C(AC+1)= 777777 777767 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 672340 000000 C(AC+1)= 000000 000000
----------
*032350 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 777777 C(AC+1)= 777777 777773 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 673300 000000 C(AC+1)= 000000 000000
----------
*032357 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 777777 C(AC+1)= 777777 777775 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 674200 000000 C(AC+1)= 000000 000000
----------
*032366 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600777 777777 C(AC+1)= 777777 777776 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 674400 000000 C(AC+1)= 000000 000000
----------
*032376 DFAD 4,000006
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200777 777777 C(AC+1)= 777777 777777 C(E)= 200000 000000 C(E+1)= 400000 777777
FINAL
C(AC)= 201400 000000 C(AC+1)= 000000 377777
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 26
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0247
*032405 DFAD 4,040716
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 000600 000000 C(AC+1)= 000000 000000 C(E)= 000400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 001500 000000 C(AC+1)= 000000 000000
----------
*032414 DFAD 4,040723
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 377000 000000 C(AC+1)= 000000 000000 C(E)= 377600 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 377600 000000 C(AC+1)= 000000 000000
----------
*032423 DFAD 4,040727
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600400 000000 C(AC+1)= 000000 000000 C(E)= 177400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 000000 000000 C(AC+1)= 000000 000000
----------
*032432 DFAD 4,040733
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000000 000000 C(E)= 205400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 205410 000000 C(AC+1)= 000000 000000
----------
*032441 DFAD 4,040736
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000000 000000 C(E)= 205600 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 205610 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 27
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0248
*032450 DFAD 4,040731
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 000600 000000 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 200400 000000 C(AC+1)= 000000 000000
----------
*032457 DFAD 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200700 000000 C(AC+1)= 000000 000000 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 200700 000000 C(AC+1)= 000000 000000
----------
*032466 DFAD 4,040731
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 201400 000000 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 201600 000000 C(AC+1)= 000000 000000
----------
*032475 DFAD 4,040731
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 202400 000000 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 202500 000000 C(AC+1)= 000000 000000
----------
*032504 DFAD 4,040731
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 204400 000000 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 204420 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 28
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0249
*032513 DFAD 4,040731
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 210400 000000 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 210401 000000 C(AC+1)= 000000 000000
----------
*032522 DFAD 4,040731
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 220400 000000 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 220400 002000 C(AC+1)= 000000 000000
----------
*032531 DFAD 4,040731
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 240400 000000 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 240400 000000 C(AC+1)= 004000 000000
----------
*032540 DFAD 4,040731
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 300400 000000 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 300400 000000 C(AC+1)= 000000 000000
----------
*032547 DFAD 4,040725
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600400 000000 C(AC+1)= 000000 000000 C(E)= 600400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 577400 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 29
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0250
*032556 DFAD 4,040733
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 000000 000000 C(AC+1)= 000000 000000 C(E)= 205400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 205400 000000 C(AC+1)= 000000 000000
----------
*032565 DFAD 4,040731
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 201400 000000 C(AC+1)= 000000 000000
----------
*032574 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 577400 000000 C(AC+1)= 000000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 576400 000000 C(AC+1)= 000000 000000
----------
*032603 DFAD 4,040727
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 205600 000000 C(AC+1)= 000000 000000 C(E)= 177400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 205604 000000 C(AC+1)= 000000 000000
----------
*032612 DFAD 4,040770
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 201000 000000 C(AC+1)= 000000 000000 C(E)= 202000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 000000 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 30
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0251
*032621 DFAD 4,040772
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 202000 000000 C(AC+1)= 000000 000000 C(E)= 204000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 000000 000000 C(AC+1)= 000000 000000
----------
*032630 DFAD 4,040774
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 204000 000000 C(AC+1)= 000000 000000 C(E)= 207000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 000000 000000 C(AC+1)= 000000 000000
----------
*032637 DFAD 4,041000
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 210000 000000 C(AC+1)= 000000 000000 C(E)= 214000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 000000 000000 C(AC+1)= 000000 000000
----------
*032646 DFAD 4,041004
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 220000 000000 C(AC+1)= 000000 000000 C(E)= 225000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 000000 000000 C(AC+1)= 000000 000000
----------
*032655 DFAD 4,041010
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 240000 000000 C(AC+1)= 000000 000000 C(E)= 246000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 000000 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 31
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0252
*032664 DFAD 4,041014
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 300000 000000 C(AC+1)= 000000 000000 C(E)= 307000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 000000 000000 C(AC+1)= 000000 000000
----------
*032673 DFAD 4,040725
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200000 000000 C(AC+1)= 000000 000000 C(E)= 600400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 600400 000000 C(AC+1)= 000000 000000
----------
*032702 DFAD 4,040725
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 201000 000000 C(AC+1)= 000000 000000 C(E)= 600400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 600400 000000 C(AC+1)= 000000 000000
----------
*032711 DFAD 4,040725
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 202000 000000 C(AC+1)= 000000 000000 C(E)= 600400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 600400 000000 C(AC+1)= 000000 000000
----------
*032720 DFAD 4,040725
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 203000 000000 C(AC+1)= 000000 000000 C(E)= 600400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 600400 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 32
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0253
*032727 DFAD 4,040725
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 204000 000000 C(AC+1)= 000000 000000 C(E)= 600400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 600400 000000 C(AC+1)= 000000 000000
----------
*032736 DFAD 4,040725
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 206000 000000 C(AC+1)= 000000 000000 C(E)= 600400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 600400 000000 C(AC+1)= 000000 000000
----------
*032745 DFAD 4,040725
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 207000 000000 C(AC+1)= 000000 000000 C(E)= 600400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 600400 000000 C(AC+1)= 000000 000000
----------
*032754 DFAD 4,041026
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 400200 000000 C(AC+1)= 000000 000000 C(E)= 377400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 401400 000000 C(AC+1)= 000000 000000
----------
*032763 DFAD 4,041024
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 377400 000000 C(AC+1)= 000000 000000 C(E)= 400200 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 401400 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 33
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0254
*032772 DFAD 4,040725
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000000 000000 C(E)= 600400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 177400 000000 C(AC+1)= 000000 000000
----------
*033001 DFAD 4,040057
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200600 000000 C(AC+1)= 000000 000000 C(E)= 201400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 201700 000000 C(AC+1)= 000000 000000
----------
*033010 DFAD 4,040731
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 577600 000000 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 177400 000000 C(AC+1)= 000000 000000
----------
*033017 DFAD 4,041034
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600400 000000 C(AC+1)= 000000 000000 C(E)= 577200 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 576400 000000 C(AC+1)= 000000 000000
----------
*033026 DFAD 4,040731
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 576400 000000 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 577400 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 34
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0255
*033035 DFAD 4,040731
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200440 000000 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 201420 000000 C(AC+1)= 000000 000000
----------
*033044 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 577400 000000 C(AC+1)= 000000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 576400 000000 C(AC+1)= 000000 000000
----------
*033053 DFAD 4,041043
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000077 C(AC+1)= 000000 000000 C(E)= 206400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 206404 000000 C(AC+1)= 374000 000000
----------
*033062 DFAD 4,041050
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 030400 000003 C(AC+1)= 000000 000000 C(E)= 032400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 032500 000000 C(AC+1)= 300000 000000
----------
*033071 DFAD 4,041053
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000001 C(AC+1)= 000000 000000 C(E)= 201600 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 202400 000000 C(AC+1)= 100000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 35
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0256
*033100 DFAD 4,040744
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 577400 000003 C(AC+1)= 000000 000000 C(E)= 202400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 201600 000001 C(AC+1)= 200000 000000
----------
*033107 DFAD 4,040744
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000003 C(AC+1)= 000000 000000 C(E)= 202400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 202500 000000 C(AC+1)= 300000 000000
----------
*033116 DFAD 4,040744
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 777777 C(AC+1)= 000000 000000 C(E)= 202400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 202500 177777 C(AC+1)= 300000 000000
----------
*033125 DFAD 4,041065
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200200 000001 C(AC+1)= 000000 000000 C(E)= 200200 000001 C(E+1)= 000000 000000
FINAL
C(AC)= 200400 000002 C(AC+1)= 000000 000000
----------
*033134 DFAD 4,041067
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200200 000002 C(AC+1)= 000000 000000 C(E)= 200200 000002 C(E+1)= 000000 000000
FINAL
C(AC)= 200400 000004 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 36
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0257
*033143 DFAD 4,041071
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200200 000004 C(AC+1)= 000000 000000 C(E)= 200200 000004 C(E+1)= 000000 000000
FINAL
C(AC)= 200400 000010 C(AC+1)= 000000 000000
----------
*033152 DFAD 4,041073
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200200 000010 C(AC+1)= 000000 000000 C(E)= 200200 000010 C(E+1)= 000000 000000
FINAL
C(AC)= 200400 000020 C(AC+1)= 000000 000000
----------
*033161 DFAD 4,041075
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200200 000020 C(AC+1)= 000000 000000 C(E)= 200200 000020 C(E+1)= 000000 000000
FINAL
C(AC)= 200400 000040 C(AC+1)= 000000 000000
----------
*033170 DFAD 4,041077
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200200 000040 C(AC+1)= 000000 000000 C(E)= 200200 000040 C(E+1)= 000000 000000
FINAL
C(AC)= 200400 000100 C(AC+1)= 000000 000000
----------
*033177 DFAD 4,041101
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200200 000100 C(AC+1)= 000000 000000 C(E)= 200200 000100 C(E+1)= 000000 000000
FINAL
C(AC)= 200400 000200 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 37
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0258
*033206 DFAD 4,041103
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200200 000200 C(AC+1)= 000000 000000 C(E)= 200200 000200 C(E+1)= 000000 000000
FINAL
C(AC)= 200400 000400 C(AC+1)= 000000 000000
----------
*033215 DFAD 4,041105
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200200 000400 C(AC+1)= 000000 000000 C(E)= 200200 000400 C(E+1)= 000000 000000
FINAL
C(AC)= 200400 001000 C(AC+1)= 000000 000000
----------
*033224 DFAD 4,041107
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200200 001000 C(AC+1)= 000000 000000 C(E)= 200200 001000 C(E+1)= 000000 000000
FINAL
C(AC)= 200400 002000 C(AC+1)= 000000 000000
----------
*033233 DFAD 4,040057
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 172400 000000 C(AC+1)= 000000 000000 C(E)= 201400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 201402 000000 C(AC+1)= 000000 000000
----------
*033242 DFAD 4,040057
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 173400 000000 C(AC+1)= 000000 000000 C(E)= 201400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 201404 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 38
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0259
*033251 DFAD 4,040057
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 174400 000000 C(AC+1)= 000000 000000 C(E)= 201400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 201410 000000 C(AC+1)= 000000 000000
----------
*033260 DFAD 4,040057
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 175400 000000 C(AC+1)= 000000 000000 C(E)= 201400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 201420 000000 C(AC+1)= 000000 000000
----------
*033267 DFAD 4,040057
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 176400 000000 C(AC+1)= 000000 000000 C(E)= 201400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 201440 000000 C(AC+1)= 000000 000000
----------
*033276 DFAD 4,040057
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 177400 000000 C(AC+1)= 000000 000000 C(E)= 201400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 201500 000000 C(AC+1)= 000000 000000
----------
*033305 DFAD 4,040731
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 202600 000000 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 202700 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 39
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0260
*033314 DFAD 4,040731
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 000400 000000 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 200400 000000 C(AC+1)= 000000 000000
----------
*033323 DFAD 4,040057
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 000400 000000 C(AC+1)= 000000 000000 C(E)= 201400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 201400 000000 C(AC+1)= 000000 000000
----------
*033332 DFAD 4,040744
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 000400 000000 C(AC+1)= 000000 000000 C(E)= 202400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 202400 000000 C(AC+1)= 000000 000000
----------
*033341 DFAD 4,040766
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200000 000000 C(AC+1)= 000000 000000 C(E)= 201000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 000000 000000 C(AC+1)= 000000 000000
----------
*033350 DFAD 4,040770
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200000 000000 C(AC+1)= 000000 000000 C(E)= 202000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 000000 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 40
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0261
*033357 DFAD 4,041020
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200000 000000 C(AC+1)= 000000 000000 C(E)= 203000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 000000 000000 C(AC+1)= 000000 000000
----------
*033366 DFAD 4,040731
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 201400 000000 C(AC+1)= 000000 000000
----------
*033375 DFAD 4,040057
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 201400 000000 C(AC+1)= 000000 000000 C(E)= 201400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 202400 000000 C(AC+1)= 000000 000000
----------
*033404 DFAD 4,040744
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 202400 000000 C(AC+1)= 000000 000000 C(E)= 202400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 203400 000000 C(AC+1)= 000000 000000
----------
*033413 DFAD 4,041134
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200100 000000 C(AC+1)= 000000 000000 C(E)= 200100 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 177400 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 41
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0262
*033422 DFAD 4,041136
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200040 000000 C(AC+1)= 000000 000000 C(E)= 200040 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 176400 000000 C(AC+1)= 000000 000000
----------
*033431 DFAD 4,041140
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200020 000000 C(AC+1)= 000000 000000 C(E)= 200020 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 175400 000000 C(AC+1)= 000000 000000
----------
*033440 DFAD 4,041036
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 577400 000000 C(AC+1)= 000000 000000 C(E)= 576400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 576200 000000 C(AC+1)= 000000 000000
----------
*033447 DFAD 4,041036
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 600400 000000 C(AC+1)= 000000 000000 C(E)= 576400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 576300 000000 C(AC+1)= 000000 000000
----------
*033456 DFAD 4,041036
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 601400 000000 C(AC+1)= 000000 000000 C(E)= 576400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 576340 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 42
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0263
*033465 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 576400 000000 C(AC+1)= 000000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 576200 000000 C(AC+1)= 000000 000000
----------
*033474 DFAD 4,040725
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 576400 000000 C(AC+1)= 000000 000000 C(E)= 600400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 576300 000000 C(AC+1)= 000000 000000
----------
*033503 DFAD 4,041144
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 576400 000000 C(AC+1)= 000000 000000 C(E)= 601400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 576340 000000 C(AC+1)= 000000 000000
----------
*033512 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 577400 000000 C(AC+1)= 000000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 576400 000000 C(AC+1)= 000000 000000
----------
*033521 DFAD 4,041144
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 601400 000000 C(AC+1)= 000000 000000 C(E)= 601400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 600400 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 43
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0264
*033530 DFAD 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 201400 000000 C(AC+1)= 000000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 200400 000000 C(AC+1)= 000000 000000
----------
*033537 DFAD 4,040725
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 201400 000000 C(AC+1)= 000000 000000 C(E)= 600400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 200600 000000 C(AC+1)= 000000 000000
----------
*033546 DFAD 4,041144
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 201400 000000 C(AC+1)= 000000 000000 C(E)= 601400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 200700 000000 C(AC+1)= 000000 000000
----------
*033555 DFAD 4,041147
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200000 000000 C(AC+1)= 000000 000000 C(E)= 200000 000001 C(E+1)= 000000 000000
FINAL
C(AC)= 146400 000000 C(AC+1)= 000000 000000
----------
*033564 DFAD 4,041151
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200000 000000 C(AC+1)= 000000 000000 C(E)= 200000 000002 C(E+1)= 000000 000000
FINAL
C(AC)= 147400 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 44
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0265
*033573 DFAD 4,041153
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200000 000000 C(AC+1)= 000000 000000 C(E)= 200000 000004 C(E+1)= 000000 000000
FINAL
C(AC)= 150400 000000 C(AC+1)= 000000 000000
----------
*033602 DFAD 4,041155
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200000 000000 C(AC+1)= 000000 000000 C(E)= 200000 000010 C(E+1)= 000000 000000
FINAL
C(AC)= 151400 000000 C(AC+1)= 000000 000000
----------
*033611 DFAD 4,041157
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200000 000000 C(AC+1)= 000000 000000 C(E)= 200000 000020 C(E+1)= 000000 000000
FINAL
C(AC)= 152400 000000 C(AC+1)= 000000 000000
----------
*033620 DFAD 4,041161
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200000 000000 C(AC+1)= 000000 000000 C(E)= 200000 000040 C(E+1)= 000000 000000
FINAL
C(AC)= 153400 000000 C(AC+1)= 000000 000000
----------
*033627 DFAD 4,041163
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200000 000000 C(AC+1)= 000000 000000 C(E)= 200000 000100 C(E+1)= 000000 000000
FINAL
C(AC)= 154400 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 45
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0266
*033636 DFAD 4,041165
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200000 000000 C(AC+1)= 000000 000000 C(E)= 200000 000200 C(E+1)= 000000 000000
FINAL
C(AC)= 155400 000000 C(AC+1)= 000000 000000
----------
*033645 DFAD 4,041167
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200000 000000 C(AC+1)= 000000 000000 C(E)= 200000 000400 C(E+1)= 000000 000000
FINAL
C(AC)= 156400 000000 C(AC+1)= 000000 000000
----------
*033654 DFAD 4,041171
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200000 000000 C(AC+1)= 000000 000000 C(E)= 200000 001000 C(E+1)= 000000 000000
FINAL
C(AC)= 157400 000000 C(AC+1)= 000000 000000
----------
*033663 DFAD 4,041173
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200000 000000 C(AC+1)= 000000 000000 C(E)= 200000 002000 C(E+1)= 000000 000000
FINAL
C(AC)= 160400 000000 C(AC+1)= 000000 000000
----------
*033672 DFAD 4,041175
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200000 000000 C(AC+1)= 000000 000000 C(E)= 200000 004000 C(E+1)= 000000 000000
FINAL
C(AC)= 161400 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 46
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0267
*033701 DFAD 4,041177
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200000 000000 C(AC+1)= 000000 000000 C(E)= 200000 010000 C(E+1)= 000000 000000
FINAL
C(AC)= 162400 000000 C(AC+1)= 000000 000000
----------
*033710 DFAD 4,041201
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200000 000000 C(AC+1)= 000000 000000 C(E)= 200000 020000 C(E+1)= 000000 000000
FINAL
C(AC)= 163400 000000 C(AC+1)= 000000 000000
----------
*033717 DFAD 4,041203
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200000 000000 C(AC+1)= 000000 000000 C(E)= 200000 040000 C(E+1)= 000000 000000
FINAL
C(AC)= 164400 000000 C(AC+1)= 000000 000000
----------
*033726 DFAD 4,041205
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200000 000000 C(AC+1)= 000000 000000 C(E)= 200000 100000 C(E+1)= 000000 000000
FINAL
C(AC)= 165400 000000 C(AC+1)= 000000 000000
----------
*033735 DFAD 4,041207
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200000 000000 C(AC+1)= 000000 000000 C(E)= 200000 200000 C(E+1)= 000000 000000
FINAL
C(AC)= 166400 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 47
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0268
*033744 DFAD 4,041211
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200000 000000 C(AC+1)= 000000 000000 C(E)= 200000 400000 C(E+1)= 000000 000000
FINAL
C(AC)= 167400 000000 C(AC+1)= 000000 000000
----------
*033753 DFAD 4,041213
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200000 000000 C(AC+1)= 000000 000000 C(E)= 200001 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 170400 000000 C(AC+1)= 000000 000000
----------
*033762 DFAD 4,041215
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200000 000000 C(AC+1)= 000000 000000 C(E)= 200002 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 171400 000000 C(AC+1)= 000000 000000
----------
*033771 DFAD 4,041217
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200000 000000 C(AC+1)= 000000 000000 C(E)= 200004 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 172400 000000 C(AC+1)= 000000 000000
----------
*034000 DFAD 4,041221
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200000 000000 C(AC+1)= 000000 000000 C(E)= 200010 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 173400 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 48
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0269
*034007 DFAD 4,041140
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200000 000000 C(AC+1)= 000000 000000 C(E)= 200020 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 174400 000000 C(AC+1)= 000000 000000
----------
*034016 DFAD 4,041136
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200000 000000 C(AC+1)= 000000 000000 C(E)= 200040 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 175400 000000 C(AC+1)= 000000 000000
----------
*034025 DFAD 4,041134
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200000 000000 C(AC+1)= 000000 000000 C(E)= 200100 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 176400 000000 C(AC+1)= 000000 000000
----------
*034034 DFAD 4,041026
FLAGS - INT/FINAL 000000 440200
INITIAL
C(AC)= 377400 000000 C(AC+1)= 000000 000000 C(E)= 377400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 000400 000000 C(AC+1)= 000000 000000
----------
*034043 DFAD 4,041223
FLAGS - INT/FINAL 440200 440300
INITIAL
C(AC)= 777700 000000 C(AC+1)= 000000 000000 C(E)= 777700 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 400400 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 49
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0270
*034052 DFAD 4,041226
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200000 000000 C(AC+1)= 000000 000000 C(E)= 200777 777777 C(E+1)= 000000 000000
FINAL
C(AC)= 200777 777777 C(AC+1)= 000000 000000
----------
*034061 DFAD 4,040057
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200000 000001 C(AC+1)= 000000 000000 C(E)= 201400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 201400 000000 C(AC+1)= 200000 000000
----------
*034070 DFAD 4,040744
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200000 000002 C(AC+1)= 000000 000000 C(E)= 202400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 202400 000000 C(AC+1)= 200000 000000
----------
*034077 DFAD 4,041230
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200000 000004 C(AC+1)= 000000 000000 C(E)= 203400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 203400 000000 C(AC+1)= 200000 000000
----------
*034106 DFAD 4,040747
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200000 000010 C(AC+1)= 000000 000000 C(E)= 204400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 204400 000000 C(AC+1)= 200000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 50
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0271
*034115 DFAD 4,040733
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200000 000020 C(AC+1)= 000000 000000 C(E)= 205400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 205400 000000 C(AC+1)= 200000 000000
----------
*034124 DFAD 4,041043
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200000 000040 C(AC+1)= 000000 000000 C(E)= 206400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 206400 000000 C(AC+1)= 200000 000000
----------
*034133 DFAD 4,041232
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200000 000100 C(AC+1)= 000000 000000 C(E)= 207400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 207400 000000 C(AC+1)= 200000 000000
----------
*034142 DFAD 4,040752
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200000 000200 C(AC+1)= 000000 000000 C(E)= 210400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 210400 000000 C(AC+1)= 200000 000000
----------
*034151 DFAD 4,041234
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200000 000400 C(AC+1)= 000000 000000 C(E)= 211400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 211400 000000 C(AC+1)= 200000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 51
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0272
*034160 DFAD 4,041236
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200000 001000 C(AC+1)= 000000 000000 C(E)= 212400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 212400 000000 C(AC+1)= 200000 000000
----------
*034167 DFAD 4,041240
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200000 002000 C(AC+1)= 000000 000000 C(E)= 213400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 213400 000000 C(AC+1)= 200000 000000
----------
*034176 DFAD 4,041242
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200000 004000 C(AC+1)= 000000 000000 C(E)= 214400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 214400 000000 C(AC+1)= 200000 000000
----------
*034205 DFAD 4,041244
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200000 010000 C(AC+1)= 000000 000000 C(E)= 215400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 215400 000000 C(AC+1)= 200000 000000
----------
*034214 DFAD 4,041246
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200000 020000 C(AC+1)= 000000 000000 C(E)= 216400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 216400 000000 C(AC+1)= 200000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 52
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0273
*034223 DFAD 4,041250
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200000 040000 C(AC+1)= 000000 000000 C(E)= 217400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 217400 000000 C(AC+1)= 200000 000000
----------
*034232 DFAD 4,040755
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200000 100000 C(AC+1)= 000000 000000 C(E)= 220400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 220400 000000 C(AC+1)= 200000 000000
----------
*034241 DFAD 4,041252
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200000 200000 C(AC+1)= 000000 000000 C(E)= 221400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 221400 000000 C(AC+1)= 200000 000000
----------
*034250 DFAD 4,041254
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200000 400000 C(AC+1)= 000000 000000 C(E)= 222400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 222400 000000 C(AC+1)= 200000 000000
----------
*034257 DFAD 4,041256
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200001 000000 C(AC+1)= 000000 000000 C(E)= 223400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 223400 000000 C(AC+1)= 200000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 53
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0274
*034266 DFAD 4,041260
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200002 000000 C(AC+1)= 000000 000000 C(E)= 224400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 224400 000000 C(AC+1)= 200000 000000
----------
*034275 DFAD 4,041262
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200004 000000 C(AC+1)= 000000 000000 C(E)= 225400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 225400 000000 C(AC+1)= 200000 000000
----------
*034304 DFAD 4,041264
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200010 000000 C(AC+1)= 000000 000000 C(E)= 226400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 226400 000000 C(AC+1)= 200000 000000
----------
*034313 DFAD 4,041266
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200020 000000 C(AC+1)= 000000 000000 C(E)= 227400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 227400 000000 C(AC+1)= 200000 000000
----------
*034322 DFAD 4,041270
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200040 000000 C(AC+1)= 000000 000000 C(E)= 230400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 230400 000000 C(AC+1)= 200000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 54
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0275
*034331 DFAD 4,041272
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200100 000000 C(AC+1)= 000000 000000 C(E)= 231400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 231400 000000 C(AC+1)= 200000 000000
----------
*034340 DFAD 4,041276
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200200 000000 C(AC+1)= 000000 000000 C(E)= 232400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 232400 000000 C(AC+1)= 200000 000000
----------
*034347 DFAD 4,041300
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000000 000000 C(E)= 233400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 233400 000000 C(AC+1)= 200000 000000
----------
*034356 DFAD 4,040177
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000000 000000 C(E)= 200400 000001 C(E+1)= 000000 000000
FINAL
C(AC)= 201400 000000 C(AC+1)= 200000 000000
----------
*034365 DFAD 4,040057
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000000 000000 C(E)= 201400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 201600 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 55
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0276
*034374 DFAD 4,040744
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200000 000003 C(AC+1)= 000000 000000 C(E)= 202400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 202400 000000 C(AC+1)= 300000 000000
----------
*034403 DFAD 4,041230
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200000 000005 C(AC+1)= 000000 000000 C(E)= 203400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 203400 000000 C(AC+1)= 240000 000000
----------
*034412 DFAD 4,040747
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200000 000011 C(AC+1)= 000000 000000 C(E)= 204400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 204400 000000 C(AC+1)= 220000 000000
----------
*034421 DFAD 4,040733
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200000 000021 C(AC+1)= 000000 000000 C(E)= 205400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 205400 000000 C(AC+1)= 210000 000000
----------
*034430 DFAD 4,041043
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200000 000041 C(AC+1)= 000000 000000 C(E)= 206400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 206400 000000 C(AC+1)= 204000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 56
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0277
*034437 DFAD 4,041232
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200000 000101 C(AC+1)= 000000 000000 C(E)= 207400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 207400 000000 C(AC+1)= 202000 000000
----------
*034446 DFAD 4,040752
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200000 000201 C(AC+1)= 000000 000000 C(E)= 210400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 210400 000000 C(AC+1)= 201000 000000
----------
*034455 DFAD 4,041234
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200000 000401 C(AC+1)= 000000 000000 C(E)= 211400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 211400 000000 C(AC+1)= 200400 000000
----------
*034464 DFAD 4,041236
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200000 001001 C(AC+1)= 000000 000000 C(E)= 212400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 212400 000000 C(AC+1)= 200200 000000
----------
*034473 DFAD 4,041240
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200000 002001 C(AC+1)= 000000 000000 C(E)= 213400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 213400 000000 C(AC+1)= 200100 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 57
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0278
*034502 DFAD 4,041242
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200000 004001 C(AC+1)= 000000 000000 C(E)= 214400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 214400 000000 C(AC+1)= 200040 000000
----------
*034511 DFAD 4,041244
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200000 010001 C(AC+1)= 000000 000000 C(E)= 215400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 215400 000000 C(AC+1)= 200020 000000
----------
*034520 DFAD 4,041246
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200000 020001 C(AC+1)= 000000 000000 C(E)= 216400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 216400 000000 C(AC+1)= 200010 000000
----------
*034527 DFAD 4,041250
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200000 040001 C(AC+1)= 000000 000000 C(E)= 217400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 217400 000000 C(AC+1)= 200004 000000
----------
*034536 DFAD 4,040755
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200000 100001 C(AC+1)= 000000 000000 C(E)= 220400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 220400 000000 C(AC+1)= 200002 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 58
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0279
*034545 DFAD 4,041252
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200000 200001 C(AC+1)= 000000 000000 C(E)= 221400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 221400 000000 C(AC+1)= 200001 000000
----------
*034554 DFAD 4,041254
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200000 400001 C(AC+1)= 000000 000000 C(E)= 222400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 222400 000000 C(AC+1)= 200000 400000
----------
*034570 DFAD 4,041345
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 377400 000000 C(AC+1)= 000000 000000 C(E)= 376777 777777 C(E+1)= 777777 777776
FINAL
C(AC)= 377777 777777 C(AC+1)= 377777 777777
----------
*034611 DFAD 4,041026
FLAGS - INT/FINAL 000000 440200
INITIAL
C(AC)= 377400 000000 C(AC+1)= 000000 000000 C(E)= 377400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 000400 000000 C(AC+1)= 000000 000000
----------
*034630 DFAD 4,041351
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 000200 000000 C(AC+1)= 000000 000000 C(E)= 000200 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 000400 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 59
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0280
*034651 DFAD 4,041354
FLAGS - INT/FINAL 000000 440300
INITIAL
C(AC)= 000200 000000 C(AC+1)= 000000 000000 C(E)= 000177 777777 C(E+1)= 777777 777777
FINAL
C(AC)= 377777 777777 C(AC+1)= 377777 777776
----------
*034670 DFAD 4,041361
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 400400 000000 C(AC+1)= 000000 000000 C(E)= 401000 000000 C(E+1)= 000000 000002
FINAL
C(AC)= 400000 000000 C(AC+1)= 000000 000001
----------
*034711 DFAD 4,041357
FLAGS - INT/FINAL 000000 440200
INITIAL
C(AC)= 400400 000000 C(AC+1)= 000000 000000 C(E)= 400400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 777400 000000 C(AC+1)= 000000 000000
----------
*034730 DFAD 4,041367
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 777600 000000 C(AC+1)= 000000 000000 C(E)= 777600 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 777400 000000 C(AC+1)= 000000 000000
----------
*034751 DFAD 4,041372
FLAGS - INT/FINAL 000000 440300
INITIAL
C(AC)= 777600 000000 C(AC+1)= 000000 000000 C(E)= 777600 000000 C(E+1)= 000000 000001
FINAL
C(AC)= 400000 000000 C(AC+1)= 000000 000002
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 60
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0281
*034775 DFSB 4,000006
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200777 777777 C(AC+1)= 777777 777777 C(E)= 200000 000000 C(E+1)= 400000 777777
FINAL
C(AC)= 200777 777777 C(AC+1)= 377777 000000
----------
*035004 DFSB 4,040727
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 205400 000000 C(AC+1)= 000000 000000 C(E)= 177400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 204770 000000 C(AC+1)= 000000 000000
----------
*035013 DFSB 4,040727
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000000 000000 C(E)= 177400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 177400 000000 C(AC+1)= 000000 000000
----------
*035022 DFSB 4,040731
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 000000 000000 C(AC+1)= 000000 000000
----------
*035031 DFSB 4,040727
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 201400 000000 C(AC+1)= 000000 000000 C(E)= 177400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 200600 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 61
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0282
*035040 DFSB 4,040725
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 576400 000000 C(AC+1)= 000000 000000 C(E)= 600400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 577200 000000 C(AC+1)= 000000 000000
----------
*035047 DFSB 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 201400 000000 C(AC+1)= 000000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 201600 000000 C(AC+1)= 000000 000000
----------
*035056 DFSB 4,041376
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 203400 000000 C(AC+1)= 000000 000000 C(E)= 200477 777775 C(E+1)= 000000 000000
FINAL
C(AC)= 202660 000000 C(AC+1)= 300000 000000
----------
*035072 DFSB 4,041402
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 377400 000000 C(AC+1)= 000000 000000 C(E)= 400400 000000 C(E+1)= 000000 000001
FINAL
C(AC)= 377777 777777 C(AC+1)= 377777 777777
----------
*035113 DFSB 4,041357
FLAGS - INT/FINAL 000000 440200
INITIAL
C(AC)= 377400 000000 C(AC+1)= 000000 000000 C(E)= 400400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 000400 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 62
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0283
*035132 DFSB 4,041410
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 000777 777777 C(AC+1)= 777777 777777 C(E)= 000377 777777 C(E+1)= 777777 777777
FINAL
C(AC)= 000400 000000 C(AC+1)= 000000 000000
----------
*035153 DFSB 4,040716
FLAGS - INT/FINAL 000000 440300
INITIAL
C(AC)= 000777 777777 C(AC+1)= 777777 777777 C(E)= 000400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 377777 777777 C(AC+1)= 377777 777776
----------
*035172 DFSB 4,041414
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 400400 000000 C(AC+1)= 000000 000000 C(E)= 377377 777777 C(E+1)= 777777 777777
FINAL
C(AC)= 400000 000000 C(AC+1)= 000000 000001
----------
*035213 DFSB 4,041026
FLAGS - INT/FINAL 000000 440200
INITIAL
C(AC)= 400400 000000 C(AC+1)= 000000 000000 C(E)= 377400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 777400 000000 C(AC+1)= 000000 000000
----------
*035232 DFSB 4,041422
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 777000 000000 C(AC+1)= 000000 000000 C(E)= 777400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 777400 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 63
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0284
*035253 DFSB 4,041422
FLAGS - INT/FINAL 000000 440300
INITIAL
C(AC)= 777000 000000 C(AC+1)= 000000 000001 C(E)= 777400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 400000 000000 C(AC+1)= 000000 000002
----------
*035277 DFMP 4,000006
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200777 777777 C(AC+1)= 777777 777777 C(E)= 201400 000000 C(E+1)= 400000 777777
FINAL
C(AC)= 201400 000000 C(AC+1)= 000000 777776
----------
*035306 DFMP 4,040355
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000000 000000 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 000000 000000 C(AC+1)= 000000 000000
----------
*035315 DFMP 4,040731
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 177400 000000 C(AC+1)= 000000 000000
----------
*035324 DFMP 4,040716
FLAGS - INT/FINAL 000000 440300
INITIAL
C(AC)= 000400 000000 C(AC+1)= 000000 000000 C(E)= 000400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 177400 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 64
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0285
*035333 DFMP 4,040716
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000000 000000 C(E)= 000400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 377400 000000 C(AC+1)= 000000 000000
----------
*035342 DFMP 4,040716
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 177400 000000 C(AC+1)= 000000 000000 C(E)= 000400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 376400 000000 C(AC+1)= 000000 000000
----------
*035351 DFMP 4,040716
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 377400 000000 C(AC+1)= 000000 000000 C(E)= 000400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 176400 000000 C(AC+1)= 000000 000000
----------
*035360 DFMP 4,040716
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 577400 000000 C(AC+1)= 000000 000000 C(E)= 000400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 400400 000000 C(AC+1)= 000000 000000
----------
*035367 DFMP 4,040731
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 000400 000000 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 377400 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 65
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0286
*035376 DFMP 4,040061
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 600400 000000 C(AC+1)= 000000 000000
----------
*035405 DFMP 4,040733
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000000 000000 C(E)= 205400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 204400 000000 C(AC+1)= 000000 000000
----------
*035414 DFMP 4,040061
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 000000 000000 C(AC+1)= 000000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 000000 000000 C(AC+1)= 000000 000000
----------
*035423 DFMP 4,040057
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000000 000000 C(E)= 201400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 200400 000000 C(AC+1)= 000000 000000
----------
*035432 DFMP 4,040744
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000000 000000 C(E)= 202400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 201400 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 66
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0287
*035441 DFMP 4,040747
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000000 000000 C(E)= 204400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 203400 000000 C(AC+1)= 000000 000000
----------
*035450 DFMP 4,040752
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000000 000000 C(E)= 210400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 207400 000000 C(AC+1)= 000000 000000
----------
*035457 DFMP 4,040755
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000000 000000 C(E)= 220400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 217400 000000 C(AC+1)= 000000 000000
----------
*035466 DFMP 4,040760
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000000 000000 C(E)= 240400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 237400 000000 C(AC+1)= 000000 000000
----------
*035475 DFMP 4,040762
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000000 000000 C(E)= 300400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 277400 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 67
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0288
*035504 DFMP 4,040731
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 201400 000000 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 200400 000000 C(AC+1)= 000000 000000
----------
*035513 DFMP 4,040731
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 202400 000000 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 201400 000000 C(AC+1)= 000000 000000
----------
*035522 DFMP 4,040731
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 204400 000000 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 203400 000000 C(AC+1)= 000000 000000
----------
*035531 DFMP 4,040731
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 210400 000000 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 207400 000000 C(AC+1)= 000000 000000
----------
*035540 DFMP 4,040731
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 220400 000000 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 217400 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 68
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0289
*035547 DFMP 4,040731
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 240400 000000 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 237400 000000 C(AC+1)= 000000 000000
----------
*035556 DFMP 4,040731
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 300400 000000 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 277400 000000 C(AC+1)= 000000 000000
----------
*035565 DFMP 4,041036
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000000 000000 C(E)= 576400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 577400 000000 C(AC+1)= 000000 000000
----------
*035574 DFMP 4,041435
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000000 000000 C(E)= 575400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 576400 000000 C(AC+1)= 000000 000000
----------
*035603 DFMP 4,040731
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200777 777777 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 177777 777777 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 69
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0290
*035612 DFMP 4,040731
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200777 777776 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 177777 777776 C(AC+1)= 000000 000000
----------
*035621 DFMP 4,040731
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200777 777775 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 177777 777775 C(AC+1)= 000000 000000
----------
*035630 DFMP 4,040731
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200777 777774 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 177777 777774 C(AC+1)= 000000 000000
----------
*035637 DFMP 4,040731
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 000000 000000 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 000000 000000 C(AC+1)= 000000 000000
----------
*035646 DFMP 4,040731
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 577400 000000 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 600400 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 70
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0291
*035655 DFMP 4,041453
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 501700 000000 C(AC+1)= 000000 000000 C(E)= 500400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 374100 000000 C(AC+1)= 000000 000000
----------
*035675 DFMP 4,041453
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 502700 000000 C(AC+1)= 000000 000000 C(E)= 500400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 373100 000000 C(AC+1)= 000000 000000
----------
*035715 DFMP 4,041453
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 503700 000000 C(AC+1)= 000000 000000 C(E)= 500400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 372100 000000 C(AC+1)= 000000 000000
----------
*035735 DFMP 4,041453
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 504700 000000 C(AC+1)= 000000 000000 C(E)= 500400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 371100 000000 C(AC+1)= 000000 000000
----------
*035755 DFMP 4,041453
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 505700 000000 C(AC+1)= 000000 000000 C(E)= 500400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 370100 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 71
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0292
*035775 DFMP 4,040731
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200200 000000 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 177200 000000 C(AC+1)= 000000 000000
----------
*036015 DFMP 4,040731
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200100 000000 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 177100 000000 C(AC+1)= 000000 000000
----------
*036035 DFMP 4,040731
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200040 000000 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 177040 000000 C(AC+1)= 000000 000000
----------
*036055 DFMP 4,040731
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200020 000000 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 177020 000000 C(AC+1)= 000000 000000
----------
*036075 DFMP 4,040731
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200010 000000 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 177010 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 72
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0293
*036115 DFMP 4,040731
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200004 000000 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 177004 000000 C(AC+1)= 000000 000000
----------
*036135 DFMP 4,040731
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200002 000000 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 177002 000000 C(AC+1)= 000000 000000
----------
*036155 DFMP 4,040731
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 500700 000000 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 501700 000000 C(AC+1)= 000000 000000
----------
*036175 DFMP 4,040731
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 500770 000000 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 501770 000000 C(AC+1)= 000000 000000
----------
*036215 DFMP 4,041515
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200775 000000 C(AC+1)= 000000 000000 C(E)= 200775 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 200772 011000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 73
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0294
*036224 DFMP 4,041520
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200774 000000 C(AC+1)= 000000 000000 C(E)= 200774 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 200770 020000 C(AC+1)= 000000 000000
----------
*036233 DFMP 4,041523
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200773 000000 C(AC+1)= 000000 000000 C(E)= 200773 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 200766 031000 C(AC+1)= 000000 000000
----------
*036242 DFMP 4,040741
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 177477 000000 C(AC+1)= 000000 000000 C(E)= 200700 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 177427 100000 C(AC+1)= 000000 000000
----------
*036251 DFMP 4,041226
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200777 777777 C(AC+1)= 000000 000000 C(E)= 200777 777777 C(E+1)= 000000 000000
FINAL
C(AC)= 200777 777776 C(AC+1)= 000000 000400
----------
*036260 DFMP 4,041226
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200777 777776 C(AC+1)= 000000 000000 C(E)= 200777 777777 C(E+1)= 000000 000000
FINAL
C(AC)= 200777 777775 C(AC+1)= 000000 001000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 74
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0295
*036267 DFMP 4,041226
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200777 777775 C(AC+1)= 000000 000000 C(E)= 200777 777777 C(E+1)= 000000 000000
FINAL
C(AC)= 200777 777774 C(AC+1)= 000000 001400
----------
*036276 DFMP 4,041226
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200777 777774 C(AC+1)= 000000 000000 C(E)= 200777 777777 C(E+1)= 000000 000000
FINAL
C(AC)= 200777 777773 C(AC+1)= 000000 002000
----------
*036305 DFMP 4,041226
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200777 777773 C(AC+1)= 000000 000000 C(E)= 200777 777777 C(E+1)= 000000 000000
FINAL
C(AC)= 200777 777772 C(AC+1)= 000000 002400
----------
*036314 DFMP 4,041540
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 500000 777777 C(AC+1)= 000000 000000 C(E)= 200777 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 500001 776777 C(AC+1)= 000400 000000
----------
*036323 DFMP 4,041540
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 500000 777770 C(AC+1)= 000000 000000 C(E)= 200777 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 500001 776770 C(AC+1)= 004000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 75
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0296
*036332 DFMP 4,041536
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 500000 777777 C(AC+1)= 000000 000000 C(E)= 500000 777777 C(E+1)= 000000 000000
FINAL
C(AC)= 376776 001001 C(AC+1)= 377000 000400
----------
*036341 DFMP 4,041550
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 500000 777776 C(AC+1)= 000000 000000 C(E)= 500000 777776 C(E+1)= 000000 000000
FINAL
C(AC)= 376776 001003 C(AC+1)= 376000 002000
----------
*036350 DFMP 4,041151
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200777 777777 C(AC+1)= 000000 000000 C(E)= 200000 000002 C(E+1)= 000000 000000
FINAL
C(AC)= 177000 000003 C(AC+1)= 377777 776000
----------
*036370 DFMP 4,041041
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200700 000000 C(AC+1)= 000000 000000 C(E)= 200400 000077 C(E+1)= 000000 000000
FINAL
C(AC)= 177700 000156 C(AC+1)= 100000 000000
----------
*036377 DFMP 4,041557
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200700 000000 C(AC+1)= 000000 000000 C(E)= 200400 000076 C(E+1)= 000000 000000
FINAL
C(AC)= 177700 000154 C(AC+1)= 200000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 76
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0297
*036406 DFMP 4,041562
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 200700 000000 C(AC+1)= 000000 000000 C(E)= 200400 000075 C(E+1)= 000000 000000
FINAL
C(AC)= 177700 000152 C(AC+1)= 300000 000000
----------
*036415 DFMP 4,040725
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 577400 000000 C(AC+1)= 000000 000000 C(E)= 600400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 176400 000000 C(AC+1)= 000000 000000
----------
*036424 DFMP 4,041567
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 600400 000077 C(AC+1)= 000000 000000 C(E)= 177660 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 602120 000152 C(AC+1)= 120000 000000
----------
*036433 DFMP 4,041575
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 600400 000076 C(AC+1)= 000000 000000 C(E)= 177600 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 602200 000135 C(AC+1)= 000000 000000
----------
*036442 DFMP 4,041036
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 600400 000000 C(AC+1)= 000000 000000 C(E)= 576400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 177400 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 77
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0298
*036451 DFMP 4,041435
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 600400 000000 C(AC+1)= 000000 000000 C(E)= 575400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 200400 000000 C(AC+1)= 000000 000000
----------
*036460 DFMP 4,040057
FLAGS - INT/FINAL 440300 440300
INITIAL
C(AC)= 400000 000001 C(AC+1)= 000000 000000 C(E)= 201400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 400000 000001 C(AC+1)= 000000 000000
----------
*036474 DFMP 4,041603
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 377400 000000 C(AC+1)= 000000 000000 C(E)= 201777 777777 C(E+1)= 777777 777777
FINAL
C(AC)= 377777 777777 C(AC+1)= 377777 777777
----------
*036515 DFMP 4,040744
FLAGS - INT/FINAL 000000 440200
INITIAL
C(AC)= 377400 000000 C(AC+1)= 000000 000000 C(E)= 202400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 000400 000000 C(AC+1)= 000000 000000
----------
*036534 DFMP 4,040731
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 001400 000000 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 000400 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 78
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0299
*036555 DFMP 4,040731
FLAGS - INT/FINAL 000000 440300
INITIAL
C(AC)= 000777 777777 C(AC+1)= 777777 777777 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 377777 777777 C(AC+1)= 377777 777777
----------
*036574 DFMP 4,041613
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 400400 000000 C(AC+1)= 000000 000000 C(E)= 576000 000000 C(E+1)= 000000 000001
FINAL
C(AC)= 377777 777777 C(AC+1)= 377777 777777
----------
*036615 DFMP 4,041435
FLAGS - INT/FINAL 000000 440200
INITIAL
C(AC)= 400400 000000 C(AC+1)= 000000 000000 C(E)= 575400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 000400 000000 C(AC+1)= 000000 000000
----------
*036634 DFMP 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 776400 000000 C(AC+1)= 000000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 000400 000000 C(AC+1)= 000000 000000
----------
*036655 DFMP 4,040061
FLAGS - INT/FINAL 000000 440300
INITIAL
C(AC)= 777000 000000 C(AC+1)= 000000 000001 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 377777 777777 C(AC+1)= 377777 777777
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 79
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0300
*036701 DFDV 4,000006
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200777 777777 C(AC+1)= 777777 777777 C(E)= 200400 000000 C(E+1)= 400000 777777
FINAL
C(AC)= 201777 777777 C(AC+1)= 377776 000001
----------
*036710 DFDV 4,040731
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 201400 000000 C(AC+1)= 000000 000000
----------
*036717 DFDV 4,040057
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 201400 000000 C(AC+1)= 000000 000000 C(E)= 201400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 201400 000000 C(AC+1)= 000000 000000
----------
*036726 DFDV 4,040744
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 202400 000000 C(AC+1)= 000000 000000 C(E)= 202400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 201400 000000 C(AC+1)= 000000 000000
----------
*036735 DFDV 4,040731
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 201400 000000 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 202400 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 80
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0301
*036744 DFDV 4,040744
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 202400 000000 C(AC+1)= 000000 000000 C(E)= 202400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 201400 000000 C(AC+1)= 000000 000000
----------
*036753 DFDV 4,040731
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 203400 000000 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 204400 000000 C(AC+1)= 000000 000000
----------
*036762 DFDV 4,040731
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200600 000000 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 201600 000000 C(AC+1)= 000000 000000
----------
*036771 DFDV 4,040731
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200700 000000 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 201700 000000 C(AC+1)= 000000 000000
----------
*037000 DFDV 4,040731
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200740 000000 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 201740 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 81
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0302
*037007 DFDV 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 576400 000000 C(AC+1)= 000000 000000
----------
*037016 DFDV 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 200600 000000 C(AC+1)= 000000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 576200 000000 C(AC+1)= 000000 000000
----------
*037025 DFDV 4,040747
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 177400 000000 C(AC+1)= 000000 000000 C(E)= 204400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 174400 000000 C(AC+1)= 000000 000000
----------
*037034 DFDV 4,040064
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 576400 000000 C(AC+1)= 000000 000000 C(E)= 200600 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 576252 525252 C(AC+1)= 252525 252526
----------
*037043 DFDV 4,040061
FLAGS - INT/FINAL 300000 300000
INITIAL
C(AC)= 600600 000000 C(AC+1)= 000000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 177400 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 82
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0303
*037052 DFDV 4,040061
FLAGS - INT/FINAL 300000 300000
INITIAL
C(AC)= 600400 000000 C(AC+1)= 000000 000000 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 200400 000000 C(AC+1)= 000000 000000
----------
*037061 DFDV 4,041636
FLAGS - INT/FINAL 300000 740200
INITIAL
C(AC)= 377400 777777 C(AC+1)= 000000 000000 C(E)= 577400 777777 C(E+1)= 000000 000000
FINAL
C(AC)= 777375 773771 C(AC+1)= 373773 776005
----------
*037070 DFDV 4,040355
FLAGS - INT/FINAL 740200 740040
INITIAL
C(AC)= 201400 000000 C(AC+1)= 000000 000000 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 201400 000000 C(AC+1)= 000000 000000
----------
*037077 DFDV 4,040716
FLAGS - INT/FINAL 740040 740240
INITIAL
C(AC)= 377400 000000 C(AC+1)= 000000 000000 C(E)= 000400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 200400 000000 C(AC+1)= 000000 000000
----------
*037106 DFDV 4,041644
FLAGS - INT/FINAL 740240 740040
INITIAL
C(AC)= 577775 000000 C(AC+1)= 000000 000000 C(E)= 577777 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 577775 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 83
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0304
*037115 DFDV 4,041644
FLAGS - INT/FINAL 740040 740040
INITIAL
C(AC)= 577774 000000 C(AC+1)= 000000 000000 C(E)= 577777 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 577774 000000 C(AC+1)= 000000 000000
----------
*037124 DFDV 4,041652
FLAGS - INT/FINAL 740040 740040
INITIAL
C(AC)= 210777 777777 C(AC+1)= 000000 000000 C(E)= 170750 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 221414 456123 C(AC+1)= 150726 020622
----------
*037133 DFDV 4,041656
FLAGS - INT/FINAL 740040 740040
INITIAL
C(AC)= 210777 777777 C(AC+1)= 000000 000000 C(E)= 170555 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 221547 063714 C(AC+1)= 314631 463146
----------
*037142 DFDV 4,040731
FLAGS - INT/FINAL 740040 740040
INITIAL
C(AC)= 577000 555555 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 576000 555555 C(AC+1)= 000000 000000
----------
*037151 DFDV 4,041656
FLAGS - INT/FINAL 740040 740040
INITIAL
C(AC)= 210777 777777 C(AC+1)= 777777 777777 C(E)= 170555 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 221547 063715 C(AC+1)= 200263 431746
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 84
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0305
*037160 DFDV 4,041656
FLAGS - INT/FINAL 740040 740040
INITIAL
C(AC)= 210777 777775 C(AC+1)= 000000 000000 C(E)= 170555 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 221547 063713 C(AC+1)= 145545 545545
----------
*037167 DFDV 4,041677
FLAGS - INT/FINAL 740040 740240
INITIAL
C(AC)= 377400 000000 C(AC+1)= 555000 000000 C(E)= 100777 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 077400 400400 C(AC+1)= 355355 355355
----------
*037176 DFDV 4,041440
FLAGS - INT/FINAL 740240 740040
INITIAL
C(AC)= 200777 777777 C(AC+1)= 000000 000000 C(E)= 200777 777776 C(E+1)= 000000 000000
FINAL
C(AC)= 201400 000000 C(AC+1)= 200000 000400
----------
*037205 DFDV 4,041446
FLAGS - INT/FINAL 740040 740040
INITIAL
C(AC)= 200777 777777 C(AC+1)= 000000 000000 C(E)= 200777 777774 C(E+1)= 000000 000000
FINAL
C(AC)= 201400 000001 C(AC+1)= 200000 003000
----------
*037214 DFDV 4,041656
FLAGS - INT/FINAL 740040 740040
INITIAL
C(AC)= 210777 777777 C(AC+1)= 000000 000000 C(E)= 170555 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 221547 063714 C(AC+1)= 314631 463146
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 85
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0306
*037223 DFDV 4,041705
FLAGS - INT/FINAL 740040 740040
INITIAL
C(AC)= 210777 777777 C(AC+1)= 000000 000000 C(E)= 170555 600000 C(E+1)= 000000 000000
FINAL
C(AC)= 221546 272702 C(AC+1)= 301417 730633
----------
*037232 DFDV 4,041711
FLAGS - INT/FINAL 740040 740040
INITIAL
C(AC)= 210777 777777 C(AC+1)= 000000 000000 C(E)= 170557 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 221545 111740 C(AC+1)= 234200 262444
----------
*037241 DFDV 4,041715
FLAGS - INT/FINAL 740040 740040
INITIAL
C(AC)= 210777 777777 C(AC+1)= 000000 000000 C(E)= 170560 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 221544 131025 C(AC+1)= 220544 131026
----------
*037250 DFDV 4,041677
FLAGS - INT/FINAL 740040 740240
INITIAL
C(AC)= 377400 000000 C(AC+1)= 000000 000000 C(E)= 100777 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 077400 400400 C(AC+1)= 200200 200200
----------
*037257 DFDV 4,041677
FLAGS - INT/FINAL 740240 740240
INITIAL
C(AC)= 376400 000000 C(AC+1)= 000000 000000 C(E)= 100777 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 076400 400400 C(AC+1)= 200200 200200
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 86
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0307
*037266 DFDV 4,041677
FLAGS - INT/FINAL 740240 740240
INITIAL
C(AC)= 375400 000000 C(AC+1)= 000000 000000 C(E)= 100777 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 075400 400400 C(AC+1)= 200200 200200
----------
*037275 DFDV 4,041677
FLAGS - INT/FINAL 740240 740240
INITIAL
C(AC)= 374400 000000 C(AC+1)= 000000 000000 C(E)= 100777 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 074400 400400 C(AC+1)= 200200 200200
----------
*037304 DFDV 4,041677
FLAGS - INT/FINAL 740240 740240
INITIAL
C(AC)= 373400 000000 C(AC+1)= 000000 000000 C(E)= 100777 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 073400 400400 C(AC+1)= 200200 200200
----------
*037313 DFDV 4,041677
FLAGS - INT/FINAL 740240 740240
INITIAL
C(AC)= 372400 000000 C(AC+1)= 000000 000000 C(E)= 100777 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 072400 400400 C(AC+1)= 200200 200200
----------
*037322 DFDV 4,041741
FLAGS - INT/FINAL 740240 740040
INITIAL
C(AC)= 210777 000000 C(AC+1)= 000000 000000 C(E)= 210777 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 201400 000000 C(AC+1)= 000000 000000
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 87
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0308
*037331 DFDV 4,041741
FLAGS - INT/FINAL 740040 740040
INITIAL
C(AC)= 200400 000000 C(AC+1)= 000000 000000 C(E)= 210777 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 170400 400400 C(AC+1)= 200200 200200
----------
*037340 DFDV 4,041677
FLAGS - INT/FINAL 740040 740240
INITIAL
C(AC)= 371400 000000 C(AC+1)= 000000 000000 C(E)= 100777 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 071400 400400 C(AC+1)= 200200 200200
----------
*037347 DFDV 4,041677
FLAGS - INT/FINAL 740240 740240
INITIAL
C(AC)= 370400 000000 C(AC+1)= 000000 000000 C(E)= 100777 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 070400 400400 C(AC+1)= 200200 200200
----------
*037356 DFDV 4,041677
FLAGS - INT/FINAL 740240 740240
INITIAL
C(AC)= 367400 000000 C(AC+1)= 000000 000000 C(E)= 100777 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 067400 400400 C(AC+1)= 200200 200200
----------
*037365 DFDV 4,041677
FLAGS - INT/FINAL 740240 740240
INITIAL
C(AC)= 373400 000000 C(AC+1)= 200777 000000 C(E)= 100777 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 073400 400401 C(AC+1)= 001400 400400
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 88
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0309
*037431 DFDV 4,040731
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 376777 777777 C(AC+1)= 777777 777777 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 377777 777777 C(AC+1)= 377777 777777
----------
*037452 DFDV 4,040731
FLAGS - INT/FINAL 000000 440200
INITIAL
C(AC)= 377400 000000 C(AC+1)= 000000 000000 C(E)= 200400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 000400 000000 C(AC+1)= 000000 000000
----------
*037471 DFDV 4,040744
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 001400 000000 C(AC+1)= 000000 000000 C(E)= 202400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 000400 000000 C(AC+1)= 000000 000000
----------
*037512 DFDV 4,040744
FLAGS - INT/FINAL 000000 440300
INITIAL
C(AC)= 000777 777777 C(AC+1)= 777777 777777 C(E)= 202400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 377777 777777 C(AC+1)= 377777 777777
----------
*037531 DFDV 4,040061
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 376777 777777 C(AC+1)= 777777 777777 C(E)= 577400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 400000 000000 C(AC+1)= 000000 000001
----------
PROGRAM SWITCHES MASK INSTR CNTLPC UPRPC KSSIM VER 4.0 21-JUN-78 PAGE 89
DSKCE 000000 000000 770000 000000 110000 000000 030000 777777 SEQ 0310
*037552 DFDV 4,041422
FLAGS - INT/FINAL 000000 440200
INITIAL
C(AC)= 377400 000000 C(AC+1)= 000000 000000 C(E)= 777400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 577400 000000 C(AC+1)= 000000 000000
----------
*037571 DFDV 4,041435
FLAGS - INT/FINAL 000000 000000
INITIAL
C(AC)= 001400 000000 C(AC+1)= 000000 000000 C(E)= 575400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 777400 000000 C(AC+1)= 000000 000000
----------
*037612 DFDV 4,041435
FLAGS - INT/FINAL 000000 440300
INITIAL
C(AC)= 000777 777777 C(AC+1)= 777777 777777 C(E)= 575400 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 400000 000000 C(AC+1)= 000000 000001
----------
*037631 DFDV 4,040355
FLAGS - INT/FINAL 000000 440040
INITIAL
C(AC)= 201400 000000 C(AC+1)= 000000 000000 C(E)= 000000 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 201400 000000 C(AC+1)= 000000 000000
----------
*037650 DFDV 4,041776
FLAGS - INT/FINAL 000000 440040
INITIAL
C(AC)= 201400 000000 C(AC+1)= 000000 000000 C(E)= 201200 000000 C(E+1)= 000000 000000
FINAL
C(AC)= 201400 000000 C(AC+1)= 000000 000000
----------