37 lines
2.4 KiB
Plaintext
37 lines
2.4 KiB
Plaintext
$!******************************************************************************
|
|
$! DIESE KOMMANDOPROZEDUR DEFINIERT ALLGEMEINE LOGICALS UND SYMBOLS FUER DIE
|
|
$! ARBEIT MIT MUTRACK (ALS BATCH UND INTERAKTIV)
|
|
$!******************************************************************************
|
|
$ node = "PSW264"
|
|
$
|
|
$ define /trans=con mutrackSRC$directory "UD1:[SIMULA.MUTRACK.]
|
|
$ define mutrack$COMdirectory "mutrackSRC$directory:[com]"
|
|
$ define mutrack$MAPPENdirectory "UD1:[simula.mappen.mutrack]","UD1:[simula.mappen.testmappen]"
|
|
$ define mutrack$AHdirectory "accel$OUTdirectory"
|
|
$ define mutrack$GEOdirectory "mutrackSRC$directory:[geo_files]"
|
|
$ define mutrack$EXEdirectory "mutrackSRC$directory:[exe]"
|
|
$ define mutrack$RDdirectory "mutrackSRC$directory:[RD-kumac]"
|
|
$!------------------------------------------------------------------------------
|
|
$ define mutrack$PHYSICASRCdirectory "UD0:[simula.physica_source.mutrack]"
|
|
$!==============================================================================
|
|
$ archi = F$GETSYI("ARCH_NAME") ! Host OS either "VAX" or "Alpha"
|
|
$ MU*TRACK :== "RUN mutrack$EXEdirectory:MUTRACK_''archi'.EXE"
|
|
$ MUDIR :== "dir mutrack$OUTdirectory:MU*.*.*
|
|
$ MULIST :== "dir mutrack$OUTdirectory:MU*.LOG.
|
|
$ LSEMU :== "LSE mutrack$READdirectory:MUTRACK.INPUT"
|
|
$ LSEMUNR :== "LSE mutrack$NRdirectory:mutrack_nr.dat
|
|
$ MUGEO :== "SET DEF UD1:[SIMULA.MUTRACK.GEO_FILES]"
|
|
$ MUSTAT :== "@ mutrack$COMdirectory:PLOT_BATCH_STATUS MUTRACK MU TRACK"
|
|
$ WRITEMULOG :== "@ mutrack$COMdirectory:WRITELOG.COM"
|
|
$ MAKEMUCODE :== "@ mutrack$COMdirectory:MAKE_CODENUMMERN-LIST.COM MUTRACK _MU MAKE
|
|
$ MUCODE :== "@ mutrack$COMdirectory:MAKE_CODENUMMERN-LIST.COM MUTRACK _MU TYPE
|
|
$ MUCOPY :== "@ mutrack$COMdirectory:COPY.COM MUTRACK MU"
|
|
$!------------------------------------------------------------------------------
|
|
$ SUBMU*TRACK :== -
|
|
"SUBMIT/NOTIFY/NOPRINT/NAME=MUTRACK/LOG_FILE=mutrack$OUTdirectory mutrack$COMdirectory:MUTRACK.COM
|
|
$ SUBMULIST*BATCH :== "@ mutrack$COMdirectory:SUB_LIST MU MUTRACK ''node'_BATCH"
|
|
$ SUBMULISTF*AST :== "@ mutrack$COMdirectory:SUB_LIST MU MUTRACK ''node'_FAST"
|
|
$ SUBMULISTS*LOW :== "@ mutrack$COMdirectory:SUB_LIST MU MUTRACK ''node'_SLOW"
|
|
$ SUBMULISTD*EAD :== "@ mutrack$COMdirectory:SUB_LIST MU MUTRACK ''node'_DEAD"
|
|
$!==============================================================================
|