04460 | 0020 00 0 14663 | 2594 | TRA | $APPLY | ||
10041 | 0020 00 0 14663 | 4577 | TRA | $APPLY | ||
11365 | 0774 00 4 14663 | 5404 | EVQMP | AXT | $APPLY,4 SET CELL OF PROGRAM TO BE EXECUTED | |
12030 | 1 77777 4 14663 | 5749 | TXI | $APPLY,4,−1 GO TO APPLY AND ADJUST EXIT INDEX | ||
15015 | 0020 00 0 14663 | 7474 | TRA | $APPLY | ||
15045 | 0020 00 0 14663 | 7511 | TRA | $APPLY GO TO APPLY | ||
15110 | 0020 00 0 14663 | 7548 | TRA | $APPLY GO TO APPLY WITH ITEM ASSOCIATED WITH | ||
15113 | 0074 00 4 14663 | 7552 | TSX | $APPLY,4 | ||
15537 | 0020 00 0 14663 | 7866 | TRA | $APPLY APPLY(CADR(J),LIST(CDR(E),A),A) | ||
15732 | 0020 00 0 14663 | 8003 | TRA | $APPLY APPLY(CADAR(J),EVLIS(CDR(E),A),A) | ||
16041 | 0074 00 4 14663 | 8087 | TSX | $APPLY,4 APPLY THE FUNCTION TO ITS ARGS | ||
17133 | 0020 00 0 14663 | 8765 | TRA | $APPLY DO | ||
17155 | 0074 00 4 14663 | 8786 | TSX | $APPLY,4 AND DO THE FUNCTION | ||
67031 | −3 00003 0 14663 | 9411 | TXL | APPLY,,3 GPLI0049 |