obsolete;

--- a/src/Tools/agrep	Tue Sep 30 16:12:38 1997 +0200
+++ /dev/null	Thu Jan 01 00:00:00 1970 +0000
@@ -1,3 +0,0 @@
-#! /bin/csh
-grep "$*" */*.ML */*/*.ML TFL/*.sml TFL/*.sig TFL/examples/Subst/*.ML
-

--- a/src/Tools/change_simp	Tue Sep 30 16:12:38 1997 +0200
+++ /dev/null	Thu Jan 01 00:00:00 1970 +0000
@@ -1,21 +0,0 @@
-#! /bin/sh
-# $Id$
-#Assists in converting uses of the old simplifier (Isabelle-92 and earlier)
-#Usage:
-#    change_simp FILE1 ... FILEn
-#
-#Renames old versions of the files as FILE1~~ ... FILEn~~
-#
-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/src/Tools/conv-theory-files.pl	Tue Sep 30 16:12:38 1997 +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
-#						  ([e-mail])
-#---------------------------------------------------------------------
-
-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";}
-}
-