home *** CD-ROM | disk | FTP | other *** search
/ CP/M / CPM_CDROM.iso / lambda / soundpot / f / ilisp-2.lbr / INITPROD.LZP / INITPROD.LSP
Encoding:
Text File  |  1993-10-26  |  512 b   |  11 lines
  1. (PROGN
  2.    (CLOSE (INPUT 'CON:))                      ;INPUT back to console
  3.    (OUTPUT 'CON:)                             ;OUTPUT also.
  4.    (INFILE 'PRODSYS T)                        ;Load the production system.
  5.    (INIT-MEM)                                 ;Initialize the system.
  6.    (SYSCLEAR)                                 ;Trace dump OFF.
  7.    (RUN MEM2)                                 ;Execute production system.
  8.    T)
  9.  
  10.  
  11.