--- a/agrep Wed Jul 19 15:53:43 1995 +0200
+++ /dev/null Thu Jan 01 00:00:00 1970 +0000
@@ -1,2 +0,0 @@
-#! /bin/csh
-grep "$*" {Pure/Syntax,Pure/Thy}/*ML */*ML */*/*ML
--- a/change_simp Wed Jul 19 15:53:43 1995 +0200
+++ /dev/null Thu Jan 01 00:00:00 1970 +0000
@@ -1,18 +0,0 @@
-#! /bin/sh
-# simp FILE1 ... FILEn
-#
-# leaves previous versions as XXX~~
-#
-for f in $*
-do
-echo $f. \ Backup file is $f~~
-mv $f $f~~; sed -e '
-s/\<ASM_SIMP_TAC\>/asm_simp_tac/g
-s/\<SIMP_TAC\>/simp_tac/g
-s/\<addrews\>/addsimps/g
-s/addsplits \(\[[^]]*\]\)/setloop (split_tac \1)/g
-s/addsplits/setloop split_tac/g
-s/\<setauto\>/setsolver/g
-' $f~~ > $f
-done
-echo Finished.
--- a/conv-theory-files.pl Wed Jul 19 15:53:43 1995 +0200
+++ /dev/null Thu Jan 01 00:00:00 1970 +0000
@@ -1,53 +0,0 @@
-#!/usr/bin/perl -s- # -*-Perl-*-
-
-#---------------------------------------------------------------------
-#The following script file is useful to convert old theory files into a
-#style consistent with new naming conventions. Now, the names of the
-#files must be the same as the names of the theories they define (with
-#a ".thy" suffix) and corresponding ML files must also be renamed.
-#
-#To make this renaming easier, the following perl script can be used.
-#It traverses the given directory recursively. For each file of the
-#form abc.thy, this script does the following steps:
-#
-#1. Reads the file and grabs the first identifier, say Abc (skipping comments
-# (*...*) and white space).
-#2. Outputs the commands needed to rename the file abc.thy to Abc.thy,
-# including the appropriate CVS commands.
-#3. If abc.ML also exists, it outputs appropriate commands to rename it
-# to Abc.ML.
-#
-#These commands can be put into a file, which can then be executed.
-#If you are not using cvs, use "grep" to extract just the "mv" commands.
-#
-# - Sara Kalvala
-# (sk@cl.cam.ac.uk)
-#---------------------------------------------------------------------
-
-open(MATCH_FILES, "find . -name \"*thy\" -print |");
-
-foreach $each_match (<MATCH_FILES>) {
- chop($each_match);
- if($each_match =~ /(.*\/)(\w*)\.thy/) {$dirpart = $1;}
- else {print "something wrong with finding path!\n";
- $dirpart = "";}
- open (CONTENTS, $each_match);
- @readit = <CONTENTS>;
- chop(@readit); $oneline = join(" ",@readit);
- $oneline =~ s/\(\*([^\*]|(\*[^\)]))*\*\)//g ;
-# comments: have to remove strings of anything but stars or stars
-# followed by anything but right parenthesis
- if($oneline =~ /\s*([^ ]*)\s*=.*/)
- {$th_name = $1;
- $new_name = $dirpart . $th_name . ".thy";
- print "mv -i $each_match $new_name \n";
- print "cvs rm $each_match ; cvs add $new_name \n";
-# for ML files
- $each_ML = $each_match;
- $each_ML =~ s/.thy/.ML/;
- if (-e $each_ML) { $new_ML = $dirpart . $th_name . ".ML";
- print "mv -i $each_ML $new_ML \n";
- print "cvs rm $each_ML ; cvs add $new_ML \n";}}
- else {print "something wrong with format of theory file!\n";}
-}
-
--- a/expandshort Wed Jul 19 15:53:43 1995 +0200
+++ /dev/null Thu Jan 01 00:00:00 1970 +0000
@@ -1,31 +0,0 @@
-#! /bin/sh
-#
-#expandshort - shell script to expand shorthand goal commands
-# ALSO contracts uses of resolve_tac, dresolve_tac, eresolve_tac,
-# rewrite_goals_tac on 1-element lists
-#
-# Usage:
-# expandshort FILE1 ... FILEn
-#
-# leaves previous versions as XXX~~
-#
-for f in $*
-do
-echo Expanding shorthands in $f. \ Backup file is $f~~
-mv $f $f~~; sed -e '
-s/^ba \([0-9]*\);/by (assume_tac \1);/
-s/^br \([^;]*\) \([0-9]*\);/by (rtac \1 \2);/
-s/^brs \([^;]*\) \([0-9]*\);/by (resolve_tac \1 \2);/
-s/^bd \([^;]*\) \([0-9]*\);/by (dtac \1 \2);/
-s/^bds \([^;]*\) \([0-9]*\);/by (dresolve_tac \1 \2);/
-s/^be \([^;]*\) \([0-9]*\);/by (etac \1 \2);/
-s/^bes \([^;]*\) \([0-9]*\);/by (eresolve_tac \1 \2);/
-s/^bw \([^;]*\);/by (rewtac \1);/
-s/^bws \([^;]*\);/by (rewrite_goals_tac \1);/
-s/dresolve_tac *\[\([a-zA-Z0-9_]*\)\] */dtac \1 /g
-s/eresolve_tac *\[\([a-zA-Z0-9_]*\)\] */etac \1 /g
-s/resolve_tac *\[\([a-zA-Z0-9_]*\)\] */rtac \1 /g
-s/rewrite_goals_tac *\[\([a-zA-Z0-9_]*\)\]\( *\)/rewtac \1\2/g
-' $f~~ > $f
-done
-echo Finished.
--- a/make-all Wed Jul 19 15:53:43 1995 +0200
+++ /dev/null Thu Jan 01 00:00:00 1970 +0000
@@ -1,180 +0,0 @@
-#! /bin/sh
-#
-#make-all: make all systems afresh
-
-# Creates gzipped log files called makeNNNN.log.gz on each subdirectory and
-# displays the last few lines of these files -- this indicates whether
-# the "make" failed (whether it terminated due to an error)
-
-# switches are
-# -noforce don't delete old databases/images first
-# -clean delete databases/images after use (leaving Pure)
-# -notest make databases/images w/o running the examples
-# -noexec don't execute, just check settings and Makefiles
-
-#Environment variables required:
-# ISABELLEBIN: the directory to hold Poly/ML databases or New Jersey ML images
-# ISABELLECOMP: the ML compiler
-
-# A typical shell script for /bin/sh is...
-# ML_DBASE=/usr/groups/theory/poly2.04/`arch`/ML_dbase
-# ISABELLEBIN=/homes/`whoami`/bin
-# ISABELLECOMP="poly -noDisplay"
-# export ML_DBASE ISABELLEBIN ISABELLECOMP
-# nohup make-all $*
-
-set -e #fail immediately upon errors
-
-# process command line switches
-CLEAN="off";
-FORCE="on";
-TEST="test";
-EXEC="on";
-NO="";
-for A in $*
-do
- case $A in
- -clean) CLEAN="on" ;;
- -noforce) FORCE="off" ;;
- -notest) TEST="" ;;
- -noexec) EXEC="off"
- NO="-n" ;;
- *) echo "Bad flag for make-all: $A"
- echo "Usage: make-all [-noforce] [-clean] [-notest] [-noexec]"
- exit ;;
- esac
-done
-
-echo Started at `date`
-echo Source=`pwd`
-echo Destination=${ISABELLEBIN?'No destination directory specified'}
-echo force=$FORCE ' ' clean=$CLEAN ' '
-echo Compiler=${ISABELLECOMP?'No compiler specified'}
-echo Running on `hostname`
-echo Log files will be called make$$.log.gz
-
-case $FORCE.$EXEC in
- on.on) (cd $ISABELLEBIN; rm -f Pure FOL ZF CCL LCF CTT LK Modal HOL HOLCF Cube FOLP)
-esac
-
-set +e #no longer fail upon errors -- e.g. if a "make" fails
-
-echo
-echo
-echo '*****Pure Isabelle*****'
-(cd Pure; make $NO > make$$.log)
-tail Pure/make$$.log
-gzip Pure/make$$.log
-
-echo
-echo
-echo '*****First-Order Logic (FOL)*****'
-(cd FOL; make $NO $TEST > make$$.log)
-tail FOL/make$$.log
-gzip FOL/make$$.log
-#cannot delete FOL yet... it is needed for ZF, CCL and LCF!
-
-echo
-echo
-echo '*****Set theory (ZF)*****'
-(cd ZF; make $NO $TEST > make$$.log)
-tail ZF/make$$.log
-gzip ZF/make$$.log
-case $CLEAN.$EXEC in
- on.on) rm $ISABELLEBIN/ZF
-esac
-
-echo
-echo
-echo '*****Classical Computational Logic (CCL)*****'
-(cd CCL; make $NO $TEST > make$$.log)
-tail CCL/make$$.log
-gzip CCL/make$$.log
-case $CLEAN.$EXEC in
- on.on) rm $ISABELLEBIN/CCL
-esac
-
-echo
-echo
-echo '*****Domain Theory (LCF)*****'
-(cd LCF; make $NO $TEST > make$$.log)
-tail LCF/make$$.log
-gzip LCF/make$$.log
-case $CLEAN.$EXEC in
- on.on) rm $ISABELLEBIN/FOL $ISABELLEBIN/LCF
-esac
-
-echo
-echo
-echo '*****Constructive Type Theory (CTT)*****'
-(cd CTT; make $NO $TEST > make$$.log)
-tail CTT/make$$.log
-gzip CTT/make$$.log
-case $CLEAN.$EXEC in
- on.on) rm $ISABELLEBIN/CTT
-esac
-
-echo
-echo
-echo '*****Classical Sequent Calculus (LK)*****'
-(cd LK; make $NO $TEST > make$$.log)
-tail LK/make$$.log
-gzip LK/make$$.log
-#cannot delete LK yet... it is needed for Modal!
-
-echo
-echo
-echo '*****Modal logic (Modal)*****'
-(cd Modal; make $NO $TEST > make$$.log)
-tail Modal/make$$.log
-gzip Modal/make$$.log
-case $CLEAN.$EXEC in
- on.on) rm $ISABELLEBIN/LK $ISABELLEBIN/Modal
-esac
-
-echo
-echo
-echo '*****Higher-Order Logic (HOL)*****'
-(cd HOL; make $NO $TEST > make$$.log)
-tail HOL/make$$.log
-gzip HOL/make$$.log
-#cannot delete HOL yet... it is needed for HOLCF!
-
-echo
-echo
-echo '*****LCF in HOL (HOLCF)*****'
-(cd HOLCF; make $NO $TEST > make$$.log)
-tail HOLCF/make$$.log
-gzip HOLCF/make$$.log
-case $CLEAN.$EXEC in
- on.on) rm $ISABELLEBIN/HOL $ISABELLEBIN/HOLCF
-esac
-
-echo
-echo
-echo '*****The Lambda-Cube (Cube)*****'
-(cd Cube; make $NO $TEST > make$$.log)
-case $CLEAN.$EXEC in
- on.on) rm $ISABELLEBIN/Cube
-esac
-tail Cube/make$$.log
-gzip Cube/make$$.log
-
-echo
-echo
-echo '*****First-Order Logic with Proof Terms (FOLP)*****'
-(cd FOLP; make $NO $TEST > make$$.log)
-case $CLEAN.$EXEC in
- on.on) rm $ISABELLEBIN/FOLP
-esac
-tail FOLP/make$$.log
-gzip FOLP/make$$.log
-
-case $TEST.$EXEC in
- test.on) echo
- echo '***** Now check the dates on the "test" files *****'
- ls -lrt FOL/test ZF/test CCL/test LCF/test CTT/test\
- LK/test Modal/test HOL/test HOLCF/test Cube/test\
- FOLP/test
-esac
-echo Finished at `date`
--- a/make-all-nj Wed Jul 19 15:53:43 1995 +0200
+++ /dev/null Thu Jan 01 00:00:00 1970 +0000
@@ -1,7 +0,0 @@
-#! /bin/sh
-#Make entire system using Standard ML of New Jersey
-#Pathnames will have to be modified for your site
-ISABELLEBIN=/homes/`whoami`/bin
-ISABELLECOMP=sml
-export ISABELLEBIN ISABELLECOMP
-nohup make-all $*
--- a/make-all-poly Wed Jul 19 15:53:43 1995 +0200
+++ /dev/null Thu Jan 01 00:00:00 1970 +0000
@@ -1,9 +0,0 @@
-#! /bin/sh
-#$Id$
-#Make entire system using Poly/ML
-#Pathnames will have to be modified for your site
-ML_DBASE=/usr/groups/theory/poly/polyml/`arch`/ML_dbase
-ISABELLEBIN=/homes/`whoami`/dbases
-ISABELLECOMP="poly -noDisplay -h 15000"
-export ML_DBASE ISABELLEBIN ISABELLECOMP
-nohup make-all $*
--- a/rm-logfiles Wed Jul 19 15:53:43 1995 +0200
+++ /dev/null Thu Jan 01 00:00:00 1970 +0000
@@ -1,5 +0,0 @@
-#! /bin/sh
-#rm-logfiles: remove useless files from subdirectories
-rm log */make*.log */make*.log.gz
-rm */test
-find . -name '.*.thy.ML' -print -exec rm {} \;
--- a/teeinput Wed Jul 19 15:53:43 1995 +0200
+++ /dev/null Thu Jan 01 00:00:00 1970 +0000
@@ -1,4 +0,0 @@
-#! /bin/sh
-# teeinput -- start a program and log all inputs to a file
-# environment variable $LISTEN specifies the file name
-tee -a -i $LISTEN | $*
\ No newline at end of file
--- a/xlisten Wed Jul 19 15:53:43 1995 +0200
+++ /dev/null Thu Jan 01 00:00:00 1970 +0000
@@ -1,10 +0,0 @@
-#! /bin/sh
-# xlisten -- start a program in one window and create a listener window
-# environment variable $LISTEN specifies the file name
-
-#create the file!
-date > $LISTEN
-
-xterm -geo 80x10+0+0 -T Listener -n Listener -e tail -f $LISTEN &
-sleep 2
-xterm -geo 80x45+0-0 -e teeinput $* &