# # /user/csl/arnon/Sturgis/algebra: runs SAC-2 # # from /1f/datools/ecad/dracu: runs the ECAD drc # # algebra host datafile # set verbose setenv BASE /user/csl/arnon/SAC2 setenv QEBASE /user/csl/arnon/QEALGS setenv CHARCARD $BASE/translator/charcard setenv VAXIMA /user/csl/arnon/MACSYMA/mac setenv FILE0 $CHARCARD setenv FILE2 $BASE/interpreter/nullinput setenv FILE3 $QEBASE/tmp3++ setenv FILE4 $QEBASE/tmp4++ setenv FILE7 $QEBASE/tmp7++ setenv FILE8 $QEBASE/tmp8++ setenv FILE9 $QEBASE/tmp9++ cat /tmp/algebra.lock if ($status == 0) then pupftp $1 <<--EOF store /tmp/algebra.lock WaitMsg.SUM quit --EOF while (-e /tmp/algebra.lock) sleep 120 end endif pwd > /tmp/algebra.lock date >> /tmp/algebra.lock limit data 16m /bin/rm binom.data pupftp $1 <<--EOF retrieve $2.inData binom.data quit --EOF date > sturgis.outData /user/csl/arnon/Sturgis/sturgis.out < binom.data >> sturgis.outData date >> sturgis.outData /bin/rm /tmp/algebra.lock pupftp $1 <<--EOF store sturgis.outData $2.SUM quit --EOF Ê5˜Jš œÏfœnåœÞœ œ˜þ—…—;