src/HOL/UNITY/ROOT.ML

--- a/src/HOL/UNITY/ROOT.ML	Mon Nov 16 13:58:48 1998 +0100
+++ b/src/HOL/UNITY/ROOT.ML	Mon Nov 16 13:58:56 1998 +0100
@@ -27,6 +27,7 @@
 time_use_thy "Lift";
 time_use_thy "Comp";
 time_use_thy "Client";
+time_use_thy "PPROD";
 
 loadpath := "../Auth" :: !loadpath;  (*to find Public.thy*)
 use_thy"NSP_Bad";