mkred2.mic 107 B

12345678
  1. @RUN LISP
  2. *Y60
  3. *12000 600 600 475
  4. *(LOAD RLISP REND ALG1 ALG2 REND2 ENTRY)
  5. *(EXCISE)
  6. *(QUIT)
  7. @SAVE REDUCE