1 /FOCAL EQUIVALANCE DEFINITIONS 2 3 FIXMRI FGET=0000 4 FIXMRI FADD=1000 5 FIXMRI FSUB=2000 6 FIXMRI FDIV=3000 7 FIXMRI FMUL=4000 8 FIXMRI FPUT=6000 9 FIXMRI FNOR=7000 10 FENT=JMS I 7 11 FEXT=0 12 13 /PAGE ZERO CONSTANTS, POINTERS, ETC. 14 15 AXIN=10 16 XRT=11 17 PDLXR=13 18 FLTXR=14 19 FLTXR2=15 20 AXOUT=17 21 XCT=20 22 GTEM=21 23 PC=22 24 THISLN=23 25 ONFLAG=23 26 DEBGSW=26 27 PACKST=27 28 PT1=30 29 LASTV=31 30 T1=32 31 T3=33 32 FLOP=40 33 AC1H=41 34 AC1L=42 35 OVER1=43 36 FLAC=44 37 HORD=45 38 LORD=46 39 OVER2=47 40 SIGNF=50 41 FISW=52 42 SORTCN=54 43 EFOP=56 44 BUFR=60 45 ADD=61 46 XCTIN=62 47 OUTDEV=63 48 INDEV=64 49 CHAR=66 50 LINENO=67 51 T2=71 52 P337=75 53 CLF=76 54 CCR=77 55 LIST3=77 56 DMPSW=100 57 P7700=101 58 PER=102 59 M77=103 60 P7600=104 61 M20=105 62 P177=106 63 P17=107 64 C260=113 65 M240=114 66 MCR=116 67 M5=120 68 M11=121 69 P77=122 70 C200=123 71 FLARGP=125 72 DOUBLE=127 73 FOUTPUT=130 74 FINPUT=131 75 CFRS=133 76 END=134 77 ENDT=135 78 START=177 79 QUIT=177 80 81 /NEW INSTRUCTIONS 82 83 GETSGN=1045 84 NEGATE=4451 85 FIXIT=4453 86 GETC=4545 87 SORTJ=4547 88 SORTC=4550 89 PRINTC=4551 90 READC=4552 91 PRNTLN=4553 92 FINDLN=4555 93 RTL6=4557 94 TSTLPR=4562 95 TSTGRP=4563 96 TESTC=4564 97 DELETE=4565 98 ERROR2=4566 99 RETURN=5536 100 101 /MACHINE INSTRUCTIONS 102 103 CDI=6203 104 105 /FUNCTION ADDRESSES 106 107 FEXP=4620 108 ARTN=5000 109 FLOG=5040 110 XSQRT=7400 111 /OTHER CONSTANTS AND POINTERS 112 113 WORDS=4 114 LF=212 115 GOTO=603 116 PROCESS=610 117 PROC=611 118 PC1=614 119 STAR=614 120 COMMENT=614 121 IF=1013 122 IF1=1035 123 SET=1041 124 FOR=1041 125 FINCR=1065 126 FLIMIT=1075 127 FCONT=1101 128 FPROC=1106 129 GLIST=1377 130 TLIST=1400 131 GETARG=1403 132 TLIST2=1404 133 ECALL=1601 134 EVAL=1613 135 ECHOLST=1624 136 TERMS=1770 137 FLARG=2030 138 PARTEST=2047 139 INFIX=2401 140 PRNT=2442 141 MULT10=5667 142 REMAIN=5712 143 DUBLAD=5733 144 TEN=6271 145 FPNT=6400 146 TEST2=6736 147 SPECIAL=6777 148 DMULT4=7036 149 DATUM=7102 150 SIGN=7124 151 RESOLV=7173 152 MP4=7200 153 MP1=7254 154 MP2=7256 155 MIF=7260 156 DNORM=7335 157 TEST4=7366 158 BUFFER=7470 159 MONITOR=7600 160 MONITOR=7600 161 $ end of file ^ AC1H 0041 unreferenced AC1L 0042 unreferenced ADD 0061 unreferenced ARTN 5000 unreferenced AXIN 0010 unreferenced AXOUT 0017 unreferenced BUFFER 7470 unreferenced BUFR 0060 unreferenced C200 0123 unreferenced C260 0113 unreferenced CCR 0077 unreferenced CDI 6203 unreferenced CFRS 0133 unreferenced CHAR 0066 unreferenced CLF 0076 unreferenced COMMEN 0614 unreferenced DATUM 7102 unreferenced DEBGSW 0026 unreferenced DELETE 4565 unreferenced DMPSW 0100 unreferenced DMULT4 7036 unreferenced DNORM 7335 unreferenced DOUBLE 0127 unreferenced DUBLAD 5733 unreferenced ECALL 1601 unreferenced ECHOLS 1624 unreferenced EFOP 0056 unreferenced END 0134 unreferenced ENDT 0135 unreferenced ERROR2 4566 unreferenced EVAL 1613 unreferenced FADD 1000 unreferenced FCONT 1101 unreferenced FDIV 3000 unreferenced FENT 4407 unreferenced FEXP 4620 unreferenced FEXT 0000 unreferenced FGET 0000 unreferenced FINCR 1065 unreferenced FINDLN 4555 unreferenced FINPUT 0131 unreferenced FISW 0052 unreferenced FIXIT 4453 unreferenced FLAC 0044 unreferenced FLARG 2030 unreferenced FLARGP 0125 unreferenced FLIMIT 1075 unreferenced FLOG 5040 unreferenced FLOP 0040 unreferenced FLTXR 0014 unreferenced FLTXR2 0015 unreferenced FMUL 4000 unreferenced FNOR 7000 unreferenced FOR 1041 unreferenced FOUTPU 0130 unreferenced FPNT 6400 unreferenced FPROC 1106 unreferenced FPUT 6000 unreferenced FSUB 2000 unreferenced GETARG 1403 unreferenced GETC 4545 unreferenced GETSGN 1045 unreferenced GLIST 1377 unreferenced GOTO 0603 unreferenced GTEM 0021 unreferenced HORD 0045 unreferenced IF 1013 unreferenced IF1 1035 unreferenced INDEV 0064 unreferenced INFIX 2401 unreferenced LASTV 0031 unreferenced LF 0212 unreferenced LINENO 0067 unreferenced LIST3 0077 unreferenced LORD 0046 unreferenced M11 0121 unreferenced M20 0105 unreferenced M240 0114 unreferenced M5 0120 unreferenced M77 0103 unreferenced MCR 0116 unreferenced MIF 7260 unreferenced MONITO 7600 unreferenced MP1 7254 unreferenced MP2 7256 unreferenced MP4 7200 unreferenced MULT10 5667 unreferenced NEGATE 4451 unreferenced ONFLAG 0023 unreferenced OUTDEV 0063 unreferenced OVER1 0043 unreferenced OVER2 0047 unreferenced P17 0107 unreferenced P177 0106 unreferenced P337 0075 unreferenced P7600 0104 unreferenced P77 0122 unreferenced P7700 0101 unreferenced PACKST 0027 unreferenced PARTES 2047 unreferenced PC 0022 unreferenced PC1 0614 unreferenced PDLXR 0013 unreferenced PER 0102 unreferenced PRINTC 4551 unreferenced PRNT 2442 unreferenced PRNTLN 4553 unreferenced PROC 0611 unreferenced PROCES 0610 unreferenced PT1 0030 unreferenced QUIT 0177 unreferenced READC 4552 unreferenced REMAIN 5712 unreferenced RESOLV 7173 unreferenced RETURN 5536 unreferenced RTL6 4557 unreferenced SET 1041 unreferenced SIGN 7124 unreferenced SIGNF 0050 unreferenced SORTC 4550 unreferenced SORTCN 0054 unreferenced SORTJ 4547 unreferenced SPECIA 6777 unreferenced STAR 0614 unreferenced START 0177 unreferenced T1 0032 unreferenced T2 0071 unreferenced T3 0033 unreferenced TEN 6271 unreferenced TERMS 1770 unreferenced TEST2 6736 unreferenced TEST4 7366 unreferenced TESTC 4564 unreferenced THISLN 0023 unreferenced TLIST 1400 unreferenced TLIST2 1404 unreferenced TSTGRP 4563 unreferenced TSTLPR 4562 unreferenced WORDS 0004 unreferenced XCT 0020 unreferenced XCTIN 0062 unreferenced XRT 0011 unreferenced XSQRT 7400 unreferenced