src/LK/ROOT.ML
changeset 393 02b27671b899
parent 121 d392174734e9
child 1297 7ac266cf82d0
--- a/src/LK/ROOT.ML	Thu May 19 16:42:04 1994 +0200
+++ b/src/LK/ROOT.ML	Thu May 19 17:06:24 1994 +0200
@@ -10,8 +10,7 @@
 val banner = "Classical First-Order Sequent Calculus";
 writeln banner;
 
-structure Readthy = ReadthyFUN (structure ThySyn = ThySyn);
-open Readthy;
+init_thy_reader();
 
 print_depth 1;