/FOCAL EQUIVALANCE DEFINITIONS FIXMRI FGET=0000 FIXMRI FADD=1000 FIXMRI FSUB=2000 FIXMRI FDIV=3000 FIXMRI FMUL=4000 FIXMRI FPUT=6000 FIXMRI FNOR=7000 FENT=JMS I 7 FEXT=0 /PAGE ZERO CONSTANTS, POINTERS, ETC. AXIN=10 XRT=11 PDLXR=13 FLTXR=14 FLTXR2=15 AXOUT=17 XCT=20 GTEM=21 PC=22 THISLN=23 ONFLAG=23 DEBGSW=26 PACKST=27 PT1=30 LASTV=31 T1=32 T3=33 FLOP=40 AC1H=41 AC1L=42 OVER1=43 FLAC=44 HORD=45 LORD=46 OVER2=47 SIGNF=50 FISW=52 SORTCN=54 EFOP=56 BUFR=60 ADD=61 XCTIN=62 OUTDEV=63 INDEV=64 CHAR=66 LINENO=67 T2=71 P337=75 CLF=76 CCR=77 LIST3=77 DMPSW=100 P7700=101 PER=102 M77=103 P7600=104 M20=105 P177=106 P17=107 C260=113 M240=114 MCR=116 M5=120 M11=121 P77=122 C200=123 FLARGP=125 DOUBLE=127 FOUTPUT=130 FINPUT=131 CFRS=133 END=134 ENDT=135 START=177 QUIT=177 /NEW INSTRUCTIONS GETSGN=1045 NEGATE=4451 FIXIT=4453 GETC=4545 SORTJ=4547 SORTC=4550 PRINTC=4551 READC=4552 PRNTLN=4553 FINDLN=4555 RTL6=4557 TSTLPR=4562 TSTGRP=4563 TESTC=4564 DELETE=4565 ERROR2=4566 RETURN=5536 /MACHINE INSTRUCTIONS CDI=6203 /FUNCTION ADDRESSES FEXP=4620 ARTN=5000 FLOG=5040 XSQRT=7400 /OTHER CONSTANTS AND POINTERS WORDS=4 LF=212 GOTO=603 PROCESS=610 PROC=611 PC1=614 STAR=614 COMMENT=614 IF=1013 IF1=1035 SET=1041 FOR=1041 FINCR=1065 FLIMIT=1075 FCONT=1101 FPROC=1106 GLIST=1377 TLIST=1400 GETARG=1403 TLIST2=1404 ECALL=1601 EVAL=1613 ECHOLST=1624 TERMS=1770 FLARG=2030 PARTEST=2047 INFIX=2401 PRNT=2442 MULT10=5667 REMAIN=5712 DUBLAD=5733 TEN=6271 FPNT=6400 TEST2=6736 SPECIAL=6777 DMULT4=7036 DATUM=7102 SIGN=7124 RESOLV=7173 MP4=7200 MP1=7254 MP2=7256 MIF=7260 DNORM=7335 TEST4=7366 BUFFER=7470 MONITOR=7600