$!========================================================================
$!
$! Name      : COPY_LSMLIB
$!
$! Purpose   : Copy the files needed to build the Lookup System Manager program
$!              from the work directory to the current directory.
$!
$! Arguments : 
$!
$! Created  14-SEP-1990   MICHIGAN STATE UNIVERSITY, TRIGGER CONTROL SOFTWARE
$!
$!========================================================================
$   ON ERROR     THEN $ GOTO EXIT
$   ON CONTROL_Y THEN $ GOTO EXIT
$   set def [.source]
$   copy msutrgroot:[trg_host.source_3work.lsm_menu]ASSIGN_ERROR.FOR []
$   copy msutrgroot:[trg_host.source_3work.lsm_menu]CHECK_ANALYSIS.FOR []
$   copy msutrgroot:[trg_host.source_3work.lsm_menu]CHECK_COMMON_BLOCK.FOR []
$   copy msutrgroot:[trg_host.source_3work.lsm_menu]COMPILE_PROM_COEFF.FOR []
$   copy msutrgroot:[trg_host.source_3work.lsm_menu]DISPATCH.FOR []
$   copy msutrgroot:[trg_host.source_3work.lsm_menu]EXAMPLE_0001.LSM []
$   copy msutrgroot:[trg_host.source_3work.lsm_menu]EXISTING_0000.LSM []
$   copy msutrgroot:[trg_host.source_3work.lsm_menu]EXISTING_0001.LSM []
$   copy msutrgroot:[trg_host.source_3work.lsm_menu]EXISTING_0002.LSM []
$   copy msutrgroot:[trg_host.source_3work.lsm_menu]INIT_COMMON_BLOCK.FOR []
$   copy msutrgroot:[trg_host.source_3work.lsm_menu]LEVEL1_LOOKUP.INC []
$   copy msutrgroot:[trg_host.source_3work.lsm_menu]LEVEL1_LOOKUP.PARAMS []
$   copy msutrgroot:[trg_host.source_3work.lsm_menu]LEVEL1_LOOKUP_EXPANSION.INC -
        []
$   copy msutrgroot:[trg_host.source_3work.lsm_menu]LOAD_COMMON_BLOCK.FOR []
$   copy msutrgroot:[trg_host.source_3work.lsm_menu]LOAD_LSM.FOR []
$   copy msutrgroot:[trg_host.source_3work.lsm_menu]LSM_MENM.MENU []
$   copy msutrgroot:[trg_host.source_3work.lsm_menu]LSM_MENM.SET []
$   copy msutrgroot:[trg_host.source_3work.lsm_menu]LSM_OUT_0000.LSM []
$   copy msutrgroot:[trg_host.source_3work.lsm_menu]LSM_OUT_0001.LSM []
$   copy msutrgroot:[trg_host.source_3work.lsm_menu]LSM_SETUP.COM []
$   copy msutrgroot:[trg_host.source_3work.lsm_menu]MAIN_MENU.FOR []
$   copy msutrgroot:[trg_host.source_3work.lsm_menu]main_prog.for []lsmprog.FOR 
$   copy msutrgroot:[trg_host.source_3work.lsm_menu]MESSAGE_OUT.FOR []
$   copy msutrgroot:[trg_host.source_3work.lsm_menu]MESSAGE_PRINT.FOR []
$   copy msutrgroot:[trg_host.source_3work.lsm_menu]PARSE_TOKENS.INC []
$   copy msutrgroot:[trg_host.source_3work.lsm_menu]PARSE_TOKENS.PARAMS []
$   copy msutrgroot:[trg_host.source_3work.lsm_menu]PROM_LSM.FOR []
$   copy msutrgroot:[trg_host.source_3work.lsm_menu]PROM_LSM.MENU []
$   copy msutrgroot:[trg_host.source_3work.lsm_menu]PROM_LSM.SET []
$   copy msutrgroot:[trg_host.source_3work.lsm_menu]SIMU_LSM.FOR []
$   copy msutrgroot:[trg_host.source_3work.lsm_menu]SIMU_LSM.MENU []
$   copy msutrgroot:[trg_host.source_3work.lsm_menu]SIMU_LSM.SET []
$   copy msutrgroot:[trg_host.source_3work.lsm_menu]STRIP_LSM.FOR []
$   copy msutrgroot:[trg_host.source_3work.lsm_menu]TESTRACK_0002.LSM []
$   copy msutrgroot:[trg_host.source_3work.lsm_menu]UPDT_LSM.FOR []
$   copy msutrgroot:[trg_host.source_3work.lsm_menu]VERI_LSM.FOR []
$   copy msutrgroot:[trg_host.source_3work.lsm_menu]WRITE_CUTS.FOR []
$   copy msutrgroot:[trg_host.source_3work.lsm_menu]WRITE_SLOPE.FOR []
$   copy msutrgroot:[trg_host.source_3work.lsm_menu]LSM_MENM.SET []
$   copy msutrgroot:[trg_host.source_3work.lsm_menu]PROM_LSM.SET []
$   copy MSUTRGROOT:[trg_host.source_3work.lsm_menu]SIMU_LSM.SET []
$   set def d0$level1$lsmprog
$EXIT:
$   EXIT